[code]#include
?php #使用:$var=e(数字,进制); function e($v,$l){ if($v>0&&in_array($l,array(2,8,16))){ $x=array(0,1,2,3,4,5,6,7,8,9,A,B,C,D,E,F); while($v!=0){ $r.=($l!=16)?ceil($v%$l):$x[ceil($v%$l)]; $v=intval($v/$l); } $r=strrev($r); $r=($l==2)?$r:(($l==8)?'0'.$r:'0x'.$r); return $r; }else{ return $v; } } echo e(100,2); #结果:1100100 echo e(100,8); #结果:0144 echo e(1...
[code] #!/bin/bash # Usage(){ echo "Error!!!" exit 1 } num=$1 m=0 while ((m<${#num}));do [[ ${num:$m:1} = [0-9] ]] || Usage ((m++)) done [[ $# -ne 1 || $1 == 0* ]] && Usage bin=$( while ((num!=0));do b=$((num%2)) echo -n $b num=$((num/2)) done ) echo -n $1\'s BinCode is: n=${#bin} while ((n>=0));do echo -n ${bin:$n:1} ((n--))...
本帖最后由 yinyuemi 于 2011-12-21 02:46 编辑 [code] #dec2bin h bv :a /[^0]$/s//x&/ /.0*$/s//x&/ H s/.*x// y/1234567890/0123456789/ x s/x.*// G s/\(.*\)\n/\1/ s/\n0/\n/ h s/.*\n// /^1$/! ta x :v s/[0-9]\+/x/g s/\n//g :b s/^x/1/ s/1x/2/ tc :e s/0x/1/ :c s/02/10/ s/12/20/ s/^2/10/ :te /2/tc /x/!b bb; [/code][code] ec...
RPG 三中能定义二进制或压缩十进制的数组吗?如果能要怎么样定义? (我自己试了一下在“P/B/L/R” 位置只能填 L/R和空 其他的写不了 ) 在RPG程序中他们之间的计算是不是都是以十进制来进行计算的?
public class TenToTwo { public static String change(long DecNumber) { String BinNumber = ""; for (int i = 64; i >= 0; i--) { if (DecNumber / (long) (Math.pow(2, i)) == 1) { BinNumber = BinNumber + "1"; DecNumber = (long) (DecNumber - Math.pow(2, i)); } else { if (!BinNumber.equals("")) { ...