Kod: Kodu kopyalamak için üzerine çift tıklayın! raw 478:*:var %! = $ibl($2,0), %£ = $calc($ibl($2,0) - 6), %½ | while (%! >= %£) { %½ = $addtok(%½,$ibl($2,%!),32) | dec %! } | mode $2 -bbbbbb %½
Ban listesi dolduğunda, atılan ilk 6 banı (yani en eski 6 banı) açar. Mantıksal açıdan düşünerek böyle bir kod yazdım, yoksa liste dolar dolmaz tüm banları açarak listeyi boşaltması gerekirdi ki bu durumda son atılan ban hemen açılmış olurdu. Bu kod üzerinden mantığı kavramaya çalış, üzerinde düzenlemeler yapılarak daha farklı varyasyonlara getirilebilir. Umarım işine yarar.
|