LIB.A c MEMRY c @B.ALC. .CLR. .RTN. ? !.MEM. ; `` @Zt ?d C } Pp @
, + p h d ?@x @T ? E, X , ,@ ; `_ Zp @ , @ , .@ @P, 5A@, 5
p x 8
l ? @h
Zh h < < `^ ?Z d } ?p p < ? ?@ , u` , RZx H , Vp , Nh X , wH , w : `^,H ]Z ?
H DH b, n Z
D 8 Z`
@`x
< ?ڬ ?8 h x : ``D {Z ?, a ` p
d ?p d |
| | | ?
? ` t ? } ` `, FRMTR c # @.BIO. +.DIO. .DTA. D.IAR. .IOI. .IOR. .RAR. OLDIO x.DLD .DST .FLUN.IOC..MPY .PACKENDIOFLOATIFIX * ` m 7 A K O R , E F H I " / X ( ) + - . $
`8 8 ff 0 0 @ 1 ``L J `_ V :z ; ` l Z 5!״P
Z p / PH Z0 / a 8 1h 1 Zh 2 ( uP ( mh 3 l P ; ` yZ( m l 8 5( p 5( 8 h a p < { ` 5 v8 5( p 5` N0 1 O` ; ` է 8 h Z Zh H H 8 `
x 3p / l ( h /
H /
@( H 1 `= x 1` / < `\i
l , Z8 6 p 2p 3p p 6 lP , P , P
, P , P : `YI , )P , ^P , ;P , GP , P , P , P (, P , P , Z, , , `Gi x 0h 7 < h 0 ; `Z ¶` , { , p 2p 3 , 8 1h 1 a , lZ {, p ? a # < `^ ܴZ , p T Ph @ 0 T p T8 @, , ` Th @ נZ
` {8 @, , p ? < `\ a # , Zp T p0 P , 8 @, , ` h T @p T, ` h @H , ` T < `]S X $ , 0 # {8 @, , p i : # p 2p 3` 1t lP , 7 , 5 ; `Z 3 , . {, . d p 1, .8 8, ` 8h 1P x >x =h 6x :x 9, ` 8, X, : < `[M v` :p 9 p ;h =X >` 8p 8x 1, h =8 9, V` p 8, v , ^P @ ? , p A ' `Rhڬ a ` Ap @` C
p B i p CZ @ A, xp D o` A, q < `^z a lP , o z ` Th U p TPx U ` Tڬ l L | h U
5 @ 5 `H U `Lu @ T, 5 @< p T x U ; `a}Z ` T h L | ` U 5 @ " 6 @ x U` T " @@ U x Tp` T p ? a < `\AŠZ o, p ? z : i o , ڶ , ` D $Zp D@ A, + ., ; `^ , , < p T p ?` T Z , d p ? z : i Z o
x I\ < `\, d , 8 I, ` I $p I .`
{` h I ` x I {h I` #H V , ; `\, H Wx I {` I { ,
p 0l $ @ 0, % p Fx Gd p H h D` ?H < `\7Z , B x EH B , kx Bp D, D` 8 ?, J8 @ ` {` BZp Eh @ , k` X B, T : `Y
S@ # {8 @, L Z@ )8 < . ih Z , h P *, f@ +, ` # a 8 @, ^d < `[l@ Y@ 4p 5` 4p i` E, |` h A ڬ .p B8 D` Fh G ` Ht ` ?@ $ p ?, 4 ; `\P , hP , 8 @, k a8 h ` + a` A@ 4p . H x x 0 ; `]p K` K {8 @ 8 0, l , ,
p /l , Th U ` / < `_ , t , 5 @< , p T D t ` T6, ` 1, Z p ?p L p T ; `]9߶p Up It p Mp NP 1, p @p BZ8 @, p K` I8 Lh B @, , p I 8 I `M, , p I 8 I, 8 ?, : `Y32
h NP , qP , NP , YP , _P , dP
, jP , zP (, ~ , th N 8 N ; `\B#\ 8 B\ , F\ Z, Gp / l , 6d t ` /
, H - ` /x /
8 / , C@ T ; `]i?PH U , 4 5 @, ;8 Nh I
ZH I
@p I, Z , P K, Vp K, p M ڶp L\ , d < `^\ p N, , Xp ?,
@ , x Bd , ] Z, tH . , d Z, ] p 5h NZ` 1 , , ; `[ z P , t, zp N , wx K , h T 0p T, h x UP Z H 5x 5 ; `[ , , p T t x U 8 8 M < < p 1x p` 1 , p ; `]h
x 8 , p T 8` T Z x h M < p Qx P VЀP | , ; `[lͶ8 P8 P8 Q, Ȭ Ķ , l PZ, p Qx P P , 8 P8 Q, ܬ , P , ; `[vZx 0h R < h 0ڬ p /| 8 5, v, 8 ` / l p Jx 7, p 5 ; `]~ p < p Rp ;p ` Yt
p 1< p O` .p 8 p Kp < ; `\K d t 8 , v` 1, : ڢ, ( p Jx 7` Xt p R h 7 v + : ` " `O.DLD .FAD .FMP .FSB ; `\/ p x p x p Vp x p p 8 8 , &` h p x ` h p " `R Dx p x , (` h V < ` @ 5SIGN c @SIGN ..FCM.DLD 2 `Zb
x P< < P , , , h , h
`` ABS c @cABS As..FCM `E! ..FCM c @r..FCM 5|..DLC `F p x ..DLC c @{..DLC !.FSB `Irk < p P
{FADSB ] c @q.FAD .FSB .DLD .FLUN.PACK ; `]
H, HP` , Z, 8 x p < ` D B, #` h p x ` h p ; `\L x d Bh | Bp , @ h , @@@ p ` h 8 , DH A D, 8@ , A, ;@ `IU 9
, A@ @< B, A` 0 `Z') C
9 `, , p
x t Bd H@
t p Z
x p H `_ PTAPE W c @PTAPE *.ENTR.IOC. ; `]'? : : 4
, ' G4 Tp $ Up $ Vt 0t A t J, +, < , ; `^D < , 'l JZ, ' + < , #` t t ` T 7, 6 0 , / $, ' , 6 1 `Y_ ;` T 7 +T $ +P 0 , @Z, ' ?< + +Z ` ` t 7 < J| J `` : `C T @ eINDEX K c @ .INDA .INDR .IOC..MPY ENDIO : `^~ d d h Z p p p Z8 p , -8 8 , < `as , * 4 $`
8 INDEX?8 t t 8 8 , pD L , `L ?8 , Gh 8 , (8 T , / q.RTOI E c @ .RTOI _.DLD .ERRR.FDV .FMP < `^! p p x < < , ( , -` p ` p x x h Z, 0x , 9` < `] , #` h *` h , @
` h x ` Zh p x h , ` h `Jn= ; p x ,
06UN , + ` @ f.ITOI F c @ .ITOI B.ERRR.MPY < `_" Z p < x < , $ , -P P , ` P , +p h , / ; `_MY x , 7` X , + P08UN Ĭ x ` p =h , ` p =, `H\ > X = 08OF, + `` \.PRAM < c @
.PRAM ; `^ d p p @ H x p @ , 8 @
, h x h ; `\! x
, .x , . 8 8 8 8 8 8 , `
p 8 `B\ : , ` 5 ? +FDV ? c @ҝ.FDV
.DIV .DLD .FLUN.MPY .PACK ; `bV Z p t :x < P,
IFIX c @IFIX H.FLUN / `ZK p AP, @ , Bp` 8, 0 ,
` A ` ERR0 c @ERR0 `B B "EXEC c @EXEC R.STOP `CE ` `` 8.PAUS c @.PAUS (.IOC.ENDIO `O@
p , " ` PAUSE 2.STOP
c @.STOP .IOC.ENDIOHALT `MK/
t , " l ,STOP 6ISIGN c @ ISIGN . `Y < <
, P , A , F.ERRR * c @.ERRR (.IOC.ENDIO ; `b t '< Rt ) , %
@ , # @p ,
, # , " ! ` h , *E `H "QR< E- 00 `` PWR2 c @.PWR2 H.FLUN " `Pt , p x P pZ` H ` < `` 0.GOTO c @ .GOTO `Qs <
L
x H ` (.SWCH c @
.SWCH `N5m Z ,
H D , d @ `_ ).FLUN c @.FLUN `I ` H 0 ` !MANT c @.MANT `G P p ` p ` `_ IAND c @IAND `H < < IOR c @pIOR `H < < IABS c @IABS `G OVF c @wOVF `E
5ISSW c @ISSW `H A
, ` !ENDIO c @ENDIO +.IOC. `G(c
@ , -.TAPE c @.TAPE +.IOC. `F~V
t , CLRIO c @$CLRIO +.IOC. `E P