Paso 6: Cargar el código de
' {$STAMP BS2}
' {$PBASIC 2.5}
' Parpadea LED código
' Joe McManus 2/06
contador VAR BYTE
Índice VAR NIB
HACER
PARA contador = 0 a 15
Contador de alta
PAUSE 50
BAJO mostrador
SIGUIENTE
PARA contador = 0 a 15
Contador de alta
ALTA (15 - contador)
PAUSA 60
BAJO mostrador
BAJA (15 - contador)
SIGUIENTE
OUTS = % 0000000000000000
DIRS = % 1111111111111111
PARA contador = 0 a 3
ÍNDICE = 0 a 15
Índice de búsqueda, (% 0000000110000000, % 0000001111000000, % 0000011111100000, % 0000111111110000,
% 0001111111111000, % 0011111111111100, % 0111111111111110, % 1111111111111111,
% 0111111111111110, % 0011111111111100, % 0001111111111000, % 0000111111110000,
% 0000011111100000, % 0000001111000000, % 0000000110000000, % 0000000000000000), SALIDAS
PAUSA DE 30
SIGUIENTE
SIGUIENTE
DIRH = % 11111111
DIRL = % 11111111
OUTH = % 00000000
OUTL = % 00000000
PARA contador = 0 a 15
Contador de alta
ALTA (contador + 1)
PAUSA 65
BAJO mostrador
BAJO (contador + 1)
SIGUIENTE
OUTH = % 00000000
DIRH = % 11111111
OUTL = % 00000000
DIRL = % 11111111
PARA contador = 0 a 10
OUTL = % 00000000
OUTH = % 00000000
OUTH = % 11111111
PAUSE 100
OUTH = % 00000000
OUTL = % 11111111
PAUSE 100
SIGUIENTE
PARA contador = 0 a 15
Contador de alta
ALTA (contador + 1)
ALTA (15 - contador)
ALTA (14 - contador)
PAUSA 65
BAJO mostrador
BAJO (contador + 1)
BAJA (15 - contador)
BAJA (14 - contador)
SIGUIENTE
PARA contador = 0 a 10
OUTH = % 00000000
OUTL = % 00000000
OUTL = % 11110000
OUTH = % 00001111
PAUSA 120
OUTH = % 00000000
OUTL = % 00000000
OUTL = % 00001111
OUTH = % 11110000
PAUSA 120
SIGUIENTE
DIRH = % 11111111
DIRL = % 11111111
OUTH = % 00000000
OUTL = % 00000000
PARA contador = 0 a 15
Contador de alta
ALTA (contador + 1)
ALTA (contador + 2)
ALTA (contra + 3)
PAUSE 50
BAJO mostrador
BAJO (contador + 1)
BAJO (contra + 2)
BAJO (contra + 3)
SIGUIENTE
OUTS = % 0000000000000000
DIRS = % 1111111111111111
PARA contador = 0 a 2
ÍNDICE = 0 a 15
Índice de búsqueda (% 1000000000000000% 1100000000000000, % 1110000000000000, % 1111000000000000,
% 1111100000000000, % 1111110000000000, % 1111111000000000, % 1111111100000000,
% 1111111110000000, % 1111111111000000, % 1111111111100000, % 1111111111110000,
% 1111111111111000, % 1111111111111100, % 1111111111111110, % 1111111111111111), SALIDAS
PAUSA DE 30
SIGUIENTE
ÍNDICE = 0 a 15
Índice de búsqueda, (% 0111111111111111, % 0011111111111111, % 0001111111111111, % 0000111111111111,
% 0000011111111111, % 0000001111111111, % 0000000111111111, % 0000000011111111,
% 0000000001111111, % 0000000000111111, % 0000000000011111, % 0000000000001111,
% 0000000000000111, % 0000000000000011, % 0000000000000001, % 0000000000000000), SALIDAS
PAUSA DE 30
SIGUIENTE
SIGUIENTE
OUTH = % 00000000
DIRH = % 11111111
OUTL = % 00000000
DIRL = % 11111111
PARA contador = 0 a 10
OUTH = % 00000000
OUTL = % 00000000
OUTL = % 00000011
OUTH = % 11000000
PAUSA DE 40
OUTH = % 00000000
OUTL = % 00000000
OUTL = % 00001100
OUTH = % 00110000
PAUSA DE 40
OUTH = % 00000000
OUTL = % 00000000
OUTL = % 00110000
OUTH = % 00001100
PAUSA DE 40
OUTH = % 00000000
OUTL = % 00000000
OUTL = % 11000000
OUTH = % 00000011
PAUSA DE 40
OUTH = % 00000000
OUTL = % 00000000
PAUSA DE 30
SIGUIENTE
DIRH = % 11111111
DIRL = % 11111111
OUTH = % 00000000
OUTL = % 00000000
LAZO
FINAL
