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

 Kayıt ol
Etiketlenen Kullanıcılar

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 23 Şubat 2012, 09:48   #1
TİGeR
Guest
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Yüzdesi:(%)
Bu neden oluyor?



Selamlar Günaydınlar.. Gene bi sorunla karşınızdayım
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
burdan aldığım bir addon var SWS adında regex dll ile calısnan bi addon cokta yararlı bir addon fakat sıkıntı surda addonu Scripte eklediğimden beri sürekli statuste bunlar cıkıor hatamı artık nasıl adlandırsam anlamadım zaten
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
Flag M: check for user in channels I am a member of
/WHO [+|-][achmnsuM] [args]
Flags are specified like channel modes, the flags chmnsu all have arguments
Flags are set to a positive check by +, a negative check by -
The flags work as follows:
Flag a: user is away
Flag c <channel>:       user is on <channel>,
                        no wildcards accepted
Flag h <host>:          user has string <host> in his/her hostname,
                        wildcards accepted
Flag m <usermodes>:     user has <usermodes> set, only
                        O/o/C/A/a/N/B are allowed
Flag n <nick>:          user has string <nick> in his/her nickname,
                        wildcards accepted
Flag s <server>:        user is on server <server>,
                        wildcards not accepted
Flag u <user>:          user has string <user> in his/her username,
                        wildcards accepted

5 dkda bir veya tam bilmiorm ama status bunlarla doluyor

codun mrc. dosyası bu
PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!

/*
####################################################
############ Strong Wall System (SWS) v1.0 ############
####################################################
################# Coded by XcLusive #################
####################################################
*/
alias wall { $iif($dialog(wall),dialog -v wall,dialog -m wall wall) }
alias viewspath return $shortfn($scriptdirviews.mdx)
alias mdxpath return $shortfn($scriptdirmdx.dll)
alias walli { $iif($input($2,owdia,$1),haltdef,haltdef) }
dialog wall {
  title "Strong Wall System (SWS) Coded by XcLusive"
  size -1 -1 210 257
  option dbu
  tab "Algılanacak Kelimeler", 1, 6 3 198 233
  box "Algılanacak Kelimeler", 2, 53 23 102 166, tab 1
  list 3, 60 32 87 151, tab 1 size
  button "Ekle", 5, 55 192 29 10, tab 1 flat
  button "Sil", 6, 88 192 29 10, tab 1 flat
  button "Temizle", 14, 122 192 29 10, tab 1 flat
  tab "Değiştirilecek Karakterler", 4
  list 9, 60 32 87 151, tab 4 size
  box "Değiştirilecek Karakterler", 10, 53 23 102 166, tab 4
  button "Ekle", 11, 55 192 29 10, tab 4 flat
  button "Sil", 12, 88 192 29 10, tab 4 flat
  button "Temizle", 13, 122 192 29 10, tab 4 flat
  tab "Silinecek Karakterler", 7
  list 19, 60 32 87 151, tab 7 size
  box "Silinecek Karakterler", 20, 53 23 102 166, tab 7
  button "Ekle", 21, 55 192 29 10, tab 7 flat
  button "Sil", 22, 88 192 29 10, tab 7 flat
  button "Temizle", 23, 122 192 29 10, tab 7 flat
  button "Muaf Kanal", 24, 56 221 40 10, flat
  button "Muaf Nick", 8, 111 221 40 10, flat
  button "KAPAT", 25, 6 240 199 12, cancel
  check "Boşlukları Sil", 16, 74 206 43 10
  check "Rakamları Sil", 15, 19 206 45 10
  check "Uzatılmış Karakterleri Sil", 17, 124 206 68 10
}
on *:dialog:wall:*:*:{
  if $devent == init {
    if (!$isfile($shortfn($scriptdirwall.xc))) { write $scriptdirwall.xc 1 | write -c $scriptdirwall.xc }
    if (!$isfile($shortfn($scriptdirascii.xc))) { write $scriptdirascii.xc 1 | write -c $scriptdirascii.xc }
    if (!$isfile($shortfn($scriptdirchr.xc))) { write $scriptdirchr.xc 1 | write -c $scriptdirchr.xc }
    dll $mdxpath SetMircVersion $version
    dll $mdxpath MarkDialog $dname
    dll $mdxpath SetControlMDX $dname 9 ListView report nosortheader showsel single rowselect grid > $viewspath
    did -i $dname 9 1 headerdims 85 85 
    did -i $dname 9 1 headertext +c Karakter $chr(9) Karşıtı
    walllist
    asciilist
    chrlist
    if %sws.bosluk == on did -c $dname 16
    if %sws.rakam == on did -c $dname 15
    if %sws.karakter == on did -c $dname 17
  }
  if $devent == sclick {
    if $did == 5 { var %x $$?="Eklenecek Kelimeyi Girin" | walladd %x | walllist }
    if $did == 6 { walldel $did(3).seltext | walllist }
    if $did == 14 { cleanwall }
    if $did == 11 { var %x $$?="Eklenecek Karakteri Girin" | var %y $$?="Karakter Karşıtını Girin" | asciiadd %x %y | asciilist }
    if $did == 12 { asciidel $remove($did(9).seltext,$chr(9),+fs,0) | asciilist }
    if $did == 13 { cleanascii }
    if $did == 24 { muafclist }
    if $did == 8 { muafnlist }
    if $did == 21 { var %x $$?="Silinecek Karakteri Girin" | chradd %x | chrlist }
    if $did == 22 { chrdel $did(19).seltext | chrlist }
    if $did == 23 { cleanchr }
    if $did == 16 { 
      if %sws.bosluk == on { set %sws.bosluk off }
      else { set %sws.bosluk on }
    }
    if $did == 15 { 
      if %sws.rakam == on { set %sws.rakam off }
      else { set %sws.rakam on }
    }
    if $did == 17 { 
      if %sws.karakter == on { set %sws.karakter off }
      else { set %sws.karakter on }
    }
  }
}
alias walladd {
  var %! = $left($calc($ctime * $rand(1000,9999)),7)
  if (!$1) { $walli(Wall System,Eklenecek Kelime Girmediniz) | halt }
  elseif ($hfind(wall,$1,0,W).data) { $walli(Wall System,Bu Kelime Daha Önceden Eklenmiş) | halt }
  else { hadd -m wall %! $1 | hsave -o wall $shortfn($scriptdirwall.xc) | $walli(Wall System,$1 Tabloya Eklendi) }
}
alias walldel {
  if (!$1) { $walli(Wall System,Silinecek Kelime Girmediniz) | halt }
  elseif (!$hfind(wall,$1,0,W).data) { $walli(Wall System,Bu Kelime Tabloda Ekli Değil) | halt }
  else { hdel -m wall $hfind(wall,$1,1,W).data | hsave -o wall $shortfn($scriptdirwall.xc)  | $walli(Wall System,$1 Tablodan Silindi) }
}
alias wallfind {
  if ($hfind(wall,$1-,1,W).data) { return 1 }
  else { return 0 }
}
alias walllist {
  if (!$dialog(wall)) { halt }
  did -r wall 3
  var %i = 1, %t = $hget(wall,0).data
  while (%i <= %t) {
    did -a wall 3 $hget(wall,%i).data
    inc %i 1
  }
}
alias cleanwall {
  var %y/n = $input(Duvar Tablosunu Komple Silmek İstediğinize Eminmisiniz!?,ivy,DİKKAT!)
  if %y/n = $yes { write -c $shortfn($scriptdirwall.xc) | $walli(Wall System,Wall.xc Tablosu Boşaltıldı!) | .hfree -sw wall | hmake wall | walllist }
  else { halt }
}
alias cleanascii {
  var %y/n = $input(Ascii Tablosunu Komple Silmek İstediğinize Eminmisiniz!?,ivy,DİKKAT!)
  if %y/n = $yes { write -c $shortfn($scriptdirascii.xc) | $walli(Wall System,Ascii.xc Tablosu Boşaltıldı!) | .hfree -sw ascii | hmake ascii | asciilist }
  else { halt }
}
alias cleanchr {
  var %y/n = $input(Karakter Tablosunu Komple Silmek İstediğinize Eminmisiniz!?,ivy,DİKKAT!)
  if %y/n = $yes { write -c $shortfn($scriptdirchr.xc) | $walli(Wall System,Chr.xc Tablosu Boşaltıldı!) | .hfree -sw chr | hmake chr | chrlist }
  else { halt }
}
alias asciiadd {
  if (!$1) || (!$2) { $walli(Wall System,Eklenecek Karakter Girmediniz) | halt }
  elseif ($hfind(ascii,$1,0,W).item) { $walli(Wall System,Bu Karakter Daha Önceden Eklenmiş) | halt }
  else { hadd -m ascii $1 $2 | hsave -b ascii $shortfn($scriptdirascii.xc) | $walli(Wall System,$1 - $2 Olarak Tabloya Eklendi) }
}
alias asciidel {
  if (!$1) { $walli(Wall System,Silinecek Karakteri Girmediniz) | halt }
  elseif (!$hfind(ascii,$1,0,W).item) { $walli(Wall System,Bu Karakter Tabloda Ekli Değil) | halt }
  else { hdel -m ascii $1 | hsave -b ascii $shortfn($scriptdirascii.xc)  | $walli(Wall System,$1 - $2 Tablodan Silindi) }
}
alias asciifind {
  if ($hfind(wall,$1-,1,W).data) { return 1 }
  else { return 0 }
}
alias asciilist {
  if (!$dialog(wall)) { halt }
  did -r wall 9
  var %i = 1, %t = $hget(ascii,0).data
  while (%i <= %t) {
    did -a wall 9 $hget(ascii,%i).item $chr(9) $hget(ascii,%i).data $chr(9)
    inc %i 1
  }
}
alias chradd {
  var %! = $left($calc($ctime * $rand(1000,9999)),7)
  if (!$1) { $walli(Wall System,Eklenecek Kelime Girmediniz) | halt }
  elseif ($hfind(chr,$1,0,n).data) { $walli(Wall System,Bu Karakter Daha Önceden Eklenmiş) | halt }
  else { hadd -m chr %! $1 | hsave -o chr $shortfn($scriptdirchr.xc) | $walli(Wall System,$1 Tabloya Eklendi) }
}
alias chrdel {
  if (!$1) { $walli(Wall System,Silinecek Kelime Girmediniz) | halt }
  elseif (!$hfind(chr,$1,0,n).data) { $walli(Wall System,Bu Karakter Tabloda Ekli Değil) | halt }
  else { hdel -m chr $hfind(chr,$1,1,n).data | hsave -o chr $shortfn($scriptdirchr.xc)  | $walli(Wall System,$1 Tablodan Silindi) }
}
alias chrfind {
  if ($hfind(chr,$1-,1,W).data) { return 1 }
  else { return 0 }
}
alias chrlist {
  if (!$dialog(wall)) { halt }
  did -r wall 19
  var %i = 1, %t = $hget(chr,0).data
  while (%i <= %t) {
    did -a wall 19 $hget(chr,%i).data
    inc %i 1
  }
}
on *:start:{
  if (!$hget(wall)) {  hmake wall | hload wall $shortfn($scriptdirwall.xc)  }
  if (!$hget(ascii)) {  hmake ascii | hload -b ascii $shortfn($scriptdirascii.xc) }
  if (!$hget(chr)) {  hmake chr | hload chr $shortfn($scriptdirchr.xc) }
}
alias mlist {
  did -r $1 11
  var %b = 1,%a = $ulist(*,$1,0)
  while (%b <= %a) {
    did -a $1 11 $ulist(*,$1,%b)
    inc %b 1
  }
}
alias muafnlist { $iif($dialog(muafnlist),dialog -v muafnlist,dialog -m muafnlist muafnlist) }
dialog muafnlist {
  title "Muaf Nick Listesi"
  size -1 -1 150 100
  option dbu
  text "Nicki YazIp Ekleyin:", 10, 10 5 95 10
  combo 11, 10 15 95 85, sort
  button "Ekle", 1, 110 27 37 12
  button "Sil", 2, 110 47 37 12
  button "Tamam", 3, 110 67 37 12,cancel
}
on *:dialog:muafnlist:*:*:{
  if $devent == init {
    var %a = 1,%b = $ulist(*,muafnlist,0)
    while %a <= %b {
      did -a $dname 11 $ulist(*,muafnlist,%a)
      inc %a 1 
    }
  }
  if $devent == sclick {
    if $did == 1 {
      if (!$did(11).text) { $walli(Wall System,Eklenecek Nick'i Girmediniz) | halt }
      else { .auser muafnlist $did(11).text | mlist $dname }
    }
    if $did == 2 { 
      if (!$did(11).text) { $walli(Wall System,Silinecek Nick'i Seçmediniz) | halt }
      else { .ruser muafnlist $did(11).seltext | mlist $dname }
    }
  }
}
alias muafclist { $iif($dialog(muafclist),dialog -v muafclist,dialog -m muafclist muafclist) }
dialog muafclist {
  title "Muaf Kanal Listesi"
  size -1 -1 150 100
  option dbu
  text "Kanalı YazIp Ekleyin:", 10, 10 5 95 10
  combo 11, 10 15 95 85, sort
  button "Ekle", 1, 110 27 37 12
  button "Sil", 2, 110 47 37 12
  button "Tamam", 3, 110 67 37 12,cancel
}
on *:dialog:muafclist:*:*:{
  if $devent == init {
    var %a = 1,%b = $ulist(*,muafclist,0)
    while %a <= %b {
      did -a $dname 11 $ulist(*,muafclist,%a)
      inc %a 1 
    }
  }
  if $devent == sclick {
    if $did == 1 {
      if (!$did(11).text) { $walli(Wall System,Eklenecek Kanalı Girmediniz) | halt }
      else { .auser muafclist $did(11).text | mlist $dname }
    }
    if $did == 2 { 
      if (!$did(11).text) { $walli(Wall System,Silinecek Kanalı Seçmediniz) | halt }
      else { .ruser muafclist $did(11).seltext | mlist $dname }
    }
  }
}
alias duvar {
  var %::rtext = $remove($1-,$chr(44),$chr(40),$chr(41)),%xc
  %::rtext = $lower(%::rtext)
  var %i = $hget(ascii,0).item
  while %i {
    %::rtext = $replace(%::rtext,$hget(ascii,%i).item,$hget(ascii,%i).data)
    dec %i 1
  }
  var %q = $hget(chr,0).item
  while %q {
    %xc = $hget(chr,%q).data
    %::rtext = $remove(%::rtext,%xc)
    dec %q
  }
  if %sws.bosluk == on { %::rtext = $regsubex(%::rtext,/([[:space:]])/g,$null) }
  if %sws.rakam == on { %::rtext = $regsubex(%::rtext,/([[:digit:]])/g,$null) }
  if %sws.karakter == on  { %::rtext = $regsubex(%::rtext,/(.)\1+/g,\1) }
  if ($hfind(wall,%::rtext,1,W).data) { return $true }
  else { return $false }
}
#wall on
on *:text:*:#Sohbet:{
  if ($level($nick) == muafnlist) { halt }
  if ($level($chan) == muafclist) { halt }
  if $me !isop $chan && !$regex($remove($usermode,+),/(o|O|N|C|a|A)) { halt }
  if ($duvar($1-)) { ban -k $chan $nick 2  4Küfür yasak!}
}
on *:action:*:#Sohbet:{
  if ($level($nick) == muafnlist) { halt }
  if ($level($chan) == muafclist) { halt }
  if $me !isop $chan && !$regex($remove($usermode,+),/(o|O|N|C|a|A)) { halt }
  if ($duvar($1-)) { ban -k $chan $nick 2  4Küfür yasak! }
}
on *:notice:*:#Sohbet:{
  if ($level($nick) == muafnlist) { halt }
  if ($level($chan) == muafclist) { halt }
  if $me !isop $chan && !$regex($remove($usermode,+),/(o|O|N|C|a|A)) { halt }
  if ($duvar($1-)) { ban -k $chan $nick 2  4Küfür yasak! }
}
#wall end
on *:load:{
  if (!$hget(wall)) {  hmake wall | hload wall $shortfn($scriptdirwall.xc)  }
  if (!$hget(ascii)) {  hmake ascii | hload -b ascii $shortfn($scriptdirascii.xc) }
  if (!$hget(chr)) {  hmake chr | hload chr $shortfn($scriptdirchr.xc) }
  set %sws.bosluk on | set %sws.rakam on | set %sws.karakter on
  wall
  return $walli(Wall System,Strong Wall System (SWS) Yüklendi! $crlf $+ Coded By XcLusive)
}
menu menubar,status,channel,query {
  SWS
  .$iif($group(#wall) == on,$style(2)) Aç:.enable #wall | $walli(Wall System,Koruma Açıldı!)
  .$iif($group(#wall) == off,$style(2)) Kapat:.disable #wall | $walli(Wall System,Koruma Kapatıldı!)
  .Ayarlar:wall
} 

Bu bir hatamıdır yoksa bu addonu yüklediğim için olması gereken normal bişeymidir ?

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları eglen sohbet reklamver
Alt 23 Şubat 2012, 11:52   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Bu neden oluyor?



Statusteki Bu uyarıların Bu Koddan Kaynaklandığına Eminmisin? Statusteki Yazılar Who Hakkında Bilgi veriyor. Yani remotede Herhangi Bir Kod who da olmayan Bir parametre Kullanarak Who taraması yapıyor olabilir. Ekli Olan Kodları İncelemeni Tavsiye ederim.

 
Alıntı ile Cevapla

Alt 23 Şubat 2012, 12:39   #3
TİGeR
Guest
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Yüzdesi:(%)
Cevap: Bu neden oluyor?



SiLuet Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Statusteki Bu uyarıların Bu Koddan Kaynaklandığına Eminmisin? Statusteki Yazılar Who Hakkında Bilgi veriyor. Yani remotede Herhangi Bir Kod who da olmayan Bir parametre Kullanarak Who taraması yapıyor olabilir. Ekli Olan Kodları İncelemeni Tavsiye ederim.

Tam olarak emin olmamakla beraber arastırdım kodları iyice fakat su kısımlar Kodun mrc. dosyasındada gecior ondan bu addondan şüpelendim
Bu statusteki mesajın bir kısmı
Flag m <usermodes>: user has <usermodes> set, only
O/o/C/A/a/N/B are allowed

Su kısımda addonun mrc. dosyasından bir kısım
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
#wall on
on *:text:*:#Sohbet:{
  if ($level($nick) == muafnlist) { halt }
  if ($level($chan) == muafclist) { halt }
  if $me !isop $chan && !$regex($remove($usermode,+),/(o|O|N|C|a|A)) { halt }
 
Alıntı ile Cevapla

Alt 23 Şubat 2012, 12:52   #4
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Bu neden oluyor?



Statüs Ekranında /who +ğ (who Parametresi değil) Yaptıgında who ile alakalı Bilgi alacaksın.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
if $me !isop $chan && !$regex($remove($usermode,+),/(o|O|N|C|a|A)) { halt }

Bu kodda Demek istenense Kanalda Op değilsem ve Flaglarımda o|O|N|C|a|A Geçmiyorsa demektir. Yani Statusde Çıkan Mesajla alakasız.

 
Alıntı ile Cevapla

Cevapla

Etiketler
bu, neden, oluyor

« önceki Konu | sonraki Konu »

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 

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
Gece neden deprem oluyor? Sarya Merak Ettikleriniz 1 20 Ocak 2024 02:55
Tuz hipertansiyona neden oluyor Lin Sağlık Köşesi 0 03 Nisan 2008 14:17




Sitemiz bir " paylaşım " sitesidir. Bu yüzden sitemize kayıt olan herkes kontrol edilmeksizin mesaj/konu/resim paylaşabilmektedir.
Bu sebepten ötürü, sitemiz üzerinden paylaşılan mesajlar, konular ve resimlerden doğabilecek olan yasal sorumluluklar paylaşan kullanıcıya aittir. IRCForumlari.Net hiçbir yasal sorumluluk kabul etmemektedir. İllegal herhangi bir faaliyet görülmesi durumunda İletişim sayfası üzerinden ulaşıldığı taktirde mesaj, konu ya da resim en fazla 24 saat içerisinde silinecektir.
5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.
İletişim Arşiv Gizlilik Sözleşmesi Yukarı git
trsikayet.com ferizli haber kaynarca haber yavru köpek sohbet instagram takipçi sohbet teması
Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net

casino siteleriposaszafarano.com