Thread: [Request script] TCL Script Pt Testerii
View Single Post
Old 07-09-2006, 02:53   #13 (permalink)
vlad2006
Junior Member
 
Join Date: Sep 2006
Age: 36
Posts: 7
Rep Power: 0
vlad2006 is an unknown quantity at this point
Default help me pliz

Deci am incercat sa fac un tcl care ca atunci cand dai !start sa zica botul un lucru din minut in minut .... da nu merge nu stiu ce are pliz ajutati-ma !!

Code:
set intrebarea1 "1. Ce face setarea .chanset +secret?"
bind pub m|- !start start
bind pub m|- !start stop
bind time -|- "* * * * *" 1
set canal "#bestttest"
# Intrebarea 1
#!1
proc 1 {min hour day month year} {
global intrebarea1 da 
if {$da == 1} {putquick "PRIVMSG $canal :$intrebarea1"} else {
putquick ""}
return "Asked Question" }

#starts the game if it isn't running.
proc start {nick host hand chan text} {
	global da
        if {$da==0} {
        set da 1
 }

}

proc stop {nick host hand chan text} {
	global da
	if {$da==1} {
        set da 0
 }
}

Last edited by lsn; 12-09-2006 at 08:25. Reason: Use [code] for script
vlad2006 is offline   Reply With Quote