On 1/7/23 8:30 AM, Stephen Adolph wrote:
Here is my one-liner.
FORZ=0TO1:Z=0:V$="
"+CHR$(13)+CHR$(8)+"0123456789ABCDEF":E=INSTR(V$,INKEY$):IFE=1THENNEXTELSEF=(F-(E=2))MOD3:G=9*F+2-F^2:C=-C*(E=2)-(C*G+E-4)*(E>3ANDE<G+4):?:?MID$("BDH",F+1,1)":";:D=C:FORI=11*(F=0)-4TO0:J=G^I:X=INT(D*J):?MID$(V$,X+4,1);:D=D-X/J:NEXTI,Z
Hey Steve,
I had seen this submission before but never really tried to run it or
evaluate how it is working until now. This is an awesome piece of
algorithmic work for switching between and calculating / formatting
output for three different bases in only 254 characters!!
Pretty sweet.
Ken