Advertisement
aukun

base

Dec 31st, 2017
117
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
PHP 0.84 KB | None | 0 0
  1. function base(){/*v-g008*/$A=func_get_args();if((func_num_args()==1)&&($A[0]=='@')){echo file_get_contents('/media/uruk/CONTENIDORS/infofunctionsphp/basevg008');}else{$ni=$A[0];$arnu=$A[1];$typ=$A[2];bcscale(100);$c1=count($arnu);$sc1="$c1";if($typ=='0'){$nv=$ni;$stf='';$sth='';if((bccomp($ni,$sc1)==1)||(bccomp($ni,$sc1)==0)){while((bccomp($nv,$sc1)==1)||(bccomp($nv,$sc1)==0)){$re=bcmod($nv,$c1);$stf=$re . '.' . $stf;$sth=$arnu[$re] . $sth;$nv=bcdiv((bcsub($nv,$re)),$c1);if((bccomp($nv,$sc1)==-1)){$stf=$nv . '.' . $stf;$snv=substr($nv,0,stripos($nv,'.'));$sth=$arnu[$snv] . $sth;}else{}}}else{$sth=$arnu[$ni];}return $sth;}else{}if($typ=='10'){$c2=strlen($ni);$c3=0;for($t=0;$t<$c2;$t++){$c3=bcadd((bcmul((bcpow($c1,(($c2)-1-$t))),(array_search($ni[$t],$arnu)))),$c3);}return substr($c3,0,stripos($c3,'.'));}else{}if(($typ!=10)&&($typ!=0)){}else{}}}
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement