Truckology{EnterSection{PlayScript(1,"LogoScreen");};StartSection{Window+(ID=100,Pos=(32767,0),Dim=(640,480),Data=((1001,50,".."),(1002,7,1),(1100,7,0L),(1200,7,4120L),(1201,7,0),(1202,7,0),(1500,7,0),(5000,7,0L),(5001,7,0L),(5002,7,0),(5010,7,0),(5011,7,1),(501,7,0),(2000,7,0L),(2000+1,7,0L),(2000+2,7,400000L),(2000+3,7,1),(2000+100,7,0L),(2000+101,7,0L),(2000+102,7,400000L),(2000+103,7,1),(2000+200,7,0L),(2000+201,7,0L),(2000+202,7,400000L),(2000+203,7,1),(2000+300,7,0L),(2000+301,7,0L),(2000+302,7,400000L),(2000+303,7,1),(4000+100+1,7,1L),(4000+100+2,7,1L),(4000+100+3,7,1L),(4000+100+4,7,1L),(4000+200+1,7,1L),(4000+200+2,7,1L),(4000+200+3,7,1L),(4000+300+1,7,1L),(4000+300+2,7,1L),(4000+300+3,7,1L),(4000+300+4,7,1L),(4000+400+1,7,1L),(4000+400+2,7,1L),(4000+400+3,7,1L),(4000+400+4,7,1L)),Intr=(KeyUp(ParamID=1;GoBack(););KeyUp(ParamID=KC_Func04;Flags=4;SendMsg(1,19001,0,0););KeyUp(ParamID=51;SendMsg(330,10015,0,-1););KeyAction(ParamID=101+18;Flags=0;SendMsg(1,20002,0,+1););KeyAction(ParamID=101+18;Flags=2;SendMsg(1,20002,0,-1););KeyDown(ParamID=16;Clipboard(););););Hide(100);KeyDefault(100);KeyFocus(100);PlayScript(1,"CreatePanel");PlayScript(1,"CreateMedia");SendMsg(1,10801,1,0);GoToScript(10,"StartTruck");};};CreatePanel{EnterSection{Window+(ID=300,Parent=100,Pos=(0,380),Dim=(640,100),Palette=("palette\trucks.pal"));Screen+(ID=301,Parent=300,Dim=(640,100),Palette=("palette\trucks.pal"),Effect=10014_CENTER,Intr(Command(ObjectID=321;GoToScript(10,"InfoWindow");),Command(ObjectID=320;GoBack();),Command(ObjectID=322;SendMsg(1,20002,0,+1);),Command(ObjectID=323;SendMsg(1,20002,0,-1);),Command(ObjectID=324;GoToScript(10,"Navigator"););););Image+(ID=303,Parent=1,Style=0x04,File=("panels\main.bmp"),Bits=(1000L));Image+(ID=302,Parent=301,Dims=(640,100),File=(Src=303,Dim=(640,100)),Bits=(1000L));Disable(302);Button+(ID=321,Parent=301,Pos=(104,49),Dim=(80,42),File=(Src=303,Pos=(228,425),Dim=(160,42)),Help=(Pos=(77,5),Text="Leave application"));Button+(ID=320,Parent=301,Pos=(104,7),Dim=(80,42),File=(Src=303,Pos=(228,382),Dim=(160,42)),Help=(Pos=(56,2),Text="Back to the previous screen"));Button+(ID=324,Parent=301,Pos=(281,9),Dim=(76,75),Style=8,File=(Src=303,Pos=(450,198),Dim=(152,75)),Help=(Pos=(39,72),Text="Navigator screen"));Button+(ID=322,Parent=301,Pos=(58,6),Dim=(44,40),File=(Src=303,Pos=(0,246),Dim=(132,40)),Style=2,Loop=300,Help=(Pos=(46,4),Text="Increase sound volume"));Button+(ID=323,Parent=301,Pos=(58,53),Dim=(44,40),File=(Src=303,Pos=(134,246),Dim=(132,40)),Style=2,Loop=300,Help=(Pos=(46,4),Text="Decrease sound volume"));Button+(ID=325,Parent=301,Pos=(9,14),Dim=(48,44),File=(Src=303,Pos=(0,289),Dim=(144,44)),Frames=(Array=(3,288,4128,8224)),Help=(Pos=(24,46),Text="Go to the Building site (Unavailable in DEMO version)"));Button+(ID=326,Parent=301,Pos=(232,36),Dim=(48,44),File=(Src=303,Pos=(146,289),Dim=(144,44)),Frames=(Array=(3,288,4128,8224)),Help=(Pos=(24,46),Text="Go to the Quarry"),Intr(Action(GoToScript(20,"VRQuarry"););););Button+(ID=327,Parent=301,Pos=(361,18),Dim=(48,44),File=(Src=303,Pos=(0,335),Dim=(144,44)),Frames=(Array=(3,288,4128,8224)),Help=(Pos=(-25,46),Text="Go to the Fire station (Unavailable in DEMO version)"));Button+(ID=328,Parent=301,Pos=(583,37),Dim=(48,44),File=(Src=303,Pos=(146,335),Dim=(144,44)),Frames=(Array=(3,288,4128,8224)),Help=(Pos=(-210,46),Text="Go to the Farm (Unavailable in DEMO version)"));Button+(ID=329,Parent=301,Pos=(185,6),Dim=(44,40),File=(Src=303,Pos=(358,246),Dim=(88,40)),Help=(Pos=(46,4),Text="Print screen (Unavailable in DEMO version)"));Button+(ID=330,Parent=301,Pos=(185,53),Dim=(44,40),Style=1,File=(Src=303,Pos=(268,246),Dim=(88,40)),Help=(Pos=(46,4),Text="Help Mode"),Intr(Action(SetFlag(Get(100,5000));$0$Set(100,5000,7,1);$1$Set(100,5000,7,0);Update(500);SetFlag(Get(100,5001));$0$Set(100,5001,7,1);$0$SendMsg(1,10019,1,0);$1$Set(100,5001,7,0);$1$SendMsg(1,10019,0,0););););Group+(ID=360,Parent=301,Pos=(400,0),Dim=(200,100));Button+(ID=362,Parent=360,Pos=(18,15),Dim=(84,85),File=(Src=303,Pos=(294,289),Dim=(252,85)),Help=(Pos=(42,67),Text="Previous picture"),Intr(Action(SendMsg(150,10023,0,0);SendMsg(150,10016,-1,0););););Button+(ID=361,Parent=360,Pos=(102,15),Dim=(84,85),File=(Src=303,Pos=(388,383),Dim=(252,85)),Help=(Pos=(42,67),Text="Next picture"),Intr(Action(SendMsg(150,10023,0,1);SendMsg(150,10016,+1,0););););Activate(360,0);Group+(ID=380,Parent=301,Pos=(400,0),Dim=(200,100));Button+(ID=381,Parent=380,Pos=(57,7),Dim=(80,93),Style=4|2,Loop=150,File=(Src=303,Pos=(0,102),Dim=(400,93)),Frames=(Array=(5,4128,8224,8224,8224,8224)),Spot(1,1,((0,0),(40,40),(80,0))),Spot(3,1,((80,0),(40,40),(80,80))),Spot(4,1,((80,80),(40,40),(0,80))),Spot(2,1,((0,80),(40,40),(0,0))),Intr(Action(ParamID=1;SendMsg(1900,10330,3,0););Action(ParamID=4;SendMsg(1900,10330,4,0););Action(ParamID=2;SendMsg(1900,10330,1,0););Action(ParamID=3;SendMsg(1900,10330,2,0););););Button+(ID=382,Parent=380,Pos=(11,53),Dim=(44,47),Style=2,Loop=200,File=(Src=303,Pos=(0,197),Dim=(132,47)),Frames=(Array=(3,4128,8224,16)),Help=(Pos=(46,4),Text="Decrease zoom"),Intr(Action(SendMsg(1900,10330,6,0););););Button+(ID=383,Parent=380,Pos=(11,6),Dim=(44,47),Style=2,Loop=200,File=(Src=303,Pos=(134,197),Dim=(132,47)),Frames=(Array=(3,4128,8224,16)),Help=(Pos=(46,4),Text="Increase zoom"),Intr(Action(SendMsg(1900,10330,5,0););););Button+(ID=384,Parent=380,Pos=(138,6),Dim=(44,47),Style=8,File=(Src=303,Pos=(358,197),Dim=(88,47)),Help=(Pos=(-76,4),Text="Large screen"),Intr(Action(ParamID=1;SendMsg(1900,10331,0,1););),Data=((100,7,1),(101,7,385)););Button+(ID=385,Parent=380,Pos=(138,53),Dim=(44,47),Style=8,File=(Src=303,Pos=(268,197),Dim=(88,47)),Help=(Pos=(-76,4),Text="Small screen"),Intr(Action(ParamID=1;SendMsg(1900,10331,0,2););),Data=((100,7,1),(101,7,384)););Activate(380,0);Group+(ID=350,Parent=301,Pos=(400,0),Dim=(200,100));Button+(ID=351,Parent=350,Pos=(104,11),Dim=(76,89),Style=1,File=(Src=303,Pos=(0,382),Dim=(152,89)),Help=(Pos=(77,14),Text="Start ride"),Intr(Action(Start(1100););););Button+(ID=352,Parent=350,Pos=(23,11),Dim=(76,89),Style=8,File=(Src=303,Pos=(404,103),Dim=(228,89)),Help=(Pos=(77,14),Text="Stop at the next Site"),Intr(Action(Stop(1100););););Activate(350,0);Load(303);Load(301);Dispose(303);Button+(ID=331,Parent=301,Pos=(408,0),Dim=(176,100),Frames=(Array=(2,4128,8224)),Style=1,File=(File="panels\about.bmp"),Mask=2,Intr(Action(SetFlagIf(Yes=1,If=(Get(100,5002)==1););$1$Break();Set(100,5002,7,1);JumpScript(10,"About"););););Activate(331,0);Load(331);};};CreateMedia{EnterSection{Window+(ID=500,Parent=100,Dim=(640,380),Data=((2001,50,"Animation"),(2002,50,"Video"),(2003,50,"Sound"),(2004,50,"Photo"),(2005,50,"Cartoon"),(2006,50,"Info panel"),(2007,50,"Effect"),(2008,50,"Game"),(2010,50,"Go To Other Truck"),(2011,50,"Unavailable in DEMO version"),););Screen+(ID=501,Parent=500,Dim=(640,380));Wave+(ID=502,Parent=500);Wave+(ID=503,Parent=500,WavFlags=2,File="music\03.wav",Data=((1000,7,0)););};};LogoScreen{EnterSection{Region+(ID=9006,Parent=1,Dim=(1500,1500),Spot(ID=1,Type=2,Data=((0,0),(1500,1500));),Data=((1000,7,0)),Intr(Action(ParamID=1;SetFlagIf(Yes=1,If=(Get(9006,1000)==1););$1$Break();Set(9006,1000,7,1);Dispose(9000);Effect(Flags=2);PlaySection(1,"LogoScreen","TruckTitle");PostMsg(1,10006,0,9006););););Window+(ID=9000,Pos=(32767,0),Dim=(640,480),Data=((1000,7,0)),Cursor=2,Intr(KeyDown(ParamID=3;PostMsg(9006,10015,0,1););MouseDown(PostMsg(9006,10015,0,1););););Hide(9000);WinMovie+(ID=9005,Parent=9000,Pos=(32767,0),MStyle=1L,File="title\marislog.mov",Cursor=2,Intr(MouseDown(PostMsg(9006,10015,0,1););Finished(PostMsg(9006,10015,0,1););););Load(9005);Show(9000);Start(9005);KeyFocus(9000);};TruckTitle{Disable(9006);Region+(ID=9001,Parent=1,Dim=(1500,1500),Spot(ID=1,Type=2,Data=((0,0),(1500,1500));),Data=((1000,7,0)),Intr(Action(ParamID=1;SetFlagIf(Yes=1,If=(Get(9001,1000)==1););$1$Break();Set(9001,1000,7,1);Dispose(9000);Effect(Flags=2);PlaySection(1,"Truckology","StartSection");PostMsg(1,10006,0,9001););););Window+(ID=9000,Pos=(32767,0),Dim=(640,480),Data=((1000,7,0)),Cursor=2,Intr(KeyDown(ParamID=3;PostMsg(9001,10015,0,1););MouseDown(PostMsg(9001,10015,0,1););););Update(9000);Wave+(ID=9002,Parent=9000,File="music\01.wav",Intr(Started(Set(9000,1000,7,1););Finished(PostMsg(9001,10015,0,1););););Load(9002);Image+(ID=9003,Parent=9000,File=("title\truck_d.pic"));Load(9003);Disable(9003);Show(9000);Update(9000);WinMovie+(ID=9004,Parent=9000,Pos=(120,71),MFEvery=1,MStyle=2L,File="title\title.mov",Cursor=2,Intr(Finished(SetFlagIf(Yes=1,If=(Get(9000,1000)==1););$1$Break();PostMsg(9001,10015,0,1);),MouseDown(PostMsg(9001,10015,0,1););););Load(9004);Update(9004);Show(9004);Start(9004);Start(9002);KeyFocus(9000);};};