( ********************************O * HEX TO DECIMAL CONVERTER *v * BY JERRY POLITANO * * 11-20-86 * ********************************(8):500 ""ZS0:H$"0" d" PLEASE ENTER THE HEXADECIMAL FORM OF"> e" YOUR NUMBER (# IN BASE 16)"i f" THIS PROGRAM ONLY ACCEPTS INTEGER" g" VALUES. NO DECIMAL POINTS OR NEG. #'S."; i"";H$ nL(H$) xX1L F$(H$,X):1000 X1F$(F$,1) HG(16(X1))! SSH( XZ " (BASE 16) (BASE 10)" " (HEXADECIMAL) (DECIMAL)" " "H$" = "S " F1 - USE AGAIN" " F3 - QUIT PROGRAM" A$:A$""204 A$(133)2202 A$(134)2000; 204E :10i "":AX1024:53281,0:53280,0 CO0:RO024:550: RO24:CO039:550: CO39:RO2401:550: RO0:CO3901:550: 560 &AXCORO40,102: 0" "@ 5" "b :" " ?" Ѡ Ѡ" D" ѠѠѠѠ" I" " K" "" N" Ѡ Ѡ "G S" o X" " ]" PRESS ANY KEY TO START" bA$:A$""610 l10 ((F$)47)((F$)58)1040 ((F$)64)((F$)71)1020#" NOT A HEX # - TRY AGAIN":904G((F$)55)>1100OG((F$)48)XL150(9):53280,254:53281,246::""