0 Members and 1 Guest are viewing this topic.
If getkey(Y)Repeat getkey(X)End:End?
If getKey(9)Repeat getKey(9)End:End
If getkey(9)While getkey-9End:End
don't do it with the same key ( it will directly exit from the loop )try itCode: [Select]If getkey(9)While getkey-9End:End
!If getkey-9Repeat getkey-9End:End
While getkey(0) Dispgraph[r]EndRepeat getKey(0) Dispgraph[r]End
If getKey(45Repeat getKeyDispGraph[r]EndEnd
Repeat getkey(0)Dispgraph[r]EndRepeat getKey(0)-1Dispgraph[r]End
Repeat getkey-9DispgraphrrEnd
I use APD command for the "pause"
This is what I do -Code: [Select]While getkey(0) Dispgraph[r]EndRepeat getKey(0) Dispgraph[r]End
@Michael_Lee: Yours works perfectly! Thank you very much. +1
If getkey(X)Repeat getkey(X) and getkey(Y)(Here you can set the contrast to 0 or do this)Copy(L6,L3,768)ClrDrawEndCopy(L3,L6,768)