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/)
-   -   Şu kodeleri birleştirebilirmisiniz LÜTFEN ? (https://www.ircforumlari.net/mirc-scripting-sorunlari/161676-su-kodeleri-birlestirebilirmisiniz-lutfen.html)

MerakLıuSer 30 Kasım 2008 22:46

Şu kodeleri birleştirebilirmisiniz LÜTFEN ?
 
1-)
on me:*:voice:#Help: { if !%nick { Set %nick $vnick } }
on *:rawmode:#Help:{ if $1 == -v && $2 == %nick || $1 == +b && $+(%nick,*) iswm $2- { unset %nick } }
on me:*:devoice:#Help: { if %nick { unset %nick } }
on *:quit: { if $nick == %nick { unset %nick } }
on *:part:#Help: { if $nick == %nick { unset %nick } }
on *:start:unset %nick
on 1:input:#Help: { if $ctrlenter || /* iswm $1- { return }
if %nick || %nick ison $active { say $+( %nick 1:) $1- | halt }

2-)
on me:*:voice:#OperHelp: { if !%nick { Set %nick $vnick } }
on *:rawmode:#OperHelp:{ if $1 == -v && $2 == %nick || $1 == +b && $+(%nick,*) iswm $2- { unset %nick } }
on me:*:devoice:#OperHelp: { if %nick { unset %nick } }
on *:quit: { if $nick == %nick { unset %nick } }
on *:part:#OperHelp: { if $nick == %nick { unset %nick } }
on *:start:unset %nick
on 1:input:#OperHelp: { if $ctrlenter || /* iswm $1- { return }
if %nick || %nick ison $active { say $+( %nick 1:) $1- | halt }

3-)
on *:input:*:{
if $1 == s.a {
say SelamunAleyküm.
.haltdef
}
if $1 == a.s {
say AleykümSelam.
.haltdef
}
if $1 == h.g. {
say Hoşgeldin.
.haltdef
}
if $1 == :-) {
say 2:4)6:13)5:7)10:3)14:4)2:4)6:13)5: 7)10:3)14:4)
.haltdef
}
if $1 == :f {
say 2E4h6u13E5h7u10E3h14u4E2h4u6u13u1u
.haltdef
}

4-)
on *:input:#:{
if (/* iswm $1) { return }
var %a 0, %b, %c
while (%a < $numtok($1-,32)) {
inc %a
%c = $gettok($1-,%a,32)
if ($remove(%c,!,?,:,;,.,$chr(44),?) ison #) { %b = $iif(%b,%b) $+(,%c,) }
else { %b = %b %c }
}
if (!%b) { %b = $1- }
say %b
halt
}

Bu dört kodeyi bana birleştirebilirmisiniz. İstediğim şu mesela help kanalında bir nicke voice verdiğimde nickini otomatik çıkartıyor. Fakat 4 nolu kodeyide eklediğim için sorun oluyor. Yani #Help ve #Operhelp te 4 ve 3 nolu kodeyi deaktif etmemiz gerek. Diğer kanallarda ise 3 ve 4 nolu kodenin çalışıp 1 ve 2 nolu deaktif olcak. Yardımı olan arkadaşlara teşekkür ediyorum.

SuNSeT 30 Kasım 2008 23:35

Cevap: Şu kodeleri birleştirebilirmisiniz LÜTFEN ?
 
ilk 2 kod, dieforyou'nun helperler için yazdıgı kod.
o kodları remote'de farklı farklı yerlere eklersen sorun kalkacaktır sanırım, 3 v 4 nolu kod'lar için, kodenin ilk satır altına şu kodları eklersen istemiş oldugun iki kanalda calişmayacaktır.

if $chan == #Help { halt }
if $chan == #Operhelp { halt }


Addonlardan sonra ilk satıra eklersen iki kanalda calişmayacaktır.

Regex 30 Kasım 2008 23:59

Cevap: Şu kodeleri birleştirebilirmisiniz LÜTFEN ?
 
Kod:

on me:*:voice:#Help,#OperHelp:if !%nick { set %nick $vnick }
on *:rawmode:#Help,#OperHelp:if $1 == -v && $2 == %nick || $1 == +b && $regex($2-,%nick) { unset %nick }
on me:*:devoice:#Help,#OperHelp:if %nick { unset %nick }
on !*:part:#Help,#OperHelp:if $nick == %nick { unset %nick }
on *:quit:if $nick == %nick { unset %nick }
on *:start:$iif(%nick,unset %nick)
on *:input:*:{
  if $regex(#,#Help|#OperHelp) && !$ctrlenter && !$regex($1-,\/) && %nick ison # { say $+( %nick 1:) $1- | return }
  if $1 == s.a { say SelamunAleyküm. | return }
  if $1 == a.s { say AleykümSelam. | return }
  if $1 == h.g. { say Hoşgeldin. | return }
  if $1 == :-) { say 2:4)6:13)5:7)10:3)14:4)2:4)6:13)5: 7)10:3)14:4) | return }
  if $1 == :f { say 2E4h6u13E5h7u10E3h14u4E2h4u6u13u1u | return }
  var %a = 0 | while %a < $numtok($1-,32) { inc %a | var %c = $gettok($1-,%a,32) | if $remove(%c,!,?,:,;,.,$chr(44),?) ison # { var %b = $iif(%b,%b) $+(,%c,) } | else var %b = %b %c } | if !%b { var %b = $1- } | say %b | return }
}


Kodları birleştirdim. Olabildiğince de stabil hâle getirip, daha etik ve hızlı çalışır hâle getirdim. Deneme fırsatım olmadı, herhangi bir hataya rastlarsan belirtirsin.

Umarım işine yarar. Kolay gelsin.

MerakLıuSer 01 Aralık 2008 21:08

Cevap: Şu kodeleri birleştirebilirmisiniz LÜTFEN ?
 
[20:54:57] <04HELP> MerakLıuSer, hoşgeldiniz. Buyrunuz ? [20:54:57] * HELP sets mode: +v MerakLıuSer [20:55:01] <04HELP> selam
[20:55:01] <04HELP> selam
[20:55:04] <04HELP> nbr MerakLıuSer
[20:55:04] <04HELP> nbr MerakLıuSeR[20:55:10] <04HELP> /cs indentify
[20:55:10] <04HELP> /cs indentify
[20:55:13] <04HELP> :S
[20:55:14] <04HELP> :S

Bir başka kanalda ;
[20:55:19] <04HELP> selam
[20:55:19] <04HELP> selam
[20:55:20] <04HELP> :D
[20:55:20] <04HELP> :D
[20:56:59] <04HELP> deneme
[20:56:59] <04HELP> deneme

Diğer özellikler.
[20:58:25] <04HELP> SelamunAleyküm.
[20:58:25] <04HELP> s.a
[20:58:25] <04HELP> s.a
[20:58:48] <04HELP> Hoşgeldin.
[20:58:48] <04HELP> h.g.
[20:58:48] <04HELP> h.g.

Ben birkez yazıyorum o ikikez cıkarıyor. " s.a h.g. " vs gibiler ise üçkez. Teşekkürler yardım için.

Regex 01 Aralık 2008 21:20

Cevap: Şu kodeleri birleştirebilirmisiniz LÜTFEN ?
 
Haklısın. Düzelttim.

MerakLıuSer 03 Aralık 2008 14:42

Cevap: Şu kodeleri birleştirebilirmisiniz LÜTFEN ?
 
Şimdide ne yazarsam yazıyım ikişer tane çıkıyor :)

[14:28] <04MerakLıuSer> selam
[14:28] <04MerakLıuSer> selam
[14:28] <04MerakLıuSer> :D
[14:28] <04MerakLıuSer> :D
[14:29] <04MerakLıuSer> SelamunAleyküm.
[14:29] <04MerakLıuSer> s.a
[14:29] <04MerakLıuSer> selam
[14:29] <04MerakLıuSer> selam
[14:29] <04MerakLıuSer> :)
[14:29] <04MerakLıuSer> :)

Gibi :)

q0kh4n01 03 Aralık 2008 15:28

Cevap: Şu kodeleri birleştirebilirmisiniz LÜTFEN ?
 
o zaman 2 tane input kullanılmış scriptinde çakışıyo olabilir

MerakLıuSer 04 Aralık 2008 17:05

Cevap: Şu kodeleri birleştirebilirmisiniz LÜTFEN ?
 
Bir scriptte denemedim. Birden fazla scriptte denedim hepsinde aynı :(


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

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