Kodu ekledikten sonra scripti kapatıp açarsın. Ben denedim hepsi çalıştı. hdel komutu çalışması için öncelikle o tablonun scripte yüklü olması gerekmektedir olmayan tablodan veri silemez o yüzden ek kod ile açılışta kullanılan hash dosyaları varsa tabloyu oluşturup içindeki veriyi ekleyecek şekilde ayarladım.
Kod: Kodu kopyalamak için üzerine çift tıklayın!
ON *:start: { .kykle }
alias kykle {
var %ky = 1
while %ky <= 17 {
$iif(!$isfile($+(kidem,%ky,.hash)),.write $+(kidem,%ky,.hash)) | .hmake $+(kidem,%ky) 100 | .hload $+(kidem,%ky) $+(kidem,%ky,.hash)
inc %ky
}
$iif(!$isfile(founder.hash),.write founder.hash) | .hmake founder 100 | .hload founder founder.hash
}
on *:text:*:#helpsop: {
if !$istok(D3Li Rules $hmatch(founder,$nick),$nick,32) { msg # Bu Komut Yetkiniz Dışındadır . | return }
if $regex($1-,/^(\.|!)gs\s+.+/Si) {
var %help $+($2,$iif($3-,$+($chr(32),$3-),$null))
hadd -m kidem1 %help | msg $chan $qt($2) 12Genel Sorumlu Seviyesinde Eklendi. | hsave kidem1 kidem1.hash
if ($hfind(kidem1,$2)) {
hdel founder %help | hsave -o founder founder.hash
var %s = 1
while %s <= 17 {
if !$istok(kidem1,$+(kidem,%s),32) {
hdel $+(kidem,%s) %help | hsave -o $+(kidem,%s) $+(kidem,%s,.hash)
}
inc %s
}
}
}
if $regex($1-,/^(\.|!)m2\s+.+/Si) {
var %help $+($2,$iif($3-,$+($chr(32),$3-),$null))
hadd -m kidem2 %help | msg $chan $qt($2) Müfettiş ( kidem II ) Seviyesinde Eklendi. | hsave kidem2 kidem2.hash
if ($hfind(kidem2,$2)) {
hdel founder %help | hsave -o founder founder.hash
var %s = 1
while %s <= 17 {
if !$istok(kidem2,$+(kidem,%s),32) {
hdel $+(kidem,%s) %help | hsave -o $+(kidem,%s) $+(kidem,%s,.hash)
}
inc %s
}
}
}
if $regex($1-,/^(\.|!)m1\s+.+/Si) {
var %help $+($2,$iif($3-,$+($chr(32),$3-),$null))
hadd -m kidem3 %help | msg $chan $qt($2) Müfettiş ( kidem I ) Seviyesinde Eklendi. | hsave kidem3 kidem3.hash
if ($hfind(kidem3,$2)) {
hdel founder %help | hsave -o founder founder.hash
var %s = 1
while %s <= 17 {
if !$istok(kidem3,$+(kidem,%s),32) {
hdel $+(kidem,%s) %help | hsave -o $+(kidem,%s) $+(kidem,%s,.hash)
}
inc %s
}
}
}
if $regex($1-,/^(\.|!)i3\s+.+/Si) {
var %help $+($2,$iif($3-,$+($chr(32),$3-),$null))
hadd -m kidem4 %help | msg $chan $qt($2) İdari Sorumlu ( kidem III ) Seviyesinde Eklendi. | hsave kidem4 kidem4.hash
if ($hfind(kidem4,$2)) {
hdel founder %help | hsave -o founder founder.hash
var %s = 1
while %s <= 17 {
if !$istok(kidem4,$+(kidem,%s),32) {
hdel $+(kidem,%s) %help | hsave -o $+(kidem,%s) $+(kidem,%s,.hash)
}
inc %s
}
}
}
if $regex($1-,/^(\.|!)i2\s+.+/Si) {
var %help $+($2,$iif($3-,$+($chr(32),$3-),$null))
hadd -m kidem5 %help | msg $chan $qt($2) İdari Sorumlu ( kidem II ) Seviyesinde Eklendi. | hsave kidem5 kidem5.hash
if ($hfind(kidem5,$2)) {
hdel founder %help | hsave -o founder founder.hash
var %s = 1
while %s <= 17 {
if !$istok(kidem5,$+(kidem,%s),32) {
hdel $+(kidem,%s) %help | hsave -o $+(kidem,%s) $+(kidem,%s,.hash)
}
inc %s
}
}
}
if $regex($1-,/^(\.|!)i1\s+.+/Si) {
var %help $+($2,$iif($3-,$+($chr(32),$3-),$null))
hadd -m kidem6 %help | msg $chan $qt($2) İdari Sorumlu ( kidem I ) Seviyesinde Eklendi. | hsave kidem6 kidem6.hash
if ($hfind(kidem6,$2)) {
hdel founder %help | hsave -o founder founder.hash
var %s = 1
while %s <= 17 {
if !$istok(kidem6,$+(kidem,%s),32) {
hdel $+(kidem,%s) %help | hsave -o $+(kidem,%s) $+(kidem,%s,.hash)
}
inc %s
}
}
}
if $regex($1-,/^(\.|!)e3\s+.+/Si) {
var %help $+($2,$iif($3-,$+($chr(32),$3-),$null))
hadd -m kidem7 %help | msg $chan $qt($2) Eğitim Sorumlusu ( kidem III ) Seviyesinde Eklendi. | hsave kidem7 kidem7.hash
if ($hfind(kidem7,$2)) {
hdel founder %help | hsave -o founder founder.hash
var %s = 1
while %s <= 17 {
if !$istok(kidem7,$+(kidem,%s),32) {
hdel $+(kidem,%s) %help | hsave -o $+(kidem,%s) $+(kidem,%s,.hash)
}
inc %s
}
}
}
if $regex($1-,/^(\.|!)e2\s+.+/Si) {
var %help $+($2,$iif($3-,$+($chr(32),$3-),$null))
hadd -m kidem8 %help | msg $chan $qt($2) Eğitim Sorumlusu ( kidem II ) Seviyesinde Eklendi. | hsave kidem8 kidem8.hash
if ($hfind(kidem8,$2)) {
hdel founder %help | hsave -o founder founder.hash
var %s = 1
while %s <= 17 {
if !$istok(kidem8,$+(kidem,%s),32) {
hdel $+(kidem,%s) %help | hsave -o $+(kidem,%s) $+(kidem,%s,.hash)
}
inc %s
}
}
}
if $regex($1-,/^(\.|!)e1\s+.+/Si) {
var %help $+($2,$iif($3-,$+($chr(32),$3-),$null))
hadd -m kidem9 %help | msg $chan $qt($2) Eğitim Sorumlusu ( kidem I ) Seviyesinde Eklendi. | hsave kidem9 kidem9.hash
if ($hfind(kidem9,$2)) {
hdel founder %help | hsave -o founder founder.hash
var %s = 1
while %s <= 17 {
if !$istok(kidem9,$+(kidem,%s),32) {
hdel $+(kidem,%s) %help | hsave -o $+(kidem,%s) $+(kidem,%s,.hash)
}
inc %s
}
}
}
if $regex($1-,/^(\.|!)el\s+.+/Si) {
var %help $+($2,$iif($3-,$+($chr(32),$3-),$null))
hadd -m kidem10 %help | msg $chan $qt($2) Ekip Lideri Seviyesinde Eklendi. | hsave kidem10 kidem10.hash
if ($hfind(kidem10,$2)) {
hdel founder %help | hsave -o founder founder.hash
var %s = 1
while %s <= 17 {
if !$istok(kidem10,$+(kidem,%s),32) {
hdel $+(kidem,%s) %help | hsave -o $+(kidem,%s) $+(kidem,%s,.hash)
}
inc %s
}
}
}
if $regex($1-,/^(\.|!)is\s+.+/Si) {
var %help $+($2,$iif($3-,$+($chr(32),$3-),$null))
hadd -m kidem11 %help | msg $chan $qt($2) İstihbarat Yetkilisi Seviyesinde Eklendi. | hsave kidem11 kidem11.hash
if ($hfind(kidem11,$2)) {
hdel founder %help | hsave -o founder founder.hash
var %s = 1
while %s <= 17 {
if !$istok(kidem11,$+(kidem,%s),32) {
hdel $+(kidem,%s) %help | hsave -o $+(kidem,%s) $+(kidem,%s,.hash)
}
inc %s
}
}
}
if $regex($1-,/^(\.|!)y4\s+.+/Si) {
var %help $+($2,$iif($3-,$+($chr(32),$3-),$null))
hadd -m kidem12 %help | msg $chan $qt($2) Yardım Ve Eğitim Görevlisi Seviyesinde Eklendi. | hsave kidem12 kidem12.hash
if ($hfind(kidem12,$2)) {
hdel founder %help | hsave -o founder founder.hash
var %s = 1
while %s <= 17 {
if !$istok(kidem12,$+(kidem,%s),32) {
hdel $+(kidem,%s) %help | hsave -o $+(kidem,%s) $+(kidem,%s,.hash)
}
inc %s
}
}
}
if $regex($1-,/^(\.|!)y3\s+.+/Si) {
var %help $+($2,$iif($3-,$+($chr(32),$3-),$null))
hadd -m kidem13 %help | msg $chan $qt($2) Yardım Görevlisi ( kidem III ) Seviyesinde Eklendi. | hsave kidem13 kidem13.hash
if ($hfind(kidem13,$2)) {
hdel founder %help | hsave -o founder founder.hash
var %s = 1
while %s <= 17 {
if !$istok(kidem13,$+(kidem,%s),32) {
hdel $+(kidem,%s) %help | hsave -o $+(kidem,%s) $+(kidem,%s,.hash)
}
inc %s
}
}
}
if $regex($1-,/^(\.|!)y2\s+.+/Si) {
var %help $+($2,$iif($3-,$+($chr(32),$3-),$null))
hadd -m kidem14 %help | msg $chan $qt($2) Yardım Görevlisi ( kidem II ) Seviyesinde Eklendi. | hsave kidem14 kidem14.hash
if ($hfind(kidem14,$2)) {
hdel founder %help | hsave -o founder founder.hash
var %s = 1
while %s <= 17 {
if !$istok(kidem14,$+(kidem,%s),32) {
hdel $+(kidem,%s) %help | hsave -o $+(kidem,%s) $+(kidem,%s,.hash)
}
inc %s
}
}
}
if $regex($1-,/^(\.|!)y1\s+.+/Si) {
var %help $+($2,$iif($3-,$+($chr(32),$3-),$null))
hadd -m kidem15 %help | msg $chan $qt($2) Yardım Görevlisi ( kidem I ) Seviyesinde Eklendi. | hsave kidem15 kidem15.hash
if ($hfind(kidem15,$2)) {
hdel founder %help | hsave -o founder founder.hash
var %s = 1
while %s <= 17 {
if !$istok(kidem15,$+(kidem,%s),32) {
hdel $+(kidem,%s) %help | hsave -o $+(kidem,%s) $+(kidem,%s,.hash)
}
inc %s
}
}
}
if $regex($1-,/^(\.|!)stj\s+.+/Si) {
var %help $+($2,$iif($3-,$+($chr(32),$3-),$null))
hadd -m kidem16 %help | msg $chan $qt($2) Stajyer Helper Seviyesinde Eklendi. | hsave kidem16 kidem16.hash
if ($hfind(kidem16,$2)) {
hdel founder %help | hsave -o founder founder.hash
var %s = 1
while %s <= 17 {
if !$istok(kidem16,$+(kidem,%s),32) {
hdel $+(kidem,%s) %help | hsave -o $+(kidem,%s) $+(kidem,%s,.hash)
}
inc %s
}
}
}
if $regex($1-,/^(\.|!)desk\s+.+/Si) {
var %help $+($2,$iif($3-,$+($chr(32),$3-),$null))
hadd -m kidem17 %help $+($2,$iif($3-,$+($chr(32),$3-),$null)) | msg $chan $qt($2) Half Oper Seviyesinde Eklendi. | hsave kidem17 kidem17.hash
if ($hfind(kidem17,$2)) {
hdel founder %help | hsave -o founder founder.hash
var %s = 1
while %s <= 17 {
if !$istok(kidem17,$+(kidem,%s),32) {
hdel $+(kidem,%s) %help | hsave -o $+(kidem,%s) $+(kidem,%s,.hash)
}
inc %s
}
}
}
if $regex($1-,/^(\.|!)founder\s+.+/Si) {
var %help $+($2,$iif($3-,$+($chr(32),$3-),$null))
hadd -m founder %help | msg $chan $qt($2) Help Koordinatörü Seviyesinde Eklendi. | hsave founder founder.hash
if ($hfind(founder,$2)) {
var %s = 1
while %s <= 17 {
hdel $+(kidem,%s) %help | hsave -o $+(kidem,%s) $+(kidem,%s,.hash)
inc %s
}
}
}
if $regex($1-,/^(\.|!)hsil\s+.+/Si) {
var %help $+($2,$iif($3-,$+($chr(32),$3-),$null))
/msg $chan 4 $2 1 nicki Tüm Yetkileri İle Birlikte Helpteam Departmanından silindi.
hdel founder %help | hsave -o founder founder.hash
var %s = 1
while %s <= 17 {
hdel $+(kidem,%s) %help | hsave -o $+(kidem,%s) $+(kidem,%s,.hash)
inc %s
}
}
}