Would you like to try your luck (sorry - skill!) again?
EnterBook
EnterPage
the NoOfMines
Book
&OldMines
7GameTime
GOldTime
WGameIsTimed
jOldTimed
UpdateHiScoreTable
4TimeLeft, GameScore, TScore
SysLockScreen
CongratsMessage
"HardLuck"
PerfAnal
"ResultScore"
"ResultTimeLeft"
* 10
"ResultBonus"
* 10
"ResultTotal"
"HiScoreValues"
ResultOK
OKpressed
Perfanal
>OKPressed
RVals
HSVals
RNames
HSNames
AddHiScore
PVals
PNames
CVals
CNames
MVals
MNames
< Tscore
B(i+1)
B(i+1)
"HiScoreName" \
"HiScoreNames"
ClearHiScores
teHiScoreTable
EnterPage
OKpressed
AddHiScore
UpdateHiScoreTable
ClearHiScores
EnterPage
NoOfMines
Mines
NoOfMines
OldMines
GameTime
OldTime
GameIsTimed
OldTimed
UpdateHiScoreTable
HardLuck
ResultScore
ResultTimeLeft
ResultBonus
ResultTotal
HiScoreValues
HardLuck
HardLuck
ResultOK
PerfAnal
CongratsMessage
TimeLeft
GameScore
TScore
OKpressed
HiScoreValues
GameTime
RVals
HSVals
RNames
HSNames
AddHiScore
HSVals
RVals
HSNames
RNames
GameTime
PVals
HSVals
PNames
HSNames
AddHiScore
HSVals
PVals
HSNames
PNames
GameTime
CVals
HSVals
CNames
HSNames
AddHiScore
HSVals
CVals
HSNames
CNames
GameTime
SVals
HSVals
SNames
HSNames
AddHiScore
HSVals
SVals
HSNames
SNames
GameTime
MVals
HSVals
MNames
HSNames
AddHiScore
HSVals
MVals
HSNames
MNames
ResultOK
Perfanal
TScore
AddHiScore
HSVals
Tscore
HSVals
HSVals
HSNames
HSNames
HSVals
HiScoreName
HSNames
HSVals
HiScoreValues
HSNames
HiScoreNames
TScore
ClearHiScores
HSVals
MVals
SVals
CVals
PVals
RVals
....................
HSNames
....................
MNames
....................
SNames
....................
CNames
....................
PNames
....................
RNames
HSVals
HiScoreValues
HSNames
HiScoreNames
*6+\+
-l.h/T0
OldTimed
RNames
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
PNames
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
CNames
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
SNames
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
MNames
A.N. Onymous
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
HSNames
A.N. Onymous
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
RVals
PVals
CVals
SVals
HSVals
OldTime
OldMines
mvals
Setuppppppppppppppppp
ButtonUp
GameIsTimed
B(GameTime
ButtonUp
ButtonUp
GameIsTimed
GameTime
GameIsTimed
Timed game with High Scores
Timed mission how good are you???????
Mines
How many mines would you like?
J!"!G!
- 2 minutes
- 6 minutes
- 5 minutes
- 4 minutes
- 3 minutes
ButtonDown
B"120"
B"180"
B"240"
B"300"
B"360"
ButtonUp
GameTime
Book
x & "s"
"HiScoreType"
RVals
Page
"HiScoreValues"
RNames
"HiScoreNames"
PVals
PNames
CVals
CNames
SVals
SNames
MVals
MNames
ButtonDown
ButtonUp
ButtonDown
ButtonUp
GameTime
HiScoreType
RVals
HiScoreValues
RNames
HiScoreNames
PVals
HiScoreValues
PNames
HiScoreNames
CVals
HiScoreValues
CNames
HiScoreNames
SVals
HiScoreValues
SNames
HiScoreNames
MVals
HiScoreValues
MNames
HiScoreNames
Recruit
0)chacked
false
Private
Corporal
Sergeant
Sergeant Major
High Score Tableeeeeeeeeeeeeeeee3+
HiScoreType
l,D,i,
Sergeant Majors
HiScoreNames
A.N. Onymous
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
.....
HiScoreValues
LANDMINE v1.0
ButtonUp
the NoOfMines
Book
OldMines
&GameIsTimed
9OldTimed
JGameTime
EnterBook
ButtonUp
ButtonUp
NoOfMines
OldMines
GameIsTimed
OldTimed
GameTime
OldTime
EnterBook
NoSave
ButtonUp
"Mines" < 20
$> 40
HNoOfMines
Book
EnterBook
ButtonUp
ButtonUp
Mines
Mines
Mines
Mines
NoOfMines
Mines
EnterBook
ResultOK
ButtonUp
SysLockScreen
PerfAnal
ResultOK
OKPressed
ButtonUp
ButtonUp
OKPressed
ResultOK
PerfAnal
PerfAnal
Your Performance Analysis
p:H:m:
Your base score was:
ResultScore
16705
\;4;Y;
Giving a bonus of :
ResultBonus
24005
H< <E<
Your time left was:
ResultTimeLeft
24745
Giving a total score of :
ResultTotal
19105
CongratsMessage
HiScoreName
A.N. Onymous
Congratulations!
You have made the Hi-Score Table. Please enter your Name then press the OK button
HardLuck
Hard Luck!
I'm afraid that you haven't made the Hi-Score table.
Please press OK to continue.nnnnn
ButtonUp
"Are you sure
want
[down th Hi-Score table?"
f"Yes"
ClearHiScores
ButtonUp
ButtonUp
Are you sure you want to clear down th Hi-Score table?
@ClearHiScores
Clear Hi-Score table
DlgTitle
Instructionsssssssssssssssss
DlgBox
This is a version of a fairly well known and simple PC DOS game also called Landmine adapted for ToolBook by me - DNA.
It has been used as an exercise in building a ToolBook application, and as it's my first I make no apologies for the coding and methods used.
The game starts with your man at the top left square of the playing grid. The objective is to get him to the square at the bottom right of the grid without blowing him to kingdom come.
At each turn your man may be moved in any of the 8 compass directions by clicking on the relevant arrow to the right. Once your man is on a new square, a message will appear informing you of the number of surrounding squares which contain mines.
It should be possible, with the application of logic and a fair degree of luck to get your man across the minefield safely. To aid in this, if you identify that a square is probably a mine, then you may mark it as such by clicking on it. This will cause the square to turn red, but make no judgement on whether it is, or is not, a mine. In order to turn the square back to yellow again, simply click on it once more.
Within SETUP there are also multiple options to set the number of mines you wish to contend with on your traverse, plus the option to go for a time limited game. If you choose to go for a time limited game, there are 5 levels varying from Recruit to Sergeant Major (more militaristic overtones!), reflecting a supposed level of experience.
If you have chosen a timed game then two additional windows will appear at the bottom of the main play screen showing Time Left and Score. The initial Score is a base value plus an allowance for the number of mines you choose, and will be reduced by 1000 for the use of the Cheat and Disrupter functions, by 10 for each move, and by 200 for each use of Jump. If the Time Left reaches zero you will have been caught in the minefield as the sun rises and machine gunned where you stand!
The final result of your timed game score and time left will, on successful completion of your mission, be used to provide a final score which, if high enough, will be placed in the Hi-Score table.
DISRUPTER button
Clicking on this button will cause all mines immediately surrounding you to be disarmed and replaced with unmined green squares. You may only use this countermeasure once during a game, and within a timed game it will deduct 1000 points from your score.
CHEAT button
The cheat button allows you 1 cheat per game. Depressing this button will cause all the surrounding mines to be identified, but only once in a game, so use it carefully! This also will deduct 1000 points from your score.
JUMP button
Being a rather athletic chap, you can actually jump tall buildings with one mighty bound, or, put another way, you can click on the JUMP button and your next move will be two squares, rather than one. During a timed game, this will reduce your score by 200 points.
MINES button
The mines button is used to allow a number of mines that are randomly placed in the grid, to be specified. This can be any number from 20 to 40 depending on how lucky you feel..
LANDMINE v1.0
ButtonUp
ButtonUp
ButtonUp
Return
ButtonUp
ButtonUp
ButtonUp
ButtonUp
ButtonUp
ButtonUp
ButtonUp
4Jump, GameScore
"StatusBox"
"Ready
jump..."
GameIsTimed
Book
P - 200
ButtonUp
ButtonUp
StatusBox
Ready to jump...
GameIsTimed
GameScore
ButtonUp
4CurrentSquare, DisrupterUsed, GameScore
"StatusBox"
"You've already discharged your disrupter!"
NewSquare(i)
ncontainer
Rectangle
FillColor
Green
GameIsTimed
Book
- 1000
ButtonUp
ButtonUp
StatusBox
You've already discharged your disrupter!
NewSquare
container
120,50,100
container
120,50,100
GameIsTimed
CurrentSquare
DisrupterUsed
GameScore
Disrupter
LANDMINE v1.0
ScoreDisplay
Score
400000
Rf*fOf
Score -
TimeLeft
240000
Time Left
ButtonUp
4Direction
direction
MoveMan
ButtonUp
ButtonUp
direction
5?MoveMan
Direction
ButtonUp
4Direction
direction
MoveMan
ButtonUp
ButtonUp
direction
5?MoveMan
Direction
ButtonUp
4Direction
direction
MoveMan
ButtonUp
ButtonUp
direction
5?MoveMan
Direction
AnotherGo
Would you like another go?
ButtonUp
AnotherGo
ButtonUp
ButtonUp
AnotherGo
No Thankyou.
ButtonUp
AnotherGo
EnterBook
ButtonUp
ButtonUp
EnterBook
AnotherGo
Yes Please!
EnterPage
the NoOfMines
Book
&OldMines
7GameTime
GOldTime
WGameIsTimed
jOldTimed
UpdateHiScoreTable
4TimeLeft, GameScore, TScore
SysLockScreen
CongratsMessage
"HardLuck"
PerfAnal
"ResultScore"
"ResultTimeLeft"
* 10
"ResultBonus"
* 10
"ResultTotal"
"HiScoreValues"
ResultOK
OKpressed
Perfanal
>OKPressed
RVals
HSVals
RNames
HSNames
AddHiScore
PVals
PNames
CVals
CNames
MVals
MNames
< Tscore
B(i+1)
B(i+1)
"HiScoreName" \
"HiScoreNames"
ClearHiScores
teHiScoreTable
EnterPage
OKpressed
AddHiScore
UpdateHiScoreTable
ClearHiScores
EnterPage
NoOfMines
Mines
NoOfMines
OldMines
GameTime
OldTime
GameIsTimed
OldTimed
UpdateHiScoreTable
HardLuck
ResultScore
ResultTimeLeft
ResultBonus
ResultTotal
HiScoreValues
HardLuck
HardLuck
ResultOK
PerfAnal
CongratsMessage
TimeLeft
GameScore
TScore
OKpressed
HiScoreValues
GameTime
RVals
HSVals
RNames
HSNames
AddHiScore
HSVals
RVals
HSNames
RNames
GameTime
PVals
HSVals
PNames
HSNames
AddHiScore
HSVals
PVals
HSNames
PNames
GameTime
CVals
HSVals
CNames
HSNames
AddHiScore
HSVals
CVals
HSNames
CNames
GameTime
SVals
HSVals
SNames
HSNames
AddHiScore
HSVals
SVals
HSNames
SNames
GameTime
MVals
HSVals
MNames
HSNames
AddHiScore
HSVals
MVals
HSNames
MNames
ResultOK
Perfanal
TScore
AddHiScore
HSVals
Tscore
HSVals
HSVals
HSNames
HSNames
HSVals
HiScoreName
HSNames
HSVals
HiScoreValues
HSNames
HiScoreNames
TScore
ClearHiScores
HSVals
MVals
SVals
CVals
PVals
RVals
....................
HSNames
....................
MNames
....................
SNames
....................
CNames
....................
PNames
....................
RNames
HSVals
HiScoreValues
HSNames
HiScoreNames
*$+J+r+
-4.0/
AVC|Ck
OldTimed
RNames
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
PNames
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
CNames
Freddy
Freddy
....................
....................
....................
....................
....................
....................
....................
....................
....................
SNames
Freddie
Freddie
....................
....................
....................
....................
....................
....................
....................
....................
....................
MNames
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
....................
HSNames
Freddy
Freddy
....................
....................
....................
....................
....................
....................
....................
....................
....................
RVals
PVals
CVals
SVals
HSVals
OldTime
OldMines
mvals
Setuppppppppppppppppp
ButtonUp
GameIsTimed
B(GameTime
ButtonUp
ButtonUp
GameIsTimed
GameTime
GameIsTimed
Timed game with High Scores
Timed mission how good are you???????
Mines
How many mines would you like?
- 2 minutes
- 6 minutes
- 5 minutes
- 4 minutes
- 3 minutes
ButtonDown
B"120"
B"180"
B"240"
B"300"
B"360"
ButtonUp
GameTime
Book
x & "s"
"HiScoreType"
RVals
Page
"HiScoreValues"
RNames
"HiScoreNames"
PVals
PNames
CVals
CNames
SVals
SNames
MVals
MNames
ButtonDown
ButtonUp
ButtonDown
ButtonUp
GameTime
HiScoreType
RVals
HiScoreValues
RNames
HiScoreNames
PVals
HiScoreValues
PNames
HiScoreNames
CVals
HiScoreValues
CNames
HiScoreNames
SVals
HiScoreValues
SNames
HiScoreNames
MVals
HiScoreValues
MNames
HiScoreNames
Recruit
(chacked
false
Private
Corporal
Sergeant
Sergeant Major
High Score Tableeeeeeeeeeeeeeeee
HiScoreType
CorporalsMajors
HiScoreNames
Freddy
Freddy
....................
....................
....................
....................
....................
....................
....................
....................
....................
............
............
HiScoreValues
LANDMINE v1.0
ButtonUp
the NoOfMines
Book
OldMines
&GameIsTimed
9OldTimed
JGameTime
EnterBook
ButtonUp
ButtonUp
NoOfMines
OldMines
GameIsTimed
OldTimed
GameTime
OldTime
EnterBook
NoSave
ButtonUp
"Mines" < 20
$> 40
HNoOfMines
Book
EnterBook
ButtonUp
ButtonUp
Mines
Mines
Mines
Mines
NoOfMines
Mines
EnterBook
ResultOK
ButtonUp
SysLockScreen
PerfAnal
ResultOK
OKPressed
ButtonUp
ButtonUp
OKPressed
ResultOK
PerfAnal
PerfAnal
Your Performance Analysis
Your base score was:
ResultScore
72005
Giving a bonus of :
ResultBonus
27005
Your time left was:
ResultTimeLeft
27945
Giving a total score of :
ResultTotal
99005
CongratsMessage
HiScoreName
Freddye
Congratulations!
You have made the Hi-Score Table. Please enter your Name then press the OK button
HardLuck
Hard Luck!
I'm afraid that you haven't made the Hi-Score table.
Please press OK to continue.nnnnn
ButtonUp
"Are you sure
want
[down th Hi-Score table?"
f"Yes"
ClearHiScores
ButtonUp
ButtonUp
Are you sure you want to clear down th Hi-Score table?
@ClearHiScores
Clear Hi-Score table
DlgTitle
Instructionsssssssssssssssss
DlgBox
This is a version of a fairly well known and simple PC DOS game also called Landmine.
It has been used as an exercise in building a ToolBook application, and as it's my first I make no apologies for the coding and methods used.
The game starts with your man at the top left square of the playing grid. The objective is to get him to the square at the bottom right of the grid without blowing him to kingdom come.
At each turn your man may be moved in any of the 8 compass directions by clicking on the relevant arrow to the right. Once your man is on a new square, a message will appear informing you of the number of surrounding squares which contain mines.
It should be possible, with the application of logic and a fair degree of luck to get your man across the minefield safely. To aid in this, if you identify that a square is probably a mine, then you may mark it as such by clicking on it. This will cause the square to turn red, but make no judgement on whether it is, or is not, a mine. In order to turn the square back to yellow again, simply click on it once more.
Within SETUP there are also multiple options to set the number of mines you wish to contend with on your traverse, plus the option to go for a time limited game. If you choose to go for a time limited game, there are 5 levels varying from Recruit to Sergeant Major (more militaristic overtones!), reflecting a supposed level of experience.
If you have chosen a timed game then two additional windows will appear at the bottom of the main play screen showing Time Left and Score. The initial Score is a base value plus an allowance for the number of mines you choose, and will be reduced by 500 for the use of the Cheat and Disrupter functions, and by 200 for each use of Jump. If the Time Left reaches zero you will have been caught in the minefield as the sun rises and machine gunned where you stand!
The final result of your timed game score and time left will, on successful completion of your mission, be used to provide a final score which, if high enough, will be placed in the Hi-Score table.
DISRUPTER button
Clicking on this button will cause all mines immediately surrounding you to be disarmed and replaced with unmined green squares. You may only use this countermeasure once during a game, and within a timed game it will deduct 500 points from your score.
CHEAT button
The cheat button allows you 1 cheat per game. Depressing this button will cause all the surrounding mines to be identified, but only once in a game, so use it carefully! This also will deduct 500 points from your score.
JUMP button
Being a rather athletic chap, you can actually jump tall buildings with one mighty bound, or, put another way, you can click on the JUMP button and your next move will be two squares, rather than one. During a timed game, this will reduce your score by 200 points.
MINES button
The mines button is used to allow a number of mines that are randomly placed in the grid, to be specified. This can be any number from 20 to 40 depending on how lucky you feel.