|
yUSEz |
SET_AD
|
SET_AD 10 10 10 SET_AD &h80|4 &H80|8 16 SET_AD AD1 10 10 10 SET_AD AD7890_10 30 30 30 30 SET_AD AD1 AD7890_10 |
yFORMATz |
yFUNCTIONz |
SET_AD [args]
|
|
yEXPLANATIONz |
|
|
|
FORK 1 *disp END *disp dd=0 M=400 SET_AD AD7890_10 SET_AD 40 FORMAT "S000" DO t=AD(1,0) : t2=AD(1,2) d=(M-t)*2 : IF d>35 THEN : d=25 : END_IF IF d<0 THEN : d=0 : END_IF PWM 0 d a$=STR$(t) b$=STR$(t2) c$=a$+b$ IF dd%10==0 THEN PR_LCD c$ END_IF INC dd TIME 100 LOOP |
|
|
[LASTMODIFY]2016-03-15 11:36:21 |
[CREATEDATE]2008-12-15 17:45:44 |
|
|
|
|