Konečne som si našiel čas
Ziatial som stvoril toto:
[code]
;***************************************************************
EFEKT1 MOVLW B’00111111’
MOVWF PORTB
CALL CAKAJ
MOVLW B'11001111'
MOVWF PORTB
CALL CAKAJ
GOTO EFEKT1
;***************************************************************
EFEKT2 MOVLW B’01101111’
MOVWF PORTB
CALL CAKAJ2
MOVLW B'10011111'
MOVWF PORTB
CALL CAKAJ2
GOTO EFEKT2
;***************************************************************
EFEKT3 MOVLW B’11111111’ ;-*
MOVWF PORTB
CALL CAKAJ3
MOVLW B'00001111'
MOVWF PORTB
CALL CAKAJ3
GOTO EFEKT3
;***************************************************************
EFEKT4 MOVLW B’01111111’
MOVWF PORTB
CALL CAKAJ4
MOVLW B'10111111'
MOVWF PORTB
CALL CAKAJ4
MOVLW B'11011111'
MOVWF PORTB
CALL CAKAJ4
MOVLW B'11101111'
MOVWF PORTB
CALL CAKAJ4
MOVLW B'11011111'
MOVWF PORTB
CALL CAKAJ4
MOVLW B'10111111'
MOVWF PORTB
CALL CAKAJ4
GOTO EFEKT4
;***************************************************************
EFEKT5 MOVLW B’00111111’ ;-—-—
MOVWF PORTB
CALL CAKAJ5
MOVLW B'11111111'
MOVWF PORTB
CALL CAKAJ5
MOVLW B'00111111'
MOVWF PORTB
CALL CAKAJ5
MOVLW B'11111111'
MOVWF PORTB
CALL CAKAJ5
MOVLW B'11111111'
MOVWF PORTB
CALL CAKAJ5
MOVLW B'11111111'
MOVWF PORTB
CALL CAKAJ5
MOVLW B'11001111'
MOVWF PORTB
CALL CAKAJ5
MOVLW B'11111111'
MOVWF PORTB
CALL CAKAJ5
MOVLW B'11001111'
MOVWF PORTB
CALL CAKAJ5
MOVLW B'11111111'
MOVWF PORTB
CALL CAKAJ5
MOVLW B'11111111'
MOVWF PORTB
CALL CAKAJ5
MOVLW B'11111111'
MOVWF PORTB
CALL CAKAJ5
GOTO EFEKT5
;***************************************************************
EFEKT5 MOVLW B’00001111’
MOVWF PORTB
CALL CAKAJ5
MOVLW B'11111111'
MOVWF PORTB
CALL CAKAJ5
MOVLW B'00001111'
MOVWF PORTB
CALL CAKAJ5
MOVLW B'11111111'
MOVWF PORTB
CALL CAKAJ5
MOVLW B'11111111'
MOVWF PORTB
CALL CAKAJ5
MOVLW B'11111111'
MOVWF PORTB
CALL CAKAJ5
MOVLW B'00001111'
MOVWF PORTB
CALL CAKAJ5
MOVLW B'11111111'
MOVWF PORTB
CALL CAKAJ5
MOVLW B'00001111'
MOVWF PORTB
CALL CAKAJ5
MOVLW B'11111111'
MOVWF PORTB
CALL CAKAJ5
MOVLW B'11111111'
MOVWF PORTB
CALL CAKAJ5
MOVLW B'11111111'
MOVWF PORTB
CALL CAKAJ5
GOTO EFEKT5
;***************************************************************[/code]
Nieje tam všetko, mali byť ešte dalšie efekty, program som obkukal odtialto : bazypv.net/elektro/konstrukce/pic.htm
Neviem či je to takto možné robyť, hlavne ak mám čakaciu, log.0, MOVWF B’11111111’ či ju nemôžem nahradiť NOP?
Dalej to musím celé nejako spomaliť, kedže kryštál pracuje na 4MHz, ale to si ešte musím preštudovať. Dalšia vec kotrú som si práve všimol že musím všetky log. 0 a 1 znegovať, pretože budem spínať NPN tranzistorom, alebo nie?
administrator: příspěvek byl upraven