Leica tps1100, Руководство пользователя, Страница: 262 / 1154

GeoBASIC Reference Manual 2.GeoBasic Constructs
TPS1100-Version 1.30 2-33
♦
We present the previous example of the
WHILE
loop now as a
FOR
loop. They
performs exactly the same calculation, for all values of iLastIndex .
dSum = 0
FOR iIndex = 1 to iLastIndex
dSum = dSum + NumberArray(iIndex)
NEXT iIndex
Note on the loop EXIT-Statement
All three loops — the WHILE loop, the UNTIL loop, and the FOR loop
— may contain one or more loop-exit-statements. If one of these is
executed, the loop terminates immediately and the statement following
it is executed. An
EXIT
-statement always exits only the innermost loop
containing it.
2.7 ROUTINES
2.7.1 Routine Declaration
Routines come in two flavours: subroutines and functions. Functions return a value
and normally cause no change to the variables of their environment, while
subroutines often change their environment. Because they are quite similar, they
are described together.
Syntax:
RoutineDeclaration ::= ( SubroutineDeclaration |
FunctionDeclaration )
SubroutineDeclaration ::= [ " GLOBAL " ] " SUB "
SubroutineName [ ParameterList ]
Body
" END " [ SubroutineName ]
FunctionDeclaration ::= " FUNCTION " FunctionName
ParameterList "
AS
" DataTypeName
Body
"
END
" [ FunctionName ]
ParameterList ::= "
(
" [ ParameterSpecification { "
,
"
ParameterSpecification } ] " ) "