A$="MON TUE WED THU FRI SAT SUN " DEF FNM(X)=INT(7*(X/7-INT(X/7))+.5)
A$ is an array and FNM(x) must calculate day of the week and return some value that may be the location in the string for it to print. ----- Original Message ----- From: "norwestrzh via N8VEM-S100" <[email protected]> To: [email protected] Sent: Monday, April 6, 2015 4:39:22 PM GMT -06:00 US/Canada Central Subject: Re: [N8VEM-S100:6699] CP/M Mbasic 5.21 I'd try your snippet of code, but I don't know what "FNM" is, nor what "A$" does. -----Original Message----- From: litterbox99 <[email protected]> To: n8vem-s100 <[email protected]> Sent: Mon, Apr 6, 2015 2:23 pm Subject: Re: [N8VEM-S100:6695] CP/M Mbasic 5.21 Roger You must be close, I'm trying to convert this NorthStar basic line; 640 FOR Q=1 TO D9\E=FNM(D3-1)+1\!A$(4*E-3,4*E),\!D1,\IFZ<1 THEN 680 To CP/M basic as; 640 FOR Q=1 TO D9 642 E=FNM(D3-1)+1 644 PRINT A$(4*E-3,4*E), 646 PRINT D1, 648 IF Z<1 THEN 680 Reason for my conversion ? I couldn't find a continuation character in MBasic. When I run the program with my changes I still get the wrong answer as if Basic isn't remembering "E" from line to line. Todd -- You received this message because you are subscribed to the Google Groups "N8VEM-S100" group. To unsubscribe from this group and stop receiving emails from it, send an email to [email protected] . For more options, visit https://groups.google.com/d/optout . -- You received this message because you are subscribed to the Google Groups "N8VEM-S100" group. To unsubscribe from this group and stop receiving emails from it, send an email to [email protected]. For more options, visit https://groups.google.com/d/optout.
