Tekil Mesaj gösterimi
Alt 10 Ocak 2009, 15:53   #4
Çevrimdışı
Difuzyon
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Egitim bilgilerini kanala yansıtmak




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias egitim1 { if (%satir == $lines(egitim\egitim.txt)) { .timeroku off } else { inc %satir | msg %egitimkanal $read(egitim\egitim.txt,%satir) } } alias egitim2 { msg %egitimkanal $read(egitim\egitim.txt,1) set %satir $readn .timeroku 0 2 egitim1 } alias chanserv2 { msg %egitimkanal $read(egitim\chanserv.txt,1) set %satir $readn .timeroku 0 5 chanserv1 } alias chanserv1 { if (%satir == $lines(egitim\chanserv.txt)) { .timeroku off } else { inc %satir | msg %egitimkanal $read(egitim\chanserv.txt,%satir) } } alias Nickserv2 { msg %egitimkanal $read(egitim\nickserv.txt,1) set %satir $readn .timeroku 0 5 nickserv1 } alias nickserv1 { if (%satir == $lines(egitim\nickserv.txt)) { .timeroku off } else { inc %satir | msg %egitimkanal $read(egitim\nickserv.txt,%satir) } } alias memoserv2 { msg %egitimkanal $read(egitim\memoserv.txt,1) set %satir $readn .timeroku 0 5 memoserv1 } alias memoserv1 { if (%satir == $lines(egitim\memoserv.txt)) { .timeroku off } else { inc %satir | msg %egitimkanal $read(egitim\memoserv.txt,%satir) } } alias akick2 { msg %egitimkanal $read(egitim\akick.txt,1) set %satir $readn .timeroku 0 5 akick1 } alias akick1 { if (%satir == $lines(egitim\akick.txt)) { .timeroku off } else { inc %satir | msg %egitimkanal $read(egitim\akick.txt,%satir) } } alias Bkanalkipi2 { msg %egitimkanal $read(egitim\Bkanalkipi.txt,1) set %satir $readn .timeroku 0 5 Bkanalkipi1 } alias Bkanalkipi1 { if (%satir == $lines(egitim\Bkanalkipi.txt)) { .timeroku off } else { inc %satir | msg %egitimkanal $read(egitim\Bkanalkipi.txt,%satir) } } alias ChanservLevels2 { msg %egitimkanal $read(egitim\ChanservLevels.txt,1) set %satir $readn .timeroku 0 10 ChanservLevels1 } alias ChanservLevels1 { if (%satir == $lines(egitim\ChanservLevels.txt)) { .timeroku off } else { inc %satir | msg %egitimkanal $read(egitim\ChanservLevels.txt,%satir) } } alias ChanservSET2 { msg %egitimkanal $read(egitim\ChanservSET.txt,1) set %satir $readn .timeroku 0 5 ChanservSET1 } alias ChanservSET1 { if (%satir == $lines(egitim\ChanservSET.txt)) { .timeroku off } else { inc %satir | msg %egitimkanal $read(egitim\ChanservSET.txt,%satir) } } alias fkanalkipi2 { msg %egitimkanal $read(egitim\fkanalkipi.txt,1) set %satir $readn .timeroku 0 5 fkanalkipi1 } alias fkanalkipi1 { if (%satir == $lines(egitim\fkanalkipi.txt)) { .timeroku off } else { inc %satir | msg %egitimkanal $read(egitim\fkanalkipi.txt,%satir) } } alias ignore2 { msg %egitimkanal $read(egitim\ignore.txt,1) set %satir $readn .timeroku 0 5 ignore1 } alias ignore1 { if (%satir == $lines(egitim\ignore.txt)) { .timeroku off } else { inc %satir | msg %egitimkanal $read(egitim\ignore.txt,%satir) } } alias Nickmodeleri2 { msg %egitimkanal $read(egitim\Nickmodeleri.txt,1) set %satir $readn .timeroku 0 5 Nickmodeleri1 } alias Nickmodeleri1 { if (%satir == $lines(egitim\Nickmodeleri.txt)) { .timeroku off } else { inc %satir | msg %egitimkanal $read(egitim\Nickmodeleri.txt,%satir) } } alias Kanalmodeleri2 { msg %egitimkanal $read(egitim\Kanalmodeleri.txt,1) set %satir $readn .timeroku 0 5 Kanalmodeleri1 } alias Kanalmodeleri1 { if (%satir == $lines(egitim\Kanalmodeleri.txt)) { .timeroku off } else { inc %satir | msg %egitimkanal $read(egitim\Kanalmodeleri.txt,%satir) } } alias List2 { msg %egitimkanal $read(egitim\List.txt,1) set %satir $readn .timeroku 0 5 List1 } alias List1 { if (%satir == $lines(egitim\List.txt)) { .timeroku off } else { inc %satir | msg %egitimkanal $read(egitim\List.txt,%satir) } } alias Version2 { msg %egitimkanal $read(egitim\Version.txt,1) set %satir $readn .timeroku 0 5 Version1 } alias Version1 { if (%satir == $lines(egitim\Version.txt)) { .timeroku off } else { inc %satir | msg %egitimkanal $read(egitim\Version.txt,%satir) } } alias Who2 { msg %egitimkanal $read(egitim\Who.txt,1) set %satir $readn .timeroku 0 5 Who1 } alias Who1 { if (%satir == $lines(egitim\Who.txt)) { .timeroku off } else { inc %satir | msg %egitimkanal $read(egitim\Who.txt,%satir) } } alias wildcard2 { msg %egitimkanal $read(egitim\wildcard.txt,1) set %satir $readn .timeroku 0 5 wildcard1 } alias wildcard1 { if (%satir == $lines(egitim\wildcard.txt)) { .timeroku off } else { inc %satir | msg %egitimkanal $read(egitim\wildcard.txt,%satir) } } on *:text:*:#: { if ($1 == !egitim) { set $+(%,egitimkanal) $chan | .egitim2 } if ($1 == !chanserv) { set $+(%,egitimkanal) $chan | .chanserv2 } if ($1 == !nickserv) { set $+(%,egitimkanal) $chan | .nickserv2 } if ($1 == !memoserv) { set $+(%,egitimkanal) $chan | .memoserv2 } if ($1 == !akick) { set $+(%,egitimkanal) $chan | .akick2 } if ($1 == !bkanalkipi) { set $+(%,egitimkanal) $chan | .bkanalkipi2 } if ($1 == !Levels) { set $+(%,egitimkanal) $chan | .ChanservLevels2 } if ($1 == !set) { set $+(%,egitimkanal) $chan | .chanservset2 } if ($1 == !fkanalkipi) { set $+(%,egitimkanal) $chan | .fkanalkipi2 } if ($1 == !Ignore) { set $+(%,egitimkanal) $chan | .ignore2 } if ($1 == !Nickmodeleri) { set $+(%,egitimkanal) $chan | .nickmodeleri2 } if ($1 == !Kanalmodeleri) { set $+(%,egitimkanal) $chan | .kanalmodeleri2 } if ($1 == !list) { set $+(%,egitimkanal) $chan | .list2 } if ($1 == !version) { set $+(%,egitimkanal) $chan | .version2 } if ($1 == !Who) { set $+(%,egitimkanal) $chan | .who2 } if ($1 == !wildcard) { set $+(%,egitimkanal) $chan | .wildcard2 } if ($1 == !dur) { msg $chan Egitim $nick Tarafından Durduruldu. | .timeroku off } }

Hangi kanalda !komut yazılırsa o kanalda gösterecektir.Aynı anda 2. komut (!dur hariç) uygulanırsa işler karışır.Aynı şekilde başka bir kanalda eğitim esnasında !komut yazılırsa karışır.Botunuzu 1 kanalda bulundurmanız daha doğru olur.

Bilginize...

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları eglen sohbet bizimmekan