amos-professional/AMOSPro Sources/Dbl_Source/Tiny_Shell_Dbl.Asc

73 lines
1.4 KiB
Plaintext
Raw Normal View History

2020-04-26 00:58:13 +00:00
main dialog program of the amospro compiler tiny shell
main panel
LAbel 0;
SIze SW,SH;
BAse SWidth SX -2/,SHeight SY -2/;
BOx 0,0,1,SX,10;
PRint 1MECX,1,1ME,7;
INk 0,2,2;
GLine 0,10,SX,10;
BOx 0,11,1,SX,SY;
BUtton 0,0,0,SX,10,0,0,0;[][SM;]
EXit;
compiler vumeter
LAbel 10:
SIze 600,50;
BAse SW SX -2/,SH SY- 10- 2/ 10+;
BOx 0,0,1,SX,SY;
BOx 32,8,67,SX 32-,33;
PRint 32,SY 22- TH+,'0%',5;
PRint SX 64-,SY 22- TH+,'100%',5;
PRint 0VA CX,SY 22- TH+,0VA,3;
EXit;
compile report
LAbel 12:
SIze 0VA,1VA;
BAse SW SX -2/,SH SY- 10- 2/ 10+;
BOx 0,0,1,SX,SY;
PRint 3VA CentreX,6,3VA,7;
PRint 4VA CentreX,20,4VA,3;
PRint 5VA CentreX,30,5VA,3;
EXit;
warning requester
LAbel 13;
SIze 0VA TW 32+, 48;
BAse SW SX -2/,SH SY- 10- 2/ 10+; SA 1;
BOx 0,0,1,SX,SY;
BOx 8,4,1,SX 8-,20;
POutline 21ME CentreX,6,21ME,0,7;
PRint 0VA CentreX,20 TH+,0VA,3;
BUtton 0,0,0,SX,32,0,0,0;[][SM;]
EXit;
information
LAbel 14:
SIze 0VA TW 64+,40;
BAse SW SX -2/,SH SY- 10- 2/ 10+; SA 1;
BOx 0,0,1,SX,SY;
PRint 0VA CentreX,16,0VA,7;
EXit;
information and vumeter
LAbel 15:
SIze 0VA TW 32+,50;
BAse SW SX- 2/,SH SY- 10- 2/ 10+; SA 1;
BOx 0,0,1,SX,SY;
PRint 0VA CentreX,5,0VA,7;
BOx 32,16,67,SX 32-,36;
PRint 32,SY 20- TH+,'0%',5;
PRint SX 64-,SY 20- TH+,'100%',5;
EXit;