📄 渐变.dt
字号:
mov r25,a
i2_ret:
ret
;***************************************************
mode_j2:
bc r10,6 ;蓝灯渐灭 其余保持
inc r23
djz r25
jmp j2_ret
bs r11,6
bc p6,1
bs r1f,2
mov a,@80
mov r25,a
j2_ret:
ret
;***************************************************
mode_k2: ;绿灯渐亮 其余保持
bc r10,6
bc r11,5
dec r22
djz r25
jmp k2_ret
bs r1f,3
mov a,@80
mov r25,a
k2_ret:
ret
;***************************************************
mode_l2: ;红灯渐灭 其余保持
bc r10,6
inc r24
djz r25
jmp l2_ret
bs r11,7
bc p6,2
bs r1f,4
mov a,@80
mov r25,a
l2_ret:
ret
;****************************************************
;****************************************************
begin:
wdtc
mov a,@00011000b
iow ioc6
; mov a,@11111000b
; iow ioc5
; mov a,@11111100b
; mov p5,a
mov a,@00011000b
mov p6,a
mov a,@0xff
iow iocb ;下拉控制
;
mov a,@0x00
iow iocc ;漏极开路控制
;
mov a,@00000000b ;
iow iocd ;上拉控制
;
mov a,@0x80
iow ioce ;WDT控制器
mov a,@0x00
contw ;分频控制器
mov a,@160
mov tcc,a
mov a,@0x01
iow iocf ;中断屏蔽寄存器
clr r10
clr r11
clr r12
clr r13
clr r14
clr r15
clr r16
clr r17
clr r18
clr r20
clr r21
clr r22
clr r23
clr r24
clr r25
clr r26
clr r27
clr r28
clr r29
clr r1a
clr r1b
clr r1c
clr r1e
clr r1f
mov a,@100
mov r20,a
mov a,@02
mov r21,a
mov a,@20
mov r12,a
mov a,@04
mov r13,a
mov a,@02
mov r2e,a
mov a,@05
mov r2d,a
mov a,@81
mov r15,a
mov r17,a
mov r19,a
mov a,@80
mov r14,a
mov r16,a
mov r18,a
;****************************************
;装入密码
;**********************************************
loop:
; disi
wdtc
; nop
; nop
; jbs p6,4 ;电源50HZ同步信号
; jmp $-1
; jbc p6,4
;jmp $-1
; clr tcc
;*******************************************
eni
jbc r1a,0 ;绿灯亮
jmp s_1
bs r11,6
bs r11,7
mov a,@81
mov r23,a
mov r24,a
bc r11,5
mov a,@01
mov r22,a
call dealy_4s
; nop
;nop
mov a,@80
mov r25,a
bs r1a,0
s_1:
jbc r1a,1
jmp s_2
jbc r10,1 ;绿亮保持，蓝灯渐亮4s
call mode_a
; nop
; nop
jmp s_1
s_2:
jbc r1a,2
jmp s_3
jbc r10,1
call mode_b ;绿灯渐灭，蓝灯亮4s
;nop
; nop
jmp s_2
s_3: ;蓝灯亮保持
jbc r1a,3
jmp s_4
call dealy_4s
;nop
; nop
bs r1a,3
s_4: ;红灯渐亮 蓝亮保持
jbc r1a,4
jmp s_5
jbc r10,1
call mode_c
; nop
; nop
jmp s_4
s_5:
jbc r1a,5 ;红灯保持，蓝灯渐灭
jmp s_6
jbc r10,1
call mode_d
; nop
; nop
jmp s_5
s_6:
jbc r1a,6
jmp s_7
call dealy_4s ;红灯保持
; nop
; nop
bs r1a,6
s_7: ;绿灯渐亮
jbc r1a,7
jmp s_8
jbc r10,1
call mode_e
; nop
; nop
jmp s_7
s_8:
jbc r1b,0 ;红灯渐灭 绿灯保持
jmp s_9
jbc r10,1
call mode_f
;nop
; nop
jmp s_8
s_9:
; jbc r1b,1
; jmp s_10
call dealy_4s ;绿灯保持亮
; nop
; nop
; bs r1b,1
s_10:
jbc r1b,2 ;红蓝渐亮 绿保持亮
jmp s_11
jbc r10,1
call mode_g
; nop
; nop
jmp s_10
s_11:
jbc r1b,3 ;红绿渐灭 蓝灯保持亮
jmp s_12
jbc r10,1
call mode_h
;nop
; nop
jmp s_11
s_12:
jbc r1b,4 ;蓝灯保持亮
jmp s_13
call dealy_4s
; nop
; nop
bs r1b,4
s_13:
jbc r1b,5 ;红灯渐亮 其余保持
jmp s_14
jbc r10,1
call mode_i
;nop
;nop
jmp s_13
s_14:
jbc r1b,6 ;蓝灯渐灭 其余保持
jmp s_15
jbc r10,1
call mode_j
; nop
; nop
jmp s_14
s_15:
jbc r1b,7 ;红灯保持亮
jmp s_16
call dealy_4s
; nop
; nop
bs r1b,7
s_16:
jbc r1c,0 ;绿灯渐亮 其余保持
jmp s_17
jbc r10,1
call mode_k
; nop
; nop
jmp s_16
s_17:
jbc r1c,1 ;红灯渐灭 其余保持
jmp s_18
jbc r10,1
call mode_l
; nop
; nop
jmp s_17
s_18:
disi
bc p6,1
bc p6,2
call dealy_2s ;绿灯保持亮2秒
; nop
; nop
bs p6,1
bc p6,0
bc p6,2
call dealy_2s
; nop
; nop
bs p6,2
bc p6,0
bc p6,1
call dealy_2s
; nop
; nop
bs p6,0
bs p6,1
bc p6,2
call dealy_2s
; nop
; nop
bs p6,2
bs p6,1
bc p6,0
call dealy_2s
; nop
; nop
bs p6,2
bs p6,0
bc p6,1
call dealy_2s
; nop
; nop
bs p6,0
bs p6,1
bs p6,2
call dealy_2s
; nop
; nop
djz r2e
jmp s_18
mov a,@02
mov r2e,a
bc p6,0
bc p6,1
bc p6,2
eni
;888888888888888888888888888888888888888888888888888888888888
s_19:
;jbc r1e,0 ;绿灯亮
; jmp s_1a
bs r11,7
bs r11,6
mov a,@81
mov r23,a
mov r24,a
bc r11,5
mov a,@01
mov r22,a
call dealy_2s
; nop
; nop
mov a,@80
mov r25,a
; bs r1e,0
s_1a:
jbc r1e,0
jmp s_2a
jbc r10,6 ;绿亮保持，蓝灯渐亮4s
call mode_a2
;nop
; nop
jmp s_1a
s_2a:
jbc r1e,1
jmp s_3a
jbc r10,6
call mode_b2 ;绿灯渐灭，蓝灯亮4s
; nop
; nop
jmp s_2a
s_3a: ;蓝灯亮保持
;jbc r1a,3
; jmp s_4a
call dealy_2s
nop
nop
;bs r1a,3
s_4a: ;红灯渐亮 蓝亮保持
jbc r1e,3
jmp s_5a
jbc r10,6
call mode_c2
; nop
; nop
jmp s_4a
s_5a:
jbc r1e,4 ;红灯保持，蓝灯渐灭
jmp s_6a
jbc r10,6
call mode_d2
; nop
; nop
jmp s_5a
s_6a:
; jbc r1e,5
; jmp s_7a
call dealy_2s ;红灯保持
; nop
; nop
; bs r1a,6
s_7a: ;绿灯渐亮
jbc r1e,5
jmp s_8a
jbc r10,6
call mode_e2
nop
nop
jmp s_7a
s_8a:
jbc r1e,6 ;红灯渐灭 绿灯保持
jmp s_9a
jbc r10,6
call mode_f2
; nop
; nop
jmp s_8a
s_9a:
; jbc r1b,1
; jmp s_10a
call dealy_2s ;绿灯保持亮
; nop
; nop
; bs r1b,1
s_10a:
jbc r1e,7 ;红蓝渐亮 绿保持亮
jmp s_11a
jbc r10,6
call mode_g2
nop
nop
jmp s_10a
s_11a:
jbc r1f,0 ;红绿渐灭 蓝灯保持亮
jmp s_12a
jbc r10,6
call mode_h2
; nop
; nop
jmp s_11a
s_12a:
; jbc r1b,4 ;蓝灯保持亮
; jmp s_13a
call dealy_2s
; nop
; nop
;bs r1b,4
s_13a:
jbc r1f,1 ;红灯渐亮 其余保持
jmp s_14a
jbc r10,6
call mode_i2
; nop
; nop
jmp s_13a
s_14a:
jbc r1f,2 ;蓝灯渐灭 其余保持
jmp s_15a
jbc r10,6
call mode_j2
; nop
; nop
jmp s_14a
s_15a:
;jbc r1b,7 ;红灯保持亮
;jmp s_16a
call dealy_2s
; bs r1b,7
s_16a:
jbc r1f,3 ;绿灯渐亮 其余保持
jmp s_17a
jbc r10,6
call mode_k2
; nop
; nop
jmp s_16a
s_17a:
jbc r1f,4 ;红灯渐灭 其余保持
jmp s_18a
jbc r10,6
call mode_l2
; nop
; nop
jmp s_17a
s_18a:
disi
bs p6,0
bc p6,1
bc p6,2
call dealy_1s ;绿灯保持亮2秒
; nop
; nop
bs p6,1
bc p6,1
bc p6,2
call dealy_1s
; nop
; nop
bs p6,2
bc p6,0
bc p6,1
call dealy_1s
; nop
; nop
bs p6,0
bs p6,1
bc p6,0
call dealy_1s
; nop
; nop
bs p6,2
bs p6,1
bc p6,0
call dealy_1s
; nop
; nop
bs p6,2
bs p6,0
bc p6,1
call dealy_1s
; nop
; nop
bs p6,0
bs p6,1
bs p6,2
call dealy_1s
; nop
; nop
djz r2e
jmp s_18a
mov a,@02
mov r2e,a
bc p6,0
bc p6,1
bc p6,2
clr r1a
clr r1b
clr r1c
clr r1e
clr r1f
eni
jmp loop
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -