- Simple Projects
- 08 Nov 2010 06:32:27 pm
- Last edited by Beta7 on 08 Nov 2010 07:14:53 pm; edited 1 time in total
These are the couple of programs I've made - the reason I'm posting them is because I am hoping someone can take a look at them (they're really short) and tell me if there's anything I'm doing wrong/inefficiently. Thanks.
*EDIT*
Main Program
Code:
One of the sub programs
Code:
*EDIT*
Main Program
Code:
:ClrHome
:Menu("-MAIN MENU-","LENGTH",1,"AREA",2,"WEIGHT/VOLUME",3,"TEMPERATURE",4,"QUIT",5)
:
:Lbl 1
:prgmCONVθ002
:
:Lbl 2
:prgmCONVθ003
:
One of the sub programs
Code:
:ClrHome
:Menu("-MENU-","M2->FT2",1,"KM2->MI2",2,"FT2->M2",3,"MI2->KM2",4,"BACK",5)
:
:Lbl 1
:Prompt X
:Output(3,1,"FT2=")
:Output(5,1,10.76X)
:Goto 6
:
:Lbl 2
:Prompt X
:Output(3,1,"MI2=")
:Output(5,1,.3861X)
:Goto 6
:
:Lbl 3
:Prompt X
:Output(3,1,"M2=")
:Output(5,1,.0929X)
:Goto 6
:
:Lbl 4
:Prompt X
:Output(3,1,"KM2=")
:Output(5,1,2.59X)
:Goto 6
:
:Lbl 5
:prgmCONVθ001
:
:Lbl 6
:Output(8,1,"ENTER TO PROCEED")
:Pause
:prgmCONVθ001