This is the new home of the egghelp.org community forum.
All data has been migrated (including user logins/passwords) to a new phpBB version.
For more information, see this announcement post. Click the X in the top right-corner of this box to dismiss this message. 
	 
Help for those learning Tcl or writing their own scripts.
			
		
				
			- 
				
								neoclust							
- Halfop
- Posts: 55
- Joined: Fri Aug 14, 2009 11:03 am
						
					
													
							
						
									
						Post
					
								by neoclust » 
			
			
			
			
			
			It is possible to launch a "bind time" every 15 seconds?
Code: Select all
bind time - * Auto:scan
proc Auto:scan {minute hour day month year} {
     foreach chan [channels] {
     putserv "PRIVMSG $chan :test"
   }
}
then it is that triggers every minute
 
		 
				
		
		 
	 
				
		
				
			- 
				
								arfer							
- Master
- Posts: 436
- Joined: Fri Nov 26, 2004 8:45 pm
- Location: Manchester, UK
						
					
						
		
													
							
						
									
						Post
					
								by arfer » 
			
			
			
			
			
			No there isn't. Time binds deal only with minutes, hours, days, months and years.
You would have to use a utimer to call a proc recursively, perhaps first started when the bot joins a network.
Code: Select all
bind EVNT - init-server pTimerStart
proc pTimerStart {type} {
    utimer 15 pTimerOutput
    return 0
}
proc pTimerOutput {} {
    foreach chan [channels] {
        if {[botonchan $chan]} {
            putquick "PRIVMSG $chan :test"
        }
    }
    utimer 15 pTimerOutput
    return 0
}
I must have had nothing to do
			
						 
		 
				
		
		 
	 
				
		
				
			- 
				
								neoclust							
- Halfop
- Posts: 55
- Joined: Fri Aug 14, 2009 11:03 am
						
					
						
		
													
							
						
									
						Post
					
								by neoclust » 
			
			
			
			
			
			Oh thanks arfer very glad 
