- µù¥U®É¶¡
- 2012-2-4
- ³Ì«áµn¿ý
- 2013-4-21
- ¾\ŪÅv
- 80
- ¿n¤À
- 3402
- ºëµØ
- 0
- ©«¤l
- 267
|
¥»©«³Ì«á¥Ñ jieda ©ó 2012-6-8 14:58 ½s¿è
##############
#Main Table
#CH0 input
#CH1-7 Blue
#CH8-14 CoolWhite
#CH15 xBlue
#CH16 nc
#CH17 nc
#CH18 T5ho
#CH19-20 xML
#CH21 RG420
#CH22 CT Fan
#CH23 RL Fan
#############
closeAllCh
begin
30000 22 servo #CT fan on
30000 23 servo #RL fan on
T1100 #Blue,xBlue,CoolWhite on / RG420 on50%
44 delay_minutes
1 delay_clocks
T1300 #xML on
59 delay_minutes
2 delay_clocks
T1600 #xML off
59 delay_minutes
2 delay_clocks
30000 18 servo #T5hO on
T1900 #coolwhite off / RG420 on100%
52 delay_minutes
3 delay_clocks
0 18 servo #T5hO on
T2300 #moon on5%
51 delay_minutes
0 22 servo #CT fan on
0 23 servo #RL fan on
1 delay_clocks
closeAllCh
10 delay_clocks #delay 10 clocks
repeat
####################
sub closeAllCh
######################
0 0 0 0 0 0 0 0 0 0 0 0
0 0 0 0 0 0 0 0 0 0 0 0
23 servo 22 servo 21 servo 20 servo 19 servo 18 servo
17 servo 16 servo 15 servo 14 servo 13 servo 12 servo
11 servo 10 servo 9 servo 8 servo 7 servo 6 servo
5 servo 4 servo 3 servo 2 servo 1 servo 0 servo
1000 delay
return
#####################
sub delay_seconds
#####################
begin
dup while
1 minus 1000 delay
repeat
drop
return
#######################
sub delay_minutes
#####################
begin
dup while
1 minus 60 delay_seconds
repeat
drop
return
#####################
sub delay_clocks
#####################
begin
dup while
1 minus 60 delay_minutes
repeat
drop
return
############
sub T1100
############
0
begin
dup 12000 less_than while
1 plus
4 delay
dup 1 servo #blue
repeat drop
0
begin
dup 12000 less_than while
1 plus
4 delay
dup 2 servo #blue
repeat drop
0
begin
dup 12000 less_than while
1 plus
4 delay
dup 3 servo #blue
repeat drop
0
begin
dup 12000 less_than while
1 plus
4 delay
dup 4 servo #blue
repeat drop
0
begin
dup 12000 less_than while
1 plus
4 delay
dup 5 servo #blue
repeat drop
0
begin
dup 12000 less_than while
1 plus
4 delay
dup 6 servo #blue
repeat drop
0
begin
dup 12000 less_than while
1 plus
4 delay
dup 7 servo #blue
repeat drop
0
begin
dup 12000 less_than while
1 plus
4 delay
dup 15 servo #xblue
repeat drop
0
begin
dup 6000 less_than while
1 plus
8 delay
dup 21 servo #rg420
repeat drop
0
begin
dup 12000 less_than while
1 plus
4 delay
dup 8 servo #cool white
repeat drop
0
begin
dup 12000 less_than while
1 plus
4 delay
dup 9 servo #cool white
repeat drop
0
begin
dup 12000 less_than while
1 plus
4 delay
dup 10 servo #cool white
repeat drop
0
begin
dup 12000 less_than while
1 plus
4 delay
dup 11 servo #cool white
repeat drop
0
begin
dup 12000 less_than while
1 plus
4 delay
dup 12 servo #cool white
repeat drop
0
begin
dup 12000 less_than while
1 plus
4 delay
dup 13 servo #cool white
repeat drop
0
begin
dup 12000 less_than while
1 plus
4 delay
dup 14 servo #cool white
repeat drop
return
############
sub T1300
############
0
begin
dup 12000 less_than while
1 plus
4 delay
dup 19 servo #xml
dup 20 servo #xml
repeat drop
return
############
sub T1600
###########
12000
begin
dup 0 greater_than while
1 minus
4 delay
dup 19 servo #xml
dup 20 servo #xml
repeat drop
return
############
sub T1900
###########
12000
begin
dup 0 greater_than while
1 minus
4 delay
dup 8 servo #cool white
repeat drop
12000
begin
dup 0 greater_than while
1 minus
4 delay
dup 9 servo #cool white
repeat drop
12000
begin
dup 0 greater_than while
1 minus
4 delay
dup 10 servo #cool white
repeat drop
12000
begin
dup 0 greater_than while
1 minus
4 delay
dup 11 servo #cool white
repeat drop
12000
begin
dup 0 greater_than while
1 minus
4 delay
dup 12 servo #cool white
repeat drop
12000
begin
dup 0 greater_than while
1 minus
4 delay
dup 13 servo #cool white
repeat drop
12000
begin
dup 0 greater_than while
1 minus
4 delay
dup 14 servo #cool white
repeat drop
6000
begin
dup 12000 less_than while
1 plus
8 delay
dup 21 servo #RG420
repeat drop
return
############
sub T2300
###########
12000
begin
dup 300 greater_than while
1 minus
4 delay
dup 1 servo
dup 2 servo
dup 3 servo
dup 4 servo
dup 5 servo
dup 6 servo
dup 7 servo
dup 15 servo
dup 21 servo
repeat
drop
return
|
|