【正文】 s EQU 3CH 。50ms時(shí)基 L_300ms EQU 6 。300ms時(shí)間，50ms為時(shí)基 L_2500ms EQU 50 。，50ms為時(shí)基 L_1s EQU 20 。1s時(shí)間，50ms為時(shí)基 L_15s EQU 15 。15s時(shí)間，1s為時(shí)基 Step_D EQU Step_C EQU Step_B EQU Step_A EQU //系統(tǒng)初始化sys_init:sys_init_oscm: clr oscm 。work in normal modesys_init_ram: b0mov y, 00h b0mov z, 2fhsys_init_ram10: clr @yz decms z jmp sys_init_ram10 clr @yzsys_init_tc0: b0bclr ftc0irq b0bclr ftc0ien mov_ tc0c, L_50ms mov tc0r, a mov a,10000100b 。Fcpu/256,使能tc0,自動(dòng)裝載 mov tc0m, asys_init_io: b0bclr mov a, 00001101b b0mov p1m, a b0mov p1ur,a clr p0 clr p1 clr p2 clr p5 mov a, 0ffh b0mov p2m, a b0mov p5m, a b0mov p5ur, asys_init90: ret//程序預(yù)處理sys_premain: mov_ R_1s, L_1s mov_ Rwk01, 7 ret//分時(shí)時(shí)間處理sys_intgnd: bts1 Ftc0irq jmp sys_intgnd90 bclr Ftc0irq call timechat0 call timechat1 decms R_1s jmp sys_intgnd90 mov_ R_1s, L_1s call timechat2sys_intgnd90: rettimechat0: mov a, R_300ms cmprs a, 00h decms R_300ms jmp timechat0_90 mov_ R_300ms, L_300ms bset Fledtimechat0_90: rettimechat1: mov a, R_2500ms cmprs a, 00h decms R_2500ms jmp timechat1_90 mov_ R_2500ms, L_2500ms bset Fsteptimechat1_90: rettimechat2: bts0 FopenPM jmp timechat2_90 bts1 FP00 jmp timechat2_10 bts0 Ffirst 。是否第一次 jmp $+3 mov_ R_15s, L_15s bset Ffirst mov a, R_15s decms R_15s jmp timechat2_90 bset FopenPM mov_ R_2500ms, L_2500ms mov_ R_300ms, L_300ms 。led循環(huán)閃爍timechat2_10: bclr Ffirsttimechat2_90: ret//步進(jìn)電機(jī)工作處理motor: bts1 FopenPM jmp motor90 bts1 Fstep jmp motor90 bclr Fstep b0mov a, stept bts0 Fdirection jmp motor20 。反轉(zhuǎn)motor10: @jmp_a 8 jmp motor10_10 jmp motor10_20 jmp motor10_30 jmp motor10_40 jmp motor10_50 jmp motor10_60 jmp motor10_70 jmp motor10_80 motor10_10: bset Step_A 。A bclr Step_B bclr Step_C bclr Step_D jmp motor10_100motor10_20: bset Step_A 。AB bset Step_B bclr Step_C bclr Step_D jmp motor10_100motor10_30: bclr Step_A 。B bset Step_B bclr Step_C bclr Step_D jmp motor10_100motor10_40: bclr Step_A 。BC bset Step_B bset Step_C bclr Step_D jmp motor10_100motor10_50: bclr Step_A 。C bclr Step_B bset Step_C bclr Step_D jmp motor10_100 motor10_60: bclr Step_A 。CD bclr Step_B bset Step_C bset Step_D jmp motor10_100motor10_70: bclr Step_A 。D bclr Step_B bclr Step_C bset Step_D jmp motor10_100motor10_80: bset Step_A 。DA bclr Step_B bclr Step_C bset Step_D motor10_100: incms stept mov a, stept cmprs a, 08h jmp motor90 clr stept bset F4step jmp motor90motor20: @jmp_a 8 jmp motor20_10 jmp motor20_20 jmp motor20_30 jmp motor20_40 jmp motor20_50 jmp motor20_60 jmp motor20_70 jmp motor20_80 motor20_10: bclr Step_A 。D bclr Step_B bclr Step_C bset Step_D jmp motor10_100motor20_20: bclr Step_A 。DC bclr Step_B bset Step_C bset Step_D jmp motor10_100motor20_30: bclr Step_A 。C bclr Step_B bset Step_C bclr Step_D jmp motor10_100motor20_40: bclr Step_A 。CB bset Step_B bset Step_C bclr Step_D jmp motor10_100motor20_50: bclr Step_A 。B bset Step_B bclr Step_C bclr Step_D jmp motor10_100 motor20_60: bset Step_A 。BA bset Step_B bclr Step_C bclr Step_D jmp motor10_100motor20_70: bset Step_A 。A bclr Step_B bclr Step_C bclr Step_D jmp motor10_100motor20_80: bset Step_A 。AD bclr Step_B bclr Step_C bset Step_D jmp motor10_100motor90: ret//關(guān)機(jī)處理Work_over: bclr Step_A bclr Step_B bclr Step_C bclr Step_D b0bclr FopenPM 。清開機(jī)標(biāo)志 clr p2 ret//APP事件處理app: bts1 FopenPM jmp app90 bts0 Fdirection jmp app20 。反轉(zhuǎn)app10: 。正轉(zhuǎn) bts1 Fp00 jmp app60 bts1 Fset 。之前是否有無人標(biāo)志 jmp $+3 bclr Fset jmp app20 bts0 Fset1 。判斷是否有人 jmp app20 bset Fset1 mov_ R_led1,Rwk00 。保存有人時(shí)的位置app20: bts1 F4step jmp app90 bclr F4step incms Rwk00 mov a, Rwk00 cmprs a, 6 jmp app90 clr Rwk00 。旋轉(zhuǎn)完180176。app30: bts0 Fdirection jmp app50 bset Fdirection 。反轉(zhuǎn) bts0 Fset 。是否有無人標(biāo)記 jmp app40 mov_ R_led0, 7app40: mov_ Rwk01, R_led0 mov_ Rwk02, R_led1 jmp app90app50: bclr Fdirection 。正轉(zhuǎn) bts0 fp00 。是否有人在范圍內(nèi) jmp $+3 bts1 Fset1 。是否有有人的標(biāo)記 jmp app80 。沒有，關(guān)機(jī) bclr Fset bclr Fset1 jmp app90 app60: b0bts1 Fset1 jmp app20 b0bts0 Fset 。是否有無人標(biāo)記 jmp app20 b0bset Fset mov_ R_led0,Rwk00 。保存沒人時(shí)的位置角度 incms R_led0 jmp app20 app80: call Work_over 。關(guān)機(jī) clr Rwk02 mov_ Rwk01, 7app90: ret//LED模擬風(fēng)扇旋轉(zhuǎn)led_show: bts1 FopenPM jmp led_show90 b0mov a, ledt @jmp_a 7 jmp led_show00 jmp led_show10 jmp led_show20 jmp led_show30 jmp led_show40 jmp led_show50 jmp led_show60led_show00: mov a, 00h 。0176。 jmp led_show70led_show10: mov a, 01h 。30176。 jmp led_show70 led_show20: mov a, 02h 。60176。 jmp led_show70led_show30: mov a, 04h 。90176。 jmp led_show70led_show40: mov a, 08h 。120176。 jmp led_show70led_show50: mov a, 10h 。150176。 jmp led_show70led_show60: mov a, 20h 。180176。 led_show70: mov p2,a bts1 Fled 。300ms時(shí)間 jmp led_show90 bclr Fled incms ledt mov a, ledt cjae a, Rwk01, led_show80 jmp led_show90led_show80: mov_ ledt, Rwk02 jmp led_show90led_show90: ret53