Sayıyı binary dönüştürme

[AkrepX]

Merhabalar kodun amacı belirli bir rakamın binary degerini verir.

;Sayilari binary donusturmek icin kullanilir.
;Komutu /binary sayi seklinde kullanabilirsiniz.
alias binary {
  if $1 !isnum { echo -a >> Lutfen bir rakam giriniz | return }
  if $1 == 1 { echo -a $1 sayisinin binary degeri: 1  | return }
  var %binsayi = 2
  var %bindegis = $1
  :xe
  var %z = $calc(%bindegis / %binsayi)
  var %don = $int(%z)
  var %calc = $calc(%bindegis - (2 * %don))
  var %m %calc %m
  if %don == 1 { var %m 1 %m | goto exit }
  var %bindegis %don
  goto xe
  :exit
  echo -a -
  echo -a --> $1 sayisinin binary degeri:  $remove(%m,$chr(32))
}

Örnek kullanım

/binary 9

/binary 8

/binary 7

--> 9 sayisinin binary degeri:  1001
-
--> 8 sayisinin binary degeri:  1000
-
--> 7 sayisinin binary degeri:  111