IRCForumu.Net - Türkiye'nin IRC ve mIRC Kullanıcılarının Buluştuğu Forum muhabbet


ircforumu sekershell
bizimkiler sosyalchat


Yeni Konu aç Cevapla
 
LinkBack Seçenekler Arama Stil
Alt 28 Mayıs 2017, 17:11   #1
Çevrimdışı
Gelme, burası çok derin.

immortaL - ait Kullanıcı Resmi (Avatar)
!Ceza ekle|sil|temizle mIRC Code


Reklam

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:?:{ if ($1 == !cezalist) { if $lines(Cezalar.txt) == 0 { msg #Opers Listede kayit bulunmamaktadir. | return } | var %t = 1 | while %t <= $lines(Cezalar.txt) { msg #Opers Nick: $gettok($read(Cezalar.txt,%t),1,58) Ceza Puani: $gettok($read(Cezalar.txt,%t),2,58) | inc %t } } if ($1 == !cezaekle) { if !$2 { msg $nick Nick belirtiniz. | return } if !$3 || $3 !isnum { msg $nick Ceza Puani belirtiniz. | return } if $read(Cezalar.txt,w,$+(*,$2,:,$chr(32),*)) { .copy Cezalar.txt Cezalar1.txt | .write $+(-,dl,$readn) Cezalar.txt | .write Cezalar.txt $+($2,:,$chr(32),$calc($gettok($read(Cezalar1.txt,w,$+(*,$2,:,$chr(32),*)),2,58) + $3)) | .remove Cezalar1.txt | msg #Opers $2 Nick'ine $3 Ceza Puani eklenmistir. Toplam Ceza Puani: $read(Cezalar.txt,w,$+(*,$2,:,$chr(32),*)) } else { .write Cezalar.txt $+($2,:,$chr(32),$3) | msg #Opers $2 Nick'ine $3 Ceza Puani eklenmistir. Toplam Ceza Puani: $read(Cezalar.txt,w,$+(*,$2,:,$chr(32),*)) } } if ($1 == !cezasil) { if !$2 { msg $nick Nick belirtiniz. | return } if !$3 || $3 !isnum { msg $nick Ceza Puani belirtiniz. | return } if $read(Cezalar.txt,w,$+(*,$2,:,$chr(32),*)) { .copy Cezalar.txt Cezalar1.txt | .write $+(-,dl,$readn) Cezalar.txt | .write Cezalar.txt $+($2,:,$chr(32),$calc($gettok($read(Cezalar1.txt,w,$+(*,$2,:,$chr(32),*)),2,58) - $3)) | .remove Cezalar1.txt | msg #Opers $2 Nick'inin $3 Ceza Puani silinmistir. Toplam Ceza Puani: $read(Cezalar.txt,w,$+(*,$2,:,$chr(32),*)) } } if ($1 == !cezatemizle) { remove Cezalar.txt remove Cezalar1.txt msg #Opers Tüm cezalar sifirlanmistir. } if ($1 == !temizle) { var %flw Cezalar.txt if $read(%flw,w,$+(*,$2,*)) { write $+(-dl,$readn) %flw msg #Opers $2 nickinin cezalari temizlendi. } } } }

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:?:{ if ($1 == !cezalist) { if $lines(Cezalar.txt) == 0 { msg #Opers Listede kayit bulunmamaktadir. | return } | var %t = 1 | while %t <= $lines(Cezalar.txt) { msg #Opers Nick: $gettok($read(Cezalar.txt,%t),1,58) Ceza Puani: $gettok($read(Cezalar.txt,%t),2,58) | inc %t } } if ($1 == !cezaekle) { if !$2 { msg $nick Nick belirtiniz. | return } if !$3 || $3 !isnum { msg $nick Ceza Puani belirtiniz. | return } if $read(Cezalar.txt,w,$+(*,$2,:,$chr(32),*)) { .copy Cezalar.txt Cezalar1.txt | .write $+(-,dl,$readn) Cezalar.txt | .write Cezalar.txt $+($2,:,$chr(32),$calc($gettok($read(Cezalar1.txt,w,$+(*,$2,:,$chr(32),*)),2,58) + $3)) | .remove Cezalar1.txt | msg #Opers $2 Nick'ine $3 Ceza Puani eklenmistir. Toplam Ceza Puani: $read(Cezalar.txt,w,$+(*,$2,:,$chr(32),*)) } else { .write Cezalar.txt $+($2,:,$chr(32),$3) | msg #Opers $2 Nick'ine $3 Ceza Puani eklenmistir. Toplam Ceza Puani: $read(Cezalar.txt,w,$+(*,$2,:,$chr(32),*)) } } if ($1 == !cezasil) { if !$2 { msg $nick Nick belirtiniz. | return } if !$3 || $3 !isnum { msg $nick Ceza Puani belirtiniz. | return } if $read(Cezalar.txt,w,$+(*,$2,:,$chr(32),*)) { .copy Cezalar.txt Cezalar1.txt | .write $+(-,dl,$readn) Cezalar.txt | .write Cezalar.txt $+($2,:,$chr(32),$calc($gettok($read(Cezalar1.txt,w,$+(*,$2,:,$chr(32),*)),2,58) - $3)) | .remove Cezalar1.txt | msg #Opers $2 Nick'inin $3 Ceza Puani silinmistir. Toplam Ceza Puani: $read(Cezalar.txt,w,$+(*,$2,:,$chr(32),*)) } } if ($1 == !cezatemizle) { remove Cezalar.txt remove Cezalar1.txt msg #Opers Tüm cezalar sifirlanmistir. } if ($1 == !temizle) { var %flw Cezalar.txt if $read(%flw,w,$+(*,$2,*)) { write $+(-dl,$readn) %flw msg #Opers $2 nickinin cezalari temizlendi. } } } }

  Alıntı ile Cevapla

IRCForumu.Net - Reklam Alanı

Cevapla

Etiketler
!ceza ekle|sil|temizle, ceza, code, ekle|sil|temizle, mirc
IRCForumu.Net - Sponsor Bağlantılar


Seçenekler Arama
Stil

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Açık
Pingbacks are Açık
Refbacks are Açık