д INSERT$ BY DAVE WEST д EVER COME ACROSS..#д LET A$(3,25 TO )=" 0.00">д ON A SINCLAIR MACHINE AND WONDERED HOW TO CONVERT IT..1(д TO MICROSOFT TYPE STRING HANDLING WELL...%2д DIMENSION STRINGS IF NECESSARY7<д IF MAINSTRING IS EMPTY FILL IT eg ?$=MUL$(" ",n)Fд MAKE X$=MAINSTRINGPд MAKE Z$=SUBSTRING*Zд MAKE X=POSITION TO START INSERTIONdд GOSUB 1000nд MAKE MAINSTRING=X$-╚К A$(39):A$~ц("+",39):д INITIALIZE MAIN$G╥X$~A$:X~25:Z$~"0.00":Р1000:A$~X$:д ADD 4xCHRS TO MAIN$ FROM POS 25@▄в"1234567890123456789012345678901234567890":вA$;"*":д SCALEцмшд INSERT SUB$ INTO MAIN$ЄY~╧(Z$):д LENGTH OF SUB$5№Y$~▐(X$,XtY,╧(X$)):д Y$:=RIGHT HAND BIT OF MAIN$*X$~▌(X$,Xu1):д LEFT HAND BIT OF MAIN$"X$~X$tZ$tY$:д LEFT+SUB$+RIGHTи'0с╣'Wс╕ЕH╔т└Г┴ёсг(