home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Now/Multimedia Now 1994 March / Multimedia_Now_Issue_3_1994.iso / dosprogs / spell / spell.shr / HELP.TXT < prev    next >
Encoding:
Text File  |  1993-02-20  |  14.1 KB  |  145 lines

  1.  
  2.         RetCode:=grOutText('   Last life gone!');
  3.         RetCode:=grMoveTo(77,65);
  4.         RetCode:=grOutText('   Take more care');
  5.         RetCode:=grMoveTo(73,80);
  6.         RetCode:=grOutText('      next time!  ');
  7.         EmptyBuffer;
  8.         Ct:=100;
  9.         Repeat
  10.          Dec(Ct);
  11.          MSEDelay(21);
  12.         Until KeyPressed or
  13.           (FirePressed = True) or
  14.           (Ct = 0);
  15.         EmptyBuffer;
  16.  
  17. End; {LastLifeGone}
  18.  
  19. {*}
  20.  
  21. Procedure AddFuelBonus;
  22.  
  23. Var    BonusFuel : Integer;
  24.     BFADD      : Integer;
  25.     Ctr      : Integer;
  26.  
  27. Begin
  28.     RetCode:=grSetActivePage(Physic);
  29.         RetCode:=gxPutImage(DisplayBox,gxSet,75,70,Physic);
  30.         RetCode:=grMoveTo(80,80);
  31.         RetCode:=grSetColor(ForegroundInk);
  32.         RetCode:=grOutText('     Well done!      ');
  33.         RetCode:=grMoveTo(80,92);
  34.         RetCode:=grOutText('    Adding fuel      ');
  35.         RetCode:=grMoveTo(80,104);
  36.         RetCode:=grOutText('       bonus.        ');
  37.         BonusFuel:=FuelLevel Div 100;   {60;}
  38.         BFADD:=ScoreBase div 10;
  39.         For Ctr:=BonusFuel DownTo 0 Do
  40.          Begin
  41.           UpdateScore(BFADD);
  42.           RetCode:=grSetColor(0);
  43.           RetCode:=grDrawLine(16+ctr,187,16+Ctr,194);
  44.           MSEDelay(20);
  45.          End;
  46.         Ctr:=50;
  47.         EmptyBuffer;
  48.         Repeat
  49.          MSEDelay(10);
  50.          Dec(Ctr);
  51.         Until KeyPressed or
  52.           (FirePressed = True) or
  53.           (Ctr = 0);
  54.         EmptyBuffer;
  55.  
  56. End; {AddFuelBonus}
  57.  
  58. {*}
  59.  
  60. Function WordCheck : Boolean;
  61.  
  62. Var    Counter : Integer;
  63.  
  64. Begin
  65.     Counter:=0;
  66.         WordCheck:=True;
  67.     Repeat
  68.          Counter:=Counter + 1;
  69.          If PartWord[Counter] <> CollectedWord[Counter-1] Then
  70.           Begin
  71.            Counter:=12;
  72.            WordCheck:=False;
  73.           End;
  74.         Until Counter = 15;
  75.  
  76. End; {WordCheck}
  77.  
  78. {*}
  79.  
  80. Procedure WrongWordOrder;
  81.  
  82. var    CW : String[16];
  83.     Ct : Integer;
  84.  
  85. Begin
  86.     CW:='';
  87.         For Ct:=0 to 15 Do
  88.          CW:=CW + CollectedWord[Ct];
  89.     ShowPicture(Library[Level],'COMPUTER.PC  KHELP!                                                                      ÷┐ΦF                                                                      HÇt╦NGeneral:  The object of the game is to capture Morgana's wand as              Nquickly and efficiently as possible.  You must find the five keys             Nwhich will unlock Professor Grime's safe.                                     N                                                                              NThe more difficult you make your task, the more points you earn.  A           Nbase score of 200 points is awarded each time a robot is destroyed.           NA High Score Table records best results.                                      F                                                                      π╟Ç√tÇNUnless stated otherwise, to alter a setting, point and click your left        Nor right mouse button on the button alongside the appropriate icon.           NIf there is no active mouse, use the cursor keys (press <Enter> or            N<Space> to confirm choice).                                                   F                                                                      ═?t
  90. ÜNNumber of "lives":  This determines the number of times your                  Nhelicopter etc can be destroyed without ending the game.  Set from 3          N(very difficult) to 15 (relatively easy).  The base score for                 Ndestroying a robot is reduced by 10 points for each life you allocate         Nabove 3.                                                                      N                                                                              NSpeed:  Alter the speed of Professor Grime's robots.  Choose between          NLow, Medium and High.  You get 200 extra points for destroying a robot        Non High, 100 extra on Medium, none on Low.                                    N                                                                              NMusic:  Choose between music, speech and sound effects "On" or "Off"          KHELP!                                                                         F                                                                              NEDITING:  To edit an existing word list, first display it on-screen.          NPoint and click your left mouse button on the word(s) to be altered.          NUse the back delete key to delete letters, type in those you want,            Nthen press <Enter>.  To add a new word, either change an existing one,        Nor `edit' an empty line.  To save your modified word list, point and          Nclick on SAVE.                                                                F                                                                              NIf you want to save to a different file name, first click on the              Nlong,  narrow box above the OK and CANCEL buttons.  Type a name for           Nyour modified list at the flashing cursor, then press <Enter>.  Click         Non OK when finished.                                                          F                                                                              NNEW LISTS:  To create a new word list, point and click on the CLEAR           Nbutton.  Click on any "line", type in your first word then press              N<Enter>.  Each word list can contain up to 75 words.  Each word can           Ncontain from 1-11 letters and mixed sizes in each list are OK.                F                                                                              NTo save your new word list, point and click on SAVE.  Now click on            Nthe long, narrow box above the OK and CANCEL buttons.  Type a name for        Nyour new list at the flashing cursor, then press <Enter>.  Click on OK        Nwhen finished.                                                                F                                                                              NWARNING!  ALWAYS SAVE BEFORE USING A MODIFIED OR NEWLY CREATED WORD           KLIST.                                                                           if not bombed_out then
  91.           begin
  92.           ShowPicture('Level1.lib','computer.pcx',StdEffect);
  93.           if gamelives>0 then
  94.             begin
  95.             RetCode:=grSetColor(15);
  96.             RetCode:=grMoveTo(87,35);
  97.             RetCode:=grOutText('Well done!  You ');
  98.             RetCode:=grMoveTo(87,50);
  99.             RetCode:=grOutText('made it through');
  100.         RetCode:=grMoveTo(87,65);
  101.             RetCode:=grOutText('the demo level.');
  102.         RetCode:=grMoveTo(87,80);
  103.           RetCode:=grOutText('Here are some');
  104.             RetCode:=grMoveTo(87,95);
  105.             RetCode:=grOutText('other screens');
  106.             RetCode:=grMoveTo(87,110);
  107.             RetCode:=grOutText('from SPELLBOUND!.');
  108.             end
  109.           else
  110.             begin
  111.             RetCode:=grSetColor(15);
  112.             RetCode:=grMoveTo(87,35);
  113.             RetCode:=grOutText('Oh dear, your last');
  114.             RetCode:=grMoveTo(87,50);
  115.             RetCode:=grOutText('life has gone.');
  116.         RetCode:=grMoveTo(87,65);
  117.             RetCode:=grOutText('Try again after');
  118.         RetCode:=grMoveTo(87,80);
  119.           RetCode:=grOutText('you''ve looked at');
  120.             RetCode:=grMoveTo(87,95);
  121.             RetCode:=grOutText('some other screens');
  122.             RetCode:=grMoveTo(87,110);
  123.             RetCode:=grOutText('from SPELLBOUND!');
  124.             end;
  125.           bob_ctr:=0;
  126.           emptybuffer;
  127.           Repeat
  128.             msedelay(10);
  129.             inc(bob_ctr);
  130.           Until KeyPressed or FirePressed or (bob_ctr>150);
  131.           if keypressed then
  132.             bob_ch:=readkey;
  133.           If SBC_OK and (music=1) Then
  134.             Begin
  135.             demo_Music_In:=Load_SB_Music('sbback'+numstr(random(4)+2)+'.PCX',Mus_Buf[demo_music]);
  136.             if demo_music_in then
  137.               Start_Music(1,Mus_Buf[demo_music]);
  138.             end;
  139.  
  140.         If (Level = 2) or (GameLives = 0) Then
  141.          Begin
  142.           For Counter:=2 to 6 Do
  143.            Begin
  144.             EmptyBuffer;
  145.             COMPUTERLST ≥N░SFRUIT   Nthroughout.  If you don't have a sound card supported by Lander               NSoftware (see README file), the computer will default to silent               Noperation only.                                                               F                                                                              NFuel:  Start with Low, Medium or High quantities of fuel.  You get 200        Nextra points for destroying a robot on Low, 100 extra on Medium, none         Non High.                                                                      F                                                                              NWalls:  You can run the program with walls "Safe" or "Deadly".  If set        Nto "Safe", you will not be penalised for hitting an obstacle other            Nthan a robot.  When set to "Deadly", hitting a wall means losing a            Nlife.  You get single points for destroying a robot on Safe, double           Nfor Deadly.                                                                   N                                                                              NHELP!:  Point and click on the HELP! "bubble" to reach this screen.           F                                                                              NKEYS:  To re-define the control keys on the keyboard, click on this,          Nthen press desired keys.  <Esc> lets you stop and return to the               NControl Section at any time.                                                  F                                                                              NWORD LIST EDITOR:  This lets you edit words supplied on disk and              Ncreate new word lists.  Point and click on this and then click on the         NHELP button for further guidance.                                             F                                                                              NSAVE:  Point and click on this to save new settings.  These will then         Nbecome the program's new defaults.                                            F                                                                              NLOAD:  Point and click on this to return to the last saved default            Nsettings.                                                                     F                                                                              NABOUT:  Point and click on this to see who are behind SPELLBOUND!             F                                                                              NQUIT:  Point and click on this to return to the main Control Screen.          F                                                                              F                                                                              F                                                                              F                                                                              F                                                                              F                                                                              F                                                                              F                                                                              F                                                                              F                                                                              F                                                                              F                                                                              F                                                                              F                                                                              F                                                                              F                                                                              F                                                                              F                                                                              F                                                                              F                                                                              NLOADING A WORD LIST:  Load any word list by clicking on LOAD, clicking        Non the list name and then on the OK button.                                   F                                                                              NUSE:  Click on this to make the currently displayed list the new              Ndefault list.  This is the list from which the program will take words        Nwhen the game is played.                                                      F                                                                              NClick on QUIT to return to main Control Screen.                               F                                                                              NNote: To remove unwanted word lists, you must first return to DOS and         Nthen delete the relevant file from the SPELLBOUND! directory.                 F                                                                              F                                                                              F                                                                              F                                                                              F                                                                              F                                                                              F                                                                              F                                                                              F                                                                              F                                                                              F                                                                              F                                                                              F                                                                              F