ShowText{EnterSection{Loading(1);SetFlagIf(Yes=1,No=2,If=(Inform(1)==8););$1$Hide(150);$1$Image+(ID=1396,Parent=500,File=(File=Get(150,999+Get(150,501))),Style=0x01|0x10);$1$Load(1396);$1$Disable(1396);$1$Update(500);Window+(ID=1390,Parent=500,Pos=(96,5),Dim=(448,364));Hide(1390);Image+(ID=157,Parent=1390,Dim=(448,364),File=(File="bordwin\qu_400.bmp",Dim=(448,364)),Mask=1,Bits=(1000L));SetFlagIf(Yes=1,If=(Get(150,3000)>1););$1$Button+(ID=1392,Parent=1390,Pos=(48,333),Dim=(56,31),File=(File="bordwin\qu_400.bmp",Pos=(0,365),Dim=(168,31)),Intr(Action(SendMsg(1393,10023,0,1);SendMsg(1393,10016,+1,0););););$1$Button+(ID=1391,Parent=1390,Pos=(104,333),Dim=(56,31),File=(File="bordwin\qu_400.bmp",Pos=(168,365),Dim=(168,31)),Intr(Action(SendMsg(1393,10023,0,0);SendMsg(1393,10016,-1,0););););ImageShow+(ID=1393,Parent=1390,Pos=(25,33),Dim=(400,300),Data=((500,Import=(150,3000)),(501,7,1),(502,7,1391),(503,7,1392),(600,Import=(150,3001)),(601,Import=(150,3002)),(602,Import=(150,3003)),(603,Import=(150,3004)),(604,Import=(150,3005))),Intr(Catch(Message(150,10023,-1,0);Effect(ID=1390,Info=(1,6),Flags=2,Pos=(25,33),Dim=(400,300));Effect(When=2,Info=(1,6),ID=1390,Flags=3,Pos=(25,33),Dim=(400,300)););Catch(Message(150,10023,-1,1);Effect(ID=1390,Info=(1,7),Flags=2,Pos=(25,33),Dim=(400,300));Effect(When=2,Info=(1,7),ID=1390,Flags=3,Pos=(25,33),Dim=(400,300)););););Load(1390);Show(1390);Region+(ID=1397,Parent=1390,Pos=(25,33),Dim=(400,300),Spot(1,2,((0,0),(400,300))),Cursor=3,Intr(Action(GoBack(););););Hide(1397);SetFlagIf(Yes=1,If=(Get(150,5000)==0););$1$Loading(0);$1$Break();Stop(Get(150,2000));Wave+(ID=1399,Parent=1390,File=Get(150,5001));Load(1399);Start(1399);Loading(0);};LeaveSection{Set(150,5000,7,0);Set(150,3000,7,1);Dispose(1390);Update(500);Dispose(1396);Show(150);Start(Get(150,2000));};};ShowCartoon{EnterSection{Loading(1);Stop(Get(150,2000));SendMsg(1,10801,0,0);SetFlagIf(Yes=1,No=2,If=(Inform(1)==8););$1$Hide(150);$1$Image+(ID=1396,Parent=500,File=(File=Get(150,999+Get(150,501))),Style=0x01|0x10);$1$Load(1396);$1$Disable(1396);$1$Update(500);Window+(ID=1390,Parent=500,Pos=(96,5),Dim=(448,364));Image+(ID=157,Parent=1390,Dim=(448,364),File=(File="bordwin\qu_mov.bmp",Dim=(448,364)),Mask=1,Bits=(1000L));Button+(ID=1395,Parent=1390,Pos=(52,333),Dim=(56,31),File=(File="bordwin\qu_mov.bmp",Pos=(0,365),Dim=(112,31)),Style=8,Intr(Action(Stop(151););),Data=((100,7,1),(101,7,1394)););Button+(ID=1394,Parent=1390,Pos=(107,333),Dim=(52,31),File=(File="bordwin\qu_mov.bmp",Pos=(112,365),Dim=(104,31)),Style=8,Intr(Action(SetFlagIf(Yes=1,If=(Get(100,501)==1););$1$Hide(171);Show(151);Start(151);DelLabel(1398););),Data=((100,7,1),(101,7,1395)););WinMovie+(ID=151,Parent=1390,Pos=(25,33),MStyle=2L,File=Get(100,500),Intr(Finished(AddLabel(ID=1398,Repeat=1,Every=5000,Action(GoBack();););Function(1395,1,1);SetFlagIf(Yes=1,If=(Get(100,501)==0););$1$Break();Hide(151);Show(171);Update(1390););););Load(151);Image+(ID=171,Parent=1390,Pos=(25,33),File=(File=Get(100,502)),);Hide(171);Load(1390);Stop(Get(150,2000));&Update(1390,151);Function(1394,1);Start(151);Loading(0);};LeaveSection{Dispose(1390);DelLabel(1398);Update(500);Dispose(1396);Start(Get(150,2000));Show(150);Set(100,501,7,0);SendMsg(1,10801,1,0);};};ShowVideo{EnterSection{Loading(1);Stop(Get(150,2000));SendMsg(1,10801,0,0);SetFlagIf(Yes=1,No=2,If=(Inform(1)==8););$1$Hide(150);$1$Image+(ID=1396,Parent=500,File=(File=Get(150,999+Get(150,501))),Style=0x01|0x10);$1$Load(1396);$1$Disable(1396);$1$Update(500);Window+(ID=1390,Parent=500,Pos=(136,25),Dim=(368,305));Image+(ID=157,Parent=1390,Pos=(0,0),Dim=(368,303),File=(File="bordwin\qu_vid.bmp",Dim=(368,303)),Mask=1,Bits=(1000L));WinMovie+(ID=151,Parent=1390,Pos=(25,32),Dim=(320,240),MStyle=2L,File=Get(100,500),Intr(Finished(AddLabel(ID=1398,Repeat=1,Every=5000,Action(GoBack();););Function(1395,1,1););););Load(151);Button+(ID=1395,Parent=1390,Pos=(51,272),Dim=(56,31),File=(File="bordwin\qu_vid.bmp",Pos=(0,304),Dim=(112,31)),Style=8,Intr(Action(Stop(151););),Data=((100,7,1),(101,7,1394)););Button+(ID=1394,Parent=1390,Pos=(106,272),Dim=(52,31),File=(File="bordwin\qu_vid.bmp",Pos=(112,304),Dim=(104,31)),Style=8,Intr(Action(Start(151);DelLabel(1398););),Data=((100,7,1),(101,7,1395)););Load(1390);Stop(Get(150,2000));&Update(1390,151);Function(1394,1);Start(151);Loading(0);};LeaveSection{DelLabel(1398);Dispose(1390);Update(500);Dispose(1396);Start(Get(150,2000));Show(150);SendMsg(1,10801,1,0);};};ShowP400{EnterSection{Loading(1);SetFlagIf(Yes=1,No=2,If=(Inform(1)==8););$1$Hide(150);$1$Image+(ID=1396,Parent=500,File=(File=Get(150,999+Get(150,501))),Style=0x01|0x10);$1$Load(1396);$1$Disable(1396);$1$Update(500);Window+(ID=1390,Parent=500,Pos=(96,5),Dim=(448,364));Hide(1390);Image+(ID=157,Parent=1390,Dim=(448,364),File=(File="bordwin\qu_400.bmp",Dim=(448,364)),Mask=1,Bits=(1000L),Style=0x01|0x10);SetFlagIf(Yes=1,If=(Get(150,3000)>1););$1$Button+(ID=1392,Parent=1390,Pos=(48,333),Dim=(56,31),File=(File="bordwin\qu_400.bmp",Pos=(0,365),Dim=(168,31)),Intr(Action(SendMsg(1393,10023,0,1);SendMsg(1393,10016,+1,0););););$1$Button+(ID=1391,Parent=1390,Pos=(104,333),Dim=(56,31),File=(File="bordwin\qu_400.bmp",Pos=(168,365),Dim=(168,31)),Intr(Action(SendMsg(1393,10023,0,0);SendMsg(1393,10016,-1,0););););ImageShow+(ID=1393,Parent=1390,Pos=(26,33),Dim=(400,300),Data=((500,Import=(150,3000)),(501,7,1),(502,7,1391),(503,7,1392),(600,Import=(150,3001)),(601,Import=(150,3002)),(602,Import=(150,3003)),(603,Import=(150,3004)),(604,Import=(150,3005))),Intr(Catch(Message(150,10023,-1,0);Effect(ID=1390,Info=(1,6),Flags=2,Pos=(26,33),Dim=(400,300));Effect(When=2,Info=(1,6),ID=1390,Flags=3,Pos=(26,33),Dim=(400,300)););Catch(Message(150,10023,-1,1);Effect(ID=1390,Info=(1,7),Flags=2,Pos=(26,33),Dim=(400,300));Effect(When=2,Info=(1,7),ID=1390,Flags=3,Pos=(26,33),Dim=(400,300)););););Load(1390);Show(1390);Update(500);Region+(ID=1397,Parent=1390,Pos=(26,33),Dim=(400,300),Spot(1,2,((0,0),(400,300))),Cursor=3,Intr(Action(GoBack(););););Hide(1397);Loading(0);};LeaveSection{Set(150,3000,7,1);Dispose(1390);Update(500);Dispose(1396);Show(150);};};ShowP245{EnterSection{Loading(1);SetFlagIf(Yes=1,No=2,If=(Inform(1)==8););$1$Hide(150);$1$Image+(ID=1396,Parent=500,File=(File=Get(150,999+Get(150,501))),Style=0x01|0x10);$1$Load(1396);$1$Disable(1396);$1$Update(500);Window+(ID=1390,Parent=500,Pos=(170,5),Dim=(296,364));Hide(1390);Image+(ID=157,Parent=1390,Dim=(296,364),File=(File="bordwin\qu_245.bmp",Dim=(296,364)),Mask=1,Bits=(1000L));SetFlagIf(Yes=1,If=(Get(150,3000)>1););$1$Button+(ID=1392,Parent=1390,Pos=(49,333),Dim=(56,31),File=(File="bordwin\qu_245.bmp",Pos=(0,365),Dim=(168,31)),Intr(Action(SendMsg(1393,10023,0,1);SendMsg(1393,10016,+1,0););););$1$Button+(ID=1391,Parent=1390,Pos=(105,333),Dim=(56,31),File=(File="bordwin\qu_245.bmp",Pos=(0,397),Dim=(168,31)),Intr(Action(SendMsg(1393,10023,0,0);SendMsg(1393,10016,-1,0););););ImageShow+(ID=1393,Parent=1390,Pos=(26,33),Dim=(245,300),Data=((500,Import=(150,3000)),(501,7,1),(502,7,1391),(503,7,1392),(600,Import=(150,3001)),(601,Import=(150,3002)),(602,Import=(150,3003)),(603,Import=(150,3004))),Intr(Catch(Message(150,10023,-1,0);Effect(ID=1390,Info=(1,6),Flags=2,Pos=(26,33),Dim=(245,300));Effect(When=2,Info=(1,6),ID=1390,Flags=3,Pos=(26,33),Dim=(245,300)););Catch(Message(150,10023,-1,1);Effect(ID=1390,Info=(1,7),Flags=2,Pos=(26,33),Dim=(245,300));Effect(When=2,Info=(1,7),ID=1390,Flags=3,Pos=(26,33),Dim=(245,300)););););Load(1390);Show(1390);Region+(ID=1397,Parent=1390,Pos=(26,33),Dim=(245,300),Spot(1,2,((0,0),(245,300))),Cursor=3,Intr(Action(GoBack(););););Hide(1397);Loading(0);};LeaveSection{Set(150,3000,7,1);Dispose(1390);Update(500);Dispose(1396);Show(150);};};IntroTV{EnterSection{Loading(1);SendMsg(1,10801,0,0);SetFlagIf(Yes=1,If=(Get(503,21)==1););$1$Unload(503);Group+(ID=1330,Parent=500,Pos=(0,0),Dim=(640,380));Image+(ID=1331,Parent=1330,Pos=(0,0),Dim=(640,380),File=("tv_panel\tv_pan.bmp"),Bits=(1000L));Button+(ID=1332,Parent=1330,Pos=(0,224),Dim=(112,40),Style=1,Help=(Pos=(20,45),Text="Show/Hide Bio info"),File=(File="tv_panel\tv_pan.bmp",Pos=(0,381),Dim=(224,40)),Intr(Action(ParamID=1;Hide(1340););Action(ParamID=0;Show(1340););););Button+(ID=1333,Parent=1330,Pos=(0,302),Dim=(112,40),File=(File="tv_panel\tv_pan.bmp",Pos=(224,381),Dim=(224,40)),Help=(Pos=(20,45),Text="Go to the Quarry"),Intr(Action(GoToScript(20,"VRQuarry"););););Image+(ID=1334,Parent=1330,Pos=(169,47),Dim=(400,300),File=("info\intro\george.bmp"),Style=0x01|0x10,Bits=(1000L));Load(1330);Function(1332,0);WinMovie+(ID=1340,Parent=500,Pos=(169,47),File="movies\cartoon\01.mov",MStyle=2L,Intr(Finished(PlaySection(200,"IntroTV","TruckIntroduction"););););Load(1340);Region+(ID=1335,Parent=500,Pos=(0,0),Dim=(640,380),Spot(1,2,((0,0),(640,380))),Intr(Action(ParamID=1;Stop(1341);Delay(500);GoToScript(20,"VRQuarry"););););Hide(1335);Disable(1335);&Update(300,500);Start(1340);Loading(0);};TruckIntroduction{Enable(1335);Hide(1340);Effect(ID=500,Pos=(169,47),Dim=(400,300),Flags=2);WinMovie+(ID=1341,Parent=500,Cursor=2,Pos=(169,47),File="tv_panel\quar_tr.mov",MStyle=2L,Intr(MouseDown(Stop(1341);Delay(500);GoToScript(20,"VRQuarry"););Finished(Delay(500);GoToScript(20,"VRQuarry"););););Load(1341);Start(1341);Disable(1332);};LeaveSection{&Dispose(1340,1341);Effect(ID=500,Pos=(169,47),Dim=(400,300),Flags=3);&Dispose(1335,1330);SendMsg(1,10801,1,0);};};
