İsteğini yeniden okudum(Kıdem5 ten bahsetmişsin vs.) ve biraz daha iyi bir şey yapmaya karar verdim.(Uykusuzluğa rağmen istek ve neden biraz daha iyisi olmasın? mantığı ile.) Üstteki mesajımı tamamen silebilirsiniz
.
Üstte paylaştığım silinecek olan kodda Nickin Kanallarını eklerken aralarına virgül koy demiştim, onu ortadan kaldırdım aralarına boşluk koy.
.
Birde üstteki koddan farklı olarak, sildiğin nickin hangi tablodan silindiğini söylemiyordu, şimdi söylüyor.
!op1 <Nick> [Kanal(lar)] - !op2 <Nick> [Kanal(lar)] - !op3 <Nick> [Kanal(lar)] - !op4 <Nick> [Kanal(lar)] - !op5 <Nick> [Kanal(lar)]
Kıdemlere göre Nick ve Kanallar ekleyebilme/silebilme/değiştirebilme/listeleyebilme (yorgunsero nickli arkadaşın istediği gibi, tabi doğru anladıysam...)
e kadar kullanabilirsin.(Eğer kodu kullanmaya karar verir ve daha fazla kıdeme ihtiyaç duyarsan PM ile ulaştığında kıdem sayısını yükseltebilirim.) Ayrıca
ile belirttiğim bölüme, komutları kullanmak istediğin bir kanal yazmalısın.
Tekrar belirteyim; kod belki daha sade veya daha kısa yollarla da yazılabilir istenildiği takdirde(Benim bilgim şimdilik buna müsait). Ben başladığım ve bildiğim şekilde yapıp bitirmek istedim. Her neyse..
Örnek Resimlerde nasıl kullanıldığını daha rahat görebilirsiniz.
Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *:start: {
if ($isfile(kıdem1.hash)) { hmake kıdem1 100 | hload -i kıdem1 kıdem1.hash }
if ($isfile(kıdem2.hash)) { hmake kıdem2 100 | hload -i kıdem2 kıdem2.hash }
if ($isfile(kıdem3.hash)) { hmake kıdem3 100 | hload -i kıdem3 kıdem3.hash }
if ($isfile(kıdem4.hash)) { hmake kıdem4 100 | hload -i kıdem4 kıdem4.hash }
if ($isfile(kıdem5.hash)) { hmake kıdem5 100 | hload -i kıdem5 kıdem5.hash }
}
on *:text:*:#Kanal: {
if $regex($1-,/^(\.|!)op1\s+.+/Si) {
if !$hfind(kıdem1,$gettok($2,1,32)) && !$hfind(kıdem2,$gettok($2,1,32)) && !$hfind(kıdem3,$gettok($2,1,32)) && !$hfind(kıdem4,$gettok($2,1,32)) && !$hfind(kıdem5,$gettok($2,1,32)) {
hadd -m kıdem1 $+($2,$chr(32),$3-) | msg $chan Kıdem1 Tablosuna $qt($2) Nicki ve Kanal Bilgileri Eklendi. | hsave -i kıdem1 kıdem1.hash }
elseif $hfind(kıdem1,$gettok($2,1,32)) && !$hfind(kıdem2,$gettok($2,1,32)) && !$hfind(kıdem3,$gettok($2,1,32)) && !$hfind(kıdem4,$gettok($2,1,32)) && !$hfind(kıdem5,$gettok($2,1,32)) {
hadd -m kıdem1 $+($2,$chr(32),$3-) | msg $chan $qt($2) Nicki ve Kanal Bilgileri Kıdem1 Listesinde Güncellendi/Değiştirildi. | hsave -i kıdem1 kıdem1.hash }
elseif !$hfind(kıdem1,$gettok($2,1,32)) && $hfind(kıdem2,$gettok($2,1,32)) && !$hfind(kıdem3,$gettok($2,1,32)) && !$hfind(kıdem4,$gettok($2,1,32)) && !$hfind(kıdem5,$gettok($2,1,32)) {
hadd -m kıdem1 $+($2,$chr(32),$hget(kıdem2,$2)) | msg $chan $qt($2) Nicki ve Kanal Bilgileri Kıdem2 Listesinden Silinip Kıdem1 Listesine Eklendi | hdel kıdem2 $2 | hsave -i kıdem1 kıdem1.hash | hsave -i kıdem2 kıdem2.hash }
elseif !$hfind(kıdem1,$gettok($2,1,32)) && !$hfind(kıdem2,$gettok($2,1,32)) && $hfind(kıdem3,$gettok($2,1,32)) && !$hfind(kıdem4,$gettok($2,1,32)) && !$hfind(kıdem5,$gettok($2,1,32)) {
hadd -m kıdem1 $+($2,$chr(32),$hget(kıdem3,$2)) | msg $chan $qt($2) Nicki ve Kanal Bilgileri Kıdem3 Listesinden Silinip Kıdem1 Listesine Eklendi. | hdel kıdem3 $2 | hsave -i kıdem1 kıdem1.hash | hsave -i kıdem3 kıdem3.hash }
elseif !$hfind(kıdem1,$gettok($2,1,32)) && !$hfind(kıdem2,$gettok($2,1,32)) && !$hfind(kıdem3,$gettok($2,1,32)) && $hfind(kıdem4,$gettok($2,1,32)) && !$hfind(kıdem5,$gettok($2,1,32)) {
hadd -m kıdem1 $+($2,$chr(32),$hget(kıdem4,$2)) | msg $chan $qt($2) Nicki ve Kanal Bilgileri Kıdem4 Listesinden Silinip Kıdem1 Listesine Eklendi. | hdel kıdem4 $2 | hsave -i kıdem1 kıdem1.hash | hsave -i kıdem4 kıdem4.hash }
elseif !$hfind(kıdem1,$gettok($2,1,32)) && !$hfind(kıdem2,$gettok($2,1,32)) && !$hfind(kıdem3,$gettok($2,1,32)) && !$hfind(kıdem4,$gettok($2,1,32)) && $hfind(kıdem5,$gettok($2,1,32)) {
hadd -m kıdem1 $+($2,$chr(32),$hget(kıdem5,$2)) | msg $chan $qt($2) Nicki ve Kanal Bilgileri Kıdem5 Listesinden Silinip Kıdem1 Listesine Eklendi. | hdel kıdem5 $2 | hsave -i kıdem1 kıdem1.hash | hsave -i kıdem5 kıdem5.hash }
}
if $regex($1-,/^(\.|!)op2\s+.+/Si) {
if !$hfind(kıdem1,$gettok($2,1,32)) && !$hfind(kıdem2,$gettok($2,1,32)) && !$hfind(kıdem3,$gettok($2,1,32)) && !$hfind(kıdem4,$gettok($2,1,32)) && !$hfind(kıdem5,$gettok($2,1,32)) {
hadd -m kıdem2 $+($2,$chr(32),$3-) | msg $chan Kıdem2 Tablosuna $qt($2) Nicki ve Kanal Bilgileri Eklendi. | hsave -i kıdem2 kıdem2.hash }
elseif $hfind(kıdem1,$gettok($2,1,32)) && !$hfind(kıdem2,$gettok($2,1,32)) && !$hfind(kıdem3,$gettok($2,1,32)) && !$hfind(kıdem4,$gettok($2,1,32)) && !$hfind(kıdem5,$gettok($2,1,32)) {
hadd -m kıdem2 $+($2,$chr(32),$hget(kıdem1,$2)) | msg $chan $qt($2) Nicki ve Kanal Bilgileri Kıdem1 Listesinden Silinip Kıdem2 Listesine Eklendi. | hsave -i kıdem1 kıdem1.hash | hsave -i kıdem2 kıdem2.hash }
elseif !$hfind(kıdem1,$gettok($2,1,32)) && $hfind(kıdem2,$gettok($2,1,32)) && !$hfind(kıdem3,$gettok($2,1,32)) && !$hfind(kıdem4,$gettok($2,1,32)) && !$hfind(kıdem5,$gettok($2,1,32)) {
hadd -m kıdem2 $+($2,$chr(32),$3-) | msg $chan $qt($2) Nicki ve Kanal Bilgileri Kıdem2 Listesinde Güncellendi/Değiştirildi. | hsave -i kıdem2 kıdem2.hash }
elseif !$hfind(kıdem1,$gettok($2,1,32)) && !$hfind(kıdem2,$gettok($2,1,32)) && $hfind(kıdem3,$gettok($2,1,32)) && !$hfind(kıdem4,$gettok($2,1,32)) && !$hfind(kıdem5,$gettok($2,1,32)) {
hadd -m kıdem2 $+($2,$chr(32),$hget(kıdem3,$2)) | msg $chan $qt($2) Nicki ve Kanal Bilgileri Kıdem3 Listesinden Silinip Kıdem2 Listesine Eklendi. | hdel kıdem3 $2 | hsave -i kıdem1 kıdem1.hash | hsave -i kıdem3 kıdem3.hash }
elseif !$hfind(kıdem1,$gettok($2,1,32)) && !$hfind(kıdem2,$gettok($2,1,32)) && !$hfind(kıdem3,$gettok($2,1,32)) && $hfind(kıdem4,$gettok($2,1,32)) && !$hfind(kıdem5,$gettok($2,1,32)) {
hadd -m kıdem2 $+($2,$chr(32),$hget(kıdem4,$2)) | msg $chan $qt($2) Nicki ve Kanal Bilgileri Kıdem4 Listesinden Silinip Kıdem2 Listesine Eklendi. | hdel kıdem4 $2 | hsave -i kıdem1 kıdem1.hash | hsave -i kıdem4 kıdem4.hash }
elseif !$hfind(kıdem1,$gettok($2,1,32)) && !$hfind(kıdem2,$gettok($2,1,32)) && !$hfind(kıdem3,$gettok($2,1,32)) && !$hfind(kıdem4,$gettok($2,1,32)) && $hfind(kıdem5,$gettok($2,1,32)) {
hadd -m kıdem2 $+($2,$chr(32),$hget(kıdem5,$2)) | msg $chan $qt($2) Nicki ve Kanal Bilgileri Kıdem5 Listesinden Silinip Kıdem2 Listesine Eklendi. | hdel kıdem5 $2 | hsave -i kıdem1 kıdem1.hash | hsave -i kıdem5 kıdem5.hash }
}
if $regex($1-,/^(\.|!)op3\s+.+/Si) {
if !$hfind(kıdem1,$gettok($2,1,32)) && !$hfind(kıdem2,$gettok($2,1,32)) && !$hfind(kıdem3,$gettok($2,1,32)) && !$hfind(kıdem4,$gettok($2,1,32)) && !$hfind(kıdem5,$gettok($2,1,32)) {
hadd -m kıdem3 $+($2,$chr(32),$3-) | msg $chan Kıdem3 Tablosuna $qt($2) Nicki ve Kanal Bilgileri Eklendi. | hsave -i kıdem3 kıdem3.hash }
elseif $hfind(kıdem1,$gettok($2,1,32)) && !$hfind(kıdem2,$gettok($2,1,32)) && !$hfind(kıdem3,$gettok($2,1,32)) && !$hfind(kıdem4,$gettok($2,1,32)) && !$hfind(kıdem5,$gettok($2,1,32)) {
hadd -m kıdem3 $+($2,$chr(32),$hget(kıdem1,$2)) | msg $chan $qt($2) Nicki ve Kanal Bilgileri Kıdem1 Listesinden Silinip Kıdem3 Listesine Eklendi. | hdel kıdem1 $2 | hsave -i kıdem1 kıdem1.hash | hsave -i kıdem3 kıdem3.hash }
elseif !$hfind(kıdem1,$gettok($2,1,32)) && $hfind(kıdem2,$gettok($2,1,32)) && !$hfind(kıdem3,$gettok($2,1,32)) && !$hfind(kıdem4,$gettok($2,1,32)) && !$hfind(kıdem5,$gettok($2,1,32)) {
hadd -m kıdem3 $+($2,$chr(32),$hget(kıdem2,$2)) | msg $chan $qt($2) Nicki ve Kanal Bilgileri Kıdem2 Listesinden Silinip Kıdem3 Listesine Eklendi. | hdel kıdem2 $2 | hsave -i kıdem2 kıdem2.hash | hsave -i kıdem3 kıdem3.hash }
elseif !$hfind(kıdem1,$gettok($2,1,32)) && !$hfind(kıdem2,$gettok($2,1,32)) && $hfind(kıdem3,$gettok($2,1,32)) && !$hfind(kıdem4,$gettok($2,1,32)) && !$hfind(kıdem5,$gettok($2,1,32)) {
hadd -m kıdem3 $+($2,$chr(32),$3-) | msg $chan $qt($2) Nicki ve Kanal Bilgileri Kıdem3 Listesinde Güncellendi/Değiştirildi. | hsave -i kıdem3 kıdem3.hash }
elseif !$hfind(kıdem1,$gettok($2,1,32)) && !$hfind(kıdem2,$gettok($2,1,32)) && !$hfind(kıdem3,$gettok($2,1,32)) && $hfind(kıdem4,$gettok($2,1,32)) && !$hfind(kıdem5,$gettok($2,1,32)) {
hadd -m kıdem3 $+($2,$chr(32),$hget(kıdem4,$2)) | msg $chan $qt($2) Nicki ve Kanal Bilgileri Kıdem4 Listesinden Silinip Kıdem3 Listesine Eklendi. | hdel kıdem4 $2 | hsave -i kıdem3 kıdem3.hash | hsave -i kıdem4 kıdem4.hash }
elseif !$hfind(kıdem1,$gettok($2,1,32)) && !$hfind(kıdem2,$gettok($2,1,32)) && !$hfind(kıdem3,$gettok($2,1,32)) && !$hfind(kıdem4,$gettok($2,1,32)) && $hfind(kıdem5,$gettok($2,1,32)) {
hadd -m kıdem3 $+($2,$chr(32),$hget(kıdem5,$2)) | msg $chan $qt($2) Nicki ve Kanal Bilgileri Kıdem5 Listesinden Silinip Kıdem3 Listesine Eklendi. | hdel kıdem5 $2 | hsave -i kıdem3 kıdem3.hash | hsave -i kıdem5 kıdem5.hash }
}
if $regex($1-,/^(\.|!)op4\s+.+/Si) {
if !$hfind(kıdem1,$gettok($2,1,32)) && !$hfind(kıdem2,$gettok($2,1,32)) && !$hfind(kıdem3,$gettok($2,1,32)) && !$hfind(kıdem4,$gettok($2,1,32)) && !$hfind(kıdem5,$gettok($2,1,32)) {
hadd -m kıdem4 $+($2,$chr(32),$3-) | msg $chan Kıdem4 Tablosuna $qt($2) Nicki ve Kanal Bilgileri Eklendi. | hsave -i kıdem4 kıdem4.hash }
elseif $hfind(kıdem1,$gettok($2,1,32)) && !$hfind(kıdem2,$gettok($2,1,32)) && !$hfind(kıdem3,$gettok($2,1,32)) && !$hfind(kıdem4,$gettok($2,1,32)) && !$hfind(kıdem5,$gettok($2,1,32)) {
hadd -m kıdem4 $+($2,$chr(32),$hget(kıdem1,$2)) | msg $chan $qt($2) Nicki ve Kanal Bilgileri Kıdem1 Listesinden Silinip Kıdem4 Listesine Eklendi. | hdel kıdem1 $2 | hsave -i kıdem1 kıdem1.hash | hsave -i kıdem4 kıdem4.hash }
elseif !$hfind(kıdem1,$gettok($2,1,32)) && $hfind(kıdem2,$gettok($2,1,32)) && !$hfind(kıdem3,$gettok($2,1,32)) && !$hfind(kıdem4,$gettok($2,1,32)) && !$hfind(kıdem5,$gettok($2,1,32)) {
hadd -m kıdem4 $+($2,$chr(32),$hget(kıdem2,$2)) | msg $chan $qt($2) Nicki ve Kanal Bilgileri Kıdem2 Listesinden Silinip Kıdem4 Listesine Eklendi. | hdel kıdem2 $2 | hsave -i kıdem2 kıdem2.hash | hsave -i kıdem4 kıdem4.hash }
elseif !$hfind(kıdem1,$gettok($2,1,32)) && !$hfind(kıdem2,$gettok($2,1,32)) && $hfind(kıdem3,$gettok($2,1,32)) && !$hfind(kıdem4,$gettok($2,1,32)) && !$hfind(kıdem5,$gettok($2,1,32)) {
hadd -m kıdem4 $+($2,$chr(32),$hget(kıdem3,$2)) | msg $chan $qt($2) Nicki ve Kanal Bilgileri Kıdem3 Listesinden Silinip Kıdem4 Listesine Eklendi. | hdel kıdem3 $2 | hsave -i kıdem3 kıdem3.hash | hsave -i kıdem4 kıdem4.hash }
elseif !$hfind(kıdem1,$gettok($2,1,32)) && !$hfind(kıdem2,$gettok($2,1,32)) && !$hfind(kıdem3,$gettok($2,1,32)) && $hfind(kıdem4,$gettok($2,1,32)) && !$hfind(kıdem5,$gettok($2,1,32)) {
hadd -m kıdem4 $+($2,$chr(32),$3-) | msg $chan $qt($2) Nicki ve Kanal Bilgileri Kıdem4 Listesinde Güncellendi/Değiştirildi. | hsave -i kıdem4 kıdem4.hash }
elseif !$hfind(kıdem1,$gettok($2,1,32)) && !$hfind(kıdem2,$gettok($2,1,32)) && !$hfind(kıdem3,$gettok($2,1,32)) && !$hfind(kıdem4,$gettok($2,1,32)) && $hfind(kıdem5,$gettok($2,1,32)) {
hadd -m kıdem4 $+($2,$chr(32),$hget(kıdem5,$2)) | msg $chan $qt($2) Nicki ve Kanal Bilgileri Kıdem5 Listesinden Silinip Kıdem4 Listesine Eklendi. | hdel kıdem5 $2 | hsave -i kıdem4 kıdem4.hash | hsave -i kıdem5 kıdem5.hash }
}
if $regex($1-,/^(\.|!)op5\s+.+/Si) {
if !$hfind(kıdem1,$gettok($2,1,32)) && !$hfind(kıdem2,$gettok($2,1,32)) && !$hfind(kıdem3,$gettok($2,1,32)) && !$hfind(kıdem4,$gettok($2,1,32)) && !$hfind(kıdem5,$gettok($2,1,32)) {
hadd -m kıdem5 $+($2,$chr(32),$3-) | msg $chan Kıdem5 Tablosuna $qt($2) Nicki ve Kanal Bilgileri Eklendi. | hsave -i kıdem5 kıdem5.hash }
elseif $hfind(kıdem1,$gettok($2,1,32)) && !$hfind(kıdem2,$gettok($2,1,32)) && !$hfind(kıdem3,$gettok($2,1,32)) && !$hfind(kıdem4,$gettok($2,1,32)) && !$hfind(kıdem5,$gettok($2,1,32)) {
hadd -m kıdem5 $+($2,$chr(32),$hget(kıdem1,$2)) | msg $chan $qt($2) Nicki ve Kanal Bilgileri Kıdem1 Listesinden Silinip Kıdem5 Listesine Eklendi. | hdel kıdem1 $2 | hsave -i kıdem1 kıdem1.hash | hsave -i kıdem5 kıdem5.hash }
elseif !$hfind(kıdem1,$gettok($2,1,32)) && $hfind(kıdem2,$gettok($2,1,32)) && !$hfind(kıdem3,$gettok($2,1,32)) && !$hfind(kıdem4,$gettok($2,1,32)) && !$hfind(kıdem5,$gettok($2,1,32)) {
hadd -m kıdem5 $+($2,$chr(32),$hget(kıdem2,$2)) | msg $chan $qt($2) Nicki ve Kanal Bilgileri Kıdem2 Listesinden Silinip Kıdem5 Listesine Eklendi. | hdel kıdem2 $2 | hsave -i kıdem2 kıdem2.hash | hsave -i kıdem5 kıdem5.hash }
elseif !$hfind(kıdem1,$gettok($2,1,32)) && !$hfind(kıdem2,$gettok($2,1,32)) && $hfind(kıdem3,$gettok($2,1,32)) && !$hfind(kıdem4,$gettok($2,1,32)) && !$hfind(kıdem5,$gettok($2,1,32)) {
hadd -m kıdem5 $+($2,$chr(32),$hget(kıdem3,$2)) | msg $chan $qt($2) Nicki ve Kanal Bilgileri Kıdem3 Listesinden Silinip Kıdem5 Listesine Eklendi. | hdel kıdem3 $2 | hsave -i kıdem3 kıdem3.hash | hsave -i kıdem5 kıdem5.hash }
elseif !$hfind(kıdem1,$gettok($2,1,32)) && !$hfind(kıdem2,$gettok($2,1,32)) && !$hfind(kıdem3,$gettok($2,1,32)) && $hfind(kıdem4,$gettok($2,1,32)) && !$hfind(kıdem5,$gettok($2,1,32)) {
hadd -m kıdem5 $+($2,$chr(32),$hget(kıdem4,$2)) | msg $chan $qt($2) Nicki ve Kanal Bilgileri Kıdem4 Listesinden Silinip Kıdem5 Listesine Eklendi. | hdel kıdem4 $2 | hsave -i kıdem4 kıdem4.hash | hsave -i kıdem5 kıdem5.hash }
elseif !$hfind(kıdem1,$gettok($2,1,32)) && !$hfind(kıdem2,$gettok($2,1,32)) && !$hfind(kıdem3,$gettok($2,1,32)) && !$hfind(kıdem4,$gettok($2,1,32)) && $hfind(kıdem5,$gettok($2,1,32)) {
hadd -m kıdem5 $+($2,$chr(32),$3-) | msg $chan $qt($2) Nicki ve Kanal Bilgileri Kıdem5 Listesinde Güncellendi/Değiştirildi. | hsave -i kıdem5 kıdem5.hash }
}
if $regex($1-,/^(\.|!)sil\s+.+$/Si) {
if $hfind(kıdem1,$gettok($2,1,32)) { hdel kıdem1 $2 | msg $chan $qt($2) Nicki Kıdem1 Listesinden Silindi. }
if $hfind(kıdem2,$gettok($2,1,32)) { hdel kıdem2 $2 | msg $chan $qt($2) Nicki Kıdem2 Listesinden Silindi. }
if $hfind(kıdem3,$gettok($2,1,32)) { hdel kıdem3 $2 | msg $chan $qt($2) Nicki Kıdem3 Listesinden Silindi. }
if $hfind(kıdem4,$gettok($2,1,32)) { hdel kıdem4 $2 | msg $chan $qt($2) Nicki Kıdem4 Listesinden Silindi. }
if $hfind(kıdem5,$gettok($2,1,32)) { hdel kıdem5 $2 | msg $chan $qt($2) Nicki Kıdem5 Listesinden Silindi. }
}
if $regex($1-,/^(\.|!)k(ı|i)demler$/Si) {
if $hget(kıdem1,0).item != 0 { msg $chan Kıdem1 Nickleri Listeleniyor.. }
var %a = 1,%b = $hget(kıdem1,0).item | while %a <= %b { /msg $chan 2 $hget(kıdem1,%a).item 4 $hget(kıdem1,$hget(kıdem1,%a).item) | inc %a }
if $hget(kıdem2,0).item != 0 { msg $chan Kıdem2 Nickleri Listeleniyor.. }
var %c = 1,%d = $hget(kıdem2,0).item | while %c <= %d { /msg $chan 2 $hget(kıdem2,%c).item 4 $hget(kıdem2,$hget(kıdem2,%c).item) | inc %c }
if $hget(kıdem3,0).item != 0 { msg $chan Kıdem3 Nickleri Listeleniyor.. }
var %e = 1,%f = $hget(kıdem3,0).item | while %e <= %f { /msg $chan 2 $hget(kıdem3,%e).item 4 $hget(kıdem3,$hget(kıdem3,%e).item) | inc %e }
if $hget(kıdem4,0).item != 0 { msg $chan Kıdem4 Nickleri Listeleniyor.. }
var %g = 1,%h = $hget(kıdem4,0).item | while %g <= %h { /msg $chan 2 $hget(kıdem4,%g).item 4 $hget(kıdem4,$hget(kıdem4,%g).item) | inc %g }
if $hget(kıdem5,0).item != 0 { msg $chan Kıdem5 Nickleri Listeleniyor.. }
var %i = 1,%j = $hget(kıdem5,0).item | while %i <= %j { /msg $chan 2 $hget(kıdem5,%i).item 4 $hget(kıdem5,$hget(kıdem5,%i).item) | inc %i }
}
}