// A short tutorial explaining the use of ships as a means of transporting platoons across the ocean.
// Created by Daxter
// 16th January 2008; 8:32 AM AEST(Australian Eastern Standard Time)
global ShipTutorialComplete = 0
global SecondShipTutorialComplete = 0
global ShipSelected = 0
global ActivateSecondTutorialScroll = 0
// Tutorial 1 - Teaches you about controlling ships.
define script ShipTutorial(NewShip)
// Tutorial 2 - Teaches you about the transportation aspects of a ship.
define script ShipTutorial2(NewShip)
begin script ShipTutorial(NewShip)
ShipTutorialScroll = 0
CreateVideo = 0
ShipScrollPos = marker at {615, 40, 1186}
TargetVFX = 0
NewShipPos = get MOBILESTATIC MOBILE_STATIC_INFO_NORSESHIP at {743, 1.25, 1186}
HandPos = marker at hand position
start
ShipTutorialScroll = create highlight SCRIPT_HIGHLIGHT_INFO_SCRIPT_BRONZE name "HELP_TEXT_CREATURE_CURRENT_SOURCE_09" remind "HELP_TEXT_CREATURE_CURRENT_SOURCE_09" at {ShipScrollPos}
ALTITUDE of ShipTutorialScroll = 6.00
wait until ShipTutorialScroll left clicked or ShipTutorialScroll right clicked
set fade red 0 green 0 blue 0 time 2
wait until fade ready
begin interactive camera
wait 3 seconds
set camera position to {NewShip}+{25, 15, 15}
set camera focus to {NewShip}+{10,10,0}
set fade in time 3
wait until fade ready
say "Welcome to the ship control tutorial. This tutorial will cover the basics of ship control and transport uses."
wait until read and 3 seconds or key KB_SPACE down
clear dialogue
wait 0.2 seconds
say "Times have changed recently, people have discovered the use of ships as part of their warfare or to colonize a land's islands."
wait until read and 3 seconds or key KB_SPACE down
clear dialogue
wait 0.2 seconds
say "These ships are used by the greeks and other tribes as a means of transporting villagers and platoons across the oceans of the world."
wait until read and 3 seconds or key KB_SPACE down
clear dialogue
wait 0.2 seconds
say "Which is why u must learn to use them. To select a ship, simply hold your hand over the ship and click the action button."
CreateVideo = create video window with left 0.05 top 0.05 width 0.3 height 0.3 with border
set CreateVideo clipping window left 0 top 0 width 1 height 1
play video "ShipTutorialVideo1"
wait until read and 3 seconds or key KB_SPACE down
clear dialogue
wait 0.2 seconds
wait until not video is playing
stop video
say "Now you give it a try."
wait until read
clear dialogue
wait 0.2 seconds
wait until ShipSelected == 1
say "Selecting ships is easy, you must now move it to the desired destination."
wait 2 seconds and read or key KB_SPACE down
clear dialogue
wait 0.2 seconds
TargetVFX = create visual effect VISUAL_EFFECT_SCROLL_BEAM at {743, 5, 1186} time -1
move camera position to {778, 28, 1196} time 8
move camera focus to {NewShip} time 8
wait 10 seconds
say "Here is a target for you to move the ship to."
wait until read and 2 seconds or key KB_SPACE down
clear dialogue
wait 0.2 seconds
say "With the ship selected, click the action button where the marker is and the ship will move there."
wait until read and 2 seconds or key KB_SPACE down
clear dialogue
wait 0.2 seconds
say "Do this now."
wait until read
clear dialogue
wait 0.2 seconds
wait until {NewShip} near right clicked position radius 0.1
say "As the world expands, more and more ships will be under your control and therefore must be controlled individually"
wait until read or key KB_SPACE down
clear dialogue
wait 0.2 seconds
stop visual effect TargetVFX
say "To deselect a ship at any time simply hold the hand over the ship and click the action button whilst holding down the Left Ctrl button on your keyboard. Do this now."
wait until read or key KB_SPACE down
clear dialogue
wait 0.2 seconds
wait until ShipSelected == 0
say "Excellent. You have learnt all the basic functions of ship control, fundamental skills needed to influence your word across the seas. Why don't you try the next tutorial that will appear at the shoreline."
wait until read or key KB_SPACE down
clear dialogue
wait 0.2 seconds
say "A tutorial that will expand on ship control by showing you how to transport platoons."
wait until read or key KB_SPACE down
clear dialogue
wait 0.2 seconds
increment tribute by 35000
end interactive camera
ActivateSecondTutorialScroll = 1
run background script ShipTutorial2(NewShip)
end script ShipTutorial
begin script ShipTutorial2(NewShip)
ShipScrollPos2 = marker at {866.95, 30, 555.29}
ShipTutorialOceanPos = marker at {836.98, 12, 527.94}
PlatoonTransportScroll = 0
start
begin loop
if ActivateSecondTutorialScroll == 1
wait until not NewShip is moving
ALTITUDE of NewShip = get water height
set NewShip position to {ShipTutorialOceanPos}
release NewShip from limbo
PlatoonTransportScroll = create highlight SCRIPT_HIGHLIGHT_INFO_SCRIPT_BRONZE name "HELP_TEXT_CREATURE_CURRENT_SOURCE_09" remind "HELP_TEXT_CREATURE_CURRENT_SOURCE_09" at {ShipScrollPos2}
ALTITUDE of PlatoonTransportScroll = 10
wait until get object hand is over == PlatoonTransportScroll and bindable action BINDABLE_ACTION_TYPE_ACTION performed
begin cinema
set fade in time 3
wait until fade ready
ALTITUDE of NewShip = get water height - (NewShip + 3.22)
end cinema
SecondShipTutorialComplete = 1
end if
end loop
until SecondShipTutorialComplete == 1
end script ShipTutorial2