PHP Kod: Kodu kopyalamak için üzerine çift tıklayın!
on !*:join:#paparazzi@:{
msg $nick Bot, kullanma talimatı
msg $nick !start
msg $nick !stop
msg $nick !list
msg $nick !ekle mesaj gir
msg $nick !sil Sırano (ilk rakamı)
}
on *:text:*:#paparazzi@:{
if $1 == !start { .timermagazin 0 5 magazinoku }
if $1 == !stop { unset %magazin | .timermagazin off }
if $1 == !list {
if ($lines(magazin.txt) == 0) { msg #paparazzi@ Liste Boş | /remove magazin.txt }
else {
var %a 1 | while %a <= $lines(magazin.txt) { msg #paparazzi@ %a $+ ) $read(magazin.txt,%a) | inc %a } } }
if $1 == !ekle { msg $chan msj girildi. | write magazin.txt $2- }
if $1 == !sil { msg $chan $2 nolu msj silindi. | write -dl $2 magazin.txt }
}
alias magazinoku {
if $lines(magazin.txt) == 0 { msg #paparazzi@ Hiç mesaj yok-mesaj ekle | .timermagazin off | halt }
if !%magazin { Sırano: $+(1,/,$lines(magazin.txt),:,) msg #paparazzi $read(magazin.txt,1) | goto zıpzıp }
msg #paparazzi Sırano: $+(%magazin,/,$lines(magazin.txt),:,) $read(magazin.txt,%magazin)
:zıpzıp
if %magazin == $lines(magazin.txt) { set -e %magazin 0 }
msg #paparazzi -
inc %magazin
}