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/)
-   -   Çözüldü otomatik voice yardım (https://www.ircforumlari.net/mirc-scripting-sorunlari/13021-otomatik-voice-yardim.html)

CakmakCakmak 21 Temmuz 2010 20:52

Cevap: otomatik voice yardım
 
kardeş bu komutu vermişsin ama /cs levels #kanal set AUTOVOICE 0 Bu komut anope services te kullanılmıyor [20:48] -ChanServ- Bu modda bu komut kullanilmaz. buyurun bakın yardım ederseniz sevinirim

Giant 09 Temmuz 2023 10:50

Cevap: otomatik voice yardım
 
Arkadaşlar merhaba otomatik voice popups da var remote de yok ilgilenir misiniz


Kod:

Otomatik Voice
.Ekle:.auser +vlist $$1 | .notice $$1 Seni Otomatik Voice Listeme Ekledim! %CesuryureK | echo -a %CesuryureK $$1 Auto Voice Listesine Eklendi.
.Çıkar:.ruser +vlist $$1 | echo -a %CesuryureK $$1 Auto Voice Listesinden Çıkartıldı.
.-
.Listele:dialog -m _+vlist _+vlist
-

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 10:50 -->-> Daha önceki mesaj 09:56 --

alias -l _buser { .guser +vlist $1 3 }
alias -l _rbuser { .ruser +vlist $1 3 }
alias -l _luser { dialog -m _+vlist _+vlist }
alias -l _vlist {
did -r _+vlist 11
var %_btotal = $ulist(*,+vlist,0) , %_b = 0
while (%_b < %_btotal) {
inc %_b
did -a _+vlist 11 $ulist(*,+vlist,%_b)
}
}
dialog _+vlist {
title "Auto Voice Listesi"
size -1 -1 105 125
option dbu
combo 11, 4 6 68 115
button "Ekle", 20, 74 6 26 11
button "Sil", 30, 74 19 26 11
button "Tamam", 40, 75 104 26 11, ok
box "", 1, 1 0 102 122
}

on *:dialog:_+vlist:init:*: {
idset 1000
_vlist
dll aniwin.dll anime $dialog($dname).hwnd -hn 650
}

on *:dialog:_+vlist:sclick:*: {
if ($did == 20) {
if ($did(11).text != $null && $level($did(11).text) != +vlist) {
var %_badd = $did(11).text
.auser +vlist %_badd
_vlist
}

}
if ($did == 30) {
if ($did(11).text != $null && $level($did(11).text) == +vlist) {
var %_brem = $did(11).text
.ruser +vlist %_brem
_vlist
}

}
}

on @+vlist:join:#: {
mode # +v-k $nick Autovoice
notice $nick 4,1Auto Voice Listemdesin! %CesuryureK
}


çalışmadı

Vision 09 Temmuz 2023 11:32

Cevap: otomatik voice yardım
 
Bu kodu deneyebilirsin.

Kod:


;############################# ARKADAŞ LİSTESİ ######################################


menu channel,status,menubar,query {
  -
  Arkadaş Listesi { dialog -m arkadaslist arkadaslist }
  -
}

;- Arkadaş Listenizde ekli kişiye #Sohbet kanalın 'da (+v) verirsiniz.
#arkadaslist on
on arkadaslist:join:#Sohbet:{
  .mode # +v $nick
  .msg $nick $_bilgi(Bilgilendirme Mesajı: Arkadaş listesine ekli kullanıcı kanalda (+) 'landı.)
  $iif(!$window(@Q-Takip),.window -zne @Q-Takip)
  .echo -em @Q-Takip $_gri($_tarih) $_baslik2(Arkadaş Listesi) $_kirmizi(Nick/IP: $nick - @ $+ $_ndr($nick)) $_bilgi(Arkadaş listesine ekli kullanıcı kanalda (+) 'landı.) $_sari(#) $_yesil($network)
}
on *:NICK:{
  if ($level($newnick) == arkadaslist) {
    var %:chans = $comchan($newnick,0) | while %:chans {
      if $istok(#Sohbet,$comchan($newnick,%:chans),44) {
        .mode $comchan($newnick,%:chans) +v $newnick
        $iif(!$window(@Q-Takip),window -zne @Q-Takip)
        .echo -em @Q-Takip $_gri($_tarih) $_baslik2(Arkadaş Listesi) $_kirmizi(Nick/IP: $newnick - @ $+ $_ndr($nick)) $_bilgi(Arkadaş listesine ekli kullanıcı kanalda (+) 'landı.) $_sari($comchan($newnick,%:chans)) $_yesil($network)
      }
      dec %:chans
    }
    .msg $newnick $_bilgi(Bilgilendirme Mesajı: Arkadaş listesine ekli kullanıcı kanalda (+) 'landı.)
  }
}
#arkadaslist end

alias arkadaslist { /dialog -m arkadaslist arkadaslist }
dialog arkadaslist {
  title "Arkadaş Listesi"
  size -1 -1 136 102
  option dbu
  box Nick:, 6, 66 0 68 97
  text "Arkadaşına + verir.", 12, 70 20 68 97
  button Ekle(+), 4, 82 30 39 11
  button Kaldır(-), 10, 82 46 39 11
  edit "", 1, 70 8 61 10, autohs
  button Tamam, 3, 82 70 39 18, default ok
  list 2, 5 3 57 83, size
  check Sistemi Aktifleştir, 5, 7 89 51 10
}

on 1:dialog:arkadaslist:sclick:5:{
  if ($did(5).state == 1) { .enable #arkadaslist | .echo -a 4Arkadaş Listesi 14Aktif Edildi. }
  else { .disable #arkadaslist | .echo -a 4Arkadaş Listesi 14Deaktif Edildi. }
}
on *:dialog:arkadaslist:*:*:{
  if ($group(#arkadaslist) == on) { did -c arkadaslist 5 }
  if ($devent == sclick) {
    if ($did == 4) { .did -a arkadaslist 2 $did(arkadaslist,1) | .auser arkadaslist $did(arkadaslist,1) | .did -r arkadaslist 1 }
    if ($did == 10) { .ruser arkadaslist $did(arkadaslist,2).seltext | .did -d arkadaslist 2 $did(arkadaslist,2).sel }
  }
  if ($devent == init) {
    if $ulist(*,arkadaslist,0) > 0 {
      var %i 1
      while %i <= $ulist(*,arkadaslist,0) {
        .did -a arkadaslist 2 $ulist(*,arkadaslist,%i)
        inc %i 
      }
    }
  }
}


Alıntı:

Giant Nickli Üyeden Alıntı (Mesaj 1042814249)
Arkadaşlar merhaba otomatik voice popups da var remote de yok ilgilenir misiniz
çalışmadı



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

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk