Arkadasımla cok ugrastık ama bir türlü beceremedik
daha once kullandıgımız mirc kodunu tcl ye cevirebilicek varmi acaba
!ekle
!oku
!sil
mantıgıyla yapmaya calıstık ama yapamadık lütfen biri yardim etsin .
Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*!basvuru*:#basvurukanal:{
if ($strip($1) == !basvuru ) {
.notice $nick 3,1»»--07 $nick 0Basvurunuz isleme alindi ...
.timer 1 2 notice $nick 3,1»»--0 Basvurunuz, Yetkililer tarafindan gözden gecirilecektir kabul edildiginde geri dönüs yapilir.7Lütfen 3PM7 atmayiniz ...
.write basvuru.txt 4,1»» 0Basvuru 4 $nick 0 $+ : $2-
}
}
on *:text:*!basvurular*:#yetkilikanali:{
.msg #yetkilikanali 3,1»»--0 Basvurular Yetkili7 $nick 0 tarafindan inceleniyor ...
.timer 1 2 /play #yetkilikanali basvuru.txt
}
on *:text:*!del*:#yetkilikanali:{
.msg #yetkilikanali 3,1»»--0 Basvurular Yetkili 7 $nick 0 tarafindan siliniyor ...
.remove -b basvuru.txt
.timer 1 3 .msg #yetkilikanali 3,1»»--0 Basvurular silindi!!!
}