[MSC] Add of macro on mainMenu
This commit is contained in:
anhe-odoo
parent
fa3af8eab1
commit
66b659c4b9
662
0~MENU__.cbs
662
0~MENU__.cbs
|
|
@ -1,3 +1,8 @@
|
|||
#define PERIODIC 0
|
||||
#define CONSTANT 1
|
||||
#define CONVERT 0
|
||||
#define CHEMISTRY 0
|
||||
#define CIRCUIT 0
|
||||
Local i,g
|
||||
AxesOff
|
||||
GridOff
|
||||
|
|
@ -16,7 +21,6 @@ PlotOn 34,58:
|
|||
F-Line 95,61,97,63:
|
||||
F-Line 122,58,127,63:
|
||||
F-Line 125,58,127,60:
|
||||
|
||||
For 2->i To 92 Step 30
|
||||
F-Line i,39,i+28,39:
|
||||
F-Line i+28,40,i+28,56:
|
||||
|
|
@ -24,373 +28,341 @@ For 2->i To 92 Step 30
|
|||
Then F-Line i,20,i+28,20:
|
||||
F-Line i+28,21,i+28,37:
|
||||
IfEnd
|
||||
'If i<33
|
||||
'Then F-Line i,1,i+28,1:
|
||||
'F-Line i+28,2,i+28,1'8:
|
||||
'IfEnd
|
||||
// If i<33
|
||||
// Then F-Line i,1,i+28,1:
|
||||
// F-Line i+28,2,i+28,1'8:
|
||||
// IfEnd
|
||||
Next
|
||||
|
||||
F-Line 2,40,2,49:
|
||||
F-Line 4,40,4,49:
|
||||
F-Line 6,40,6,49:
|
||||
For 8->i To 14 Step 2
|
||||
F-Line i,40,i,43:
|
||||
PlotOn i-1,41:
|
||||
PlotOn i-1,43:
|
||||
Next
|
||||
PlotOn 15,41:
|
||||
PlotOn 15,43:
|
||||
F-Line 16,40,16,47:
|
||||
F-Line 18,40,18,47:
|
||||
F-Line 20,40,20,49:
|
||||
F-Line 22,40,22,49:
|
||||
#if defined(PERIODIC) && (PERIODIC == 1)
|
||||
F-Line 2,40,2,49:
|
||||
F-Line 4,40,4,49:
|
||||
F-Line 6,40,6,49:
|
||||
For 8->i To 14 Step 2
|
||||
F-Line i,40,i,43:
|
||||
PlotOn i-1,41:
|
||||
PlotOn i-1,43:
|
||||
Next
|
||||
PlotOn 15,41:
|
||||
PlotOn 15,43:
|
||||
F-Line 16,40,16,47:
|
||||
F-Line 18,40,18,47:
|
||||
F-Line 20,40,20,49:
|
||||
F-Line 22,40,22,49:
|
||||
For 41->i To 49 Step 2
|
||||
PlotOn 3,i:
|
||||
PlotOn 5,i:
|
||||
PlotOn 21,i:
|
||||
Next
|
||||
For 41->i To 47 Step 2
|
||||
PlotOn 5,i:
|
||||
PlotOn 17,i:
|
||||
PlotOn 19,i:
|
||||
Next
|
||||
F-Line 8,49,8,45:
|
||||
F-Line 11,49,11,45:
|
||||
F-Line 9,47,10,47:
|
||||
F-Line 14,49,14,47:
|
||||
F-Line 4,52,4,55:
|
||||
F-Line 2,56,6,56:
|
||||
PlotOn 7,54:
|
||||
F-Line 9,52,9,56:
|
||||
F-Line 10,56,11,56:
|
||||
F-Line 10,54,11,54:
|
||||
PlotOn 12,55:
|
||||
F-Line 14,52,14,56:
|
||||
F-Line 15,56,16,56:
|
||||
F-Line 15,54,16,54:
|
||||
F-Line 17,52,17,53:
|
||||
PlotOn 17,55:
|
||||
F-Line 19,52,19,56:
|
||||
F-Line 20,52,21,52:
|
||||
F-Line 20,56,21,56:
|
||||
F-Line 22,53,22,55:
|
||||
F-Line 24,53,24,55:
|
||||
F-Line 25,56,26,56:
|
||||
F-Line 25,52,27,54:
|
||||
PlotOn 27,55:
|
||||
PlotOn 27,52:
|
||||
F-Line 24,40,24,45:
|
||||
F-Line 25,40,25,45:
|
||||
F-Line 26,40,26,45:
|
||||
PlotOff 26,43:
|
||||
PlotOn 27,45:
|
||||
F-Line 28,40,28,45:
|
||||
F-Line 29,40,29,45:
|
||||
#else
|
||||
FillRect 2,8,30,25
|
||||
#endif
|
||||
|
||||
For 41->i To 49 Step 2
|
||||
PlotOn 3,i:
|
||||
PlotOn 5,i:
|
||||
PlotOn 21,i:
|
||||
Next
|
||||
#if defined(CONSTANT) && (CONSTANT == 1)
|
||||
F-Line 33,50,35,50:
|
||||
F-Line 36,49,38,49:
|
||||
F-Line 39,48,41,46:
|
||||
F-Line 43,43,42,45:
|
||||
F-Line 32,45,32,48:
|
||||
F-Line 33,46,33,47:
|
||||
F-Line 35,46,36,46:
|
||||
F-Line 37,45,38,43:
|
||||
F-Line 39,41,39,40:
|
||||
F-Line 42,41,43,41:
|
||||
F-Line 41,40,44,40:
|
||||
F-Line 32,40,32,43:
|
||||
F-Line 33,40,33,43:
|
||||
F-Line 34,40,34,42:
|
||||
F-Line 35,40,35,41:
|
||||
F-Line 44,46,46,46:
|
||||
F-Line 44,48,45,48:
|
||||
F-Line 44,50,46,50:
|
||||
PlotOn 43,49:
|
||||
PlotOn 43,47:
|
||||
PlotOn 47,47:
|
||||
PlotOn 48,48:
|
||||
PlotOn 49,47:
|
||||
PlotOn 48,46:
|
||||
F-Line 48,44,49,44:
|
||||
F-Line 47,41,47,43:
|
||||
F-Line 50,43,48,42:
|
||||
F-Line 48,40,49,40:
|
||||
F-Line 51,45,52,45:
|
||||
F-Line 54,47,54,49:
|
||||
F-Line 56,47,56,49:
|
||||
F-Line 53,50,57,50:
|
||||
F-Line 32,53,32,55:
|
||||
F-Line 33,52,35,52:
|
||||
F-Line 33,56,35,56:
|
||||
F-Line 37,53,37,55:
|
||||
F-Line 38,52,39,52:
|
||||
F-Line 38,56,39,56:
|
||||
F-Line 40,53,40,55:
|
||||
F-Line 42,52,42,56:
|
||||
PlotOn 43,55:
|
||||
PlotOn 44,54:
|
||||
F-Line 45,52,45,56:
|
||||
F-Line 47,52,49,52:
|
||||
F-Line 48,54,49,54:
|
||||
F-Line 48,56,50,56:
|
||||
PlotOn 50,53:
|
||||
PlotOn 47,55:
|
||||
F-Line 52,56,56,56:
|
||||
F-Line 54,52,54,55:
|
||||
F-Line 54,39,54,45:
|
||||
F-Line 55,45,59,45:
|
||||
F-Line 55,43,58,43:
|
||||
F-Line 56,41,59,41:
|
||||
PlotOn 55,42:
|
||||
PlotOn 59,44:
|
||||
#else
|
||||
FillRect 32,8,60,25
|
||||
#endif
|
||||
|
||||
For 41->i To 47 Step 2
|
||||
PlotOn 5,i:
|
||||
PlotOn 17,i:
|
||||
PlotOn 19,i:
|
||||
Next
|
||||
#if defined(CONVERT) && (CONVERT == 1)
|
||||
F-Line 62,53,62,55:
|
||||
F-Line 63,52,64,52:
|
||||
F-Line 63,56,64,56:
|
||||
F-Line 67,52,68,52:
|
||||
F-Line 66,53,66,55:
|
||||
F-Line 67,56,68,56:
|
||||
F-Line 69,53,69,55:
|
||||
F-Line 71,52,71,56:
|
||||
F-Line 72,55,73,54:
|
||||
F-Line 74,52,74,56:
|
||||
F-Line 76,53,76,56:
|
||||
PlotOn 77,52:
|
||||
F-Line 78,53,78,56:
|
||||
F-Line 80,52,80,56:
|
||||
F-Line 81,52,82,52:
|
||||
F-Line 81,56,82,56:
|
||||
PlotOn 81,54:
|
||||
F-Line 84,52,84,56:
|
||||
F-Line 87,55,85,56:
|
||||
F-Line 85,54,86,54:
|
||||
F-Line 87,52,87,53:
|
||||
F-Line 84,40,84,45:
|
||||
F-Line 85,45,89,45:
|
||||
F-Line 85,43,88,43:
|
||||
F-Line 85,41,88,41:
|
||||
PlotOn 85,42:
|
||||
PlotOn 89,40:
|
||||
PlotOn 89,42:
|
||||
PlotOn 89,44:
|
||||
F-Line 62,47,62,48:
|
||||
F-Line 64,47,64,48:
|
||||
F-Line 66,47,66,48:
|
||||
PlotOn 63,49:
|
||||
PlotOn 65,49:
|
||||
F-Line 68,48,69,48:
|
||||
PlotOn 70,47:
|
||||
PlotOn 70,49:
|
||||
PlotOn 71,48:
|
||||
F-Line 73,47,73,48:
|
||||
PlotOn 73,50:
|
||||
F-Line 75,47,75,49:
|
||||
F-Line 76,49,77,47:
|
||||
F-Line 79,42,79,48:
|
||||
PlotOn 80,48:
|
||||
PlotOn 81,47:
|
||||
PlotOn 81,49:
|
||||
PlotOn 82,48:
|
||||
F-Line 84,47,86,47:
|
||||
F-Line 84,48,85,49:
|
||||
F-Line 86,48,86,49:
|
||||
F-Line 88,47,88,50:
|
||||
PlotOn 64,45:
|
||||
PlotOn 63,44:
|
||||
PlotOn 65,44:
|
||||
PlotOn 64,43:
|
||||
F-Line 64,42,66,42:
|
||||
F-Line 68,42,68,43:
|
||||
F-Line 68,40,70,42:
|
||||
PlotOn 70,43:
|
||||
F-Line 72,42,73,43:
|
||||
F-Line 74,41,74,44:
|
||||
PlotOn 73,41:
|
||||
PlotOn 76,42:
|
||||
PlotOn 77,41:
|
||||
PlotOn 77,43:
|
||||
PlotOn 78,42:
|
||||
#else
|
||||
FillRect 62,8,90,25
|
||||
#endif
|
||||
|
||||
F-Line 8,49,8,45:
|
||||
F-Line 11,49,11,45:
|
||||
F-Line 9,47,10,47:
|
||||
#if defined(CHEMISTRY) && (CHEMISTRY == 1)
|
||||
F-Line 92,52,92,56:
|
||||
F-Line 93,52,94,52:
|
||||
F-Line 93,54,94,54:
|
||||
F-Line 93,56,94,56:
|
||||
PlotOn 95,53:
|
||||
PlotOn 95,55:
|
||||
F-Line 97,52,97,55:
|
||||
F-Line 98,56,99,56:
|
||||
F-Line 98,54,99,54:
|
||||
F-Line 100,52,100,55:
|
||||
F-Line 102,52,102,56:
|
||||
F-Line 103,52,104,52:
|
||||
F-Line 106,52,106,55:
|
||||
F-Line 107,56,108,56:
|
||||
F-Line 107,54,108,54:
|
||||
F-Line 109,52,109,55:
|
||||
F-Line 111,52,111,56:
|
||||
F-Line 112,55,113,54:
|
||||
F-Line 114,52,114,56:
|
||||
F-Line 116,53,116,55:
|
||||
F-Line 117,52,118,52:
|
||||
F-Line 117,56,118,56:
|
||||
F-Line 92,48,92,49:
|
||||
F-Line 93,50,94,50:
|
||||
F-Line 93,47,94,47:
|
||||
F-Line 95,48,95,49:
|
||||
F-Line 97,48,97,49:
|
||||
F-Line 98,47,99,47:
|
||||
F-Line 98,50,99,50:
|
||||
F-Line 100,48,100,49:
|
||||
F-Line 95,45,97,45:
|
||||
F-Line 94,44,98,44:
|
||||
F-Line 94,43,98,43:
|
||||
F-Line 94,42,98,42:
|
||||
F-Line 95,41,97,41:
|
||||
F-Line 102,47,106,47:
|
||||
PlotOn 105,48:
|
||||
F-Line 102,45,106,45:
|
||||
PlotOn 103,44:
|
||||
F-Line 105,41,105,42:
|
||||
F-Line 106,43,107,43:
|
||||
F-Line 106,40,107,40:
|
||||
F-Line 108,41,108,42:
|
||||
F-Line 109,43,111,43:
|
||||
F-Line 108,44,112,44:
|
||||
F-Line 108,45,112,45:
|
||||
F-Line 108,46,112,46:
|
||||
F-Line 109,47,111,47:
|
||||
F-Line 112,48,112,49:
|
||||
F-Line 113,47,114,47:
|
||||
F-Line 113,50,114,50:
|
||||
F-Line 115,48,115,49:
|
||||
F-Line 114,40,114,45:
|
||||
F-Line 115,40,117,40:
|
||||
F-Line 115,41,117,41:
|
||||
F-Line 115,45,119,45:
|
||||
F-Line 116,44,117,44:
|
||||
F-Line 116,43,117,43:
|
||||
F-Line 119,43,119,44:
|
||||
F-Line 119,40,119,41:
|
||||
#else
|
||||
FillRect 92,8,120,25
|
||||
#endif
|
||||
|
||||
F-Line 14,49,14,47:
|
||||
|
||||
F-Line 4,52,4,55:
|
||||
F-Line 2,56,6,56:
|
||||
PlotOn 7,54:
|
||||
|
||||
F-Line 9,52,9,56:
|
||||
F-Line 10,56,11,56:
|
||||
F-Line 10,54,11,54:
|
||||
PlotOn 12,55:
|
||||
|
||||
|
||||
F-Line 14,52,14,56:
|
||||
F-Line 15,56,16,56:
|
||||
F-Line 15,54,16,54:
|
||||
F-Line 17,52,17,53:
|
||||
PlotOn 17,55:
|
||||
|
||||
F-Line 19,52,19,56:
|
||||
F-Line 20,52,21,52:
|
||||
F-Line 20,56,21,56:
|
||||
F-Line 22,53,22,55:
|
||||
|
||||
F-Line 24,53,24,55:
|
||||
F-Line 25,56,26,56:
|
||||
F-Line 25,52,27,54:
|
||||
PlotOn 27,55:
|
||||
PlotOn 27,52:
|
||||
|
||||
F-Line 24,40,24,45:
|
||||
F-Line 25,40,25,45:
|
||||
F-Line 26,40,26,45:
|
||||
PlotOff 26,43:
|
||||
PlotOn 27,45:
|
||||
F-Line 28,40,28,45:
|
||||
F-Line 29,40,29,45:
|
||||
|
||||
F-Line 33,50,35,50:
|
||||
F-Line 36,49,38,49:
|
||||
F-Line 39,48,41,46:
|
||||
F-Line 43,43,42,45:
|
||||
|
||||
F-Line 32,45,32,48:
|
||||
F-Line 33,46,33,47:
|
||||
F-Line 35,46,36,46:
|
||||
F-Line 37,45,38,43:
|
||||
F-Line 39,41,39,40:
|
||||
F-Line 42,41,43,41:
|
||||
F-Line 41,40,44,40:
|
||||
|
||||
F-Line 32,40,32,43:
|
||||
F-Line 33,40,33,43:
|
||||
F-Line 34,40,34,42:
|
||||
F-Line 35,40,35,41:
|
||||
|
||||
F-Line 44,46,46,46:
|
||||
F-Line 44,48,45,48:
|
||||
F-Line 44,50,46,50:
|
||||
PlotOn 43,49:
|
||||
PlotOn 43,47:
|
||||
PlotOn 47,47:
|
||||
PlotOn 48,48:
|
||||
PlotOn 49,47:
|
||||
PlotOn 48,46:
|
||||
|
||||
F-Line 48,44,49,44:
|
||||
F-Line 47,41,47,43:
|
||||
F-Line 50,43,48,42:
|
||||
F-Line 48,40,49,40:
|
||||
F-Line 51,45,52,45:
|
||||
|
||||
F-Line 54,47,54,49:
|
||||
F-Line 56,47,56,49:
|
||||
F-Line 53,50,57,50:
|
||||
|
||||
F-Line 32,53,32,55:
|
||||
F-Line 33,52,35,52:
|
||||
F-Line 33,56,35,56:
|
||||
|
||||
F-Line 37,53,37,55:
|
||||
F-Line 38,52,39,52:
|
||||
F-Line 38,56,39,56:
|
||||
F-Line 40,53,40,55:
|
||||
|
||||
F-Line 42,52,42,56:
|
||||
PlotOn 43,55:
|
||||
PlotOn 44,54:
|
||||
F-Line 45,52,45,56:
|
||||
|
||||
F-Line 47,52,49,52:
|
||||
F-Line 48,54,49,54:
|
||||
F-Line 48,56,50,56:
|
||||
PlotOn 50,53:
|
||||
PlotOn 47,55:
|
||||
|
||||
F-Line 52,56,56,56:
|
||||
F-Line 54,52,54,55:
|
||||
|
||||
F-Line 54,39,54,45:
|
||||
F-Line 55,45,59,45:
|
||||
F-Line 55,43,58,43:
|
||||
F-Line 56,41,59,41:
|
||||
PlotOn 55,42:
|
||||
PlotOn 59,44:
|
||||
|
||||
F-Line 62,53,62,55:
|
||||
F-Line 63,52,64,52:
|
||||
F-Line 63,56,64,56:
|
||||
|
||||
F-Line 67,52,68,52:
|
||||
F-Line 66,53,66,55:
|
||||
F-Line 67,56,68,56:
|
||||
F-Line 69,53,69,55:
|
||||
|
||||
F-Line 71,52,71,56:
|
||||
F-Line 72,55,73,54:
|
||||
F-Line 74,52,74,56:
|
||||
|
||||
F-Line 76,53,76,56:
|
||||
PlotOn 77,52:
|
||||
F-Line 78,53,78,56:
|
||||
|
||||
F-Line 80,52,80,56:
|
||||
F-Line 81,52,82,52:
|
||||
F-Line 81,56,82,56:
|
||||
PlotOn 81,54:
|
||||
|
||||
F-Line 84,52,84,56:
|
||||
F-Line 87,55,85,56:
|
||||
F-Line 85,54,86,54:
|
||||
F-Line 87,52,87,53:
|
||||
|
||||
F-Line 84,40,84,45:
|
||||
F-Line 85,45,89,45:
|
||||
F-Line 85,43,88,43:
|
||||
F-Line 85,41,88,41:
|
||||
PlotOn 85,42:
|
||||
PlotOn 89,40:
|
||||
PlotOn 89,42:
|
||||
PlotOn 89,44:
|
||||
|
||||
F-Line 62,47,62,48:
|
||||
F-Line 64,47,64,48:
|
||||
F-Line 66,47,66,48:
|
||||
PlotOn 63,49:
|
||||
PlotOn 65,49:
|
||||
|
||||
F-Line 68,48,69,48:
|
||||
PlotOn 70,47:
|
||||
PlotOn 70,49:
|
||||
PlotOn 71,48:
|
||||
|
||||
F-Line 73,47,73,48:
|
||||
PlotOn 73,50:
|
||||
|
||||
F-Line 75,47,75,49:
|
||||
F-Line 76,49,77,47:
|
||||
|
||||
F-Line 79,42,79,48:
|
||||
PlotOn 80,48:
|
||||
PlotOn 81,47:
|
||||
PlotOn 81,49:
|
||||
PlotOn 82,48:
|
||||
|
||||
F-Line 84,47,86,47:
|
||||
F-Line 84,48,85,49:
|
||||
F-Line 86,48,86,49:
|
||||
|
||||
F-Line 88,47,88,50:
|
||||
|
||||
PlotOn 64,45:
|
||||
PlotOn 63,44:
|
||||
PlotOn 65,44:
|
||||
PlotOn 64,43:
|
||||
F-Line 64,42,66,42:
|
||||
|
||||
F-Line 68,42,68,43:
|
||||
F-Line 68,40,70,42:
|
||||
PlotOn 70,43:
|
||||
|
||||
F-Line 72,42,73,43:
|
||||
F-Line 74,41,74,44:
|
||||
PlotOn 73,41:
|
||||
|
||||
PlotOn 76,42:
|
||||
PlotOn 77,41:
|
||||
PlotOn 77,43:
|
||||
PlotOn 78,42:
|
||||
|
||||
F-Line 92,52,92,56:
|
||||
F-Line 93,52,94,52:
|
||||
F-Line 93,54,94,54:
|
||||
F-Line 93,56,94,56:
|
||||
PlotOn 95,53:
|
||||
PlotOn 95,55:
|
||||
|
||||
F-Line 97,52,97,55:
|
||||
F-Line 98,56,99,56:
|
||||
F-Line 98,54,99,54:
|
||||
F-Line 100,52,100,55:
|
||||
|
||||
F-Line 102,52,102,56:
|
||||
F-Line 103,52,104,52:
|
||||
|
||||
F-Line 106,52,106,55:
|
||||
F-Line 107,56,108,56:
|
||||
F-Line 107,54,108,54:
|
||||
F-Line 109,52,109,55:
|
||||
|
||||
F-Line 111,52,111,56:
|
||||
F-Line 112,55,113,54:
|
||||
F-Line 114,52,114,56:
|
||||
|
||||
F-Line 116,53,116,55:
|
||||
F-Line 117,52,118,52:
|
||||
F-Line 117,56,118,56:
|
||||
|
||||
F-Line 92,48,92,49:
|
||||
F-Line 93,50,94,50:
|
||||
F-Line 93,47,94,47:
|
||||
F-Line 95,48,95,49:
|
||||
|
||||
F-Line 97,48,97,49:
|
||||
F-Line 98,47,99,47:
|
||||
F-Line 98,50,99,50:
|
||||
F-Line 100,48,100,49:
|
||||
|
||||
F-Line 95,45,97,45:
|
||||
F-Line 94,44,98,44:
|
||||
F-Line 94,43,98,43:
|
||||
F-Line 94,42,98,42:
|
||||
F-Line 95,41,97,41:
|
||||
|
||||
F-Line 102,47,106,47:
|
||||
PlotOn 105,48:
|
||||
F-Line 102,45,106,45:
|
||||
PlotOn 103,44:
|
||||
|
||||
F-Line 105,41,105,42:
|
||||
F-Line 106,43,107,43:
|
||||
F-Line 106,40,107,40:
|
||||
F-Line 108,41,108,42:
|
||||
|
||||
F-Line 109,43,111,43:
|
||||
F-Line 108,44,112,44:
|
||||
F-Line 108,45,112,45:
|
||||
F-Line 108,46,112,46:
|
||||
F-Line 109,47,111,47:
|
||||
|
||||
F-Line 112,48,112,49:
|
||||
F-Line 113,47,114,47:
|
||||
F-Line 113,50,114,50:
|
||||
F-Line 115,48,115,49:
|
||||
|
||||
F-Line 114,40,114,45:
|
||||
F-Line 115,40,117,40:
|
||||
F-Line 115,41,117,41:
|
||||
F-Line 115,45,119,45:
|
||||
F-Line 116,44,117,44:
|
||||
F-Line 116,43,117,43:
|
||||
F-Line 119,43,119,44:
|
||||
F-Line 119,40,119,41:
|
||||
|
||||
Text 27,2,"CIRCUIT":
|
||||
|
||||
F-Line 3,30,15,30:
|
||||
F-Line 15,31,18,31:
|
||||
F-Line 15,29,18,29:
|
||||
F-Line 18,30,21,30:
|
||||
F-Line 21,29,21,28:
|
||||
F-Line 20,28,20,25:
|
||||
F-Line 22,28,22,25:
|
||||
F-Line 21,25,21,23:
|
||||
F-Line 20,23,9,23:
|
||||
F-Line 9,24,6,24:
|
||||
F-Line 9,22,6,22:
|
||||
F-Line 6,23,3,23:
|
||||
F-Line 3,24,3,25:
|
||||
F-Line 2,26,2,27:
|
||||
F-Line 4,26,4,27:
|
||||
F-Line 3,28,3,29:
|
||||
PlotOn 6,29:
|
||||
PlotOn 7,31:
|
||||
PlotOn 8,29:
|
||||
PlotOn 9,31:
|
||||
PlotOn 10,29:
|
||||
F-Line 13,29,13,28:
|
||||
F-Line 12,27,14,27:
|
||||
F-Line 12,25,14,25:
|
||||
PlotOn 13,24:
|
||||
|
||||
F-Line 24,26,24,21:
|
||||
F-Line 25,22,28,22:
|
||||
F-Line 25,26,29,26:
|
||||
F-Line 26,24,29,24:
|
||||
PlotOn 29,23:
|
||||
PlotOn 29,21:
|
||||
#if defined(CIRCUIT) && (CIRCUIT == 1)
|
||||
Text 27,2,"CIRCUIT":
|
||||
F-Line 3,30,15,30:
|
||||
F-Line 15,31,18,31:
|
||||
F-Line 15,29,18,29:
|
||||
F-Line 18,30,21,30:
|
||||
F-Line 21,29,21,28:
|
||||
F-Line 20,28,20,25:
|
||||
F-Line 22,28,22,25:
|
||||
F-Line 21,25,21,23:
|
||||
F-Line 20,23,9,23:
|
||||
F-Line 9,24,6,24:
|
||||
F-Line 9,22,6,22:
|
||||
F-Line 6,23,3,23:
|
||||
F-Line 3,24,3,25:
|
||||
F-Line 2,26,2,27:
|
||||
F-Line 4,26,4,27:
|
||||
F-Line 3,28,3,29:
|
||||
PlotOn 6,29:
|
||||
PlotOn 7,31:
|
||||
PlotOn 8,29:
|
||||
PlotOn 9,31:
|
||||
PlotOn 10,29:
|
||||
F-Line 13,29,13,28:
|
||||
F-Line 12,27,14,27:
|
||||
F-Line 12,25,14,25:
|
||||
PlotOn 13,24:
|
||||
F-Line 24,26,24,21:
|
||||
F-Line 25,22,28,22:
|
||||
F-Line 25,26,29,26:
|
||||
F-Line 26,24,29,24:
|
||||
PlotOn 29,23:
|
||||
PlotOn 29,21:
|
||||
#else
|
||||
FillRect 2,27,30,44
|
||||
#endif
|
||||
|
||||
LocateYX 0,38,"MAIN MENU"
|
||||
|
||||
Lbl 2
|
||||
Prog "_WAITKEY"->g
|
||||
Switch g:
|
||||
Case 72:
|
||||
Prog "PER~MAIN"
|
||||
Goto 1
|
||||
Case 62:
|
||||
Prog "CST~MAIN"
|
||||
Goto 1
|
||||
# if defined(PERIODIC) && (PERIODIC == 1)
|
||||
Case 72:
|
||||
Prog "PER~MAIN"
|
||||
Goto 1
|
||||
# endif
|
||||
# if defined(CONSTANT) && (CONSTANT == 1)
|
||||
Case 62:
|
||||
Prog "CST~MAIN"
|
||||
Goto 1
|
||||
# endif
|
||||
# if defined(CONVERT) && (CONVERT == 1)
|
||||
Case 52:
|
||||
Prog "CNV~MAIN"
|
||||
Goto 1
|
||||
# endif
|
||||
# if defined(CHEMISTRY) && (CHEMISTRY == 1)
|
||||
Case 73:
|
||||
Prog "CHM~MAIN"
|
||||
Goto 1
|
||||
# endif
|
||||
# if defined(CIRCUIT) && (CIRCUIT == 1)
|
||||
Case 63:
|
||||
Prog "ELC~MAIN"
|
||||
Goto 1
|
||||
# endif
|
||||
Case 48:
|
||||
Return
|
||||
Case 47:
|
||||
ClrText
|
||||
"Programme interrompu Appuyez sur [EXE]"DISP
|
||||
Goto 1
|
||||
Case 78:
|
||||
Prog "_WAITKEY"
|
||||
If Ans==47
|
||||
Then
|
||||
ClrText
|
||||
Stop
|
||||
IfEnd
|
||||
Stop
|
||||
SwitchEnd
|
||||
Goto 2
|
||||
Goto 2
|
||||
|
|
|
|||
Loading…
Reference in New Issue