®ü¤ô»â°ì SeaFishZone

¼ÐÃD: Pololu ²ß§@ [¥´¦L¥»­¶]

---

§@ªÌ: jieda    ®É¶¡: 2012-5-12 18:41:45     ¼ÐÃD: Pololu ²ß§@






##############
#Main Table
#RoyIp
#############
begin
   closeAllCh
   T0700 #CH0-3 RB ON
   30000 13 servo #CH13 T5 on
   30000 15 servo #CH15 Fan on
   1 delay_clocks
   T0800 #CH4-7 B ON
   1 delay_clocks
   T0900 #CH12 B ON
   2 delay_clocks
   T1100 #CH8-11 ON
   2 delay_clocks
   T1300 #CH14 XML ON
   3 delay_clocks
   T1600 #CH14 XML OFF
   3 delay_clocks
   T1900 #CH8-11 OFF, CH0-3 10%, CH13 T5 OFF
   2 delay_clocks
   T2100 #CH4-7 & CH12 OFF
   6 delay_clocks
   closeAllCh
   4 delay_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 T0700
############
0
begin
  dup 15000 less_than while
  1 plus
  4 delay
  dup 0 servo
  dup 1 servo
  dup 2 servo
  dup 3 servo
repeat
drop
return

############
sub T0800
############
0
begin
  dup 15000 less_than while
  1 plus
  4 delay
  dup 4 servo
  dup 5 servo
  dup 6 servo
  dup 7 servo
repeat
drop
return

############
sub T0900
############
0
begin
  dup 15000 less_than while
  1 plus
  4 delay
  dup 12 servo
repeat
drop
return

############
sub T1100
############
0
begin
  dup 15000 less_than while
  1 plus
  4 delay
  dup 8 servo
  dup 9 servo
  dup 10 servo
  dup 11 servo
repeat
drop
return

############
sub T1300
############
0
begin
  dup 15000 less_than while
  1 plus
  4 delay
  dup 14 servo
repeat
drop
return

############
sub T1600
###########
15000
begin
  dup 0 greater_than while
  1 minus
  4 delay
  dup 14 servo
repeat
drop
return

############
sub T1900
###########
15000
begin
  dup 0 greater_than while
  1 minus
  4 delay
  dup 8 servo
  dup 9 servo
  dup 10 servo
  dup 11 servo
repeat
drop
0 13 servo #CH13 T5 OFF
15000
begin
  dup 750 greater_than while
  1 minus
  4 delay
  dup 0 servo
  dup 1 servo
  dup 2 servo
  dup 3 servo
repeat
drop
return

############
sub T2100
###########
15000
begin
  dup -1 greater_than while
  1 minus
  5 delay
  dup 4 servo
  dup 5 servo
  dup 6 servo
  dup 7 servo
  dup 12 servo
repeat
drop
return

---

§@ªÌ: jieda    ®É¶¡: 2012-5-12 18:44:49

##############
#Main Table
#GoReef
#############
Close_all
begin
   T0900 #CH15,16 Blue On
   T1000 #CH17 T5 On
   1 delay_clocks
   T1100 #CH1 Blue On
   T1110 #CH2 Blue On
   T1120 #CH3 Blue On
   T1130 #CH4 Blue On
   T1140 #CH5 Blue On
   T1150 #CH6 Blue On
   T1200 #CH7~12 Cool White On
   T1500 #CH13,14 MXL On
   4 delay_clocks
   T2000 #CH13,14 MXL Off
   2 delay_clocks
   T2300 #CH7~12 Cool White Off
   T0000 #CH1 Blue Off
   T0010 #CH2 Blue Off  
   T0020 #CH3 Blue Off  
   T0030 #CH4 Blue Off  
   T0040 #CH5 Blue Off  
   T0050 #CH6 Blue Off  
   1 delay_clocks
   T0200 #CH17 T5 Off  
   Moon_0200 #CH15,16 Blue Down to 10%  
   3 delay_clocks
   Close_all
   3 delay_clocks #Speed
repeat

#########
sub Close_all
#########  
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
###########  
check_temp
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 check_temp
##########
0 18 servo #FAN
0 19 servo #FAN
0 0 740 servo_range
8000 740 760 servo_range
16000 760 1023 servo_range
return

##########
sub servo_range
##########
pot 2 pick less_than logical_not    # >= low
pot 2 pick greater_than logical_not # <= high
logical_and
if
  2 pick 16000 equals
  if
     2 pick 18 servo #FAN
     2 pick 19 servo #FAN
  else  
     2 pick 18 servo #FAN
  endif
endif
drop drop drop
return

#####
sub pot
#####
0 get_position
return

######
sub T0900
######
0
begin
   dup 15001 less_than while
   dup 15 servo
   dup 16 servo   
   1 plus
   240 delay
   check_temp
repeat
drop return

######
sub T1000
######
30000 17 servo
return

######
sub T1100
######
0
begin
   dup 15001 less_than while
   dup 1 servo
   1 plus
   40 delay
   check_temp
repeat
drop return

######
sub T1110
######
0
begin
   dup 15001 less_than while
   dup 2 servo
   1 plus
   40 delay
   check_temp
repeat
drop return

######
sub T1120
######
0
begin
   dup 15001 less_than while
   dup 3 servo
   1 plus
   40 delay
   check_temp
repeat
drop return

######
sub T1130
######
0
begin
   dup 15001 less_than while
   dup 4 servo
   1 plus
   40 delay
   check_temp
repeat
drop return

######
sub T1140
######
0
begin
   dup 15001 less_than while
   dup 5 servo
   1 plus
   40 delay
   check_temp
repeat
drop return

######
sub T1150
######
0
begin
   dup 15001 less_than while
   dup 6 servo
   1 plus
   40 delay
   check_temp
repeat
drop return

######
sub T1200
######
0
begin
   dup 15001 less_than while
   dup 7 servo
   dup 8 servo
   dup 9 servo
   dup 10 servo
   dup 11 servo
   dup 12 servo
   1 plus
   720 delay
   check_temp
repeat
drop return

######
sub T1500
######
0
begin
   dup 15001 less_than while
   dup 13 servo
   dup 14 servo
   1 plus
   240 delay
   check_temp
repeat
drop return

#####
sub T2000
#######
15000
begin
   dup -1 greater_than while
   dup 13 servo
   dup 14 servo
   1 minus
   240 delay
   check_temp
repeat
drop return

#####
sub T2300
#######
15000
begin
   dup -1 greater_than while
   dup 7 servo
   dup 8 servo
   dup 9 servo
   dup 10 servo
   dup 11 servo
   dup 12 servo
   1 minus
   240 delay
   check_temp
repeat
drop return

#####
sub T0000
#######
15000
begin
   dup -1 greater_than while
   dup 1 servo
   1 minus
   40 delay
   check_temp
repeat
drop return

#####
sub T0010
#######
15000
begin
   dup -1 greater_than while
   dup 2 servo
   1 minus
   40 delay
   check_temp
repeat
drop return

#####
sub T0020
#######
15000
begin
   dup -1 greater_than while
   dup 3 servo
   1 minus
   40 delay
   check_temp
repeat
drop return

#####
sub T0030
#######
15000
begin
   dup -1 greater_than while
   dup 4 servo
   1 minus
   40 delay
   check_temp
repeat
drop return

#####
sub T0040
#######
15000
begin
   dup -1 greater_than while
   dup 5 servo
   1 minus
   40 delay
   check_temp
repeat
drop return

#####
sub T0050
#######
15000
begin
   dup -1 greater_than while
   dup 6 servo
   1 minus
   40 delay
   check_temp
repeat
drop return

######
sub T0200
######
0 17 servo
return

#####
sub Moon_0200
#######
15000
begin
   dup -1 greater_than while
   dup 750 greater_than
   if
     dup 15 servo
     dup 16 servo
   else
   endif
   1 minus
   240 delay
   check_temp
repeat
drop return

---

§@ªÌ: ¤t­¶¤t­¶    ®É¶¡: 2012-5-12 19:05:26

---

§@ªÌ: kitangle    ®É¶¡: 2012-5-12 19:28:15

¦º¤`²ß§@

---

§@ªÌ: ¿ß¿ß    ®É¶¡: 2012-5-12 21:03:48

´X®É±o¶¢À°§Ú·d

---

§@ªÌ: ªÎ¹Ê¹Êªe°¨¥J    ®É¶¡: 2012-5-12 21:06:10

Ú»¨ìÀY·w

---

§@ªÌ: jieda    ®É¶¡: 2012-5-12 21:41:00

¿ß¿ß µoªí©ó 2012-5-12 21:03
´X®É±o¶¢À°§Ú·d

©ñ­Ó®É¶¡ªí¤W¾¤°Õ

---

§@ªÌ: ¤T¤@¸U¯à«L    ®É¶¡: 2012-5-12 22:45:28

¶Ì¨Ð¤Sªk§@³â.

---

§@ªÌ: ice28720    ®É¶¡: 2012-5-13 00:19:16

---

§@ªÌ: jieda    ®É¶¡: 2012-5-13 12:00:50

¤T¤@¸U¯à«L µoªí©ó 2012-5-12 22:45
¶Ì¨Ð¤Sªk§@³â.

§A¨£­ø¨ì§Ú¦³¨Ì­Ó ²üÄõ¤ô»\ «§




¹Ï¤ùªþ¥ó: 123.JPG (2012-5-13 12:00:41, 56.62 KB) / ¤U¸ü¦¸¼Æ 304
http://www.seafishzone.com/forum.php?mod=attachment&aid=NTY3NnxlZWQ1OTk1MnwxNzY0Mzk4MjQ5fDB8MA%3D%3D

---

§@ªÌ: fatlankei    ®É¶¡: 2012-5-13 13:11:37

---

§@ªÌ: jieda    ®É¶¡: 2012-5-13 13:15:26

¤J¿Ë¾¤³£·w

---

§@ªÌ: jackyn    ®É¶¡: 2012-5-13 13:24:06

¤T¤@¸U¯à«L µoªí©ó 2012-5-12 22:45
¶Ì¨Ð¤Sªk§@³â.

°÷ÄÁ­¹ÃÄ

---

§@ªÌ: jieda    ®É¶¡: 2012-5-13 15:37:42

jackyn µoªí©ó 2012-5-13 13:24
°÷ÄÁ­¹ÃÄ

¤w¸g¤òÃÄ¥i±Ï
µ¥ÅÜ´£¤l°®
¡C¡C¡C¡C

---

§@ªÌ: ¿ß¿ß    ®É¶¡: 2012-5-14 16:31:10

dup 0 greater_than while¦Pdup -1 greater_than while¦³«§¤À§O§r ¤j®v¥S

---

§@ªÌ: jieda    ®É¶¡: 2012-5-14 17:17:53

¿ß¿ß µoªí©ó 2012-5-14 16:31
dup 0 greater_than while¦Pdup -1 greater_than while¦³«§¤À§O§r ¤j®v¥S

¤Ö©ó 0 °±¤î begin...repeat ¨Ì­Ó«ü¥O
©M
¤Ö©ó -1 °±¤î begin...repeat ¨Ì­Ó«ü¥O

---

§@ªÌ: ¤ò¨Å    ®É¶¡: 2012-5-15 08:28:15

²´ªáªá²K
°ª¤â¬J²ß§@

---

§@ªÌ: jieda    ®É¶¡: 2012-5-15 09:30:07

¤ò¨Å µoªí©ó 2012-5-15 08:28
²´ªáªá²K
°ª¤â¬J²ß§@

¨Ì«×ÉN°ª¤â
¤j¸L¦Ë´N¦³±ø
:-P

---

§@ªÌ: ¤T¤@¸U¯à«L    ®É¶¡: 2012-5-15 10:43:25

jieda µoªí©ó 2012-5-15 09:30
¨Ì«×ÉN°ª¤â
¤j¸L¦Ë´N¦³±ø
:-P

§A¦³ÉN©OºØspotlight§r????



¹Ï¤ùªþ¥ó: ZX.png (2012-5-15 10:43:10, 215.21 KB) / ¤U¸ü¦¸¼Æ 335
http://www.seafishzone.com/forum.php?mod=attachment&aid=NTczN3w4NDUzYmNjMHwxNzY0Mzk4MjQ5fDB8MA%3D%3D

---

§@ªÌ: jieda    ®É¶¡: 2012-5-15 11:20:27

¤T¤@¸U¯à«L µoªí©ó 2012-5-15 10:43
§A¦³ÉN©OºØspotlight§r????

OUTDOOR ²£«~
§Ú¦a³y§^¨ì§r

---

§@ªÌ: jieda    ®É¶¡: 2012-5-15 11:56:09

https://www.facebook.com/photo.php?v=366459876743803

0 0 servo #ON/OFF=OFF  
0 1 servo #R/L=R
0 2 servo #Speed=0
begin
30000 0 servo #ON/OFF=ON
MOD001
0 0 servo  
0 1 servo
0 2 servo
repeat

######
sub MOD001
######
30000 1 servo #R/L=L
0
begin
   dup 30000 less_than while
   dup 2 servo
   500 plus
   10 delay
repeat
drop
0 1 servo #R/L=R
0
begin
   dup 15000 less_than while
   dup 2 servo
   500 plus
   10 delay
repeat
drop return

---

§@ªÌ: ¤T¤@¸U¯à«L    ®É¶¡: 2012-5-15 11:56:12

jieda µoªí©ó 2012-5-15 11:20
OUTDOOR ²£«~
§Ú¦a³y§^¨ì§r

­ø«Y­noutdoor.
¦n¦ü¬[¥J¬ûËÝ©O,¥u«Y­n°ªmA¹ïÀ³®g¦í.§AªG°¦Å±¼Ò´²±o¨ì°ª·Å.
­ø¬~¦hPAR38¦æ¨ì7²É700mA.Õi§r.

---

§@ªÌ: jieda    ®É¶¡: 2012-5-15 12:24:05

¤T¤@¸U¯à«L µoªí©ó 2012-5-15 11:56
­ø«Y­noutdoor.
¦n¦ü¬[¥J¬ûËÝ©O,¥u«Y­n°ªmA¹ïÀ³®g¦í.§AªG°¦Å±¼Ò´²±o¨ì°ª·Å.
­ø¬~¦hPAR38¦æ¨ì7²É700mA.Õi ...

E27 ´¡ÀY
3¨Ã7¦ê
°ªÀ£±À°Ê

---

§@ªÌ: ¤T¤@¸U¯à«L    ®É¶¡: 2012-5-15 12:33:16

jieda µoªí©ó 2012-5-15 12:24
E27 ´¡ÀY
3¨Ã7¦ê
°ªÀ£±À°Ê

ÂI3¨Ã7¦ê????
°ªÀ£·N¥u220V?????
¦³ÉN©O­Ó¼Ò¥ý????

---

§@ªÌ: jieda    ®É¶¡: 2012-5-15 13:02:59



°ªÀ£=AC
±À°Ê=ùÚ¬yLED¹q·½

¤@¯ëe27¤j¥\²vùÚ¬yLED¹q·½ 6-9¡¯3W led27WÅX°Ê¹q·½ ¢Ï¢Ñ90-¢±6¢¯¢ä
¥u±o600mA
http://item.taobao.com/item.htm?id=14235748752&ali_trackid=2:mm_14507416_2297358_8935934,0:1337056477_4z8_627023144

©Ò¥H­n¥Î3¨Ã7¦ê±À1W¬JùÚ¬yLED¹q·½¦Ü¦³700mA¥H¤W¿é¥X
900mA ¥´­Ó¤K§é

¤£¹L....À³¸Ó¥¼¥X
¶ôPCB§Ú³£¥¼¼g










¹Ï¤ùªþ¥ó: MAX16841.JPG (2012-5-15 13:02:53, 63.89 KB) / ¤U¸ü¦¸¼Æ 266
http://www.seafishzone.com/forum.php?mod=attachment&aid=NTc0MXxlNTAyOTg1ZXwxNzY0Mzk4MjQ5fDB8MA%3D%3D

---

§@ªÌ: terlau104    ®É¶¡: 2012-5-15 13:04:41

---

§@ªÌ: ¤T¤@¸U¯à«L    ®É¶¡: 2012-5-15 13:11:44

jieda µoªí©ó 2012-5-15 13:02
°ªÀ£=AC
±À°Ê=ùÚ¬yLED¹q·½

§AçÜÕiÊ\³â,¦¨¥»­n±±¨î«Y2-3¦Ê¤º,¦æCREEÁx»E¥úªM­ø¤Ö¹L60«×,·Å¨ì5¤Q´X¦n³â.

---

§@ªÌ: jieda    ®É¶¡: 2012-5-15 13:19:57

¤T¤@¸U¯à«L µoªí©ó 2012-5-15 13:11
§AçÜÕiÊ\³â,¦¨¥»­n±±¨î«Y2-3¦Ê¤º,¦æCREEÁx»E¥úªM­ø¤Ö¹L60«×,·Å¨ì5¤Q´X¦n³â.

@299.99¤H¥J
¸¨¤@¥a°¦Order«Y«}...?
50% Deposts 50% COD

---

§@ªÌ: ¤T¤@¸U¯à«L    ®É¶¡: 2012-5-15 13:28:43

jieda µoªí©ó 2012-5-15 13:19
@299.99¤H¥J
¸¨¤@¥a°¦Order«Y«}...?
50% Deposts 50% COD

¾ã¦í´X°¦嚟¸Õ¤U¶U¥ý.
299.99´ä¹ô.
5%Deposits,95%¥Î«á3¦~COD

---

§@ªÌ: jieda    ®É¶¡: 2012-5-15 13:37:53

¤T¤@¸U¯à«L µoªí©ó 2012-5-15 13:28
¾ã¦í´X°¦嚟¸Õ¤U¶U¥ý.
299.99´ä¹ô.
5%Deposits,95%¥Î«á3¦~COD

---

§@ªÌ: ¿ß¿ß    ®É¶¡: 2012-5-20 14:13:10

§Ú¼g¦n°Õ¤j®v¥S ¸Õºò ºCºC¦A­×§ï

---

§@ªÌ: jieda    ®É¶¡: 2012-5-20 14:45:51

¿ß¿ß µoªí©ó 2012-5-20 14:13
§Ú¼g¦n°Õ¤j®v¥S ¸Õºò ºCºC¦A­×§ï

§Ú¥s ¤j¸L¦Ë §r!

---

§@ªÌ: jieda    ®É¶¡: 2012-6-8 12:35:17




##############
#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

---

§@ªÌ: jieda    ®É¶¡: 2012-6-10 12:48:35




##############
#Main Table MC09062012
##############
#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
   T1300
   44 delay_minutes
   2 delay_clocks
   T1600
   45 delay_minutes
   30000 18 servo #T5Ho on
   T1700
   59 delay_minutes
   2 delay_clocks
   T2000
   59 delay_minutes
   T2100
   59 delay_minutes
   T2200
   59 delay_minutes
   0 18 servo #T5Ho off
   T0100
   45 delay_minutes
   closeAllCh
   11 delay_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 T1300
############
0
begin
  dup 6000 less_than while
  1 plus
  8 delay
  dup 1 servo #blue
repeat
drop
0
begin
  dup 6000 less_than while
  1 plus
  8 delay
  dup 2 servo #blue
repeat
drop
0
begin
  dup 6000 less_than while
  1 plus
  8 delay
  dup 3 servo #blue
repeat
drop
0
begin
  dup 6000 less_than while
  1 plus
  8 delay
  dup 4 servo #blue
repeat
drop
0
begin
  dup 6000 less_than while
  1 plus
  8 delay
  dup 5 servo #blue
repeat
drop
0
begin
  dup 6000 less_than while
  1 plus
  8 delay
  dup 6 servo #blue
repeat
drop
0
begin
  dup 6000 less_than while
  1 plus
  8 delay
  dup 7 servo #blue
repeat
drop
0
begin
  dup 6000 less_than while
  1 plus
  8 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 6000 less_than while
  1 plus
  8 delay
  dup 8 servo #CoolWhite
repeat
drop
0
begin
  dup 6000 less_than while
  1 plus
  8 delay
  dup 9 servo #CoolWhite
repeat
drop
0
begin
  dup 6000 less_than while
  1 plus
  8 delay
  dup 10 servo #CoolWhite
repeat
drop
0
begin
  dup 6000 less_than while
  1 plus
  8 delay
  dup 11 servo #CoolWhite
repeat
drop
0
begin
  dup 6000 less_than while
  1 plus
  8 delay
  dup 12 servo #CoolWhite
repeat
drop
0
begin
  dup 6000 less_than while
  1 plus
  8 delay
  dup 13 servo #CoolWhite
repeat
drop
0
begin
  dup 6000 less_than while
  1 plus
  8 delay
  dup 14 servo #CoolWhite
repeat
drop
return

############
sub T1600
############
6000
begin
  dup 12000 less_than while
  1 plus
  8 delay
  dup 1 servo #blue
  dup 2 servo #blue
  dup 3 servo #blue
  dup 4 servo #blue
  dup 5 servo #blue
  dup 6 servo #blue
  dup 7 servo #blue
  dup 8 servo #CoolWhite
  dup 9 servo #CoolWhite
  dup 10 servo #CoolWhite
  dup 11 servo #CoolWhite
  dup 12 servo #CoolWhite
  dup 13 servo #CoolWhite
  dup 14 servo #CoolWhite
  dup 15 servo #xblue
repeat
drop
return

############
sub T1700
############
0
begin
  dup 12000 less_than while
  1 plus
  4 delay
  dup 19 servo #xml
  dup 20 servo #xml
repeat
drop
return

############
sub T2000
###########
12000
begin
  dup 0 greater_than while
  1 minus
  4 delay
  dup 19 servo #xml
  dup 20 servo #xml
repeat
drop
return

############
sub T2100
###########
6000
begin
  dup 12000 less_than while
  1 plus
  4 delay
  dup 21 servo #RG420
repeat
drop
return

############
sub T2200
###########
12000
begin
  dup 6000 greater_than while
  1 minus
  8 delay
  dup 8 servo #CoolWhite
repeat
drop
12000
begin
  dup 6000 greater_than while
  1 minus
  9 delay
  dup 9 servo #CoolWhite
repeat
drop
12000
begin
  dup 6000 greater_than while
  1 minus
  8 delay
  dup 10 servo #CoolWhite
repeat
drop
12000
begin
  dup 6000 greater_than while
  1 minus
  8 delay
  dup 11 servo #CoolWhite
repeat
drop
12000
begin
  dup 6000 greater_than while
  1 minus
  8 delay
  dup 12 servo #CoolWhite
repeat
drop
12000
begin
  dup 6000 greater_than while
  1 minus
  8 delay
  dup 13 servo #CoolWhite
repeat
drop
12000
begin
  dup 6000 greater_than while
  1 minus
  8 delay
  dup 14 servo #CoolWhite
repeat
drop
12000
begin
  dup 0 greater_than while
  1 minus
  4 delay
  dup 15 servo #xblue
repeat
drop
return

############
sub T0100
###########
6000
begin
  dup 1200 greater_than while
  1 minus
  8 delay
  dup 8 servo #CoolWhite
repeat
drop
6000
begin
  dup 1200 greater_than while
  1 minus
  8 delay
  dup 9 servo #CoolWhite
repeat
drop
6000
begin
  dup 1200 greater_than while
  1 minus
  8 delay
  dup 10 servo #CoolWhite
repeat
drop
6000
begin
  dup 1200 greater_than while
  1 minus
  8 delay
  dup 11 servo #CoolWhite
repeat
drop
6000
begin
  dup 1200 greater_than while
  1 minus
  8 delay
  dup 12 servo #CoolWhite
repeat
drop
6000
begin
  dup 1200 greater_than while
  1 minus
  8 delay
  dup 13 servo #CoolWhite
repeat
drop
6000
begin
  dup 1200 greater_than while
  1 minus
  8 delay
  dup 14 servo #CoolWhite
repeat
drop

12000
begin
  dup 6000 greater_than while
  1 minus
  8 delay
  dup 1 servo #blue
repeat
drop
12000
begin
  dup 6000 greater_than while
  1 minus
  8 delay
  dup 2 servo #blue
repeat
drop
12000
begin
  dup 6000 greater_than while
  1 minus
  8 delay
  dup 3 servo #blue
repeat
drop
12000
begin
  dup 6000 greater_than while
  1 minus
  8 delay
  dup 4 servo #blue
repeat
drop
12000
begin
  dup 6000 greater_than while
  1 minus
  8 delay
  dup 5 servo #blue
repeat
drop
12000
begin
  dup 6000 greater_than while
  1 minus
  8 delay
  dup 6 servo #blue
repeat
drop
12000
begin
  dup 6000 greater_than while
  1 minus
  8 delay
  dup 7 servo #blue
repeat
drop
12000
begin
  dup 600 greater_than while
  1 minus
  4 delay
  dup 21 servo #RG420
repeat
drop

return

---

§@ªÌ: river    ®É¶¡: 2012-6-10 13:59:25

ÉA¾¤¬[?????

---

§@ªÌ: michael.hts    ®É¶¡: 2012-6-10 14:18:45

­ø¸Ó¤j®v¥S

¹L2¤é¶¼¯ù§Ú¬J

---

§@ªÌ: jieda    ®É¶¡: 2012-6-11 00:52:44

river µoªí©ó 2012-6-10 13:59
ÉA¾¤¬[?????

³D¥J¤åÅo
¤w¸g¥Î¥ª¦¨¦~´X¬[°Õ

---

§@ªÌ: ¥q®{    ®É¶¡: 2012-12-20 14:42:56

---

Åwªï¥úÁ{ ®ü¤ô»â°ì SeaFishZone (http://www.seafishzone.com/)

Powered by Discuz! X2