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

9Beğeni(ler)
  • 2 Post By Set
  • 1 Post By q0kh4n
  • 1 Post By Set
  • 2 Post By YouMyCure
  • 1 Post By Subzero
  • 2 Post By Alper

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 23 Ekim 2012, 20:37   #1
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
[* Ekle Sil sırala oku : No'ya göre okutma *]




Öncelikle merhaba ;
Bir kod istiyorum, özellikleri ve kullanım şekli :

!ekle : '' !ekle '' kodunu kullandıkdak sonra ; kaydedecek misal ;

!ekle #Sohbet kanal founderi değiştirilmiştir.
!ekle Vagrant Nick'i oper eklendi.
!ekle Vagrant sohbet kanalına sop eklendi
-
!sırala : '' !sırala '' kodunu kullandıktan sonra ; arşiv'i sunacak misal ;

!sırala
Not1: Vagrant tarafından bilgi eklenmesi var okumak için : !not1 yazınız
Not2: Vagrant tarafından bilgi eklenmesi var okumak için : !not2 yazınız
Not3: Vagrant tarafından bilgi eklenmesi var okumak için : !not3 yazınız
-
!not1
Not-1 Okunuyor : #Sohbet kanal founderi değiştirilmiştir. Yazan: Vagrant Saat : 00:00 vb gibi.


Not : Ekle sil list var if'dede araştırınca bir cok yanıt alıyoruz ve bir cok seyı denememe ragmen yapmayı beceremedım acıkcası
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

__________________
kS.-.cMGz
 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Yazgulu Sohbet
Alt 24 Ekim 2012, 11:54   #2
Çevrimdışı
Set
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: [* Ekle Sil sırala oku : No'ya göre okutma *]




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:#mirchelp: { if $regex($1,/^[!.]ekle/i) { var %numara $iif($hget(not,0).data,$v1,1) hadd -m not %numara $+($2-,$chr(32),$chr(24),Ekleyen:,$chr(32),$nick,$chr(24),$chr(32),Tarih/Saat:,[,$date,-,$time,]) msg # * Not'unuz listeye eklenmistir. msg # [NOT] Numara: %numara - Mesaj: $2- msg # - hsave not not.63 } if $regex($1,/^[!.]sirala/i) { if $hget(not,0).data && !$hget(not) { msg # Listede suan not bulunmuyor! | return } msg # * Not listesi listeleniyor.. var %_ 1 while $hget(not,%_).data { msg # $+(%_,:) $token($v1,2,24) nick'inden bulunmakta -Komut: $+(Not,%_) inc %_ } msg # - msg # * Not listesi sonu- } if $regex($1,/^[!.]not/i) { var %numara $remove($1,!not) if !$hget(not,%numara).data { msg # %numara ile ilgili not bulunmamakta! | return } msg # [NOT] Numara: %numara - msg # Not: $token($hget(not,%numara).data,1,24) msg # - $token($hget(not,%numara).data,2,24) msg # - $token($hget(not,%numara).data,3,24) msg # - msg # * Not sonu.. } } on *:start: { hmake not hload not not.63 }

boyle birşey işini görür..

Komutlar;

!ekle Notun
!sirala
!notNumara

Hayırlı IF'ler.

 
Alıntı ile Cevapla

Alt 25 Ekim 2012, 20:37   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: [* Ekle Sil sırala oku : No'ya göre okutma *]




hoca yine döktürmüşsün, hava değişimi falanmı aldın :x

 
Alıntı ile Cevapla

Alt 15 Eylül 2015, 17:14   #4
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: [* Ekle Sil sırala oku : No'ya göre okutma *]




Set Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:#mirchelp: { if $regex($1,/^[!.]ekle/i) { var %numara $iif($hget(not,0).data,$v1,1) hadd -m not %numara $+($2-,$chr(32),$chr(24),Ekleyen:,$chr(32),$nick,$chr(24),$chr(32),Tarih/Saat:,[,$date,-,$time,]) msg # * Not'unuz listeye eklenmistir. msg # [NOT] Numara: %numara - Mesaj: $2- msg # - hsave not not.63 } if $regex($1,/^[!.]sirala/i) { if $hget(not,0).data && !$hget(not) { msg # Listede suan not bulunmuyor! | return } msg # * Not listesi listeleniyor.. var %_ 1 while $hget(not,%_).data { msg # $+(%_,:) $token($v1,2,24) nick'inden bulunmakta -Komut: $+(Not,%_) inc %_ } msg # - msg # * Not listesi sonu- } if $regex($1,/^[!.]not/i) { var %numara $remove($1,!not) if !$hget(not,%numara).data { msg # %numara ile ilgili not bulunmamakta! | return } msg # [NOT] Numara: %numara - msg # Not: $token($hget(not,%numara).data,1,24) msg # - $token($hget(not,%numara).data,2,24) msg # - $token($hget(not,%numara).data,3,24) msg # - msg # * Not sonu.. } } on *:start: { hmake not hload not not.63 }

boyle birşey işini görür..

Komutlar;

!ekle Notun
!sirala
!notNumara

Hayırlı IF'ler.



kodun calısmasında hiç bir sorun yok sorunsuz calısıyor fakat sadece 1 not kaydediyor 2 3 4 5 6 vsyr. notları kabul etmiyor demin denemeden yazmıstım düzeltiyorum not sil eksik var ve silme işlemi gerceklesmiyor coklu not ekleme sansımız yok onu fark ettim

 
Alıntı ile Cevapla

Alt 15 Eylül 2015, 22:36   #5
Çevrimdışı
Set
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: [* Ekle Sil sırala oku : No'ya göre okutma *]




var %numara $iif($hget(not,0).data,$calc ($v1 + 1),1)

Bu şekil düzeltmek dene istersen silme isleminide sen halledersin artık hayırlı filer.

 
Alıntı ile Cevapla

Alt 17 Aralık 2015, 16:52   #6
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: [* Ekle Sil sırala oku : No'ya göre okutma *]




Set Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:#mirchelp: { if $regex($1,/^[!.]ekle/i) { var %numara $iif($hget(not,0).data,$v1,1) hadd -m not %numara $+($2-,$chr(32),$chr(24),Ekleyen:,$chr(32),$nick,$chr(24),$chr(32),Tarih/Saat:,[,$date,-,$time,]) msg # * Not'unuz listeye eklenmistir. msg # [NOT] Numara: %numara - Mesaj: $2- msg # - hsave not not.63 } if $regex($1,/^[!.]sirala/i) { if $hget(not,0).data && !$hget(not) { msg # Listede suan not bulunmuyor! | return } msg # * Not listesi listeleniyor.. var %_ 1 while $hget(not,%_).data { msg # $+(%_,:) $token($v1,2,24) nick'inden bulunmakta -Komut: $+(Not,%_) inc %_ } msg # - msg # * Not listesi sonu- } if $regex($1,/^[!.]not/i) { var %numara $remove($1,!not) if !$hget(not,%numara).data { msg # %numara ile ilgili not bulunmamakta! | return } msg # [NOT] Numara: %numara - msg # Not: $token($hget(not,%numara).data,1,24) msg # - $token($hget(not,%numara).data,2,24) msg # - $token($hget(not,%numara).data,3,24) msg # - msg # * Not sonu.. } } on *:start: { hmake not hload not not.63 }

boyle birşey işini görür..

Komutlar;

!ekle Notun
!sirala
!notNumara

Hayırlı IF'ler.

Bu remote de !sil aktif değil yardımcı olur musunuz?

 
Alıntı ile Cevapla

Alt 19 Aralık 2015, 15:23   #7
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: [* Ekle Sil sırala oku : No'ya göre okutma *]




alifb Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Bu remote de !sil aktif değil yardımcı olur musunuz?

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] hocam siz yardımcı olur musunuz rica etsem

 
Alıntı ile Cevapla

Alt 19 Aralık 2015, 16:27   #8
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: [* Ekle Sil sırala oku : No'ya göre okutma *]




alifb Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] hocam siz yardımcı olur musunuz rica etsem

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:#: { if $1 == !ekle { if !$2- { msg $chan Hatalı Kullanım Not Belirtmediniz. | return } write notlist.txt $2- msg $chan Notunuz Listeye Eklendi. } if $1 == !notlar { var %i 1 while %i <= $lines(notlist.txt) { msg $chan $+(%i,.) $read(notlist.txt,%i) inc %i } } if $1 == !sil { if !$2 { msg $chan Hatalı Kullanım Numara Belirtiniz. | return } write $+(-dl,$2) notlist.txt msg $chan $2 Numaralı Not Silinmiştir.. } }

Bu Şekilde Not Ekleme Silme Listeleme Sistemi Yapılabilir.
!ekle NOT
!notlar
!sil Numara

__________________
Güneşin ilk ışıklarına vererek umutlarımı
Masal Dünyamın açıp kapılarını
Girdim insan Kalabalığına
 
Alıntı ile Cevapla

Alt 19 Ekim 2020, 21:20   #9
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: [* Ekle Sil sırala oku : No'ya göre okutma *]




YouMyCure Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:#: { if $1 == !ekle { if !$2- { msg $chan Hatalı Kullanım Not Belirtmediniz. | return } write notlist.txt $2- msg $chan Notunuz Listeye Eklendi. } if $1 == !notlar { var %i 1 while %i <= $lines(notlist.txt) { msg $chan $+(%i,.) $read(notlist.txt,%i) inc %i } } if $1 == !sil { if !$2 { msg $chan Hatalı Kullanım Numara Belirtiniz. | return } write $+(-dl,$2) notlist.txt msg $chan $2 Numaralı Not Silinmiştir.. } }

Bu Şekilde Not Ekleme Silme Listeleme Sistemi Yapılabilir.
!ekle NOT
!notlar
!sil Numara



bu remotede !ekle not !sil numara !notlar kısmını kanaldaki @ & founder e mahsus olup sadece !notlar kısmını kanaldaki diger kullanıcılar yapsın mumkunmudur

 
Alıntı ile Cevapla

Alt 20 Ekim 2020, 00:55   #10
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: [* Ekle Sil sırala oku : No'ya göre okutma *]




Subzero Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
bu remotede !ekle not !sil numara !notlar kısmını kanaldaki @ & founder e mahsus olup sadece !notlar kısmını kanaldaki diger kullanıcılar yapsın mumkunmudur


Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:#: { if $1 == !ekle { if ($nick isop $chan) { if !$2- { msg $chan Hatalı Kullanım Not Belirtmediniz. | return } write notlist.txt $2- msg $chan Notunuz Listeye Eklendi. } } if $1 == !sil { if ($nick isop $chan) { if !$2 { msg $chan Hatalı Kullanım Numara Belirtiniz. | return } write $+(-dl,$2) notlist.txt msg $chan $2 Numaralı Not Silinmiştir.. } } if $1 == !notlar { var %i 1 while %i <= $lines(notlist.txt) { msg $chan $+(%i,.) $read(notlist.txt,%i) inc %i } } }


Kırmızı belirtiğim yerler. Anlamı nick @ ise.

__________________
Davut Alper BALCI - pC`kOpAt
 
Alıntı ile Cevapla

Cevapla


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 
Seçenekler
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 Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Txt okutma SaNaLStaR Eggdrop, NeoStats, BNC 11 29 Eylül 2010 23:23
Toplist.Name.Tr - Toplist Sitesi Siteni Ekle Site Ekle armoking_yesiI Toplist - Hitlist 2 12 Şubat 2010 22:24