#¤*******OPEN PROGRAM**********š„¤Œ 1¸ž FILE$,FD$,596”#FD$,O;N:” #0Ì¢@ 12,0;FILE$Ö¢@ 25,0;"PAGE No.:";Nt1à¢@ 0,1;æ(Ç(180),40)ê¢@ 0,2;"DATE"ô¢@ 8,2;"REMARKS"þ¢@ 20,2;"IN"¢@ 27,2;"OUT"¢@ 34,2;"TOTAL"¢@ 0,3;æ(Ç(180),40)“ Nt1}1 s ‘ 543 580¢@ 8,5;"B/FWD"D A ~ 1 r 14 E° 4,2 K“ Nt1}1 z A~1 s ‘ 588 590 L 800 M‘ 600 N 690X›b“ N~0 s N~1lN~Nt1:¢ #FD$, Nv A ~ 1 r 14 €¢ M$(A)Š›”¢ #FD$,O;N:¢ #0žƒ£Œ 0!¨„:L$~"DO YOU WISH TO RETURN"©K$~"TO MAIN MENU? (Y/N)" ª 1000¬¢@ 5,10;L$­¢@ 10,11;K$ ¯T$~ä$°“ T$~"Y" s ‘ 150 689 ±Œ 0:Ž&²¤*******CALCULATION ROUTINE****** ¼° 4,2Æ¢@ 10,22;"ENTER "; Д A$Ú“ A~ 1 s ‘ 740 750ä¢@ 0,0;A$î¢@ 0,At4;A$ø¢@ 10,22;Ç(21) ¢@ 10,22;"ENTER "; ” B$BL~Ï(B$):“ L}7 s ÿ’5:¢@ 10,20;Ç(21):¢@ 8,At4;Ç(21):‘ 770 790¢@ 8,At4;B$ ¢@ 10,22;Ç(21)*¢@ 10,22;"ENTER ";4” C>¢@ 15,At4;CH¢@ 10,22;Ç(21)R¢@ 10,22;"ENTER ";\” Df¢@ 23,At4;Dp¢@ 20,22;Ç(21)z“ C}~D s ‘ 900 910„E~EtC:¢@ 31,At4;E:‘ 930Ž“ C~D s ‘ 920 260˜E~EuD:¢@ 31,At4;E:‘ 930¢M$(A)~Ö(At4)§¢@ 30,20;E5¬¢@ 0,22;"PRESS SPACE BAR TO CONTINUE: TO END" ¶Q$~ä$À“ Q$~"N" s ‘ 620 970Ê¢@ 0,22;Ç(21)Ô¨%è¤**********TWINKLE ROUTINE******ò A1~ 1 r 3ü B1 ~ 1 r 7¢@ 5,10;L$¢@ 10,11;K$ › B1$ C1 ~ 1 r 14.¢@ 5,10;Ç(21)8¢@ 10,11;Ç(21) B› C1 L› A1V¨ @ 800 J‘ 600ÿ0 )¨€ØâphV§)¤pE„o° ¤pE„aW