irc oto hoş geldin

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.

 

Oto Selam Alma Codesi 1

 

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 end

 

Oto Selam Alma Codesi 2

 

Kanala girene bilgisayar başında olmasanız bile, selam verdiğinde otomatik selam almak için olan selam alma codesinizi sizlerle paylaşıcam.
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 }
Yukarıdaki codeleri mIRC‘inizde alt+R yaparak remoteler kısmına güzelce eklerseniz, selam alma addonunuz çalışacaktır.

 

Oto Selam Alma Codesi 3

 

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 }
}

Oto Selam Alma Codesi 4

 

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 } } }

 

 

Yazar Hakkında

Yorumlar


Sen de Yorumla!