Aylık Arşiv Mart, 2008
6 Sayfa: « 1 2 [3] 4 5 6 »Kanala Gönderilen Yazıları BaÅŸka Bir Kanala Kopyalamak
Cuma, Mart 28th, 2008
Bu kod, bir kanalda yazılan yazıları aynı zamanda belirttiğiniz kanala iletilmesini sağlamaktadır. Buna göre; mircmerkez kanalına yazılan yazılar hazırkod kanalına iletilecektir.
On *:text:*:#mircmerkez:{ /msg #hazırkod < $+ $nick $+ > $1- }
Şekilli Yazı Kodu
Cuma, Mart 28th, 2008Bu kod örnek niteliÄŸindedir, istekleriniz doÄŸrultusunda geliÅŸtirmeniz için yayınlıyoruz. AÅŸağıdaki kodun iÅŸlevi “s.a yazıldığında bu mesaj SeLaMuN ALeYKüM olarak iletilmesidir” Bu örnek üzerinde fikir geliÅŸtirip sık kullandığınız kısaltmaları, karşı tarafa uzun haliyle iletebilir veya belirlediÄŸiniz yazılara renk verip görsel çalışmalar yapabilirsiniz.
On 1:input:*:{
if ($1- == s.a) { say SeLaMuN ALeYKüM | halt }
}
Helperlar için User hitap kodu
PerÅŸembe, Mart 27th, 2008Helperlar kanala giren kullanıcıya yardımcı olurken, kullanıcıya hitap ettiklerini belirtmek için yazdıkları mesajın başına kullanıcının nickini eklerler. Bu iÅŸlem, baÅŸka helperlarda bir baÅŸka kullanıcıya yardımcı olduÄŸu zamanlarda kullanıcıların kafasının karışmasını önlemektedir. Dieforyou bu iÅŸlemi daha pratik bir hale getirmek için aÅŸağıdaki kodu yazmış. Bu kod; help kanalında bir kullanıcıya voice verdiÄŸinizde o kullanıcı kanaldan çıkana […]
Renkli Yazı Koruması (Uyarılı)
Çarşamba, Mart 26th, 2008 Kanal içerisinde renkli yazı yazılmasını engellemek isteyenler için 2 uyarı 3. tekrarda kanaldan uzaklaştırma yapmanızı sağlayan koruma kodu.
on @*:text:**:#: {
if ($nick == $me || ($nick isop $chan) { halt }
hinc -mu15 renk $+($chan,.,$nick) 1
if $hget(renk,$+($chan,.,$nick)) == 1 {
.msg # $nick : kanal genelinde renkli yazı yazılması yasaktır.
}
if $hget(renk,$+($chan,.,$nick)) == 2 {
.msg # $nick : renkli […]
Harfleri Uzatma Koruması(Uyarılı)
Çarşamba, Mart 26th, 2008 Kanal genelinde harfleri uzatarak yazanları 2 kere uyarıp 3 kez tekrarlanması halinde otomatik olarak uzaklaştırmanızı sağlayan bir kanal korumasıdır.
on @*:text:*:#: {
if ($regex($1-,/([[:print:]])\1\1/gi) >= 10) {
hinc -mu20 uzunharf $+($chan,.,$nick) 1
if $hget(uzunharf,$+($chan,.,$nick)) == 1 {
.msg # $nick : lütfen harfleri uzatmadan yazınız.
}
if $hget(uzunharf,$+($chan,.,$nick)) == 2 {
.msg # $nick : harfleri uzatmamanız konusunda ikinci uyarınız, tekrarlamanız durumunda kanaldan […]
