Skip to content

Commit 21fa0f0

Browse files
committed
TwinKeeper 4th level stop duplicate messages
also converted it to level_version(1)
1 parent 0b5b65b commit 21fa0f0

File tree

1 file changed

+26
-19
lines changed

1 file changed

+26
-19
lines changed

campgns/twinkprs/map00206.txt

Lines changed: 26 additions & 19 deletions
Original file line numberDiff line numberDiff line change
@@ -14,6 +14,8 @@ REM the Free Software Foundation; either version 2 of the License, or
1414
REM (at your option) any later version.
1515
REM ****************************************************************************
1616

17+
LEVEL_VERSION(1)
18+
1719
START_MONEY(PLAYER0,10000)
1820
START_MONEY(PLAYER1,10000)
1921
START_MONEY(PLAYER2,10000)
@@ -23,9 +25,9 @@ COMPUTER_PLAYER(PLAYER1,0)
2325
COMPUTER_PLAYER(PLAYER2,0)
2426
COMPUTER_PLAYER(PLAYER3,0)
2527

26-
ALLY_PLAYERS(PLAYER1,PLAYER2)
27-
ALLY_PLAYERS(PLAYER2,PLAYER3)
28-
ALLY_PLAYERS(PLAYER1,PLAYER3)
28+
ALLY_PLAYERS(PLAYER1,PLAYER2,1)
29+
ALLY_PLAYERS(PLAYER2,PLAYER3,1)
30+
ALLY_PLAYERS(PLAYER1,PLAYER3,1)
2931

3032
SET_GENERATE_SPEED(300)
3133

@@ -99,25 +101,31 @@ ENDIF
99101
REM Over time, give better creatures and increase creature limit
100102
IF(PLAYER0,GAME_TURN > 15000)
101103
MAX_CREATURES(ALL_PLAYERS,15)
102-
CREATURE_AVAILABLE(ALL_PLAYERS,DEMONSPAWN,1,1)
103-
CREATURE_AVAILABLE(ALL_PLAYERS,BILE_DEMON,1,1)
104+
CREATURE_AVAILABLE(ALL_PLAYERS,DEMONSPAWN,1,0)
105+
CREATURE_AVAILABLE(ALL_PLAYERS,BILE_DEMON,1,0)
104106
ENDIF
105107
IF(PLAYER0,GAME_TURN > 30000)
106108
MAX_CREATURES(ALL_PLAYERS,20)
107-
CREATURE_AVAILABLE(ALL_PLAYERS,TROLL,1,1)
108-
CREATURE_AVAILABLE(ALL_PLAYERS,ORC,1,1)
109+
CREATURE_AVAILABLE(ALL_PLAYERS,TROLL,1,0)
110+
CREATURE_AVAILABLE(ALL_PLAYERS,ORC,1,0)
109111
ENDIF
110112
IF(PLAYER0,GAME_TURN > 40000)
111113
MAX_CREATURES(ALL_PLAYERS,30)
112-
CREATURE_AVAILABLE(ALL_PLAYERS,DARK_MISTRESS,1,1)
114+
CREATURE_AVAILABLE(ALL_PLAYERS,DARK_MISTRESS,1,0)
113115
ENDIF
114116

115-
REM Triggered by PLAYER1 being destroyed
116117
REM Killing a player strengthens the other players
117118

119+
IF(PLAYER0,FLAG1 == 1)
120+
REM "A good start keeper, but beware. The remaining keepers grow stronger by pilfering the remnants of this dead kingdom, and therefore attract more creatures anxious to share the spoils!"
121+
DISPLAY_INFORMATION(34)
122+
ENDIF
123+
124+
REM Triggered by PLAYER1 being destroyed
125+
118126
IF(PLAYER1,DUNGEON_DESTROYED == 1)
119127
SET_TIMER(PLAYER0,TIMER1)
120-
DISPLAY_INFORMATION(34)
128+
ADD_TO_FLAG(PLAYER0,FLAG1,1)
121129
ENDIF
122130

123131
IF(PLAYER0,TIMER1 > 1000)
@@ -142,10 +150,9 @@ IF(PLAYER0,TIMER1 > 10000)
142150
ENDIF
143151

144152
REM Triggered by PLAYER2 being destroyed
145-
REM Killing a player strengthens the other players
146153

147154
IF(PLAYER2,DUNGEON_DESTROYED == 1)
148-
DISPLAY_INFORMATION(34)
155+
ADD_TO_FLAG(PLAYER0,FLAG1,1)
149156
SET_TIMER(PLAYER0,TIMER2)
150157
ENDIF
151158

@@ -171,10 +178,8 @@ IF(PLAYER0,TIMER2 > 10000)
171178
ENDIF
172179

173180
REM Triggered by PLAYER3 being destroyed
174-
REM Killing a player strengthens the other players
175-
176181
IF(PLAYER3,DUNGEON_DESTROYED == 1)
177-
DISPLAY_INFORMATION(34)
182+
ADD_TO_FLAG(PLAYER0,FLAG1,1)
178183
SET_TIMER(PLAYER0,TIMER3)
179184
ENDIF
180185

@@ -200,32 +205,34 @@ IF(PLAYER0,TIMER3 > 10000)
200205
ENDIF
201206

202207
REM Additional actions triggered when two of the enemy players are destroyed
208+
IF(PLAYER0,FLAG1 == 2)
209+
REM Impressive work master. It is a privilege to watch you wreak destruction on your enemies. Only one enemy remains, but beware, he has seen his allies' fate and will throw everything into the battle to save his skin!"
210+
DISPLAY_INFORMATION(32)
211+
ENDIF
203212

204213
REM When PLAYER1 and PLAYER2 are gone
205214
IF(PLAYER0,TIMER1 > 1000)
206215
IF(PLAYER0,TIMER2 > 1000)
207216
ADD_CREATURE_TO_LEVEL(PLAYER3,HORNY,3,5,9,500)
208-
DISPLAY_INFORMATION(32)
209217
ENDIF
210218
ENDIF
211219

212220
REM When PLAYER2 and PLAYER3 are gone
213221
IF(PLAYER0,TIMER2 > 1000)
214222
IF(PLAYER0,TIMER3 > 1000)
215223
ADD_CREATURE_TO_LEVEL(PLAYER1,HORNY,1,5,9,500)
216-
DISPLAY_INFORMATION(32)
217224
ENDIF
218225
ENDIF
219226

220227
REM When PLAYER1 and PLAYER3 are gone
221228
IF(PLAYER0,TIMER1 > 1000)
222229
IF(PLAYER0,TIMER3 > 1000)
223230
ADD_CREATURE_TO_LEVEL(PLAYER2,HORNY,2,5,9,500)
224-
DISPLAY_INFORMATION(32)
225231
ENDIF
226232
ENDIF
227233

228234
IF(PLAYER0,ALL_DUNGEONS_DESTROYED == 1)
229-
DISPLAY_OBJECTIVE(33,PLAYER0)
235+
REM "An excellent victory once again. All three enemies lie amongst the dust of this once green and pleasant land. I sense you want to find the next land, Master?"
236+
DISPLAY_OBJECTIVE(33,ALL_PLAYERS)
230237
WIN_GAME
231238
ENDIF

0 commit comments

Comments
 (0)