chart1.ccd

来自「一个温度控制的程序」· CCD 代码 · 共 48 行

: 1_0
4 JUMP ;
: 1_14
  ~DO_101   ON
4 JUMP ;
: 1_16
  ~DO_101   OFF
  ~DO_102   OFF
  0  
  ^qb2 @!   
-3 JUMP ;
: 1_20
  ~DO_102   ON
  1  
  ^qbks @!   
  10.0    FDELAY
  0  
  ^qb2 @!   
  0  
  ^qb1 @!   
  ~DO_102   OFF
0 JUMP ;
: 1_25
-5 JUMP ;
: 1_12
TRUE
  ~DI_101 @@ 
  ^qb1 @@   LAND
LAND
IF -5 ELSE -4 THEN JUMP ;
: 1_18
TRUE
  ~DO_101 @@ 
  ^qb2 @@   LAND
LAND
IF -4 ELSE -7 THEN JUMP ;
T: T1
DUMMY
1_0
1_14
1_16
1_20
1_25
1_12
1_18
T;
&chart1 ' T1 SETTASK