Radio Shack TRS-80 X-PAD GT-116 - Page 39

60
70
80
30
100
110
120
130
140
150
160
170
180
190
200
210
220
230
240
250
260
270
ON
R
GOTO
70,80*90,100
ON C GOTO
110 ,120
,130
ON
C
GOTO
140 ,150 ,160
ON C GOTO 170,180
,190
ON
C
GOTO 200
,210 ,220
1"
II :GOTO
260
:GOTO
260
:GOTO
260
:GOTO
260
:GOTO 260
:GOTO
260
:GOTO 260
:GOTO
260
:GOTO 260
:GOTO
260
:GOTO
260
260
EN 15
NOT
ON MENU*"
PRINT
PRINT
PRINT
PRINT
PRINT
PRINT
PRINT
PRINT
PRINT
PRINT
PRINT
CLS:GOTO
PRINT
"*
GOTO 260
X=PEEK(6
:S=PEEK<
IF PEEK(
GOTO 20
,.
2
i
"3'
„
a
.
M
5'
"6'
u
7
,
"8'
"9'
"*'
"0'
5376) :Y=PEEK(65377)
65378) -.RETURN
65378)=3
THEN
260
The
Menu
is
located in the upper-left
corner
of
the
Display Area and
looks like this:
i i i i i i v
1
4
2
5
3
/
6 X
7
8 9 J
*
#
f
y
Display
Area
Row1
-
123
Row 2
-
456
Row
3
-
789
Row 4
= *0#
"Telephone Keypad" menu
Column 1
Column
2
Column
3
1
2
3
4
5
6
7
8
9
*
#
(clears Screen)
All
Systems
Go!
Now RUN
the
program.
To
use
the
program:
1.
Move
the Pen
to
the
upper-left
corner, press
down, and
a 1
will
be
displayed
on
the Screen.
2.
Lift the
Pen, move
it
to
the right, and
press it down
again.
As you move the
Pen
to
the right,
l's
will
be
displayed, then 2's,
and
then
3's
(1, 2,
and
3
are
the
Menu characters
in
the
first
row).
Any
point within
the
3"
x
4-1/4"
boundary of this
Menu returns a value
on your Screen.
When you
go
beyond the
boundary of
the
Menu,
the following message is displayed
on the
Screen telling
you that
you
are
off the menu:
*PEN IS
NOT
ON
MENU*
3.
Move
the Pen
to
the
next
line and press down at
the
left margin;
a 4 is displayed. Move the Pen to the
right
and press down;
4's, 5's,
and
6's
will
be
displayed.
4. Move the Pen
down the
left margin
to
the
next line; as
you
move
the Pen across the Display Area,
7's,
8's,
and
9
?
s
will
be
displayed.
5. Move the Pen further
down
the
left
margin, and
begin
moving it to the right (*'s and O's appear).
When you
move
it further,
the Screen
is
cleared
("#"
is
assigned
this area
in the Menu program and
"#"
means CLS).
Menu
—
Through the Looking
Glass
This Menu
program
can be a
little hard
to
understand,
so
take
a closer look.
Each time
you
write
a Menu
program,
you must
decide
the
size
of
each menu character
(e.g., the
size of
the area
defined). In
this program, we decided
we
wanted the
size
of a Menu
character
to be about
1"
x
1".
Since
there are
256 increments on the
9"
X-axis,
divide
to find out how
many
increments
are
in
1"
horizontal (the size
of one
32