Smple
Procedures
380
END
DEFine
390
REMark
****************
400
REMark
*
Program
Data
*
410
REMa
rk
****************
420
DATA
"Full",
"fifth-generation",
"systems"
430
DATA
"Systematic",
"knowledge-based",
"machines"
440
DATA
"InteLLigent",
"compatibLe",
"computers"
450
DATA
"ControLled",
"cybernetic",
"feedback"
460
DATA
"Automated",
"user-friendly",
"transputers"
470
DATA
"Synchronised",
"paralleL",
"micro-chips"
480
DATA
"Functional",
"Learning",
"capabi
lity"
490
DATA
"Optional",
"adaptabLe",
"programming"
500
DATA
"Positive",
"moduLar",
"packages"
510
DATA
"BaLanced",
"structured",
"databasesll
520
DATA
"Integrated",
Illogic-oriented",
"spreadsheets"
530
DATA
"Coordinated",
"f;
Le-oriented",
"word-processors"
540
DATA
"Sophisticated",
"standardised",
"objectives
ll
•
•
Automated
fifth-generation
capabiLity
Functional
Learning
packages
FuLL
paraLLeL
objectives
Positive
user-friendly
spreadsheets
Intelligent
file-oriented
capability
Synchronised
cybernetic
transputers
Functional
Logic-oriented
micro-chips
Positive
paraLLeL
feedback
BaLanced
learning
databases
Controlled
cybernetic
objectives
FOR SERVICE MANUALS
CONTACT:
MAURITRON
TECHNICAL
SERVICES
www.mauritron.co.uk
TEL
01844
-
351694
FAX:
01844
-
352554
•
Suppose
we
wish
to
draw squares
of
various
sizes
and various colours
in
various positions
on the scale graphics screen.
If
we
define a procedure, square,
to
do
this
it
will
require four Items
of
information:
length
of
one side
colour (colour code)
position (across and up)
The square's
flosition
is
determined by giving two
values,
across and
up,
which
fix
the
bottom
left
hand corner
of
the square
as
shown below
ac+side,up+side
ac+side,up
up
ac
The colour of the square
IS
easily fixed but the square itself uses the values
of
side and
ac and
up as
follows.
200 DEFine PROCedure
square(side,ac,up)
210 LINE
ac,up
TO
ac+side,up
220 LINE
TO
ac+side,up+side
230 LINE
TO
aC,up+side
TO
ac,up
240
END
DEFine
In
order
to
make this procedure work values
of
side,ae and up must be provided. These
values are provided when the procedure
is
called.
For
example you could add the
following main program
to
get one green square
of
side
20.
12/84
PASSING
INFORMATION
TO
PROCEDURES
35
To Next Page
Loading...
Need help?
General
