Hoşgeldin Misafir

$base encode/decode olayını anlamak

By_Nimetullah

10 Şub 2023
1,718 Mesaj

Aktiflik

Seviye

Deneyim

TIM / GÖREV:
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:
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
  }
}