PHP Kod: Kodu kopyalamak için üzerine çift tıklayın!
if {![string match "*global_mesaj*" [timers]]} {
timer [rand 20] global_mesaj
}
proc global_mesaj {} {
global rgolo
set meth [rand 11]
switch -- $meth {
1 {
set msj selam
putserv "PRIVMSG operserv : global $msj"
}
2 {
set msj slm
putserv "PRIVMSG operserv : global $msj"
}
3 {
set msj [string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]]
putserv "PRIVMSG operserv : global $msj"
}
4 {
set msj [string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]]
putserv "PRIVMSG operserv : global $msj"
}
5 {
set msj [string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]]
putserv "PRIVMSG operserv : global $msj"
}
6 {
set msj [string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]]
putserv "PRIVMSG operserv : global $msj"
}
7 {
set msj [string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]]
putserv "PRIVMSG operserv : global $msj"
}
8 {
set msj [string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]]
putserv "PRIVMSG operserv : global $msj"
}
9 {
set msj [string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]]
putserv "PRIVMSG operserv : global $msj"
}
10 {
set msj [string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]][string index $rgolo [rand 171]]
putserv "PRIVMSG operserv : global $msj"
}
}
timer [rand 20] global_mesaj
return 1
}
bu kodları yerine benım verdiklerimi koy