Table of Contents
Advertisement
Getting Started
13
230
':::;OI.JF~C
E
'T"t-!E'
t)r-·(:::::ji-Act
'j:::.
r.tH!~::.(!
r"E·tijj""'!'·'iE,!::j
t()
ti'-iE'
;;~,:~O
~::;oi
... n:;::CE
c!
t.t
t
t:)
i)
'~.
!').:1 ('
i
.::i
t)
'!
E'
'j
t-i
1:;
f::j ::;
I C:
'!
i
=~
i:.
1-:;:-
C]
among the arguments
RET
1
We~re
finished, so return to BASIC
END Multipl ication
!
End of module
~90
IASSEMBLE Multiplication
600
ICALL Multiply(Index,Dimension,Subscript)
E; i
~~]
I:::!
('('.::i:) (~:;!J!:):.:::.c
r
H
•
'j
f)t
>
=\1.3.
'!
tJi:::'
It isn't necessary that a program be assembled in every BASIC program which uses it. Object
code can be stored on mass storage with a statement like -
So if the example were instead made to read-
:::;OUF~C[
~::;Ui.JF"CE
NAM Multipl ication
!
Beginning of module
' : ::;01..) :::::CE:
':::;Ol..JRCE
:::;OUF'CE
'::;otJF:CE
':::;OI...iF:C[
1
;;:.C
::;ClUF:CE
1.
:3U
~:;C)Uf:;::CE
1.
'::;~::!
:::;CiURCE
1.1:::C:l
':::;OURCE
1.;:"(:i
:::;iJUF:CE
~?::~. ~:]
~:;C~Li ~:C:E:
~~5 ~~1
' : ::;
UJ F: C E
;:;:'6~:J
'::;UUF:CE
Integers:
BSS 2
:···if)i...it
J.::
t··iFi .
..!t
~~:
I.xt.
f)
i)
t :
::::;UB
li···j·r
Ii··rr
H·iT
ultiply:
LDA =Integers
L.DB ::: Input
1
L..Iit: :::
I
j'"'it)i-At
;;:~
.J:::;!':'!
C;l::'t.
!').::J.
' !
i)~_~'
L..Di=i
Inteqer-·:::.
L.DE I
rltE:·!;;~e!····:::.+:l
::;'Tfi I
r-!t
E·!~~E·i""··:::·
LliA
==
I
[-1t
E:'i;~E'!-':::'
LI:E =Ci!Jt
t=it~i:.
~::;t c!(,,~j.!;;jl::' ,::j,('E··~
-f"()t-'
i
j"':1.
E:'i;;!E:'
!.~':::,
C t-';::',:::1. t
E'ij
Indicates entry point follows
I
!"'!(j
i
C·:::L
t
E-::;,
it
'j
r-it
~:'!;~~::'
r'
~)::!.r·'::L!Y!E:'t
!::'r--:,::. ·::1.r'E'
~~ssed
in the order qiven by these
:::. '~":1,
t
E·iYi~:,!· ..
!t ::::'
.::tt-lc1 ·::tr"'E'
!;;;i'j
=,)=:::'j'''l
l'''~:irfiE':=,
r"c!!~~t 'j I"'!~.::'
tiE";;i
i
r"::::,
t):)
·f!-::'1:. c
i''':
' i
i"'!!~
·:::i.C
t
i.X::t.
' I
l'}.::'i,l
i.AI::'
clf'
t!''':E'
l!·"it)i)t.
r):::J.i,M,,::ti'fi ,
::'1:.,:::'r';:,
from BASIC and storing them
A1Ere
the routine can use them
arithmetic
~:cu~jlator
and
finally multiFl ies them
H
check for overflow is performed
i
j'''!
t.t":t:,
E;
r-'''::'!]1
:::,'i:.i:;·r'"
i,'.!~-!~:'(i
'i t
::::,\'-IC!ij
'!
cl
t::E'
~3
.::Lf"!i] ' 1 .~.
-:-
' 1
:=,1''':'' ','
II
!
.('('C!i""
::::.;"!
' i ;:- :::,!:::'
j
I::: :::
t
i::~'Cj
and the
routj~e
is aborted
amc~q
the arquments
:;;:~?~)
':;CiUF~CE
END Mu!tipl ication
!
~nc
ot·
mc~ule
:'::;~::!~:i
I :::;T
C!F~
E
'I~ I~~
I
r
'f
r:'
i
I~ ~
t,
~ l~!:"-.:
11
!':"!LJL.
'r
!!
:~;
1
i;::1
Et'~I)
Advertisement
Table of Contents
