home *** CD-ROM | disk | FTP | other *** search
/ Computer Based Training: …, Windows 95 & NT Basics / a1454501.iso / mo97w03 / AW01SCPT.TXT < prev    next >
Encoding:
Text File  |  1997-04-22  |  10.6 KB  |  359 lines
  1. REM #########################################################################################################################
  2. REM @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
  3. REM                                           T A S K   01 
  4. REM @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
  5. REM #########################################################################################################################
  6.  
  7. SIMSCRN 1 7 15
  8.  
  9. BEGIN SETUP
  10.     LOAD MENU_1
  11.     PLOTDIB SCREEN_1 0 0 640 442 "A01_001.DIB"
  12.     LOADDLG DIALOG_1000
  13.     LOADDLG DIALOG_2000
  14.     LOADDLG DIALOG_3000
  15.     LOADDLG DIALOG_4000
  16.     LOADDLG DIALOG_5000
  17.     SETVISIBLE DIALOG_1000 TRUE
  18.     LOAD TEXTBOX_0001 10 10 10 10 "" THREED INVISIBLE
  19. END SETUP
  20.  
  21. BEGIN TASK 01
  22.  
  23. JUDGE
  24.     DIALOG_4000 VISIBLE TRUE
  25.     DIALOG_3000 VISIBLE FALSE
  26.     DIALOG_2000 VISIBLE FALSE
  27.     DIALOG_1000 VISIBLE FALSE
  28. END JUDGE
  29.  
  30. SHOWME
  31.     LOAD MENU_1
  32.     SETVISIBLE DIALOG_1000 TRUE
  33.     REM *********************** STEP 1
  34.     LOAD PICTURE_1 410 26 120 70 "A00_001.DIB"
  35.     TIMEDELAY 1.0
  36.     MOUSEMOVE DIALOG_1000 541 10
  37.     TIMEDELAY 0.5
  38.     SETVISIBLE DIALOG_2000 TRUE
  39.     SETVISIBLE DIALOG_1000 FALSE
  40.     TIMEDELAY 0.3
  41.     UNLOAD PICTURE_1
  42.     TIMEDELAY 1.5
  43.     REM *********************** STEP 2
  44.     LOAD PICTURE_2 130 0 120 70 "A00_002.DIB"
  45.     TIMEDELAY 2.0
  46.     UNLOAD PICTURE_2
  47.     SHOWMENU "4_1"
  48.     TIMEDELAY 0.7
  49.     SETCHECK RADIOBUTTON_3001 TRUE
  50.     SETVISIBLE DIALOG_3000 TRUE
  51.     SETENABLED DIALOG_2000 FALSE
  52.     SETMENUSTATE MENU_1 FALSE
  53.     SETFOCUS RADIOBUTTON_3001 TRUE
  54.     TIMEDELAY 1.5
  55.     REM *********************** STEP 3
  56.     LOAD PICTURE_3 200 176 120 70 "A00_003.DIB"
  57.     TIMEDELAY 1.0
  58.     MOUSEMOVE RADIOBUTTON_3004 1 11
  59.     TIMEDELAY 0.5
  60.     SETCHECK RADIOBUTTON_3004 TRUE
  61.     SETFOCUS RADIOBUTTON_3004 TRUE
  62.     SETCHECK RADIOBUTTON_3001 FALSE
  63.     TIMEDELAY 0.7
  64.     UNLOAD PICTURE_3
  65.     TIMEDELAY 1.5
  66.     REM *********************** STEP 4
  67.     LOAD PICTURE_4 292 222 120 70 "A00_004.DIB"
  68.     TIMEDELAY 1.0
  69.     MOUSEMOVE BUTTON_3001 30 15
  70.     TIMEDELAY 0.5
  71.     SETSTATE BUTTON_3001 TRUE
  72.     SETFOCUS BUTTON_3001 TRUE
  73.     TIMEDELAY 0.2
  74.     SETSTATE BUTTON_3001 FALSE
  75.     TIMEDELAY 0.5
  76.     SETVISIBLE DIALOG_3000 FALSE
  77.     UNLOAD PICTURE_4
  78.     SETVISIBLE DIALOG_4000 TRUE
  79.     SETVISIBLE DIALOG_2000 FALSE
  80.     SETENABLED DIALOG_2000 FALSE
  81.     LOAD MENU_2
  82.     TIMEDELAY 1.5  
  83. END SHOWME
  84.  
  85. SKIPTASK
  86.     LOAD MENU_2
  87.     SETVISIBLE DIALOG_4000 TRUE
  88. END SKIPTASK
  89.  
  90. END TASK 01
  91.  
  92. REM #########################################################################################################################
  93. REM @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
  94. REM                                           T A S K   02 
  95. REM @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
  96. REM #########################################################################################################################
  97.  
  98. SIMSCRN 1 8 15
  99.  
  100.  
  101. BEGIN SETUP
  102.     LOAD MENU_1
  103.     PLOTDIB SCREEN_1 0 0 640 442 "A01_100.DIB"
  104.     LOADDLG DIALOG_6000
  105.     LOADDLG DIALOG_7000
  106.     LOADDLG DIALOG_8000
  107.     SETVISIBLE DIALOG_6000 TRUE
  108.     LOAD TEXTBOX_0001 10 10 10 10 "1" THREED INVISIBLE
  109. END SETUP
  110.  
  111. BEGIN TASK 02
  112.  
  113. JUDGE
  114.     DIALOG_8000 VISIBLE TRUE
  115.     DIALOG_7000 VISIBLE FALSE
  116.     DIALOG_6000 VISIBLE FALSE
  117. END JUDGE
  118.  
  119. SHOWME
  120.     LOAD MENU_1
  121.     SETVISIBLE DIALOG_6000 TRUE
  122.     SETTEXT TEXTBOX_7002 "5.77\""
  123.     SETTEXT TEXTBOX_7003 "2.73\""
  124.     SETTEXT TEXTBOX_7004 "0.5\""
  125.     PLOTDIB DIALOG_7000 0 21 247 83 "A01_103A.DIB"
  126.     SETTEXT TEXTBOX_7001 "1"
  127.     PLOTDIB DIALOG_7000 36 176 42 72 "A01_104A.DIB"
  128.     PLOTDIB DIALOG_7000 258 144 121 133 "A01_102A.DIB"
  129.     SETVISIBLE TEXTBOX_7003 FALSE
  130.     SETVISIBLE BUTTON_7007 FALSE
  131.     SETVISIBLE BUTTON_7008 FALSE
  132.     SETVISIBLE TEXTBOX_7004 FALSE
  133.     SETVISIBLE BUTTON_7009 FALSE
  134.     SETVISIBLE BUTTON_7010 FALSE
  135.     SETENABLED CHECKBOX_7001 FALSE
  136.     SETENABLED CHECKBOX_7002 FALSE
  137.     SETCHECK CHECKBOX_7001 FALSE
  138.     REM ********************** STEP 1
  139.     LOAD PICTURE_1 174 0 120 70 "A00_002.DIB"
  140.     TIMEDELAY 2.0
  141.     UNLOAD PICTURE_1
  142.     SHOWMENU "5_5"
  143.     TIMEDELAY 0.5
  144.     SETVISIBLE DIALOG_7000 TRUE
  145.     SETENABLED DIALOG_6000 FALSE
  146.     SETMENUSTATE MENU_1 FALSE
  147.     TIMEDELAY 1.5
  148.     REM ********************* STEP 2
  149.     LOAD PICTURE_2 277 170 120 70 "A00_003.DIB"
  150.     TIMEDELAY 0.5
  151.     MOUSEMOVE BUTTON_7003 15 16
  152.     TIMEDELAY 0.5
  153.     SETSTATE BUTTON_7003 TRUE
  154. rem    SETFOCUS TEXTBOX_7001 TRUE
  155.     SETSTATE BUTTON_7003 FALSE
  156.     SETTEXT TEXTBOX_7001 "2"
  157.     SETTEXT TEXTBOX_7002 "2.73\""
  158.     SETTEXT TEXTBOX_7003 "2.73\""
  159.     PLOTDIB DIALOG_7000 0 21 247 83 "A01_103.DIB"
  160.     PLOTDIB DIALOG_7000 36 176 42 72 "A01_104.DIB"
  161.     SETENABLED TEXTBOX_7003 TRUE
  162.     PLOTDIB DIALOG_7000 258 144 121 133 "A01_102.DIB"
  163.     SETVISIBLE TEXTBOX_7003 TRUE
  164.     SETVISIBLE BUTTON_7007 TRUE
  165.     SETVISIBLE BUTTON_7008 TRUE
  166.     SETVISIBLE TEXTBOX_7004 TRUE
  167.     SETVISIBLE BUTTON_7009 TRUE
  168.     SETVISIBLE BUTTON_7010 TRUE
  169.     SETENABLED CHECKBOX_7001 TRUE
  170.     SETENABLED CHECKBOX_7002 TRUE
  171.     TIMEDELAY 0.5
  172.     UNLOAD PICTURE_2
  173.     TIMEDELAY 1.5
  174.     REM ******************** STEP 3
  175.     LOAD PICTURE_3 100 320 120 70 "A00_004.DIB"
  176.     TIMEDELAY 0.5
  177.     MOUSEMOVE CHECKBOX_7001 1 10
  178.     TIMEDELAY 0.5
  179.     SETCHECK CHECKBOX_7001 TRUE
  180.     SETFOCUS CHECKBOX_7001 TRUE
  181.     PLOTDIB DIALOG_7000 36 176 42 72 "A01_104B.DIB"
  182.     SETENABLED TEXTBOX_7003 FALSE
  183.     SETVISIBLE BUTTON_7007 FALSE
  184.     SETVISIBLE BUTTON_7008 FALSE
  185.     TIMEDELAY 0.5
  186.     UNLOAD PICTURE_3
  187.     TIMEDELAY 1.5
  188.     REM ********************* STEP 4
  189.     LOAD PICTURE_4 100 250 120 70 "A00_005.DIB"
  190.     TIMEDELAY 1.0
  191.     SETTEXT TEXTBOX_7004 ""
  192.     SHOWTEXT TEXTBOX_7004 "0.3""
  193.     TIMEDELAY 1.0
  194.     UNLOAD PICTURE_4
  195.     TIMEDELAY 1.5
  196.     REM ********************* STEP 5
  197.     LOAD PICTURE_5 205 105 120 70 "A00_001.DIB"
  198.     TIMEDELAY 0.5
  199.     MOUSEMOVE BUTTON_7001 30 10
  200.     TIMEDELAY 0.5
  201.     SETSTATE BUTTON_7001 TRUE
  202.     TIMEDELAY 0.5
  203.     SETSTATE BUTTON_7001 FALSE
  204.     TIMEDELAY 0.5
  205.     UNLOAD PICTURE_5
  206.     SETVISIBLE DIALOG_7000 FALSE
  207.     TIMEDELAY 1.0
  208.     LOAD MENU_3
  209.     SETVISIBLE DIALOG_8000 TRUE
  210.     SETVISIBLE DIALOG_6000 FALSE
  211.     TIMEDELAY 1.5
  212. END SHOWME
  213.  
  214. SKIPTASK
  215.     LOAD MENU_3
  216.     SETVISIBLE DIALOG_8000 TRUE
  217. END SKIPTASK
  218.  
  219. END TASK 02
  220.  
  221.  
  222. REM #########################################################################################################################
  223. REM @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
  224. REM                                           T A S K   03 
  225. REM @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
  226. REM #########################################################################################################################
  227.  
  228. SIMSCRN 1 15 15
  229.  
  230. BEGIN SETUP
  231.     LOAD MENU_1
  232.     PLOTDIB SCREEN_1 0 0 640 442 "A01_200.DIB"
  233.     LOADDLG DIALOG_20000
  234.     LOADDLG DIALOG_21000
  235.     LOADDLG DIALOG_22000
  236.     LOADDLG DIALOG_23000
  237.     LOADDLG DIALOG_24000
  238.     LOADDLG DIALOG_25000
  239.     SETVISIBLE DIALOG_20000 TRUE
  240.     LOAD TEXTBOX_0001 10 10 10 10 "1" THREED INVISIBLE
  241.     LOAD RADIOBUTTON_0001 10 40 40 10 "FLAG TO SEE IF i,ii,iii.. PICKED" THREED INVISIBLE
  242.     SETCHECK RADIOBUTTON_0001 FALSE
  243.     LOAD TEXTBOX_0002 10 60 10 10 "" THREED  
  244. END SETUP
  245.  
  246. BEGIN TASK 03
  247.  
  248. JUDGE
  249.     DIALOG_25000 VISIBLE TRUE
  250.     DIALOG_24000 VISIBLE FALSE
  251.     DIALOG_23000 VISIBLE FALSE
  252.     DIALOG_22000 VISIBLE FALSE
  253.     DIALOG_21000 VISIBLE FALSE
  254.     DIALOG_20000 VISIBLE FALSE
  255. END JUDGE
  256.  
  257. SHOWME
  258.     LOAD MENU_1
  259.     SETVISIBLE DIALOG_20000 TRUE
  260.     REM ************************ STEP 1
  261.     LOAD PICTURE_1 135 0 120 70 "A00_002.DIB"
  262.     TIMEDELAY 1.5
  263.     UNLOAD PICTURE_1
  264.     SHOWMENU "4_8"
  265.     TIMEDELAY 0.5
  266.     SETVISIBLE DIALOG_21000 TRUE
  267.     SETENABLED DIALOG_20000 FALSE
  268.     SETFOCUS BUTTON_21001 TRUE
  269.     TIMEDELAY 1.5
  270.     REM ************************ STEP 2
  271.     LOAD PICTURE_2 335 330 120 70 "A00_004.DIB"
  272.     TIMEDELAY 0.5
  273.     MOUSEMOVE BUTTON_21004 30 15
  274.     TIMEDELAY 0.5
  275.     SETSTATE BUTTON_21004 TRUE
  276.     SETFOCUS BUTTON_21004 TRUE
  277.     TIMEDELAY 0.2
  278.     SETSTATE BUTTON_21004 FALSE
  279.     TIMEDELAY 0.2
  280.     UNLOAD PICTURE_2
  281.     SETVISIBLE DIALOG_22000 TRUE
  282.     SETENABLED DIALOG_21000 FALSE
  283.     TIMEDELAY 1.5
  284.     REM *********************** STEP 3
  285.     LOAD PICTURE_3 343 222 120 70 "A00_003.DIB"
  286.     TIMEDELAY 0.5
  287.     MOUSEMOVE COMBOBOX_22002 140 5
  288.     TIMEDELAY 0.5
  289.     SETFOCUS COMBOBOX_22002 TRUE
  290.     SHOWCOMBO COMBOBOX_22002 3
  291.     PLOTDIB DIALOG_21000 139 107 113 23 "A01_211.DIB"
  292.     PLOTDIB DIALOG_22000 123 120 89 20 "A01_208.DIB"
  293.     TIMEDELAY 0.5
  294.     UNLOAD PICTURE_3
  295.     TIMEDELAY 1.5
  296.     REM *********************** STEP 4
  297.     LOAD PICTURE_4 190 355 120 70 "A00_004.DIB"
  298.     TIMEDELAY 0.5
  299.     MOUSEMOVE BUTTON_22001 30 15
  300.     TIMEDELAY 0.5
  301.     SETSTATE BUTTON_22001 TRUE
  302.     SETFOCUS BUTTON_22001 TRUE
  303.     TIMEDELAY 0.2
  304.     SETSTATE BUTTON_22001 FALSE
  305.     TIMEDELAY 0.5
  306.     UNLOAD PICTURE_4
  307.     SETVISIBLE DIALOG_22000 FALSE
  308.     SETENABLED DIALOG_21000 TRUE
  309.     TIMEDELAY 1.5
  310.     REM ********************** STEP 5
  311.     LOAD PICTURE_5 188 330 120 70 "A00_004.DIB"
  312.     TIMEDELAY 0.5
  313.     MOUSEMOVE BUTTON_21002 30 15
  314.     TIMEDELAY 0.5
  315.     SETSTATE BUTTON_21002 TRUE
  316.     SETFOCUS BUTTON_21002 TRUE
  317.     TIMEDELAY 0.2
  318.     SETSTATE BUTTON_21002 FALSE
  319.     TIMEDELAY 0.5
  320.     UNLOAD PICTURE_5
  321.     SETVISIBLE DIALOG_21000 FALSE
  322.     TIMEDELAY 0.2
  323.     SETVISIBLE DIALOG_24000 TRUE
  324.     SETVISIBLE DIALOG_20000 FALSE
  325.     SETFOCUS TEXTBOX_24001 TRUE
  326.     TIMEDELAY 1.5
  327.     REM ********************* STP 6
  328.     LOAD PICTURE_6 153 277 120 70 "A00_006.DIB"
  329.     TIMEDELAY 0.5
  330.     SHOWTEXT TEXTBOX_24001 "See list on page 30"
  331.     TIMEDELAY 0.5
  332.     UNLOAD PICTURE_6
  333.     TIMEDELAY 1.5
  334.     REM ********************* STP 7
  335.     LOAD PICTURE_5 223 250 120 70 "A00_004.DIB"
  336.     TIMEDELAY 0.5
  337.     MOUSEMOVE DIALOG_24000 230 210
  338.     TIMEDELAY 0.5
  339.     UNLOAD PICTURE_5
  340.     LOAD MENU_5
  341.     SETVISIBLE DIALOG_25000 TRUE
  342.     SETVISIBLE DIALOG_24000 FALSE
  343.     TIMEDELAY 1.5
  344. END SHOWME
  345.  
  346. SKIPTASK
  347.     LOAD MENU_4
  348.     SETTEXT TEXTBOX_24001 "See list on page 30"
  349.     SETVISIBLE DIALOG_24000 TRUE
  350. END SKIPTASK
  351.  
  352. END TASK 03
  353.  
  354.  
  355. BEGIN ROUTINE 01
  356.       PLOTDIB DIALOG_24000 0 0 640 442 "a01_213.dib"
  357. REM      SETVISIBLE DIALOG_24000 FALSE
  358. END ROUTINE 01
  359.