📄 ledv1_f398.dt
字号:
jbc Sys_Status,F_Sta
ret
mov a,@0b00000100
mov H2L_port,a ;From High To Low
mov a,@0b00010100
mov L2H_port,a ;From Low To High
call PWM
LedStatus05_4:;red 5, green 4, blue 2
jbc Sys_Status,F_Sta
ret
mov a,@0b00010100
mov H2L_port,a ;From High To Low
mov a,@0b00010000
mov L2H_port,a ;From Low To High
call PWM
LedStatus05_5:;red 5, green 4, blue 2
jbc Sys_Status,F_Sta
ret
mov a,@0b00010000
mov H2L_port,a ;From High To Low
mov a,@0b00110000
mov L2H_port,a ;From Low To High
call PWM
LedStatus05_6:;red 5, green 4, blue 2
jbc Sys_Status,F_Sta
ret
mov a,@0b00110000
mov H2L_port,a ;From High To Low
mov a,@0b00100000
mov L2H_port,a ;From Low To High
call PWM
jmp LedStatus05_1
;============================================;
LedStatus06:
bc Sys_Status,F_Sta
bs Sys_Status_T,F_4s
LedStatus06_loop:
call LedStatus06_1
jbc Sys_Status,F_Sta
jmp LedStatus07
jmp LedStatus06_loop
;---------------------------------------
LedStatus06_1:;red 5, green 4, blue 2
jbc Sys_Status,F_Sta
ret
mov a,@0b00100000
mov H2L_port,a ;From High To Low
mov a,@0b00110000
mov L2H_port,a ;From Low To High
call PWM
LedStatus06_2:;red 5, green 4, blue 2
jbc Sys_Status,F_Sta
ret
mov a,@0b00110000
mov H2L_port,a ;From High To Low
mov a,@0b00010000
mov L2H_port,a ;From Low To High
call PWM
LedStatus06_3:;red 5, green 4, blue 2
jbc Sys_Status,F_Sta
ret
mov a,@0b00010000
mov H2L_port,a ;From High To Low
mov a,@0b00010100
mov L2H_port,a ;From Low To High
call PWM
LedStatus06_4:;red 5, green 4, blue 2
jbc Sys_Status,F_Sta
ret
mov a,@0b00010100
mov H2L_port,a ;From High To Low
mov a,@0b00000100
mov L2H_port,a ;From Low To High
call PWM
LedStatus06_5:;red 5, green 4, blue 2
jbc Sys_Status,F_Sta
ret
mov a,@0b00000100
mov H2L_port,a ;From High To Low
mov a,@0b00100100
mov L2H_port,a ;From Low To High
call PWM
LedStatus06_6:;red 5, green 4, blue 2
jbc Sys_Status,F_Sta
ret
mov a,@0b00100100
mov H2L_port,a ;From High To Low
mov a,@0b00100000
mov L2H_port,a ;From Low To High
call PWM
jmp LedStatus06_1
;============================================;
LedStatus07:
bs Sys_Status_T,F_2s
bc Sys_Status_T,F_4s
bc Sys_Status,F_Sta
LedStatus07_loop:
call LedStatus05_1
jbc Sys_Status,F_Sta
jmp LedStatus08
jmp LedStatus07_loop
;============================================;
LedStatus08:
bc Sys_Status,F_Sta
bs Sys_Status_T,F_2s
LedStatus08_loop:
call LedStatus06_1
jbc Sys_Status,F_Sta
jmp LedStatus09
jmp LedStatus08_loop
;============================================;
LedStatus09:
bc Sys_Status_T,F_2s
bs Sys_Status_T,F_1s
bc Sys_Status,F_Sta
LedStatus09_loop:
call LedStatus05_1
jbc Sys_Status,F_Sta
jmp LedStatus10
jmp LedStatus09_loop
;============================================;
LedStatus10:
bc Sys_Status,F_Sta
bs Sys_Status_T,F_1s
LedStatus10_loop:
call LedStatus06_1
jbc Sys_Status,F_Sta
jmp LedStatus11
jmp LedStatus10_loop
;============================================;
LedStatus11:
bc Sys_Status,F_Sta
bc Sys_Status_T,F_1s
bs Sys_Status_T,F_2s
LedStatus11_1:;red 5, green 4, blue 2
jbc Sys_Status,F_Sta
jmp LedStatus12
mov a,@0b00000000
mov H2L_port,a ;From High To Low
mov a,@0b00100000
mov L2H_port,a ;From Low To High
call PWM
LedStatus11_2:;red 5, green 4, blue 2
jbc Sys_Status,F_Sta
jmp LedStatus12
mov a,@0b00100000
mov H2L_port,a ;From High To Low
mov a,@0b00000000
mov L2H_port,a ;From Low To High
call PWM
LedStatus11_3:;red 5, green 4, blue 2
jbc Sys_Status,F_Sta
jmp LedStatus12
mov a,@0b00000000
mov H2L_port,a ;From High To Low
mov a,@0b00010000
mov L2H_port,a ;From Low To High
call PWM
LedStatus11_4:;red 5, green 4, blue 2
jbc Sys_Status,F_Sta
jmp LedStatus12
mov a,@0b00010000
mov H2L_port,a ;From High To Low
mov a,@0b00000000
mov L2H_port,a ;From Low To High
call PWM
LedStatus11_5:;red 5, green 4, blue 2
jbc Sys_Status,F_Sta
jmp LedStatus12
mov a,@0b00000000
mov H2L_port,a ;From High To Low
mov a,@0b00000100
mov L2H_port,a ;From Low To High
call PWM
LedStatus11_6:;red 5, green 4, blue 2
jbc Sys_Status,F_Sta
jmp LedStatus12
mov a,@0b00000100
mov H2L_port,a ;From High To Low
mov a,@0b00000000
mov L2H_port,a ;From Low To High
call PWM
jmp LedStatus11_1
;============================================;
LedStatus12:
bc Sys_Status,F_Sta
bc Sys_Status_T,F_2s
LedStatus12_1:
jbc Sys_Status,F_Sta
jmp LedStatus13
mov a,@0b00100000;red 5, green 4, blue 2
call LedStatus12_loop
LedStatus12_2:
jbc Sys_Status,F_Sta
jmp LedStatus13
mov a,@0b00010000;red 5, green 4, blue 2
call LedStatus12_loop
LedStatus12_3:
jbc Sys_Status,F_Sta
jmp LedStatus13
mov a,@0b00000100;red 5, green 4, blue 2
call LedStatus12_loop
jmp LedStatus12_1
LedStatus12_loop:
mov r6,a
jbs Sys_Status_s,F_38s
jmp LedStatus12_loop
bc Sys_Status_s,F_38s
ret
;============================================;
LedStatus13:
bc Sys_Status,F_Sta
LedStatus13_1:
jbc Sys_Status,F_Sta
jmp LedStatus14
mov a,@0b00100000;red 5, green 4, blue 2
call LedStatus12_loop
LedStatus13_2:
jbc Sys_Status,F_Sta
jmp LedStatus14
mov a,@0b00000100;red 5, green 4, blue 2
call LedStatus12_loop
LedStatus13_3:
jbc Sys_Status,F_Sta
jmp LedStatus14
mov a,@0b00010000;red 5, green 4, blue 2
call LedStatus12_loop
jmp LedStatus13_1
;============================================;
LedStatus14:
bc Sys_Status,F_Sta
LedStatus14_1:
jbc Sys_Status,F_Sta
jmp LedStatus15
mov a,@0b00100000;red 5, green 4, blue 2
call LedStatus14_loop
LedStatus14_2:
jbc Sys_Status,F_Sta
jmp LedStatus15
mov a,@0b00010000;red 5, green 4, blue 2
call LedStatus14_loop
LedStatus14_3:
jbc Sys_Status,F_Sta
jmp LedStatus15
mov a,@0b00000100;red 5, green 4, blue 2
call LedStatus14_loop
jmp LedStatus14_1
LedStatus14_loop:
mov r6,a
jbs Sys_Status_s,F_64s
jmp LedStatus14_loop
bc Sys_Status_s,F_64s
ret
;============================================;
LedStatus15:
bc Sys_Status,F_Sta
LedStatus15_1:
jbc Sys_Status,F_Sta
jmp LedStatus16
mov a,@0b00100000;red 5, green 4, blue 2
call LedStatus14_loop
LedStatus15_2:
jbc Sys_Status,F_Sta
jmp LedStatus16
mov a,@0b00000100;red 5, green 4, blue 2
call LedStatus14_loop
LedStatus15_3:
jbc Sys_Status,F_Sta
jmp LedStatus16
mov a,@0b00010000;red 5, green 4, blue 2
call LedStatus14_loop
jmp LedStatus15_1
;============================================;
LedStatus16:
bc Sys_Status,F_Sta
LedStatus16_1:
jbc Sys_Status,F_Sta
jmp LedStatus17
mov a,@0b00100000;red 5, green 4, blue 2
call LedStatus16_loop
LedStatus16_2:
jbc Sys_Status,F_Sta
jmp LedStatus17
mov a,@0b00010000;red 5, green 4, blue 2
call LedStatus16_loop
LedStatus16_3:
jbc Sys_Status,F_Sta
jmp LedStatus17
mov a,@0b00000100;red 5, green 4, blue 2
call LedStatus16_loop
jmp LedStatus16_1
LedStatus16_loop:
mov r6,a
jbs Sys_Status_s,F_128s
jmp LedStatus16_loop
bc Sys_Status_s,F_128s
ret
;============================================;
LedStatus17:
bc Sys_Status,F_Sta
LedStatus17_1:
jbc Sys_Status,F_Sta
jmp LedStatus18
mov a,@0b00100000;red 5, green 4, blue 2
call LedStatus16_loop
LedStatus17_2:
jbc Sys_Status,F_Sta
jmp LedStatus18
mov a,@0b00000100;red 5, green 4, blue 2
call LedStatus16_loop
LedStatus17_3:
jbc Sys_Status,F_Sta
jmp LedStatus18
mov a,@0b00010000;red 5, green 4, blue 2
call LedStatus16_loop
jmp LedStatus17_1
;============================================;
LedStatus18:
bc Sys_Status,F_Sta
LedStatus18_1:
jbc Sys_Status,F_Sta
jmp LedStatus19
mov a,@0b00100000;red 5, green 4, blue 2
call LedStatus18_loop
LedStatus18_2:
jbc Sys_Status,F_Sta
jmp LedStatus19
mov a,@0b00010000;red 5, green 4, blue 2
call LedStatus18_loop
LedStatus18_3:
jbc Sys_Status,F_Sta
jmp LedStatus19
mov a,@0b00000100;red 5, green 4, blue 2
call LedStatus18_loop
jmp LedStatus18_1
LedStatus18_loop:
mov r6,a
jbs Sys_Status_s,F_256s
jmp LedStatus18_loop
bc Sys_Status_s,F_256s
ret
;============================================;
LedStatus19:
bc Sys_Status,F_Sta
LedStatus19_1:
jbc Sys_Status,F_Sta
jmp LedStatus20
mov a,@0b00100000;red 5, green 4, blue 2
call LedStatus18_loop
LedStatus19_2:
jbc Sys_Status,F_Sta
jmp LedStatus20
mov a,@0b00000100;red 5, green 4, blue 2
call LedStatus18_loop
LedStatus19_3:
jbc Sys_Status,F_Sta
jmp LedStatus20
mov a,@0b00010000;red 5, green 4, blue 2
call LedStatus18_loop
jmp LedStatus19_1
;============================================;
LedStatus20:
bc Sys_Status,F_Sta
LedStatus20_1:
bs r6,red
bc r6,green
bc r6,blue
jbc Sys_Status,F_Sta
jmp LedStatus21
jmp LedStatus20_1
;============================================;
LedStatus21:
bc Sys_Status,F_Sta
LedStatus21_1:
bc r6,red
bs r6,green
bc r6,blue
jbc Sys_Status,F_Sta
jmp LedStatus22
jmp LedStatus21_1
;============================================;
LedStatus22:
bc Sys_Status,F_Sta
LedStatus22_1:
bc r6,red
bc r6,green
bs r6,blue
jbc Sys_Status,F_Sta
jmp LedStatus23
jmp LedStatus22_1
;============================================;
LedStatus23:
bc Sys_Status,F_Sta
LedStatus23_1:
bs r6,red
bs r6,green
bc r6,blue
jbc Sys_Status,F_Sta
jmp LedStatus24
jmp LedStatus23_1
;============================================;
LedStatus24:
bc Sys_Status,F_Sta
LedStatus24_1:
bs r6,red
bc r6,green
bs r6,blue
jbc Sys_Status,F_Sta
jmp LedStatus25
jmp LedStatus24_1
;============================================;
LedStatus25:
bc Sys_Status,F_Sta
LedStatus25_1:
bc r6,red
bs r6,green
bs r6,blue
jbc Sys_Status,F_Sta
jmp LedStatus26
jmp LedStatus25_1
;============================================;
LedStatus26:
bc Sys_Status,F_Sta
LedStatus26_1:
bs r6,red
bs r6,green
bs r6,blue
jbc Sys_Status,F_Sta
jmp LedStatus27
jmp LedStatus26_1
;============================================;
LedStatus27:
bc Sys_Status,F_Sta
LedStatus27_1:
clr r6
jbc Sys_Status,F_Sta
jmp LedStatus01
jmp LedStatus27_1
;============================================;
;********************************************;
;============================================;
Pwm:
clr high
clr pwm_temp
pwm_on_off:
mov a,High
mov High_T,a
xor a,@0
jbc status,z
jmp pwm_off_on
mov a,r6_LH
mov r6,a
pwm_on_off_loop:
inc PWM_T
jbs PWM_T,4;5;6
jmp pwm_on_off_loop
clr PWM_T
djz High_T
jmp pwm_on_off_loop
; clr r6
pwm_off_on:
mov a,high
sub a,@140
mov low_t,a
mov a,r6_HL
mov r6,a
pwm_off_on_loop:
inc PWM_T
jbs PWM_T,4;1=6;2=5;3=7
jmp pwm_off_on_loop
clr PWM_T
djz Low_T
jmp pwm_off_on_loop
; clr r6
jbc Sys_Status_T,F_1s
jmp pwm_F1s
jbc Sys_Status_T,F_2s
jmp pwm_F2s
pwm_F4s:
jbs Sys_Status_T,F_20ms
jmp pwm_on_off
bc Sys_Status_T,F_20ms
inca pwm_temp
xor a,@198
jbc status,z
ret
inc pwm_temp
inca pwm_temp
call pwm_table
mov high,a
jmp pwm_on_off
;============================================;
pwm_F1s:
jbs Sys_Status_T,F_5ms
jmp pwm_on_off
bc Sys_Status_T,F_5ms
inca pwm_temp
xor a,@198
jbc status,z
ret
inc pwm_temp
inca pwm_temp
call pwm_table
mov high,a
jmp pwm_on_off
pwm_F2s:
jbs Sys_Status_T,F_10ms
jmp pwm_on_off
bc Sys_Status_T,F_10ms
inca pwm_temp
xor a,@198
jbc status,z
ret
inc pwm_temp
inca pwm_temp
call pwm_table
mov high,a
jmp pwm_on_off
;============================================;
;********************************************;
;============================================;
/*
;============================================;
;============================================;
LedStatus12_loop0:
mov a,Event_Counter1
add pc,a
jmp LedStatus12_1
jmp LedStatus12_2
jmp LedStatus12_3
inc Times29
clr Event_Counter1
jmp LedStatus12_loop0
;============================================;
LedStatus13_loop0:
mov a,Event_Counter1
add pc,a
jmp LedStatus13_1
jmp LedStatus13_2
jmp LedStatus13_3
clr Event_Counter1
jmp LedStatus13_loop0
;============================================;
LedStatus28_loop0:
mov a,Event_Counter1
add pc,a
jmp LedStatus28_1
jmp LedStatus28_2
jmp LedStatus28_3
jmp LedStatus28_4
jmp LedStatus28_5
jmp LedStatus28_6
clr Event_Counter1
jmp LedStatus28_loop0
;============================================;
Table29:
mov a,Event29
add pc,a
retl @200
retl @100
retl @50
retl @30
jmp LedStatus12_loop0
;============================================;
LedStatus28:
jbc Sys_Status,F_Init
jmp LedStatus28_loop0
mov a,@100 ;0.38s
mov AC_Time,a
bs Sys_Status,F_Init
jmp LedStatus28_loop0
LedStatus28_1:
bs r6,red
bc r6,green
bc r6,blue
jmp main
LedStatus28_2:
bc r6,red
bs r6,green
bc r6,blue
jmp main
LedStatus28_3:
bc r6,red
bc r6,green
bs r6,blue
jmp main
LedStatus28_4:
bs r6,red
bs r6,green
bs r6,blue
jmp main
LedStatus28_5:
bs r6,red
bs r6,green
bs r6,blue
jmp main
LedStatus28_6:
bs r6,red
bs r6,green
bs r6,blue
jmp main
;============================================;
LedStatus29:
jbc Sys_Status,F_Init
jmp LedStatus29_loop
mov a,@200 ;0.38s
mov AC_Time,a
clr Times29
bs Sys_Status,F_Init
jmp LedStatus12_loop0
LedStatus29_loop:
mov a,Times29
sub a,@2
jbc status,c
jmp LedStatus12_loop0
clr Times29
inc Event29
call Table29
mov AC_Time,a
jmp LedStatus12_loop0
;-----------------------------------------*/
jmp System_Initialize
;============================================;
eop⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -