!hediye Nick -
!söz Nick -
!fb Nick Komutlarıyla sen ve kanaldaki user'lar kullanabilirsiniz. Eğer
!söz Nick -
!hediye Nick veya
!fb Nick kısmında belirttiğin
nick kanalda ise ona yollar, değilse kanalda yok diye uyarır.
Not: mIRC ana dizininde (
//run $mircdir)
hediye.txt soz.txt ve
fb.txt bulunmalı ve içinde yollamak istediğin mesajlar olmalıdır.
Örnek bir
hediye.txt içeriği alttaki gibi olmalıdır.
Kod: Kodu kopyalamak için üzerine çift tıklayın!
Çay
Nescafe
Pepsi
Türk Kahvesi
gibi..
(soz.txt ve fb.txt içinde aynısı geçerli. Sözler ve fb.txt içeriği alt alta satırlar halinde olmalı.)
Mevcut koda daha fazla fonksiyon eklenebilir/değiştirilebilir/silinebilir. İyi forumlar.
Kod: Kodu kopyalamak için üzerine çift tıklayın!
on $*:text:/[!.]hediye\s+\S+$/SAi:#: {
if ($2 ison $chan) { msg $chan $nick Tarafından $2 Nickine Hediye Yollandı. Hediyeniz: $read(hediye.txt) }
else { msg $chan $2 Nicki Kanalda Bulunmuyor. }
}
on $*:text:/[!.]fb\s+\S+$/SAi:#: {
if ($2 ison $chan) { msg $chan $nick Tarafından $2 Nickine FB Mesajı Yollandı. Mesajınız: $read(fb.txt) }
else { msg $chan $2 Nicki Kanalda Bulunmuyor. }
}
on $*:text:/[!.]s(o|ö)z\s+\S+$/SAi:#: {
if ($2 ison $chan) { msg $chan $nick Tarafından $2 Nickine Söz Yollandı. Sözünüz: $read(soz.txt) }
else { msg $chan $2 Nicki Kanalda Bulunmuyor. }
}
on *:input:#: {
if $regex($1-,/[!.]hed(i|ı)ye\s+\S+$/SAi) {
if ($2 ison $chan) { .timer 1 1 msg $chan $nick Tarafından $2 Nickine Hediye Yollandı. Hediyeniz: $read(hediye.txt) }
else { .timer 1 1 msg $chan $2 Nicki Kanalda Bulunmuyor. }
}
if $regex($1-,/[!.]fb\s+\S+$/SAi) {
if ($2 ison $chan) { .timer 1 1 msg $chan $nick Tarafından $2 Nickine FB Mesajı Yollandı. Mesajınız: $read(fb.txt) }
else { .timer 1 1 msg $chan $2 Nicki Kanalda Bulunmuyor.) }
}
if $regex($1-,/[!.]s(o|ö)z\s+\S+$/SAi) {
if ($2 ison $chan) { .timer 1 1 msg $chan $nick Tarafından $2 Nickine Söz Yollandı. Sözünüz: $read(soz.txt) }
else { .timer 1 1 msg $chan $2 Nicki Kanalda Bulunmuyor. }
}
}