home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Hacker 70
/
HACKER70.ISO
/
Igre
/
Startopia
/
startopiademo.exe
/
missions
/
00
/
valmessages00.txt
< prev
next >
Wrap
Text File
|
2001-05-14
|
5KB
|
319 lines
:VALComment100
if
human = 1
VALRand = 0
then
set VALComment (turn + 100000)
set VALRand ((rnd%28) + 1)
disable
end
:VALComment101
if
blueprint_count < 1
VALRand = 1
turn > VALComment
then
say ! "Valmessages_val01"
set VALRand ((rnd%28) + 1)
set VALcomment (turn + 50000)
end
:VALComment102
if
blueprint_count < 1
VALRand = 2
turn > VALComment
then
say ! "Valmessages_val02"
set VALRand ((rnd%28) + 1)
set VALcomment (turn + 50000)
end
:VALComment103
if
blueprint_count < 1
VALRand = 3
turn > VALComment
then
say ! "Valmessages_val03"
set VALRand ((rnd%28) + 1)
set VALcomment (turn + 50000)
end
:VALComment104
if
blueprint_count < 1
VALRand = 4
turn > VALComment
then
say ! "Valmessages_val04"
set VALRand ((rnd%28) + 1)
set VALcomment (turn + 50000)
end
:VALComment105
if
blueprint_count < 1
VALRand = 5
turn > VALComment
then
say ! "Valmessages_val05"
set VALRand ((rnd%28) + 1)
set VALcomment (turn + 50000)
end
:VALComment106
if
blueprint_count < 1
VALRand = 6
turn > VALComment
then
say ! "Valmessages_val06"
set VALRand ((rnd%28) + 1)
set VALcomment (turn + 50000)
end
:VALComment107
if
blueprint_count < 1
VALRand = 7
turn > VALComment
then
say ! "Valmessages_val07"
set VALRand ((rnd%28) + 1)
set VALcomment (turn + 50000)
end
:VALComment108
if
blueprint_count < 1
VALRand = 8
turn > VALComment
then
say ! "Valmessages_val08"
set VALRand ((rnd%28) + 1)
set VALcomment (turn + 50000)
end
:VALComment109
if
blueprint_count < 1
VALRand = 9
turn > VALComment
then
say ! "Valmessages_val09"
set VALRand ((rnd%28) + 1)
set VALcomment (turn + 50000)
end
:VALComment110
if
blueprint_count < 1
VALRand = 10
turn > VALComment
then
say ! "Valmessages_val10"
set VALRand ((rnd%28) + 1)
set VALcomment (turn + 50000)
end
:VALComment111
if
blueprint_count < 1
VALRand = 11
turn > VALComment
then
say ! "Valmessages_val11"
set VALRand ((rnd%28) + 1)
set VALcomment (turn + 50000)
end
:VALComment112
if
blueprint_count < 1
VALRand = 12
turn > VALComment
then
say ! "Valmessages_val12"
set VALRand ((rnd%28) + 1)
set VALcomment (turn + 50000)
end
:VALComment113
if
blueprint_count < 1
VALRand = 13
turn > VALComment
then
say ! "Valmessages_val13"
set VALRand ((rnd%28) + 1)
set VALcomment (turn + 50000)
end
:VALComment114
if
blueprint_count < 1
VALRand = 14
turn > VALComment
then
say ! "Valmessages_val14"
set VALRand ((rnd%28) + 1)
set VALcomment (turn + 50000)
end
:VALComment115
if
blueprint_count < 1
VALRand = 15
turn > VALComment
then
say ! "Valmessages_val15"
set VALRand ((rnd%28) + 1)
set VALcomment (turn + 50000)
end
:VALComment116
if
blueprint_count < 1
VALRand = 16
turn > VALComment
then
say ! "Valmessages_val16"
set VALRand ((rnd%28) + 1)
set VALcomment (turn + 50000)
end
:VALComment117
if
blueprint_count < 1
VALRand = 17
turn > VALComment
then
say ! "Valmessages_val17"
set VALRand ((rnd%28) + 1)
set VALcomment (turn + 50000)
end
:VALComment118
if
blueprint_count < 1
VALRand = 18
turn > VALComment
then
say ! "Valmessages_val18"
set VALRand ((rnd%28) + 1)
set VALcomment (turn + 50000)
end
:VALComment119
if
blueprint_count < 1
VALRand = 19
turn > VALComment
then
say ! "Valmessages_val19"
set VALRand ((rnd%28) + 1)
set VALcomment (turn + 50000)
end
:VALComment120
if
blueprint_count < 1
VALRand = 20
turn > VALComment
then
say ! "Valmessages_val20"
set VALRand ((rnd%28) + 1)
set VALcomment (turn + 50000)
end
:VALComment121
if
blueprint_count < 1
VALRand = 21
turn > VALComment
then
say ! "Valmessages_val21"
set VALRand ((rnd%28) + 1)
set VALcomment (turn + 50000)
end
:VALComment122
if
blueprint_count < 1
VALRand = 22
turn > VALComment
then
say ! "Valmessages_val22"
set VALRand ((rnd%28) + 1)
set VALcomment (turn + 50000)
end
:VALComment123
if
blueprint_count < 1
VALRand = 23
turn > VALComment
then
say ! "Valmessages_val23"
set VALRand ((rnd%28) + 1)
set VALcomment (turn + 50000)
end
:VALComment124
if
blueprint_count < 1
VALRand = 24
turn > VALComment
then
say ! "Valmessages_val24"
set VALRand ((rnd%28) + 1)
set VALcomment (turn + 50000)
end
:VALComment125
if
blueprint_count < 1
VALRand = 25
turn > VALComment
then
say ! "Valmessages_val25"
set VALRand ((rnd%28) + 1)
set VALcomment (turn + 50000)
end
:VALComment126
if
blueprint_count < 1
VALRand = 26
turn > VALComment
then
say ! "Valmessages_val26"
set VALRand ((rnd%28) + 1)
set VALcomment (turn + 50000)
end
:VALComment127
if
blueprint_count < 1
VALRand = 27
turn > VALComment
then
say ! "Valmessages_val27"
set VALRand ((rnd%28) + 1)
set VALcomment (turn + 50000)
end
:VALComment128
if
blueprint_count < 1
VALRand = 28
turn > VALComment
then
say ! "Valmessages_val28"
set VALRand ((rnd%28) + 1)
set VALcomment (turn + 50000)
end