=: @ 15,0;"ACCOUNTS PROGRAM BY B.F.SURRIDGE SEPT 1988"W"*******************************************************************************"M"PLEASE READ THROUGH THESE PAGES CAREFULLY AND AT THE END OF EACH PAGE":@ 20,20;"PRESS THE SPACE BAR TO GO TO THE NEXT PAGE"X$~$: X$~" " 450: q30);"DISCLAIMER" q30);((129),10)X;"NO RESPONSIBILITY IS ACCEPTED BY THE AUTHOR FOR ANY LOSS OF FILES OR OTHER DATA"S;"THROUGH THE USE OF THIS PROGRAM. ANY UNAUTHORISED COPYING OF THIS PROGRAM,"U;"EITHER IN WHOLE OR IN PART, EXCEPT FOR THE PURPOSES OF MAKING A BACK-UP COPY"S;"WILL BE TREATED AS A BREACH OF COPYRIGHT UNLESS PRIOR SANCTION IS OBTAINED"#;"FROM THE AUTHOR IN WRITING",@ 20,20;"PRESS SPACE BAR TO CONTINUE";&A$~$: A$~ " " s 560&0: ;q26);"LAYOUT OF THE PROGRAM": q26);((129),21)WD@ 5,4;"THE PROGRAM IS ARRANGED INTO FIVE OPTIONS CHAINED TO PROVIDE THE GREATEST"DN;"POSSIBLE USE OF MEMORY. THE FIVE OPTIONS ARE DETAILED BELOW"Xb*l q25);"1....................ACCOUNT"v* q25);"2.......................OPEN"* q25);"3......................ALTER"* q25);"4....................SCANNER"* q25);"5...................DELETION"+@ 25,20;"PRESS SPACE BAR TO CONTINUE"A$~$: A$~" " s 730 : q10);"ACCOUNT SECTION" q10);((129),15)^ q10);"WHEN THE PROGRAM IS FIRST RUN A PAGE IS SHEWN SETTING OUT THE MAIN MENU AS SHEWN"  q35);"PRIMARY MENU":  q15);"KEY 1............................INFORMATION":* q15);"KEY 2............................NEW ACCOUNT":4 q15);"KEY 3...........................MAIN PROGRAM":> q15);"KEY 4............................END PROGRAM"H q35);"PRESS 1 TO 4",I@ 20,20;"PRESS SPACE BAR TO CONTINUE";JX$~$: X$~" " s 850R: ;"THE FIRST OPTION IS"#\;"FOR CREATING A NEW ACCOUNT"f;((129),26)Wp;"THIS IS PLACED HERE TO MAKE THE WHOLE OPERATION EASIER WITHOUT HAVING TO REFER"z;"TO ANOTHER PROGRAM"S q10);"AFTER CREATING THE NEW ACCOUNT THE SCREEN WILL CHANGE TO SHEW ALL THE"U;"ACCOUNTS ON THE DISC IN DRIVE 1, OR YOU MAY GO STRAIGHT TO THE 'MAIN OPTION'"T;"WITHOUT CREATING A NEW ACCOUNT IF YOU SO WISH. ON THIS NEW PAGE YOU WILL BE"X;"ASKED IF YOU WANT TO CONTINUE OR END THE PROGRAM. IF YOU PRESS THE TO CARRY"V;"ON THEN YOU WILL BE ASKED FOR THE NAME OF THE ACCOUNT THAT Y0U REQUIRE. AFTER"V;"SELECTING YOUR ACCOUNT YOU WILL BE SHEWN A NEW MENU FROM WHICH YOU CAN SELECT"+;"THE NEXT OPERATION ON THAT ACCOUNT.,@ 20,20;"PRESS SPACE BAR TO CONTINUE";X$~$: X$~" " s 1000 q30);"ACCOUNT MENU"A q17);"KEY 1...............................CREATE NEW PAGE"A q17);"KEY 2...............................READ/ALTER PAGE"A q17);"KEY 3...............................SCAN/PRINT PAGE"A$ q17);"KEY 4......................................DELETION"A. q17);"KEY 0...................................END PROGRAM"8 q30);"ENTER 0 TO 4"9:;<UB"AT THE END OF THIS INFORMATION SECTION A DUMMY PAGE WILL APPEAR ON THE SCREEN"#L;"TO ILLUSTRATE HOW IT LOOKS"V`+j@ 25,20;"PRESS SPACE BAR TO CONTINUE"tX$~$: X$~" " s 11600: q10) ;"1............CREATE A NEW PAGE" q10);((129),30)X;"IN ORDER TO START USING THE FILE,AND WHEN EACH PAGE IS USED UP IT IS NECESSARY "W;"TO USE THIS FUNCTION TO START A NEW PAGE. IT WILL BE NOTICED THAT THE PAGE No."W;"WILL BE INCREASED WITH USE. AS THE PAGE IS USED THE TOTAL ON THE LEFTHAND SIDE"S;"WILL BE A RUNNING TOTAL,AND THIS IS PRINTED ALSO AT THE BOTTOM OF THE PAGE"W;"IF IT IS REQUIRED TO ADD,OR CORRECT,ANY ENTRIES ON THIS PAGE AT ANY TIME THEN "-;"THE NEXT SECTION WILL DEAL WITH THAT"W;"AFTER USING THIS SECTION YOU WILL BE REFERRED BACK TO THE DIRECTORY PAGE AGAIN"G;"EACH SECTION FULLY PROMPTS YOU FOR EVERY MOVE YOU WISH TO MAKE",@ 15,22;"PRESS SPACE BAR TO CONTINUE";A$~$: A$~" " s 1273[: q5);"AFTER THE FIRST PAGE, WHEN USING THIS SECTION, EACH NEW PAGE THAT IS CREATED"W"AUTOMATICALLY PRINTS AT THE TOP THE EMBLEM 'B/FWD' AND THEN YOU ARE REFERRED"V"STRAIGHT TO THE 'IN' POSITION. THUS ENABLING YOU TO ENTER THE BALANCE FROM THE"K"PREVIOUS PAGE WITHOUT FURTHER ADO. THEREAFTER CARRYING ON AS USUAL.",@ 15,22;"PRESS SPACE BAR TO CONTINUE"; A$~$: A$~" " s 1300, q10);"2..............READ/ALTER PAGE"( q10);((129),30)2]< q10);"YOU WILL FIRST BE ASKED WHICH PAGE YOU REQUIRE AND PROMPTED TO ENTER THE NUMBER"NF;"AFTER WHICH THE SCREEN CLEARS AND YOU ARE SHEWN THE PAGE AS IT STANDS"TP q10);"THIS OPTION WHEN CALLED WILL ASK FIRST IF YOU HAVE A BANK STATEMENT TO"VZ;"CHECK.IF YOU DO THEN ON ENTERING THE LINE No. AN ASTERISK APPEARS ON THE LEFT"Xd;"SIDE OF THE REMARKS COLUMN, INDICATING THAT THIS HAS BEEN CHECKED. IF OF COURSE"Vn;"YOU HAVE ENTERED IN RESPONSE THEN YOU ARE ASKED IF HAVE ANY LINE TO ALTER"Wx;"IF YOU HAVE THEN YOU WILL BE ASKED WHICH LINE YOU WANT TO ALTER. YOU CAN ALTER"S;"ANY LINE IN ANY ORDER YOU NEED. ALL THE TOTALS WILL AUTOMATICALLY ALTER TO"W;"THE NEW TOTALS, IF THIS IS NECESSARY. FOR INSTANCE SUPPOSE YOU WANTED TO ALTER"P;"ANY ITEM ON A LINE,THEN PRESS THE UNTIL THE PROMPT COMES UP AND"Q;"ENTER THE CORRECTION. A LITTLE TRYOUT WILL SHEW HOW IT WORKS IN PRACTICE"L;"ON COMPLETION YOU WILL BE DIRECTED BACK TO THE DIRECTORY PAGE AGAIN"F;"AND GIVEN THE OPTION OF CARRYING ON OR FINISHING THE PROGRAM.",@ 20,22;"PRESS SPACE BAR TO CONTINUE";A$~$: A$~" " s 14900: q10);"3................SCAN/PRINT PAGE" q10);((129),32)S q10);"IT IS SOMETIMES NECESSARY TO HUNT THROUGH THE PAGES OF A FILE TO FIND"U;"A PARTICULAR ITEM TO CHECK IT. THIS PROGRAM WILL DO JUST THAT. FIRST YOU ARE"T;"TOLD THE TOTAL No. OF PAGES ON THAT ACCOUNT AND YOU CAN SELECT IN ANY ORDER"V;"THE PAGES YOU WISH TO LOOK AT. ON PRODUCING A PAGE YOU ARE ASKED FIRST IF YOU"S;"NEED TO PRINT IT OUT. IN THIS CASE THIS PROGRAM WILL DO IT FOR YOU WITHOUT"R";"REFERRING TO ANY OTHER PROGRAM. IF YOU DO NOT,THEN ENTER AND YOU WILL"V,;"THEN BE ASKED IF YOU HAVE ANY OTHER PAGES TO SCAN. IF AGAIN YOU ENTER THEN"X6;"YOU WILL BE REFERRED BACK TO THE DIRECTORY PAGE. IF ON THE OTHER HAND YOU ENTER"S@;" THEN YOU WILL BE REFERRED BACK TO THE PAGE ASKING FOR THE NEW PAGE No."BJ;"WHEN AGAIN YOU CAN SEARCH FOR THE ITEM YOU WANT TO STUDY."/T@ 20,22;"PRESS THE SPACE BAR TO CONTINUE"^A$~$: A$~" " s 1640hr'| q10);"4................DELETION" q10);((129),25)Q q10);"THIS OPTION WILL DELETE ANY PAGE YOU REQUIRE. YOU SEE ALL THE OTHER"N;"PAGES SHUFFLING DOWN TO FILL THE VACANT SPACE. IT REQUIRES NO FURTHER"H;"INFORMATION, FOR IT WILL RETURN YOU TO THE DIRECTORY PAGE AGAIN"5@ 20,22;"PRESS SPACE BAR TO SEE THE DUMMY PAGE"A$~$: A$~" " s 1740@ 40,0;"ACCOUNT.DAT"@ 55,0;"PAGE No.:1"@ 0,1;((148),80)@ 0,2;"DATE"@ 20,2;"REMARKS"@ 42,2;"IN"@ 57,2;"OUT"@ 70,2;"TOTAL"&@ 0,3;((148),80)0 B~ 65 r 78: (B);":"D BN@ 3,5;"12/12/88"X@ 20,5;"400456(CASH)"b@ 42,5;"234.56"l@ 57,5;"00.00"v@ 70,5;"234.56"@ 3,6;"14/12/88"@ 20,6;"BDG SOCTY"@ 42,6;"0.00"@ 57,6;"23.45"@ 70,6;"211.11"@ 3,7;"15/12/88"@ 20,7;"SALARY"@ 42,7;"231.45"@ 57,7;"0.00"@ 70,7;"442.56"@ 70,20;"442.56"4@ 0,22;"PRESS SPACE BAR TO RETURN TO PROGRAM";A$~$: A$~" " s 2050 : 10