[an error occurred while processing this directive]

.

III.4. AOBE OPOPAMM BBOA-BBOA  ""
        ""  "-9"
       ( )

.

1.1. Haaee

ace opopa oa-oa (Input-Output SUBroutines), aee - IOSUB, oecea ae oooc opaa aoa c cooae aap eeoopa - cpoc, xox a opa execx cpec BM "AAT". opopa oo o poe popapoa a cceep, oea oee aco coex ec.

JSR - , ( ).

Ocoe , oee IOSUB, ao:

Bo:

- o oooo coa c aap;

- o cpo coo c aap c pacoaae peapx coo;

- e e op oa c cooae popa oa, aao ooaee, .. o c poo cpoca p coe pa pa;

- oee oax coc coo a oe, .e. ceax ec cae oce oo oo coa.

Bo:

- o oooo coa a pa oo x ecox peo (-32 -64);

- o c cooae opopa oa coa, aao ooaee, .. o a poe cpoco;

- oee oax coc coo a oe; ca oocc:

- paee oe oa,

- paee coepaec a pae opae.

Moe oooc IOSUB ceao oope e opopa oca x cooa acceepo popae. p oee eao aoce c IOSUB peoaaec apaeoe aoco c x cxo eco, oea oae po x pao. oo "" .

1.2. Opaa aoa

opopa IOSUB oecea o c aap epeopo coo: p, ao, ox acoo pccoo aao, pax. p oe aoe coo coec 2 cpaa O ( ¤200-¤2FF).

Boooc oa c paa. a a pao a, oo opee, ao co opae eoopo o paa, a ae eo eoc.

Oo aoa. IOSUB oca eee aoa e a ce oa paa, a opaeo pooo oac, aaeo oo. Oca ac paa p o o e apaa.

Tea o. opaa aoa eeo oe ee o oe. Bo pe oa oa aae, e e ee oepeo co, a o pe oa opeee o pcopa, oo ae oa eoopa aaec oe pcopa.

o pcopa eec p oe aoo coa a, o opaoa ececeoe aoee paa coa cea apao cepx ; p eoxooc pa "caec" epx, ocooa c cpo (ec "oae" epx). e pe epeee pcopa peaoa a oaa apa a pae co p x oe (apep, co "P-Z" ceae pcop a cpo ).

1.3. ocoe apaep aoa

Cocoe aoa ooc opeeec eco apaepa, oope xpac cex eax eo cpa:

1. Ocoe apaep:

TXPAGE (¤19) - (D0-D4) ;

INVFLG (COLOR) (¤32) - cap - pe aoa: (0-32, 1-64), ocae e cc oo pee 32 opee eoc coa (aec, coepoe INVFLG acaec o 2- a pecae coa a pae);

WNDLFT (¤20) - e oc oa: paccoe e e pa oa paa aax ( 32 o co coo, 64 - oeoe co);

WNDWDTH (¤21) - pa oa aax;

WNDTOP (¤22) - epx paa oa (paccoe o 0 cpo paa);

WNDBTM (¤23) - paa oa (paccoe o 0 cpo paa);

CH (¤24) - o pcopa cpoe (o eoo pa oa);

CV (¤25) - ea cpoa (epaa o pcopa), ca c 0 o epxe cpo paa;

CSWL,H (¤36-¤37) - apec ooaeco popa oa coa; IOSUB oe COUT1;

KSWL,H (¤38-¤39) - apec ooaeco popa oa coa; IOSUB oe KEYIN.

******************************************
*           ^        ^         ^         *
*           !        !         !         *
*    WNDTOP !     CV !         ! WNDBTM  *
*           !        !         !         *
*           v        !         !         *
*         !----------!------!  !         *
*         ! OKHO     !      !  !         *
*         !          !      !  !         *
*         !          v      !  !         *
*         !<---CH--->       !  !         *
*  WNDLFT !                 !  !         *
*<------->!                 !  !         *
*         !<----WNDWDTH---->!  !         *
*         !_________________!  v         *
*                                        *
******************************************

Pc.1.1. aae oa o pcopa.

2. Bcooaee apaep:

BASL,H (¤28-¤29) - apec aaa ee cpo oa; cec a pa o p cee ae CV; coec oca ecoo oca o pcopa;

RNDL,RNDH (¤4E-¤4F) - caoe co, eec KEYIN ee a oa oa a;

PROMPT (¤33) - co-paee o o cpo (GETLN).

KURSOR (¤2D) - , .

1.4. Ocae opopa

1.4.1

1.4.1.1 - SWSCRN.

¤F800

. , .

: 1 - 128128; 2 - ; 3 - 256256. .

1 3 128128 256256 / , 1 63 .

1 31 - 3232 , 33 63 - 3264 .

1.4.1.2. - SETINV.

¤F7A

SETINV COUT1.

.

3264

1.4.1.3. - SETNORM.

¤FE7E

SETNORM COUT1.

.

.

1.4.2. opopa pae pao

1.4.2.1. UP,DN,LF,RT - c pcopa a o o peeax oa; ec opeec - c epexoo a p cpo, oo paa. : ¤FC37,¤FC6F,¤FC21,¤FC05

1.4.2.2. SCROLL - oa paa a cpo epx; epx cpoa p o poaae. : ¤FC77.

1.4.2.3. CROUT -

¤FD92

CROUT " " (¤8D) COUT. ¤8A . ( SCROLL).

1.4.2.4. HOME - epeeee pcopa e epx o oa epexo a CLREOP. : ¤FC41.

1.4.2.5. CLREOP - oca (aoee poea eeo ea) paa eo o pcopa. ¤FC4B.

CLREOP .

COUT1 ¤9E (-, "f8")

1.4.2.6. CLREOL - oca ocaa cpo. ¤FCA5. COUT1 ¤9D (-), "f7").

1.4.2.7. INIT - caoa caapoo oa o ec pa:

WNDTOP = 0, WNDLFT = 0, WNDWDTH = ¤40, WNDBTM = CV + 1 = ¤20.

¤FBEF.

1.4.2.8. BASCALC - cee apeca aaa cpo, oep oopo epeaec A:

        (BASL, BASH) = ao apec + A * 64

¤FB2B

1.4.2.9. VTAB - cee apeca aaa cpo oa:

        (BASL, BASH) = BASCALC(CV) + CH

¤FC61

1.4.3. opopa .

1.4.3.1. .

COUT.

¤FDE1

.

COUT , CSW ( ¤36-¤37) (* COUT1*).

1.4.3.2. .

COUT1.

¤FDE4

COUT1 . . COUT1 :

¤8D,¤8A - ;

¤88 - ;

¤95 - ;

¤99 - ;

¤9A - ;

¤8C - ;

¤9D - ;

¤9E - ;

¤87 - .

1.4.4. opopa .

1.4.4.1. RDKEY.

¤FCCB

RDKEY , KSW (¤38-¤39).

(* KEYIN *)

1.4.4.2.

KEYIN.

¤FD11

KEYIN , , ( KURSOR).

KEYIN .

1.4.4.3. -

- RDCHAR.

¤FB74

RDCHAR - , , RDKEY, :

-

" " - 1 ( )

" " - 1 ( ). , . , , , .

1.4.4.4.

GETLN.

¤FD72

GETLN ¤33 (PROMPT).

( ¤200), RDCHAR, .

GETLNZ - GETLN ¤FD6F

, GETLN, .

.

"" "" "-9", IOSUB.

.

PRBYTE.

¤FDCE

PRBYTE . .

PRHEX.

¤FDD7

PRHEX . .

PRNTAX.

¤F93C

PRNTAX X .

, - . .

PRBLNK

¤FF5A

PRBL2

¤FF5C

PRBL2 1 256 .

X . X=00, 256 .

BELL COU ¤87.

¤FF3D ¤FCB8

WAIT.

¤FB94

WAIT , .

.

, :

.

(5**+27*+26)/2 .

.

WAIT .

Y .

IOSAVE.

A,X,Y,P,S ¤45,¤46,¤47,¤48,¤49.

¤FF4B

IOREST.

¤45,¤46,¤47,¤48 ( S ). ¤FF40.

. III:5.1

[an error occurred while processing this directive]