* ADJUST.CMD set confirm on set talk off set bell on set colon off store f to mdone do while .not. mdone erase @ 0,50 say "CLASS: " + FILE2 text ADJUST A STUDENTS GRADE You will be using the Dbase command BROWSE. Use the following control keys to move around your file: ^W Return to Menu (QUIT BROWSE) ^R Move up one record ^C Move down one record ^F Move right one field ^A Move left one field endtext store " " to mchoice @ 12,10 say "Which Grading Period Do You Want? " @ 14,10 say " 1] Grading Period 1 " @ 15,10 say " 2] Grading Period 2 " @ 16,10 say " 3] The Present Grading Period " @ 17,10 say " 4] QUIT " @ 19,10 say "Make Your Choice ---> " get mchoice pict "##" read if mchoice = "1" goto top browse fields NAME, GRADE1 endif if mchoice = "2" goto top browse fields NAME, GRADE2 endif if mchoice = "3" goto top browse fields NAME, GRADE endif if mchoice = "4" store t to mdone endif enddo set colon on set confirm on release all like m* return * release choice release done set confirm off set bell on return NPtASN15NVtPROJ01N\tPROJ02NbtPROJ03NhtPROJ04NntPROJ05NttTEST01NztTEST02N€tTEST03N†tTEST04NŒtTEST05N’tTOTALN˜tGRADECžtGRADE1C tGRADE2