sandy1258
Newbie level 1
can somebody check my program??
because it has many errors...and i don't know what is it
here's my program....thank you!!
please mail me at
DOS
movf Gpr 0,10
call table
movwf portb
call 1sec
inct Gpr 0,f
movf Gpr 0,w
sublw d'16'
btfss 03h,2
Goto $-8
goto Uno
One sec:
call ms ;delay for 1 second
call ms
call ms
call ms
return
One min; movlw d'60' :delay 1min
movwf Grprl
call 1sec
decfsz Grprl,f
goto $-2
Return
mc: movlw P'250'
Nms: movwf Grp3
Mlp: movlw P'248'
call mc
nop
decfsz Gpr3,f
Goto mlp
return
Table ANDLW H'0f'
ADDLW PCL,F
RETLW H'4e'
RETLW H'c0'
RETLW H'47'
RETLW H'86'
RETLW H'07'
RETLW H'87'
RETLW H'06'
RETLW H'a4'
RETLW H'30'
RETLW H'c7'
RETLW H'09'
RETLW H'88'
RETLW H'03'
RETLW H'92'
RETLW H'79'
RETLW H'f9'
END
because it has many errors...and i don't know what is it
here's my program....thank you!!
please mail me at
DOS
movf Gpr 0,10
call table
movwf portb
call 1sec
inct Gpr 0,f
movf Gpr 0,w
sublw d'16'
btfss 03h,2
Goto $-8
goto Uno
One sec:
call ms ;delay for 1 second
call ms
call ms
call ms
return
One min; movlw d'60' :delay 1min
movwf Grprl
call 1sec
decfsz Grprl,f
goto $-2
Return
mc: movlw P'250'
Nms: movwf Grp3
Mlp: movlw P'248'
call mc
nop
decfsz Gpr3,f
Goto mlp
return
Table ANDLW H'0f'
ADDLW PCL,F
RETLW H'4e'
RETLW H'c0'
RETLW H'47'
RETLW H'86'
RETLW H'07'
RETLW H'87'
RETLW H'06'
RETLW H'a4'
RETLW H'30'
RETLW H'c7'
RETLW H'09'
RETLW H'88'
RETLW H'03'
RETLW H'92'
RETLW H'79'
RETLW H'f9'
END