StartTruck{EnterSection{Loading(1);Hide(501);Activate(331,1);Image+(ID=1000,Parent=500,Dim=(640,380),File=("ride\start.pic"));Region+(ID=1002,Parent=500,Dim=(640,380),Spot(1,1,((50,90),(113,90),(124,63),(245,51),(296,102),(588,102),(607,129),(483,209),(516,247),(516,300),(491,332),(376,332),(349,285),(284,285),(258,328),(124,328),(105,288),(52,288),(76,182),(26,155));),Help=(Text="Ride to site"),Intr(Action(GoToScript(10,"RideToSite"););););Update(300);SetFlagIf(Yes=1,If=(Get(503,21)==0););$1$Load(503);Effect(When=2,Info=(16,0),ID=500,Flags=3);Load(500);Update(500);Start(503);AddLabel(ID=2000,Repeat=1,Every=30000,Action(GoToScript(10,"RideToSite");););Loading(0);};LeaveSection{Effect(ID=500,Info=(1,0),Flags=2);Effect(When=2,Info=(16,0),ID=500,Flags=3);DelLabel(2000);Dispose(1000);Dispose(1002);Dispose(1003);};};RideToSite{EnterSection{Loading(1);Hide(501);Activate(331,0);Image+(ID=1102,Parent=500,File=("ride\first.pic"));Load(1102);Update(1102);SetFlagIf(Yes=1,If=(Get(503,21)==0););$1$Load(503);Start(503);Wave+(ID=1101,Parent=500,File="music\02.wav",WavFlags=2);Load(1101);WinMovie+(ID=1100,Parent=500,Pos=(0,29),MFLoop=-1,MFEvery=1,MStyle=1L,File="ride\sin145.mov",Data=((500,7,1),(501,10,(6600,7600)),(600,7,1),(601,7,7500),(3001,7,200),(4001,50,"VRQuarry")),Intr(Catch(Message(1100,21001,-1,-1);Enable(352);Stop(1100);Function(352,1););Catch(Message(1100,21003,-1,-1);Disable(352););Started(Set(100,1201,7,0);Stop(1105);Hide(1105);Stop(503);Start(1101);Disable(351);Disable(1104);Function(352,0););Stopped(Stop(1101);Set(100,1201,7,1);SetFlagIf(Yes=1,If=(Get(1100,120)!=0););$1$Set(100,1202,7,Get(1100,120));PlaySection(10,"RideToSite","ShowIntroduction");PostMsg(1,10014,22,500);Set(100,1200,7,Get(1100,130));Enable(1104););););Activate(1100,0);Load(1100);Activate(1100,1);Region+(ID=1104,Parent=500,Dim=(640,380),Spot(1,1,((0,0),(640,0),(640,260),(130,260),(130,380),(0,380));),Data=((100001,50,"Go to site")),Intr(Action(GoToScript(20,Get(1100,4000+Get(1100,120));););););Hide(1104);Disable(1104);WinMovie+(ID=1105,Parent=500,Pos=(276,280),MFLoop=1,MFEvery=1,MStyle=1L,File="ride\introd.mov",Cursor=2,Help=(Pos=(10,66),Text="Start site introduction"),Intr(MouseDown(JumpScript(Get(1100,3000+Get(1100,120)),"IntroTV"););););Activate(1105,0);Load(1105);Activate(350,1);Function(352,1);Disable(352);Enable(351);Effect(When=2,Info=(1,1),ID=300,Flags=3|4);&Update(300,500);Function(351,0);Loading(0);};ShowIntroduction{Stop(1101);Start(503);Activate(1105,1);Start(1105);&Enable(352,1104);};LeaveSection{SetFlagIf(Yes=1,If=(Get(100,1202)!=0););$1$Set(100,1201,7,1);&Dispose(1100,1101,1103,1104,1102);Dispose(1105);Effect(ID=500,Flags=2);Activate(350,0);Effect(When=2,Info=(1,1),ID=300,Flags=3|4);Update(300);SendMsg(1,10801,1,0);};};Navigator{EnterSection{Loading(1);Function(324,1);Activate(331,1);Disable(324);Image+(ID=1200,Parent=501,File=("navi\nav_back.bmp"),Bits=(1000L));Button+(ID=390,Parent=501,Pos=(15,21),Dim=(136,102),File=(File="navi\nav_quar.bmp",Pos=(0,0),Dim=(408,102)),Frames=(Array=(3,288,4128,8224)),Help=(Text="Unavailable in DEMO version"));Button+(ID=391,Parent=501,Pos=(169,21),Dim=(136,102),File=(File="navi\nav_fire.bmp",Pos=(0,0),Dim=(408,102)),Frames=(Array=(3,288,4128,8224)),Intr(Action(GoToScript(10,"ShowGame"););),);Button+(ID=392,Parent=501,Pos=(340,21),Dim=(136,102),File=(File="navi\nav_cran.bmp",Pos=(0,0),Dim=(408,102)),Frames=(Array=(3,288,4128,8224)),Help=(Text="Unavailable in DEMO version"));Button+(ID=393,Parent=501,Pos=(496,21),Dim=(136,102),File=(File="navi\nav_plug.bmp",Pos=(0,0),Dim=(408,102)),Frames=(Array=(3,288,4128,8224)),Help=(Text="Unavailable in DEMO version"));Button+(ID=394,Parent=501,Pos=(13,210),Dim=(188,137),File=(File="navi\nav_driv.bmp",Pos=(0,0),Dim=(564,137)),Frames=(Array=(3,288,4128,8224)),Help=(Text="Unavailable in DEMO version"));Button+(ID=395,Parent=501,Pos=(451,210),Dim=(188,137),File=(File="navi\nav_selc.bmp",Pos=(0,0),Dim=(564,137)),Frames=(Array=(3,288,4128,8224)),Intr(Action(GoToScript(10,"SelectCar"););),);Button+(ID=396,Parent=501,Pos=(211,210),Dim=(224,168),File=(File="navi\nav_ride.bmp",Pos=(0,0),Dim=(672,168)),Frames=(Array=(3,288,4128,8224)),Intr(Action(GoToScript(10,"RideToSite"););),);Load(1200);&Load(390,391,392,393,394,395,396);Show(501);Effect(When=2,Info=(1,1),ID=300,Flags=3|4);Effect(When=2,Info=(16,0),ID=500,Flags=3);&Update(300,500);Loading(0);SetFlagIf(Yes=1,If=(Get(503,21)==0););$1$Load(503);Start(503);};LeaveSection{Function(324,0);&Dispose(1200,390,391,392,393,394,395,396);Enable(324);Dispose(1101);Effect(ID=500,Flags=2);};};ShowGame{EnterSection{SetFlagIf(Yes=1,If=(Get(503,21)==1););$1$Unload(503);Image+(ID=3005,Parent=500,File=("demo\game.bmp"),Bits=(1000L));Load(3005);Update(500);Wave+(ID=1101,Parent=500,File="demo\fire2.wav",WavFlags=2);Load(1101);Start(1101);};LeaveSection{Effect(ID=500,Flags=2);&Dispose(3005,1101);};};InfoWindow{EnterSection{SetFlagIf(Yes=1,If=(Get(503,21)==1););$1$Unload(503);&Dispose(500,300);Window+(ID=499,Pos=(32767,0),Dim=(640,480),Cursor=3,Intr=(KeyDown(ParamID=KC_Space;GoBack(););MouseDown(GoBack());););Image+(ID=3005,Parent=499,File=("demo\info.pic"));Load(3005);Disable(3005);Update(499);Delay(1000);};LeaveSection{Dispose(499);SendMsg(1,19001,0,0);};};SelectCar{EnterSection{Loading(1);Show(501);Activate(331,1);SetFlagIf(Yes=1,If=(Get(503,21)==0););$1$Load(503);Start(503);Effect(When=2,Info=(16,0),ID=500,Flags=3);Image+(ID=1200,Parent=501,File=("trucksel\trs.pic"));Load(1200);Effect(When=2,Info=(1,1),ID=300,Flags=3|4);&Update(300,500);WinMovie+(ID=1201,Parent=500,MFLoop=-1,File="trucksel\mass_trs.mov",Pos=(6,35),MFEvery=1,Data=((1015,50,"trucksel\exc_trs.mov"),(2015,10,(421,255)),(3015,50,"QuarExc"),(4015,7,203),(5015,50,"voice\voice001.wav")););Region+(ID=1203,Parent=500,Dim=(640,380),Spot(15,2,((421,255),(217,108))),Intr(Catch(Message(1203,10706,-1,-1);DelLabel(2000);Stop(1201);Reset(502););Catch(Message(1203,10016,-1,-1);Stop(1201);SetFlagIf(Yes=1,If=(Get(1203,101)<=0));$1$Break();DelLabel(2000);Reset(502);AddLabel(ID=2000,Repeat=1,Every=1000,Action(Change(502,(1,50,Get(1201,5000+Get(1203,101))))););Disable(1201);Set(1201,101,50,Get(1201,1000+Get(1203,101))),Load(1201),Set(1201,9,10,Get(1201,2000+Get(1203,101))),Enable(1201);Start(1201););Catch(Message(1203,10015,-1,-1);SetFlagIf(Yes=1,If=(Get(1203,101)<=0));$1$Break();Stop(1201);Set(100,1001,50,Get(1201,3000+Get(1203,101)));Set(100,1002,7,Get(1201,4000+Get(1203,101)));GoToScript(Get(100,1002),Get(100,1001);););););Hide(1203);Show(1201);Load(500);Disable(1200);Disable(1201);Effect(When=2,Info=(1,1),ID=300,Flags=3|4);Update(300);Loading(0);};LeaveSection{Hide(501);DelLabel(2000);Dispose(1201);Effect(ID=500,Flags=2);&Dispose(1200,1203);};};About{EnterSection{Loading(1);Set(100,5002,7,1);Disable(331);SetFlagIf(Yes=1,If=(Get(503,21)==1););$1$Stop(503);$1$Unload(503);Show(501);Image+(ID=1901,Pos=(120,380),Parent=500,File=("credits\about.bmp"),Bits=(1000L),Intr(Finished(Set(1901,1000,7,Inform(2));SetFlagIf(Yes=1,No=2,If=(Inform(2)>8););$1$SendMsg(1,20002,0,-2);$2$SendMsg(1,20002,0,-1);Delay(500);$1$SendMsg(1,20002,0,-2);$2$SendMsg(1,20002,0,-1);Delay(500);$1$SendMsg(1,20002,0,-2);$2$SendMsg(1,20002,0,-1);Delay(500);$1$SendMsg(1,20002,0,-2);$2$SendMsg(1,20002,0,-1);Delay(500);Stop(1902);Delay(1000);SendMsg(1,20001,0,Get(1901,1000));GoBack(););),Data=((1000,7,0)););Load(1901);&Update(500,300);Loading(0);SendMsg(1901,10310,-1,40);Wave+(ID=1902,Parent=500,WavFlags=2,File="music\25.wav");Load(1902);Start(1902);};LeaveSection{Function(331,0);Enable(331);&Stop(1901,1902);&Dispose(1901,1902);Set(100,5002,7,0);Effect(ID=500,Flags=2);SendMsg(1,10801,1,0);};};DriveSim{EnterSection{Loading(1);Hide(501);Button+(ID=1901,Parent=301,Pos=(418,7),Dim=(140,28),File=(File="drive\but_sim.bmp",Pos=(0,0),Dim=(280,28)),Style=8,Intr(Action(ParamID=1;Hide(1900);Effect(ID=500,Info=(1,0),Flags=2);Effect(When=2,Info=(16,0),ID=500,Flags=3);&Show(1930,1925);Update(500););),Data=((100,7,2),(101,7,1902),(102,7,1903)););Button+(ID=1902,Parent=301,Pos=(418,36),Dim=(140,28),File=(File="drive\but_sim.bmp",Pos=(0,29),Dim=(280,28)),Style=8,Intr(Action(ParamID=1;&Hide(1900,1930,1925);Effect(ID=500,Info=(1,0),Flags=2);Effect(When=2,Info=(16,0),ID=500,Flags=3);SetFlagIf(No=2,If=(Get(1900,1001)==1));$2$Set(1900,1001,7,1);$2$Load(1900);Show(1900);Update(500););),Data=((100,7,2),(101,7,1901),(102,7,1903)););Button+(ID=1903,Parent=301,Pos=(418,65),Dim=(140,28),File=(File="drive\but_sim.bmp",Pos=(0,58),Dim=(280,28)),Style=8,Intr(Action(ParamID=1;SetFlagIf(Yes=1,If=(Get(100,5010)==1));$1$Break();Set(100,5010,7,1);GoToScript(10,"DriveGo");Set(100,5010,7,0););),Data=((100,7,2),(101,7,1901),(102,7,1902)););&Load(1903,1901,1902);Image+(ID=1925,Parent=500,File=("drive\md_back.bmp"),Bits=(1000L));Group+(ID=1930,Parent=500,Dim=(640,380));Hide(1930);Image+(ID=303,Parent=1930,Style=0x04,File=("drive\md_butt.bmp"),Bits=(1000L));Button+(ID=1931,Parent=1930,Pos=(7,239),Dim=(202,132),File=(Src=303,Pos=(0,137),Dim=(404,132)),Style=8,Intr(Action(Set(1900,1000,7,1););),Data=((100,7,3),(101,7,1932),(102,7,1933),(103,7,1934)););Button+(ID=1932,Parent=1930,Pos=(7,47),Dim=(202,132),File=(Src=303,Pos=(0,3),Dim=(404,132)),Style=8,Intr(Action(Set(1900,1000,7,2););),Data=((100,7,3),(101,7,1931),(102,7,1933),(103,7,1934)););Button+(ID=1933,Parent=1930,Pos=(429,47),Dim=(202,132),File=(Src=303,Pos=(0,272),Dim=(404,132)),Style=8,Intr(Action(Set(1900,1000,7,3););),Data=((100,7,3),(101,7,1932),(102,7,1931),(103,7,1934)););Button+(ID=1934,Parent=1930,Pos=(429,239),Dim=(202,132),File=(Src=303,Pos=(0,408),Dim=(404,132)),Style=8,Intr(Action(Set(1900,1000,7,4););),Data=((100,7,3),(101,7,1932),(102,7,1933),(103,7,1931)););Load(1925);Load(1930);Dispose(303);Show(1930);Effect(When=2,Info=(16,0),ID=500,Flags=3);Update(500);Function(1931-1+Get(100,5011),1);Image+(ID=1900,Parent=500,File=("drive\help.pic"),Data=((1000,Import=(100,5011)),(1001,7,0)););Effect(When=2,Info=(1,1),ID=300,Flags=3|4);Update(300);Function(1901,1);SetFlagIf(Yes=1,If=(Get(503,21)==0););$1$Load(503);Start(503);Loading(0);};LeaveSection{Loading(1);Show(501);Set(100,5011,7,Get(1900,1000));&Dispose(1903,1901,1902);&Dispose(1900,1930,1925);Effect(ID=500,Flags=2);Loading(0);SetFlagIf(Yes=1,If=(Get(100,5010)==1));$1$Break();Effect(When=2,Info=(1,1),ID=300,Flags=3|4);Update(300);};};DriveGo{EnterSection{Stop(503);Set(100,5010,7,1);SetFlag(Get(100,5011));$1$Execute(Module="media\driv_sim\carh.pif",Path="media\driv_sim");$2$Execute(Module="media\driv_sim\carh0.pif",Path="media\driv_sim");$3$Execute(Module="media\driv_sim\car0.pif",Path="media\driv_sim");$4$Execute(Module="media\driv_sim\car.pif",Path="media\driv_sim");Set(100,5010,7,0);Start(503);GoBack();};LeaveSection{Set(100,5010,7,0);};};
