powerup.con

一个温度控制的程序

: 'Powerup ." 06/01/2006 22:22:13" ;
: 0_0
  &average   START.T
  ^stat1 @! 
  &average_test   START.T
  ^stat1 @! 
0 JUMP ;
: 0_12
  &guocheng   START.T
  ^stat1 @! 
0 JUMP ;
: 0_14
  &TimerConvert   START.T
  ^stat1 @! 
0 JUMP ;
T: T0
DUMMY
0_0
0_12
0_14
T;