| ;--------------------------------------------------- |
| FONTP | EQU *F700 | ; |
| FONT5 | EQU *F100 | ; |
| rPAGE | EQU *B53E | ; |
| ;--------------------------------------------------- |
| mINIT | EQU *9800 | ; INIT DOORS SYSTEM |
| mCHECKON | EQU *9803 | ; CHECK AREA |
| mCHECKONITEM | EQU *9806 | ; CHECK ITEM |
| mREDRAW | EQU *9809 | ; REDRAW |
| mREDRAWITEM | EQU *980C | ; REDRWA ITEM |
| mPRMENU | EQU *980F | ; PRINT MENU |
| mPRITEM | EQU *9812 | ; PRINT ITEM |
| mSYNC | EQU *9815 | ; SYNCRO - (HALT) |
| mWAIT | EQU *9818 | ; RUN APPLICATION |
| mSTY | EQU *981B | ; STRELON |
| mSTN | EQU *981E | ; STRELOFF |
| mPRFIZ | EQU *9821 | ; PHYSICAL PRINT PROPORCIONAL |
| mPRFIZ5 | EQU *9824 | ; PHYSICAL PRINT 5X5 |
| mIFITEMOFF | EQU *9827 | ; ON OFF ITEM (HL=PROC) |
| mCURSOR | EQU *982A | ; SET CURSOR |
| mCURITEM | EQU *982D | ; CHG CURS ON ITEM |
| mRUNOFFITEM | EQU *9830 | ; EXECUTE OFF ITEM |
| mPROCSTRON | EQU *9833 | ; STR PROC = HL |
| mPROCSTROFF | EQU *9836 | ; STR PROC = DELETE HL |
| mPROCINTERON | EQU *9839 | ; pOBR = HL |
| mPROCINTEROFF | EQU *983C | ; pOBR = DELETE HL |
| mSETFNTP | EQU *983F | ; HL - FONT PROPORCIONAL L=0!!! |
| mSETFNTPS | EQU *9842 | ; STANDART FONT (OUT HL - FNT) |
| mSETFNT5X5 | EQU *9845 | ; HL - FONT ADDR |
| mSETFNT5X5S | EQU *9848 | ; STANDART FONT (OUT HL - FNT) |
| mEXITW | EQU *984B | ; EXIT FROM WINDOW |
| mITEMFUNCTION | EQU *984E | ; EXECUTE ITEM FUNCTION |
| mSETTIMECUR | EQU *9851 | ; SET CURSOR ON "ON" ITEM TIME |
| mMAKEFNTPS | EQU *9854 | ; MAKE STANDART FONT PROPORCIONAL |
| mMAKEFNT5X5S | EQU *9857 | ; MAKE STANDART FONT 5X5 |
| mIFITEMOFFDEL | EQU *985A | ; DISABLE IF ITEM OFF (HL = PROC) |
| mWINMEMCR | EQU *985D | ; WIN in mem - CREATE |
| mWINMEMDEL | EQU *9860 | ; WIN in mem - DELETE |
| mWINMEMEX | EQU *9863 | ; WIN in mem - EXCHANGE |
| mWINMOVE | EQU *9866 | ; MOVE WINDOW |
| mCOPYTOEXT | EQU *9869 | ; COPY SCR FROM MAIN TO EXT |
| mCOPYTOMAI | EQU *986C | ; COPY SCR FROM EXT TO MAIN |
| mGETFNTADRP | EQU *986F | ; GET ADR OF FONT PROP |
| mGETFNTADR5X5 | EQU *9872 | ; GET ADR OF FONT 5X5 |
| mKEY | EQU *9875 | ; GET KEYS A, E-FAKE, D-REAL |
| mWINMOVEH | EQU *9878 | ; A = * FF - STAND, A=0 CAN HIDE |
| mKEYCLR | EQU *987B | ; CLEAR KEYS |
| -------Vectors-devices----------- |
| mFIRE | EQU *987E | ; the Button fire ON MUOE = A |
| mVECTOR | EQU *9881 | ; the Vector of MOVING = DE |
| mPAGE | EQU *9884 | ; LOGIC PAGE |
| mMAISCR | EQU *9887 | ; MAIN SCREEN |
| mEXTSCR | EQU *988A | ; EXTENDED SCREEN |
| mKEYBOARD | EQU *988D | ; KEYBOARD READ |
| mCNC | EQU *9890 | ; VIRTUAL KEY-> REAL KEY |
| DOWN_HL | EQU *9893 | ; DOWN_HL |
| UP_HL | EQU *9896 | ; UP_HL |
| DOWN_DE | EQU *9899 | ; DOWN_DE |
| UP_DE | EQU *989C | ; UP_DE |
| mSCREEN | EQU *989F | ; HL (XA, YP)-> DE (ADDR IN SCREEN) |
| -------Functions-works-with-memories - --- |
| mINITMEMDRV | EQU *98A2 | ; HL-ADR OF DRV |
| mINITMEM | EQU *98A5 | ; INIT STANDART 128KB Driver |
| mALLOC | EQU *98A8 | ; Alloc mem HL-ADR E-SIZ D-PRG |
| mALLOCH | EQU *98AB | ; Alloc hard A-PAGE (IF HIGH) |
| mFINDL | EQU *98AE | ; Find free mem low E-SIZE |
| mFINDH | EQU *98B1 | ; Find free mem high E-SIZE |
| mFINDALLOCL | EQU *98B4 | ; Find and allocate mem low |
| mFINDALLOCH | EQU *98B7 | ; Find and allocate mem high |
| mFINDHP | EQU *98BA | ; Find mem high in A-PAGE E-SIZE |
| mDEALLOC | EQU *98BD | ; Deallocate memory |
| -------eaaiaaoua-functions----------- |
| mFUN00 | EQU *98C0 | ; LEN OF STRING PROPORCIONAL |
| mFUN01 | EQU *98C3 | ; GET FROM IX HL, DE (X, Y, SX, SY) |
| mFUN02 | EQU *98C6 | ; GET AND XA-> XP SXA-> SXP |
| mFUN03 | EQU *98C9 | ; GET AND YA-> YP SYA-> SYP |
| mFUN04 | EQU *98CC | ; GET AND XA-> XP YA-> YP SXA-> SXP SYA-> SYP |
| mFUN05 | EQU *98CF | ; COMPARE COORDS (BC) HL-X, Y DE-SX, SY |
| mFUN06 | EQU *98D2 | ; PRT LINE *0 PHYSICAL PROPORCIONAL |
| mFUN07 | EQU *98D5 | ; PRT LINE *0 PHYSICAL 5X5 |
| mFUN08 | EQU *98D8 | ; INIT ZADERZHKA |
| mFUN09 | EQU *98DB | ; ZADERZHKA (Z - DO IT, NZ - WAIT) |
| mFUN10 | EQU *98DE | ; GET XPwin YPwin (BEGIN) |
| mFUN11 | EQU *98E1 | ; GET XAwin YAwin (BEGIN) |
| mFUN12 | EQU *98E4 | ; COORD ADD BEGwin STYLE XP YP |
| mFUN13 | EQU *98E7 | ; COORD ADD BEGwin STYLE XA YP |
| mFUN14 | EQU *98EA | ; STANDAR ADDR OF RUN ELEMENT |
| mFUN15 | EQU *98ED | ; ADDITIONAL ELEMENTS CHECKING |
| mFUN16 | EQU *98F0 | ; ADDITIONAL ELEMENTS PRINT |
| mFUN17 | EQU *98F3 | ; PRINT 8X8 SP PHYS DE - XA, YP, HL - ADR |
| mFUN18 | EQU *98F6 | ; GET AND ADD K COORD XA YP |
| mFUN19 | EQU *98F9 | ; PHISICAL COORD CLR (A - ATTR C - FLAG) |
| mFUN20 | EQU *98FC | ; GET ADDR OF SYS 8X8 SPRITE (A - NUMBER) |
| mFUN21 | EQU *98FF | ; STANDART ROLIK EXECUTION |
| mFUN22 | EQU *9902 | ; GET ST WIN COORD |
| mFUN23 | EQU *9905 | ; GET BUF LINE ADDR |
| mFUN24 | EQU *9908 | ; A * BC = A, HL |
| mFUN25 | EQU *990B | ; PRINT 5X5 LINE *00 WITH SPACE |
| mFUN26 | EQU *990E | ; HL scr-> HL attr |
| -------Variables------------------ |
| pFLAG | EQU *9911 | ; NOT ZERO-?OI-OI LIKE REPRINT IEIA NOW |
| gSTRFL | EQU *9912 | ; WHETHER THE ARROW | IS INCLUDED
| pTEKID | EQU *9913 | ; THE CURRENT APPENDIX |
| pTEKSD | EQU *9914 | ; THE BEGINNING FLEW. WINDOWS |
| gKLFL | EQU *9916 | ; 0 - LAT/RUS, 1-NONE/CAPS, 2-ON/OFF |
| gDOBCLK | EQU *9917 | ; PRESENCE DOUBLE CLICK |
| gCO_NEW | EQU *9918 | ; COORDINATES OF THE ARROW |
| pLASTC | EQU *991A | ; LAST PRESSED KEY |
| pMEMDRV | EQU *991C | ; THE ADDRESS OF THE DRIVER OF MEMORY |
| rPAG | EQU *991E | ; CURRENT PAGE OF MEMORY |
| rPAGES | EQU *991F | ; QUANTITY OF PAGES |
| -------Additional-function------ |
| mFCALL | EQU *9920 | ; |
| mFCALLB | EQU *9923 | ; |
| -------Disk-function------------ |
| mzINIT | EQU *9926 | ; |
| mzADDDR | EQU *9929 | ; |
| mzADDDRF | EQU *992C | ; |
| mzDELDR | EQU *992F | ; |
| mzCURDR | EQU *9932 | ; |
| mzDRACT | EQU *9935 | ; |
| mzDRACT1 | EQU *9938 | ; |
| mzADRV | EQU *993B | ; |
| mzBANV | EQU *993D | ; |
| mzPARAM | EQU *993E | ; |