Michael Martin
18dee31c4d
Key changes: - Spacing and sizing between sections is more consistent. - Trademark disclaimer is more universal. - Put many contributors from "other contributions" into "additional programming" or "additional artwork", as needed. - New credits as reflected from changelog and Precursors site.
532 lines
8.4 KiB
Plaintext
532 lines
8.4 KiB
Plaintext
#(=========== This is the PC intro script =========================)
|
|
|
|
#( !!!WARNING!!! Do not mess with the timing of this script starting )
|
|
#( from SYNC in Slide 1. The music is synchronized to the slides. If )
|
|
#( you MUST change timing of a subtitle, make sure this change is )
|
|
#( balanced off by another subtitle within the same slide! )
|
|
|
|
#(Clear entire screen first; set size...)
|
|
DIMS 320 240
|
|
|
|
#(... and clear)
|
|
CLS
|
|
|
|
#(Set sequence dimensions; param1=width; param2=height)
|
|
DIMS 320 200
|
|
#(Everything is drawn within the clipping rect defined by DIMS, from 0, 0)
|
|
|
|
#(Fade all to black; param1=fade time)
|
|
FTB 0
|
|
|
|
#(Set text fore color; 0xRRGGBB)
|
|
TC FFFFFF
|
|
#(Set text back color; 0xRRGGBB)
|
|
TBC 000000
|
|
#(Set text effect; Traced, None, others when added)
|
|
TE TRACED
|
|
|
|
#(Load font to use later)
|
|
FONT 0 base/fonts/starcon.fon
|
|
#(Load font to use later)
|
|
FONT 1 base/fonts/slides.fon
|
|
|
|
#(************ Title Screen ******************************************)
|
|
|
|
#(+++++++++++ Title 1 +++++++++++++++++++++++++++++++++)
|
|
|
|
#(Set font to use)
|
|
FONT 0
|
|
|
|
#(Set ANIM to draw slides from)
|
|
ANI base/cutscene/intro/title.ani
|
|
|
|
#(Set text fade in/out color; 0xRRGGBB)
|
|
TFC 000000
|
|
|
|
#(Set text vertical position; can be T=top, B=bottom, M=middle)
|
|
TVA B
|
|
|
|
#(Draw slide; param1=ANI index)
|
|
DRAW 0
|
|
#(Fade-in a slide; param1=fade time)
|
|
FTC 1500
|
|
#(Wait)
|
|
WAIT 2000
|
|
#(Fade slide to black; param1=fade time)
|
|
FTB 2000
|
|
#(Wait)
|
|
WAIT 500
|
|
|
|
#(++++++++++++ Title 2 +++++++++++++++++++++++++++++++++++)
|
|
|
|
#(Play music)
|
|
MUSIC base/cutscene/intro/introx.mod
|
|
|
|
#(Move sync point to current time index)
|
|
RESYNC
|
|
|
|
#(Draw slide; param1=ANI index)
|
|
DRAW 1
|
|
#(Fade-in a slide; param1=fade time)
|
|
FTC 3000
|
|
#(Synchronize)
|
|
SYNC 5000
|
|
#(Text fade-in)
|
|
TFI Based on the source code of STAR CONTROL II
|
|
(All trademarks belong to their respective owners)
|
|
#(Synchronize)
|
|
SYNC 8000
|
|
#(Text fade-out)
|
|
TFO
|
|
#(Wait)
|
|
WAIT 200
|
|
#(Text fade-in)
|
|
TFI Originally Created by
|
|
Fred Ford and Paul Reiche III
|
|
in 1992
|
|
#(Synchronize)
|
|
SYNC 12000
|
|
#(Text fade-out)
|
|
TFO
|
|
#(Wait)
|
|
WAIT 200
|
|
#(Text fade-in)
|
|
TFI Set free into the Open Source community
|
|
in 2002
|
|
|
|
#(Synchronize)
|
|
SYNC 16000
|
|
|
|
#(Fade slide to black; param1=fade time)
|
|
FTB 3000
|
|
|
|
#(************* Slides *********************************************)
|
|
|
|
#(Set font to use)
|
|
FONT 1
|
|
|
|
#(Set ANIM to draw slides from)
|
|
ANI base/cutscene/intro/intro.ani
|
|
|
|
#(Set text vertical position; can be T=top, B=bottom, M=middle)
|
|
TVA T
|
|
|
|
#(++++++++++++++++++++ Slide 1 ++++++++++++++++++++++++)
|
|
|
|
#(Set text fade in/out color; 0xRRGGBB)
|
|
TFC 1018BC
|
|
|
|
#(!!! Milestone Sync 1 !!!)
|
|
SYNC 20000
|
|
|
|
#(Draw slide; param1=ANI index)
|
|
DRAW 0
|
|
#(Fade-in a slide; param1=fade time)
|
|
FTC 700
|
|
#(Text fade-in)
|
|
TFI There were many great battles...
|
|
#(Wait)
|
|
WAIT 2500
|
|
#(Text fade-out)
|
|
TFO
|
|
#(Draw slide; param1=ANI index)
|
|
DRAW 0
|
|
#(Wait)
|
|
WAIT 500
|
|
|
|
#(Text fade-in)
|
|
TFI Earth and her partners in the
|
|
Alliance of Free Stars...
|
|
#(Wait)
|
|
WAIT 3000
|
|
#(Text fade-out)
|
|
TFO
|
|
#(Draw slide; param1=ANI index)
|
|
DRAW 0
|
|
#(Wait)
|
|
WAIT 500
|
|
|
|
#(Text fade-in)
|
|
TFI Against the evil Ur-Quan and its
|
|
Hierarchy of Battle Thralls.
|
|
#(!!! Milestone Sync 2 !!!)
|
|
SYNC 35000
|
|
#(Text fade-out)
|
|
TFO
|
|
#(Draw slide; param1=ANI index)
|
|
DRAW 0
|
|
#(Wait)
|
|
WAIT 500
|
|
|
|
#(Text fade-in)
|
|
TFI ...and the Ur-Quan were winning...
|
|
#(Wait)
|
|
WAIT 2000
|
|
#(Text fade-out)
|
|
TFO
|
|
#(Draw slide; param1=ANI index)
|
|
DRAW 0
|
|
#(Wait)
|
|
WAIT 500
|
|
|
|
#(Text fade-in)
|
|
TFI Meanwhile, on the edge of the
|
|
known frontier, an amazing
|
|
discovery was made...
|
|
#(!!! Milestone Sync 3 !!!)
|
|
SYNC 41000
|
|
#(Wait)
|
|
WAIT 4000
|
|
#(Text fade-out)
|
|
TFO
|
|
#(Draw slide; param1=ANI index)
|
|
DRAW 0
|
|
#(Wait)
|
|
WAIT 500
|
|
|
|
#(Text fade-in)
|
|
TFI far beneath the surface of an
|
|
unexplored, alien world...
|
|
#(Wait)
|
|
WAIT 4000
|
|
#(Text fade-out)
|
|
TFO
|
|
#(Draw slide; param1=ANI index)
|
|
DRAW 0
|
|
|
|
#(Wait)
|
|
WAIT 700
|
|
|
|
#(Fade slide to black; param1=fade time)
|
|
FTB 700
|
|
|
|
#(+++++++++++++++++++++ Slide 2 ++++++++++++++++++++++)
|
|
|
|
#(Set text fade in/out color; 0xRRGGBB)
|
|
TFC 707070
|
|
|
|
#(Draw slide; param1=ANI index)
|
|
DRAW 1
|
|
#(Fade-in a slide; param1=fade time)
|
|
FTC 700
|
|
|
|
#(Text fade-in)
|
|
TFI A huge underground city...
|
|
#(Wait)
|
|
WAIT 3500
|
|
#(Text fade-out)
|
|
TFO
|
|
#(Draw slide; param1=ANI index)
|
|
DRAW 1
|
|
#(Wait)
|
|
WAIT 500
|
|
|
|
#(Text fade-in)
|
|
TFI Filled with the technological
|
|
wonders of an advanced alien
|
|
race, the Precursors...
|
|
#(Wait)
|
|
WAIT 6000
|
|
#(Text fade-out)
|
|
TFO
|
|
#(Draw slide; param1=ANI index)
|
|
DRAW 1
|
|
#(Wait)
|
|
WAIT 500
|
|
|
|
#(Text fade-in)
|
|
TFI Who vanished a thousand
|
|
centuries ago.
|
|
#(Wait)
|
|
WAIT 4000
|
|
#(Text fade-out)
|
|
TFO
|
|
#(Draw slide; param1=ANI index)
|
|
DRAW 1
|
|
#(Wait)
|
|
WAIT 500
|
|
|
|
#(Text fade-in)
|
|
TFI But then the main Ur-Quan fleet
|
|
broke through the Alliance's
|
|
defensive line...
|
|
#(Wait)
|
|
WAIT 6500
|
|
#(Text fade-out)
|
|
TFO
|
|
#(Draw slide; param1=ANI index)
|
|
DRAW 1
|
|
#(Wait)
|
|
WAIT 500
|
|
|
|
#(Text fade-in)
|
|
TFI Isolating the planet, stranding
|
|
the scientists a hundred light
|
|
years away from Earth.
|
|
#(Wait)
|
|
WAIT 6500
|
|
#(Text fade-out)
|
|
TFO
|
|
#(Draw slide; param1=ANI index)
|
|
DRAW 1
|
|
#(Wait)
|
|
WAIT 500
|
|
|
|
#(Text fade-in)
|
|
TFI They waited hopefully for a
|
|
rescue vessel...
|
|
#(Wait)
|
|
WAIT 3500
|
|
#(Text fade-out)
|
|
TFO
|
|
#(Draw slide; param1=ANI index)
|
|
DRAW 1
|
|
#(Wait)
|
|
WAIT 500
|
|
|
|
#(Text fade-in)
|
|
TFI which never came.
|
|
#(Wait)
|
|
WAIT 3000
|
|
#(Text fade-out)
|
|
TFO
|
|
#(Draw slide; param1=ANI index)
|
|
DRAW 1
|
|
|
|
#(Wait)
|
|
WAIT 700
|
|
|
|
#(Fade slide to black; param1=fade time)
|
|
FTB 700
|
|
|
|
#(+++++++++++++++++++++++ Slide 3 +++++++++++++++++++++++++++)
|
|
|
|
#(Set text fade in/out color; 0xRRGGBB)
|
|
TFC FCA030
|
|
|
|
#(Draw slide; param1=ANI index)
|
|
DRAW 2
|
|
#(Fade-in a slide; param1=fade time)
|
|
FTC 700
|
|
|
|
#(Text fade-in)
|
|
TFI 20 years have passed...
|
|
#(Wait)
|
|
WAIT 3000
|
|
#(Text fade-out)
|
|
TFO
|
|
#(Draw slide; param1=ANI index)
|
|
DRAW 2
|
|
#(Wait)
|
|
WAIT 500
|
|
|
|
#(Text fade-in)
|
|
TFI We, the survivors of the research
|
|
mission have colonized this world.
|
|
#(Wait)
|
|
WAIT 4500
|
|
#(Text fade-out)
|
|
TFO
|
|
#(Draw slide; param1=ANI index)
|
|
DRAW 2
|
|
#(Wait)
|
|
WAIT 500
|
|
|
|
#(Text fade-in)
|
|
TFI We continued our investigation of
|
|
the underground city...
|
|
#(Wait)
|
|
WAIT 4500
|
|
#(Text fade-out)
|
|
TFO
|
|
#(Draw slide; param1=ANI index)
|
|
DRAW 2
|
|
#(Wait)
|
|
WAIT 500
|
|
|
|
#(Text fade-in)
|
|
TFI And we have discovered its
|
|
purpose...
|
|
#(Wait)
|
|
WAIT 4000
|
|
#(Text fade-out)
|
|
TFO
|
|
#(Draw slide; param1=ANI index)
|
|
DRAW 2
|
|
#(Wait)
|
|
WAIT 500
|
|
|
|
#(Text fade-in)
|
|
TFI It is a factory.
|
|
#(Wait)
|
|
WAIT 3000
|
|
#(Text fade-out)
|
|
TFO
|
|
#(Draw slide; param1=ANI index)
|
|
DRAW 2
|
|
|
|
#(Wait)
|
|
WAIT 700
|
|
|
|
#(Fade slide to black; param1=fade time)
|
|
FTB 700
|
|
|
|
#(+++++++++++++++++++++++ Slide 4 +++++++++++++++++++++++++++)
|
|
|
|
#(Set text fade in/out color; 0xRRGGBB)
|
|
TFC FC480C
|
|
|
|
#(Draw slide; param1=ANI index)
|
|
DRAW 3
|
|
#(Fade-in a slide; param1=fade time)
|
|
FTC 700
|
|
|
|
#(Text fade-in)
|
|
TFI A factory for building starships!
|
|
#(Wait)
|
|
WAIT 4500
|
|
#(Text fade-out)
|
|
TFO
|
|
#(Draw slide; param1=ANI index)
|
|
DRAW 3
|
|
#(Wait)
|
|
WAIT 500
|
|
|
|
#(Text fade-in)
|
|
TFI But there aren't enough materials
|
|
to make a complete vessel.
|
|
#(Wait)
|
|
WAIT 5000
|
|
#(Text fade-out)
|
|
TFO
|
|
#(Draw slide; param1=ANI index)
|
|
DRAW 3
|
|
#(Wait)
|
|
WAIT 500
|
|
|
|
#(Text fade-in)
|
|
TFI We can finish only the skeleton
|
|
of one starship.
|
|
#(Wait)
|
|
WAIT 5000
|
|
#(Text fade-out)
|
|
TFO
|
|
#(Draw slide; param1=ANI index)
|
|
DRAW 3
|
|
#(Wait)
|
|
WAIT 500
|
|
|
|
#(Text fade-in)
|
|
TFI But that must be enough --
|
|
#(Wait)
|
|
WAIT 3500
|
|
#(Text fade-out)
|
|
TFO
|
|
#(Draw slide; param1=ANI index)
|
|
DRAW 3
|
|
#(Wait)
|
|
WAIT 500
|
|
|
|
#(Text fade-in)
|
|
TFI Because YOU must captain the
|
|
vessel...
|
|
#(Wait)
|
|
WAIT 4000
|
|
#(Text fade-out)
|
|
TFO
|
|
#(Draw slide; param1=ANI index)
|
|
DRAW 3
|
|
#(Wait)
|
|
WAIT 500
|
|
|
|
#(Text fade-in)
|
|
TFI And return to Earth!
|
|
#(Wait)
|
|
WAIT 4000
|
|
#(Text fade-out)
|
|
TFO
|
|
#(Draw slide; param1=ANI index)
|
|
DRAW 3
|
|
|
|
#(Wait)
|
|
WAIT 700
|
|
|
|
#(Fade slide to black; param1=fade time)
|
|
FTB 700
|
|
|
|
#(+++++++++++++++++++++++ Slide 5 +++++++++++++++++++++++++++)
|
|
|
|
#(Set text fade in/out color; 0xRRGGBB)
|
|
TFC 000000
|
|
|
|
#(Draw slide; param1=ANI index)
|
|
DRAW 4
|
|
#(Fade-in a slide; param1=fade time)
|
|
FTC 700
|
|
|
|
#(Text fade-in)
|
|
TFI To travel the great distance,
|
|
you must push through into
|
|
HyperSpace...
|
|
#(Wait)
|
|
WAIT 6000
|
|
#(Text fade-out)
|
|
TFO
|
|
#(Draw slide; param1=ANI index)
|
|
DRAW 4
|
|
#(Wait)
|
|
WAIT 500
|
|
|
|
#(Text fade-in)
|
|
TFI Find out what has happened over
|
|
these many years...
|
|
#(Wait)
|
|
WAIT 5000
|
|
#(Text fade-out)
|
|
TFO
|
|
#(Draw slide; param1=ANI index)
|
|
DRAW 4
|
|
#(Wait)
|
|
WAIT 500
|
|
|
|
#(Text fade-in)
|
|
TFI Tell Earth of our plight!
|
|
#(Wait)
|
|
WAIT 4000
|
|
#(Text fade-out)
|
|
TFO
|
|
#(Draw slide; param1=ANI index)
|
|
DRAW 4
|
|
#(Wait)
|
|
WAIT 500
|
|
|
|
#(Text fade-in)
|
|
TFI And if the war with the Ur-Quan
|
|
still rages...
|
|
#(Wait)
|
|
WAIT 5000
|
|
#(Text fade-out)
|
|
TFO
|
|
#(Draw slide; param1=ANI index)
|
|
DRAW 4
|
|
#(Wait)
|
|
WAIT 500
|
|
|
|
#(Text fade-in)
|
|
TFI Fight for Earth and the Alliance,
|
|
as well as you can...
|
|
#(Wait)
|
|
WAIT 6000
|
|
#(Text fade-out)
|
|
TFO
|
|
#(Draw slide; param1=ANI index)
|
|
DRAW 4
|
|
|
|
#(Wait)
|
|
WAIT 700
|
|
|
|
#(Fade slide to black; param1=fade time)
|
|
FTB 700
|
|
|
|
#(***************************** The End ********************************)
|