Programación SAP
¿Zheng? ¿EQU? 30 horas
¿Fan? ¿EQU? 31H
¿No? ¿EQU? 32 horas
¿Como? ¿EQU? 33H
SS? ¿EQU? ¿34H
ORG? 00H?
¿AJMP? Principal
ORG03H
AJMP? SUB_INT0
ORG30H
Maestro: ¿MOV? 10H, #01H
¿MOV? 11H, #03H
¿MOV? 12H, #02H
¿MOV? 13H, #06H
¿MOV? 14H, #04H
¿MOV? 15H, #0CH
¿MOV? 16H, #08H
¿MOV? 17H, #09H
¿MOV? 20H, #50
¿MOV? 21H, #25
¿MOV? 22H, #10
¿MOV? 23H, #05
¿CLR? Zheng
CLR? ¿Ventilador
CLR? ¿Sin
CLR? ¿Te gusta
CLR? Santo
¿MOV? R1, #20H
¿MOV? a,@R1
¿MOV? R5, ¿A
MOV? es decir, #1000001B
¿SETB? IT0
¿MOV? R0, #0FH
Bucle: ¿JNB? Zheng Records
¿Llamar? Ir
Larry Page: ¿JNB? Ventilador de circulación
¿Llamar? Volver
¿AJMP? Anillo
;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ~~~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ (interrupción)
SUB_INT0:
Escanear: ¿MOV? a, P0
CPL? ¿A
ANL? a,#00011111B
JNZ? ¿Escanear 1
AJMP? Escanear
ESCANEAR1:? ¿Llamar? Retraso 1
¿MOV? a, P0
CPL? ¿A
ANL? a,#00011111B
¿JZ? Escanear
¿Llamar? ¿RDCLAVE?
Reti
RDKEY:? MOV? a, P0
JNB? ¿Acelerar 0, detener
JNB? Anexo 2, versión revisada
¿JNB? ¿ACC.1 para
JNB? Acelera 3, acelera
¿JNB? ACC.4, subespecie
Descontinuado por: SETBNO
Remojado en agua para ablandar
Para:? ¿SETB? Zheng
Remojado en agua para suavizarlo
REV:? ¿SETB? Ventilador
Remojado en agua para suavizar
SETB? Como
remojado en agua para suavizar
Subespecie: ¿SETB? Santo
Remojado en agua para suavizar
; ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ (rotación hacia adelante)
GO: CLR? Zheng
CLR? ¿Ventilador
CLR? ¿Sin
CLR? Me gusta
>
¿CLR? Salvia
INC? R0
¿MOV? a, R0
CJNE? a#18H,GO2
¿MOV? R0, #10H
GO2:? MOV? P2,@R0
¿MOV? a,@R1
¿MOV? R5,A?
¿Llamar? Retraso
¿JB? No, regresa
¿JB? Zheng, vuelve
¿JB? Fan, ¿regresas?
¿JNB? SS, GO3
¿Llamar? Jane
GO3:? JNB? Componente, GO4
¿Llamar? Jia (apellido chino)
GO4:? ¿AJMP? Ir
;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ~~~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~(Reversa)
Respuesta: ¿CLR? Zheng
CLR? ¿Ventilador
CLR? ¿No?
¿CLR? ¿Te gusta
CLR? ¿SS?
¿Diciembre? R0
¿MOV? a, R0
CJNE? Respuesta: Oh, TT
¿MOV? R0, #17H
¿SJMP? VOLVER2
TT: ¿CJNE? a, #0FH, ATRÁS2
¿MOV? R0, #17H
VOLVER2:? MOV? P2,@R0
¿MOV? a,@R1
¿MOV? R5, ¿Una
llamada? Retraso
¿JB? No, regresa
¿JB? Zheng, vuelve
¿JB? Fan, ¿regresas?
¿JNB? Componente, atrás 3
¿Llamar? Jia (apellido chino)
VOLVER3:? JNB? SS, atrás 4
¿Llamar? Jane
VOLVER4:? ¿AJMP? Volver
;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ~~~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~(aceleración)
Jia:? MOV? 1. R1
¿CJNE? a, #23H, JIA1
Remojado en agua para suavizar
JIA1: INC? R1
Remojar en agua para suavizar
; ~ ~ ~ ~ ~ ~ ~ ~~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ (más despacio)
Jian: ¿En serio? 1. R1
¿CJNE? a, #20H, JIAN1
Remojado en agua para suavizar
JIAN1:? ¿Diciembre? ¿R1?
Remojado en agua para suavizar
Regreso: RET
Retraso:?
D1: ¿MOV? R6, No. 50
D2: ¿MOV? R7, #150
D3: ¿DJNZ? R7, USD
¿DJNZ? ¿R6, D2?
¿DJNZ? ¿R5, D1?
¿RET?
RETARDO1:? MOV? R6, No. 60
D4: ¿MOV? R7, #100
¿DJNZ? R7, USD
¿DJNZ? D4 R6
Remojado en agua
Suave
Extremo