home *** CD-ROM | disk | FTP | other *** search
/ POWERdrive for you 1998 June / Pdr0698.iso / VOLLVERS / POWERMAN / WALK.WDL < prev    next >
Text File  |  1998-05-05  |  723b  |  33 lines
  1. ACTION my_move {
  2.     RULE PLAYER_VX = FORCE_AHEAD * PLAYER_COS - FORCE_STRAFE * PLAYER_SIN;
  3.     RULE PLAYER_VY = FORCE_AHEAD * PLAYER_SIN + FORCE_STRAFE * PLAYER_COS;
  4.     RULE PLAYER_VROT = 0.1 * FORCE_ROT;
  5. }
  6.  
  7. SKILL sql {}
  8.  
  9. ACTION my_start {
  10.         IF_EQUAL sql,1;
  11.         GOTO ii;
  12.         CALL vorspann;
  13.         ii:
  14.         SET PLAYER_SIZE,4;
  15.     SET PLAYER_LIGHT,0.8;    
  16.     SET EACH_TICK.16, my_move;
  17.     CALL INIT_FIRE;
  18.     SET PANELS.10,pan;
  19.     SET PANELS.9,pan2;
  20.     SET IF_TAB,NULL;
  21.         IF_EQUAL sql,1;
  22.         GOTO fff;
  23.         WAITT 220;
  24.         fff:
  25.         SET zeit,300;
  26.         IF_EQUAL sql,1;
  27.         GOTO lllll;
  28.         CALL hallo_text;
  29.         lllll:
  30.         PLAY_SONG mid,0.2;
  31.         SET sql,1;
  32. }
  33.