IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   Belirtileni silmek (https://www.ircforumlari.net/mirc-scripting-sorunlari/41649-belirtileni-silmek.html)

SaintCty 19 Kasım 2007 13:46

Belirtileni silmek
 
ustalar selam benim yapmış oldugum basit bir kod önce konu verim ardından yapamadıgımı acıklayım

Kod:

on 100:text:*:#:{
  if $1 == !sabıkalılar { play #karalist sabıka.txt 450 | halt }
  if !sabıkalısil == $1 { remove sabıka.txt $2- | .msg #karalist $2- nickli sabıkalı  $nick  tarafından silinmistir. }
  if !sabıkalıekle == $1 { write sabıka.txt $2- | .msg #karalist $2-  nicki   $nick  Tarafından Başarıyla Eklendi }
}

şimdi bu kodda sevmedigim sabıkalı nickleri ekliyor okutuyor ve siliyorum sorumum şu mesela sabıkalı texte 20 adet nick var sil diyince hepsini birden siliyor onunda bir anlamı kalmıyor benim yapmak istedigim eklerken şöyle ekleyim
!sabıkalıekle deli ama kaydederken sabıkalı text se ekledikce numaralandırsın
listeyi görmek istedigimde
1: deli
2: ozan
böyle versin ve ben silmek istedigimde
!sabıkalısil 2 yazayım silinecek nickin numarasını sadece
2 numarada kim varsa onu silsin sadece
umarım anlatabilmişimdir yardım ederseniz sevinirim şimdiden tşkler

KiLL 19 Kasım 2007 14:00

Cevap: Belirtileni silmek
 
if !sabıkalısil == $1 { remove sabıka.txt $2- | .msg #karalist $2- nickli sabıkalı  $nick  tarafından silinmistir. }
bunun yerıne bunu yaz ;

if $read(sabıka.txt,w,$2 $+ *) == $null { /msg #karalis Böyle Bir Sabıka Kaydı Bulunamadı. }
else { remove sabıka.txt,w,$2 $+ * | /msg #karalist $read(sabıka.txt,w,$2 $+ *) Sabıkalısının Sabıka Kaydı Silindi. }

SaintCty 19 Kasım 2007 14:20

Cevap: Belirtileni silmek
 
kil emegin için tşkler ama olmadı istedigim gibi yine hepsini siliyor
numaralandırmıyor ekleyince aynısı var demiyor veya sil diye komut uygulayınca veri bulunamadı gibisinden ses vermiyor
yani anlıycagın benimkinden farkı yok sorunum şu
eklerken numaralndıracak
silerken sadece o numarayı yazıcam
ikinci kec aynı numarayı sildiyince listede yok diycek
veya aynı nicki ekleyince listede var zaten diycek
işte bunlar
ilgin emegin için tşkler

L4roXyL 19 Kasım 2007 16:34

Cevap: Belirtileni silmek
 
Şu şekilde birşey işini görecektir.

on 100:text:*:#: { if $1 == !sabıkalıekle { if !$read(sabıkalı.txt,w,$+(*,$2)) { inc %1 1 | write sabıkalı.txt $+($(%1,2),:,$chr(32),$2) | msg # $2 listeye eklendi. } } | if $1 == !sabıkalısil { if $regex($2,/[1-9]) && $read(sabıkalı.txt,s,$+($2,:)) { write $+(-dl,$readn) sabıkalı.txt | msg # $2 numarasındaki veri silindi. } } }

Eklerken numaralandırır.
Silerken !sabıkalısil numara yazarsan o numaradki veriyi siler.(Tabi varsa)

L4roXyL 19 Kasım 2007 16:37

Cevap: Belirtileni silmek
 
HachLi $numtock kısmını düzelt.

SaintCty 19 Kasım 2007 17:24

Cevap: Belirtileni silmek
 
Kod:

on *:text:*:#:{
  if $1 == !sabıkalıekle { if !$read(sabıkalı.txt,w,$+(*,$2)) { inc %1 1 | write sabıkalı.txt $+($(%1,2),:,$chr(32),$2) | msg # $2 listeye eklendi. } } | if $1 == !sabıkalısil { if $regex($2,/[1-9]) && $read(sabıkalı.txt,s,$+($2,:)) { write $+(-dl,$readn) sabıkalı.txt | msg # $2 numarasındaki veri silindi. } } |  if $1 == !sabıkalılar  { play #karalist sabıkalı.txt 450 | halt  }
}

USTA ELİNE SAGLIK OLMUŞ YANLIZ BİR SORUN VAR OKUTAMIYORUM
YANİ OKUYOR AMA ŞÖYLE
[ 17: 17 : 38 ] <saintcty> !sabıkalılar
[ 17: 17 : 39 ] <s-bot> 1: 1
[ 17: 17 : 39 ] <s-bot> 2: 2
[ 17: 17 : 40 ] <s-bot> 3: 3
sabıkalı textin içine bir göz attımda sadece numaraları kaydetmiş
yani nickleri detayı vermiyor
bir tamamlarsan sana zahmet tşkler şimdiden
!sabıkalıekle 1 ahmet küfür etti
bu şekilde ekledim ama sadece numara kaydetmiş

L4roXyL 19 Kasım 2007 17:31

Cevap: Belirtileni silmek
 
on *:text:*:#: {
if $1 == !sabıkalıekle { if !$read(sabıkalı.txt,w,$+(*,$2)) { inc %1 1 | write sabıkalı.txt $+($(%1,2),:,$chr(32),$2) | msg # $2 listeye eklendi. } }
if $1 == !sabıkalısil { if $regex($2,/[1-9]) && $read(sabıkalı.txt,s,$+($2,:)) { write $+(-dl,$readn) sabıkalı.txt | msg # $2 numarasındaki veri silindi. } }
if $1 == !sabıkalılar { var %< = 1,%> = $lines(sabıkalı.txt) | while %< <= %> { msg # $read(sabıkalı.txt,%<) | inc %< } }
}

!sabıkalılar yaparsan olucaktır.

SaintCty 19 Kasım 2007 18:02

Cevap: Belirtileni silmek
 
ustam tamam yanlız son bi sorunum oda
!sabıkalıekle ahmet küfürden den dolayı
yazıyorum ama sadece ilk kelimeyi listeye ekliyor
yani okuttugumda
[ 17: 58 : 48 ] <saintcty> !sabıkalılar
[ 17: 58 : 48 ] <s-bot> 8: ahmet
yani yazdıgımı sadece ilk kelimesini texe kaydeyor oysa ben istiyorumki ondan sonraki bölümüde alsınki nick neden sabıkalı hatırlayamassam göreyim
ilgin ve emeklerin için tşkler

L4roXyL 19 Kasım 2007 18:20

Cevap: Belirtileni silmek
 
on *:text:*:#:{
if $1 == !sabıkalıekle { if !$read(sabıkalı.txt,w,$+(*,$2)) { inc %1 1 | write sabıkalı.txt $+($(%1,2),:,$chr(32),$2-) | msg # $2 listeye eklendi. } }
if $1 == !sabıkalısil { if $regex($2,/[1-9]) && $read(sabıkalı.txt,w,$+($2,:,*)) { write $+(-dl,$readn) sabıkalı.txt | msg # $2 numarasındaki veri silindi. } }
if $1 == !sabıkalılar { var %< = 1,%> = $lines(sabıkalı.txt) | while %< <= %> { msg # $read(sabıkalı.txt,%<) | inc %< } }
}


Şeklinde değişirsen istediğin olacaktır.


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 22:40.

Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net