![[-]](https://lamerler.com/images/collapse.png "[-]")
OTO SELAM ALMA ADDONLARI codeleri mIRC‘inizde alt+R yaparak remoteler kısmına güzelce eklerseniz, selam alma addonunuz çalışacaktır.
Alt +R yapip mircde herhangi bir remoteye ekleyiniz.Bu remote ile birlikte bir dakka icinde bir kisiden bir selam alirsiniz ve banlanmazsiniz
$read(selam.txt) Ayrica mirc klasorunda bir txt dosyasi acip icine bir kac selam yazisi yazip alt altta tabi bolece her selama ayri bir selam alarak cevap vermis olursunuz ve herkes sizi online zanneder.bot sanmayacaklardir.
selam.txt dosyasi acmak istemiyorsaniz kodu remoteye ekleyip sadece kirmizi kismi a.selam gibi degisiniz.
Kodun işlevi:
1 Kişiye 300 saniyede selam verdiği taktirde 1 kere cevap verecektir. aynı kişi 300 saniye yani 5 dakika dolmadan selam yazsa dahi cevap vermeyecek ancak o süre bittikten sonra selam yazarsa karşılık yazacaksınız.
Not:
slm|selam|s\.a|s\.l\.m|sa\.
vs şeklinde selam türlerini çoğaltırsınız.
Kod:
menu status,menubar,channel {
.-
.» Auto selam System
..Açık:.enable #Otoselam | .echo -a 6 Auto selam System açıldı
..Kapalı:.disable #Otoselam | .echo -a 6 Auto selam System kapatıldı
.-
}
#Otoselam off
on *:text:*:#, :{ if $istok(slm s.a. sa selam Selamın Aleyküm Selamın Aleykum selamlar slms sLm. Selams s.a SeLamun ALeyküm ,$1-,32) { inc -eu10 $+(%,$nick,#,$network) 1 | if $($+(%,$nick,#,$network),2) == 1 { msg # aLéyküm SéLam $nick hoŞgeLdin (: } }
}
on *:Action:*:#, :{ if $istok(slm s.a. sa selam Selamın Aleyküm Selamın Aleykum selamlar slms sLm. Selams s.a SeLamun ALeyküm ,$1-,32) { inc -eu10 $+(%,$nick,#,$network) 1 | if $($+(%,$nick,#,$network),2) == 1 { msg # aLéyküm SéLam $nick hoŞgeLdin (: } }
}
#Otoselam endKod:
dialog otos {
title “oto selam”
size -1 -1 60 53
option dbu
button “Açık”, 1, 12 5 37 12
button “Kapalı”, 2, 12 20 37 12
button “Tamam”, 3, 12 35 37 12, cancel
}
alias otos dialog -m otos otos
on *:dialogtos:sclick:*: {
if ($did == 1) { .enable #otos }
if ($did == 2) { .disable #otos }
}
#otos on
on *:text:*:?: {
msg $nick A.selam $nick
}
#otos endKod:
on *:text:s.a:#:{ /msg $chan a.selam $nick hoşgeldin }
on *:text:slm:#:{ /msg $chan a.selam $nick hoşgeldin }
on *:text:selam:#:{ /msg $chan a.selam $nick hoşgeldin }
on *:text:selamlar:#:{ /msg $chan a.selam $nick hoşgeldin }
on *:text:selam aleykum:#:{ /msg $chan a.selam $nick hoşgeldin }
on *:text:s.aleykum:#:{ /msg $chan a.selam $nick hoşgeldin }Kod:
on @*:text:*:#:{
if ($nick isreg $chan) {
if (selam iswm $1-) || (s.a. iswm $1-) || (sa iswm $1-) || (slm iswm $1-) {
msg $chan ALeykum SeLaM 5 $nick }
}Kod:
on *:text:*:#:{ if $istok(slm sa selam selamm SLmlar sa selamlar s.a,$1-,32) { inc -eu60 $+(%,$nick,#,$network) 1 | if $($+(%,$nick,#,$network),2) == 1 { msg # $read(selam.txt) $nick } } }
on *:action:*:#:{ if $istok(slm sa selam selamm sa slmlar selamlar s.a,$1-,32) { inc -eu30 $+(%,$nick,#,$network) 1 | if $($+(%,$nick,#,$network),2) == 1 { msg # $read(selam.txt) $nick } } }$read(selam.txt) Ayrica mirc klasorunda bir txt dosyasi acip icine bir kac selam yazisi yazip alt altta tabi bolece her selama ayri bir selam alarak cevap vermis olursunuz ve herkes sizi online zanneder.bot sanmayacaklardir.
selam.txt dosyasi acmak istemiyorsaniz kodu remoteye ekleyip sadece kirmizi kismi a.selam gibi degisiniz.
Kod:
on *:text:*:#:{ if $istok(slm selam selamlar s.a,$1-,32) { inc -eu10 $+(%,$nick,#,$network) 1 | if $($+(%,$nick,#,$network),2) == 1 { msg # selam $nick } } }Kodun işlevi:
1 Kişiye 300 saniyede selam verdiği taktirde 1 kere cevap verecektir. aynı kişi 300 saniye yani 5 dakika dolmadan selam yazsa dahi cevap vermeyecek ancak o süre bittikten sonra selam yazarsa karşılık yazacaksınız.
Not:
slm|selam|s\.a|s\.l\.m|sa\.
vs şeklinde selam türlerini çoğaltırsınız.
Kod:
On *:Text:*:#:{
if $regex($1-,/(slm|selam|s\.a|s\.a\.)/ASi) && !$var($+(%,cesur,$nick)) {
msg $chan Aleykum Selam $nick
.set -u300 $+(%,cesur,$nick)
}
}
