[CoCoRiCo]

Daha önce bir arkadaşımız bu konudaki soruları sebebiyle

BASE temelindeki mIRC üzerinde encode/decode yaparak alınan dökümle

bir nebze olsun bu olayı anlamamıza katkı sağlayacağını düşünüyorum.

elbette çok derin ve geniş bir konu bu nedenle çok detaya girmiyorum
meselenin mIRC ile kullanımı konusunu odağa aldım.



kullanımı: /base? text

Kod:   Kodu kopyalamak için üzerine çift tıklayın!

alias base? {
  if $1 && !$2 {
    var %i 0,%d 1
    while (%i < 64) { var %x 0 | inc %i
      while (%x < 64) { inc %x
        if $base($1-,%i,%x) && %i != %x {
          var %e $base($1-,%i,%x),%dc $base(%e,%x,%i) 
          echo No: %d $(|) $qt(%i / %x) $(|) 0,4Encode:  -> %e $(|) $iif($1- == %dc,Full Match) 0,3Decode: --> %dc  
          hadd -m base %e %dc | inc %d
        }
      }
    }
    echo > Unique Encode/decode Count: $hget(base,0).item | hfree base
  }
}