02 Haziran 2019, 20:13
|
#2 |
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
| Cevap: /sirala #Kanal
/sirala #Kanal Yarisma süremiz dolmuştur, katılım sağlayan arkadaşlara teşekkür ediyorum. 1. @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 60 byte. Kod: Kodu kopyalamak için üzerine çift tıklayın!
sirala inc -u %a | echo -a $$nick($1,%a) | â $1
â sirala $1 2. IrCbaStarD 83 Byte Kod: Kodu kopyalamak için üzerine çift tıklayın!
x inc -u1 %8 | echo -a $nick($1,%8) | $iif(%8 < $nick($1,0),sirala $1)
sirala x $1 3. @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 90 Byte Kod: Kodu kopyalamak için üzerine çift tıklayın!
sirala $iif(%s == $nick($1,0),unset %s,s $1)
s inc %s | echo -a $nick($1,%s) | .sirala $1 4. @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 92 Byte Kod: Kodu kopyalamak için üzerine çift tıklayın!
sirala { inc -u1 %s | $iif(%s <= $nick($1,0),x $1) }
x { echo -a $nick($1,%s) | sirala $1 } 5. @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 95 Byte Kod: Kodu kopyalamak için üzerine çift tıklayın!
sirala set %s 1 | a $1
q if %s <= $nick($1,0) { echo -a $nick($1,%s) | inc %s | a $1 }
a q $1 6. @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 170 Byte Kod: Kodu kopyalamak için üzerine çift tıklayın!
sirala { unset %d_ | .remove sirala.txt | %d_c = $1 | write sirala.txt $str(d_read $crlf,$nick($1,0)) | .play -c sirala.txt 10 }
d_read inc %d_ | echo -a $nick(%d_c,%d_)
Extra olarak mirc 7.43'de çalışan en kısa kod ise; Kod: Kodu kopyalamak için üzerine çift tıklayın!
sirala savebuf -l $1 x.txt | loadbuf -a x.txt Daha düşük versionlarda savebuf -l olmadığı için kabul edilmedi.
Not: ilk 5 kişinin kodu birbirine çok benziyor aynı mantıkla gidilmiş farklılık adına @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] kodu farklısıdır. Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. |
| |