mIRC Bot takim eklentisi
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 |
############################################ ############################################ ########## Takım Eklentisi ############## ############################################ ############################################ on $*:text:/^[!.]takim/i:?: { var %bjk 3[1,0 Beşik0,1taş 3], %fb 3[8,2 Fener2,8bahce 3], %gs 3[4,8 Galata8,4saray 3], %ts 3[5,10 Trab10,5zon 3], %takim [ [ $+(%,$2) ] ] if !$2 { msg $nick Takim seciniz lutfen. Örnek 4[ 10BJK , FB , TS , GS 4] | return } if !$var($+(%,$2)) { msg $nick böyle 1 takim listemde yok. } hadd -m takim $nick %takim who +R $nick } raw 352:*: { if $hget(takim,$6) { var %v1 $v1 if $regex($7,r) { if $read(takim.63,w,$+($6,=*)) { msg $6 Eski takim: $token($v1,2,61) - takim degistiriliyor. | write $+(-dl,$readn) takim.63 } msg $6 2Takiminiz secildi. %v1 hdel -m takim $6 write takim.63 $+($6,=,%v1) } if !$regex($7,r) { msg $6 2Nickiniz kayitsizdir, Lutfen nick kayit işlemini yaptiktan sonra işlemi tekrar ediniz. hdel -m takim $6 } } } on *:rawmode:#: { if $regex($1,/\+(q|a|o|h|v)/i) { $iif($read(takim.63,w,$+($2,=*)),msg $chan $+([,Takim,]) ~ $token($v1,2,61)) } } |
önceki yazımızda « mIRC Bot Giriş Kod Sistem’i makelemiz var.
118
yorum yok 
EtiketlermIRC Bot takim eklentisi İle Benzer Sohbet Yazıları
mIRC Bot takim eklentisi yazına yapılan yorumlar