You showed no courtesy to wait for a decent amount of time before making a whiny post about no replies (your second post came less then 4 hours after first post), around here that is about the same as making demands upon persons you are not compensating for their time and efforts.Alchera wrote:It means, as per the sticky, that you wait VERY patiently and not bump for the sake of getting attention else it's into the Jank Yard.4mirc wrote:No problem Thats mean no 1 can make this tcl script
Code: Select all
bind time - * set:modes
proc set:modes args {
puthelp "mode #channel +ntk-RMmcisk auto-open-mode"
}
Code: Select all
set channelsyouwant "#chan1 #chan2 #chan3"
bind time - "?0 *" set:modes
proc set:modes args {
foreach c [list $channelsyouwant] {
puthelp "mode $c +ntk-RMmcisk auto-open-mode"
}
}
Code: Select all
#set the channel/s when u want run the tcl.
#ex: "#mychan1 #mychan2 #mychan3"
set channels "#mychan1 #mychan2"
#set the channel modes
set openmodes "nt-mirs"
bind time - "?0 *" mode:open
proc mode:open args {
global channels openmodes
foreach channel $channels {
putquick "MODE $channel +$openmodes"
}
}
putlog "OpenChanModes.tcl v1.0 Working Fine by Nor7on"