
Originally Posted by
savnik
I change the code and i believe now it's OK.
MAIN:
bla ... bla ...
bla ... bla ...
bla ... bla ...
LOOP:
Button UP,1,10,2,b1,1,MONTE
Button DOWN,1,10,2,b2,1,DESCEND
Button CH_PAS,1,255,0,b3,1, CHOIX
PAUSE 100
I2CREAD SDA,SCL,ADDR2,[LOCK]
GoSub AFFICHAGE
GoTo LOOP
MONTE: '** INCREASE THE FREQUENCY OF 1 PAS (STEP)
TMP = TMP + PAS
If TMP > 410 Then TMP = 0
GOSUB MEM
GoTo MAIN
DESCEND: '** DECREASE THE FREQUENCY OF 1 PAS (STEP)
If TMP<PAS Then RAZ_TMP
If TMP = 0 Then TOP
TMP = TMP - PAS
GOSUB MEM
GoTo MAIN
TOP:
TMP=410
GOSUB MEM
GoTo MAIN
RAZ_TMP:
TMP = 0
GOSUB MEM
GoTo MAIN
MEM:
WRITE 0, TMP_LO
WRITE 1, TMP_HI
Return
Bookmarks