;---------------------------------;
; Main program starts here
;
;
;------------------------------------;
Start:
MOVLW 0x07 ;Turn comparators off and
MOVWF CMCON ;enable pins for I/O functions
BSF STATUS,RP0 ;SELECCIONAMOS EL BANCO 1
;CLRF TRISA ;LIMPIAMOS EL REGISTRO TRISA
;MOVLW 0x07 ;Turn comparators off and
;MOVWF CMCON ;enable pins for I/O functions
CLRF TRISB ;LIMPIAMOS EL REGISTRO TRISB
MOVLW B'11110000' ;ENTRADAS RA4-RA4, SALIDAS RA0-RA3
MOVWF TRISA ;PONEMOS EL VALOR DE W EN TRISA
BCF STATUS,RP0 ;SELECCIONAMOS EL BANCO 0
bcf EndCount,0 ; reset the EndCount bit
clrf Counter ; clear the Counter register
Loop:
Call FlashingLines
Call FlashingLines
Call FlashingLines
call CubeFill
call CubeFill
call CubeFill
call SideToSide
call SideToSide
call SideToSide
call DiagAroundSides
call DiagAroundSides
call DiagAroundSides
call LayerDrop
call LayerDrop
call LayerDrop
call Spin
call Spin
call Spin
goto Loop ;add this line
end