home *** CD-ROM | disk | FTP | other *** search
/ hobbes.nmsu.edu 2008 / 2008-06-02_hobbes.nmsu.edu.zip / new / scummc-0.2.0-os2.zip / ScummC / examples / openquest / skyline.scc < prev    next >
Encoding:
Text File  |  2008-04-06  |  2.1 KB  |  74 lines
  1. /* ScummC
  2.  * Copyright (C) 2008  Alban Bedel, Gerrit Karius
  3.  *
  4.  * This program is free software; you can redistribute it and/or
  5.  * modify it under the terms of the GNU General Public License
  6.  * as published by the Free Software Foundation; either version 2
  7.  * of the License, or (at your option) any later version.
  8.  
  9.  * This program is distributed in the hope that it will be useful,
  10.  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12.  * GNU General Public License for more details.
  13.  
  14.  * You should have received a copy of the GNU General Public License
  15.  * along with this program; if not, write to the Free Software
  16.  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
  17.  *
  18.  */
  19.  
  20.  
  21. #include <scummVars6.s>
  22. #include "common.sch"
  23. #include "officeroom.sch"
  24. #include "actors.sch"
  25.  
  26.  
  27. actor ufoActor;
  28.  
  29.  
  30. room Skyline {
  31.  
  32.     image = "graphics/rooms/skyline.bmp";
  33.  
  34.     cost ufoCost = "ufo.cost";
  35.     
  36.     local script entry() {
  37.         cutscene(0) {
  38.             try {
  39.                 setCurrentActor(ufoActor);
  40.                 initActor();
  41.                 setActorCostume(ufoCost);
  42.                 setActorTalkPos(-60,-70);
  43.                 setActorName("Ufo");
  44.                 setActorWalkSpeed(2,1);
  45.                 setActorTalkColor(ZIF_COLOR);
  46.                 setActorWidth(20);
  47.                 setActorIgnoreBoxes();
  48.                 setActorAnimSpeed(4);
  49.                 
  50.                 putActorAt(ufoActor,-50,80,Skyline);
  51.                 walkActorTo(ufoActor, 140, 80);
  52.                 waitForActor( ufoActor );
  53.                 actorSay(ufoActor, "These are the coordinates.");
  54.                 waitForMessage();
  55.                 actorSay(ufoActor, "Ensign, bring the teleportation device online.");
  56.                 waitForMessage();
  57.         
  58.                 delay(100);
  59.             }
  60.             override {
  61.                 if(VAR_OVERRIDE) {
  62.                     actorSay(0xFF, ""); //stopTalking();
  63.                     screenEffect(0x8186);
  64.                 } else {
  65.                     screenEffect(0x8686);
  66.                 }
  67.             }
  68.         }
  69.         
  70.         startRoom(OfficeRoom);
  71.     }
  72.  
  73. }
  74.