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...