780 lines
36 KiB
NASM
Executable File
780 lines
36 KiB
NASM
Executable File
.FILE "wrespal.asm"
|
||
.OPTION B,D,L,T
|
||
|
||
.include "macros.h"
|
||
|
||
.DATA
|
||
.even
|
||
|
||
SUBR HRTPNK_P
|
||
|
||
.word 64
|
||
.word 00000h,07f9ah,07b16h,07ef3h,076b2h,06e90h,06e6fh,06670h
|
||
.word 06a4eh,0624eh,0662dh,05e2eh,0660bh,05e0ch,05debh,055edh
|
||
.word 051cah,05586h,04daah,04988h,04967h,04126h,03d25h,03904h
|
||
.word 034e4h,030a2h,02ca3h,02482h,02441h,01863h,01021h,00800h
|
||
.word 07fffh,077bdh,06f7bh,06739h,05ef7h,056b5h,04e73h,04631h
|
||
.word 03defh,035adh,02d6bh,02529h,01ce7h,014a5h,00c63h,00421h
|
||
.word 07f5fh,07edeh,07e5dh,079dah,07977h,07135h,06d13h,068f2h
|
||
.word 060b1h,05c90h,0586fh,0502dh,0480bh,0400ah,03406h,02c03h
|
||
|
||
SUBR HRTBLU_P
|
||
.word 64
|
||
.word 00000h,07f9ah,07b16h,07ef3h,076b2h,06e90h,06e6fh,06670h
|
||
.word 06a4eh,0624eh,0662dh,05e2eh,0660bh,05e0ch,05debh,055edh
|
||
.word 051cah,05586h,04daah,04988h,04967h,04126h,03d25h,03904h
|
||
.word 034e4h,030a2h,02ca3h,02482h,02441h,01863h,01021h,00800h
|
||
.word 07fffh,077bdh,06f7bh,06739h,05ef7h,056b5h,04e73h,04631h
|
||
.word 03defh,035adh,02d6bh,02529h,01ce7h,014a5h,00c63h,00421h
|
||
.word 02fbfh,02b3fh,02abeh,0263bh,025d8h,01d96h,01974h,01553h
|
||
.word 00d12h,008f1h,004d0h,0008eh,0006ch,0004bh,00027h,00024h
|
||
|
||
SUBR HRTGRN_P
|
||
.word 64
|
||
.word 00H,07F9AH,07B16H,07EF3H,076B2H,06E90H,06E6FH,06670H
|
||
.word 06A4EH,0624EH,0662DH,05E2EH,0660BH,05E0CH,05DEBH,055EDH
|
||
.word 051CAH,05586H,04DAAH,04988H,04967H,04126H,03D25H,03904H
|
||
.word 034E4H,030A2H,02CA3H,02482H,02441H,01863H,01021H,0800H
|
||
.word 07FFFH,077BDH,06F7BH,06739H,05EF7H,056B5H,04E73H,04631H
|
||
.word 03DEFH,035ADH,02D6BH,02529H,01CE7H,014A5H,0C63H,0421H
|
||
.word 06B7AH,05755H,04330H,02F2BH,01F07H,0EE3H,02C0H,0280H
|
||
.word 0260H,0220H,01E0H,01A0H,0180H,0140H,0100H,0E0H
|
||
|
||
SUBR HRTPRP_P
|
||
.word 64
|
||
.word 00H,07F9AH,07B16H,07EF3H,076B2H,06E90H,06E6FH,06670H
|
||
.word 06A4EH,0624EH,0662DH,05E2EH,0660BH,05E0CH,05DEBH,055EDH
|
||
.word 051CAH,05586H,04DAAH,04988H,04967H,04126H,03D25H,03904H
|
||
.word 034E4H,030A2H,02CA3H,02482H,02441H,01863H,01021H,0800H
|
||
.word 07FFFH,077BDH,06F7BH,06739H,05EF7H,056B5H,04E73H,04631H
|
||
.word 03DEFH,035ADH,02D6BH,02529H,01CE7H,014A5H,0C63H,0421H
|
||
.word 06F7BH,06ADBH,06A5BH,065BBH,0613BH,0609BH,05C3BH,05018H
|
||
.word 04816H,04013H,03410H,02C0EH,0240BH,01C08H,01006H,0803H
|
||
|
||
SUBR RZRPRP_P
|
||
.word 64
|
||
.word 00000h,07fdeh,04a50h,041edh,035cdh,02d8ch,01d07h,018e6h
|
||
.word 014c5h,010a4h,00c83h,00862h,00821h,00000h,07ffeh,07fdah
|
||
.word 07f98h,07f55h,07f54h,07f35h,07f12h,07ef3h,07ed0h,07ed1h
|
||
.word 07ad2h,07eafh,07e8eh,07290h,0766eh,0724eh,06a4eh,06e2dh
|
||
.word 0620ch,065eah,05debh,05dcah,059cah,055a8h,05188h,04d67h
|
||
.word 04125h,04502h,038e3h,03461h,02061h,01c20h,01000h,07fe8h
|
||
.word 07fa0h,07ee0h,065e0h,03d80h,0701ch,06419h,05415h,04812h
|
||
.word 04010h,0380eh,0340dh,0300ch,02c0bh,02409h,01c07h,01405h
|
||
|
||
.if 0
|
||
SUBR RZRGRN_P
|
||
.word 64
|
||
.word 00000h,07fdeh,04a50h,041edh,035cdh,02d8ch,01d07h,018e6h
|
||
.word 014c5h,010a4h,00c83h,00862h,00821h,00000h,07ffeh,07fdah
|
||
.word 07f98h,07f55h,07f54h,07f35h,07f12h,07ef3h,07ed0h,07ed1h
|
||
.word 07ad2h,07eafh,07e8eh,07290h,0766eh,0724eh,06a4eh,06e2dh
|
||
.word 0620ch,065eah,05debh,05dcah,059cah,055a8h,05188h,04d67h
|
||
.word 04125h,04502h,038e3h,03461h,02061h,01c20h,01000h,07fe8h
|
||
.word 07fa0h,07ee0h,065e0h,03d80h,00785h,00323h,002a1h,00240h
|
||
.word 00200h,001c0h,001a0h,00180h,00160h,00120h,000e0h,000a0h
|
||
.endif
|
||
|
||
SUBR RZRRED_P
|
||
.word 64
|
||
.word 00H,07FDEH,04A50H,041EDH,035CDH,02D8CH,01D07H,018E6H
|
||
.word 014C5H,010A4H,0C83H,0862H,0821H,00H,07FFEH,07FDAH
|
||
.word 07F98H,07F55H,07F54H,07F35H,07F12H,07EF3H,07ED0H,07ED1H
|
||
.word 07AD2H,07EAFH,07E8EH,07290H,0766EH,0724EH,06A4EH,06E2DH
|
||
.word 0620CH,065EAH,05DEBH,05DCAH,059CAH,055A8H,05188H,04D67H
|
||
.word 04125H,04502H,038E3H,03461H,02061H,01C20H,01000H,07FE8H
|
||
.word 07FA0H,07EE0H,065E0H,03D80H,07610H,0714AH,06CA5H,06C00H
|
||
.word 06000H,05400H,04800H,04000H,03400H,02800H,02000H,01400H
|
||
|
||
SUBR RZRBLU_P
|
||
.word 64
|
||
.word 00H,07FDEH,04A50H,041EDH,035CDH,02D8CH,01D07H,018E6H
|
||
.word 014C5H,010A4H,0C83H,0862H,0821H,00H,07FFEH,07FDAH
|
||
.word 07F98H,07F55H,07F54H,07F35H,07F12H,07EF3H,07ED0H,07ED1H
|
||
.word 07AD2H,07EAFH,07E8EH,07290H,0766EH,0724EH,06A4EH,06E2DH
|
||
.word 0620CH,065EAH,05DEBH,05DCAH,059CAH,055A8H,05188H,04D67H
|
||
.word 04125H,04502H,038E3H,03461H,02061H,01C20H,01000H,07FE8H
|
||
.word 07FA0H,07EE0H,065E0H,03D80H,02E7EH,01E1DH,011BCH,095AH
|
||
.word 0119H,0D6H,093H,070H,04DH,02AH,027H,025H
|
||
|
||
SUBR UNDNEG_P
|
||
.word 64
|
||
.word 00000h,00000h,00421h,00842h,00c63h,014a5h,018c6h,01ce7h
|
||
.word 02529h,0294ah,0318ch,035adh,039ceh,04210h,04631h,04a52h
|
||
.word 05294h,056b5h,05ef7h,06318h,06739h,06f7bh,0739ch,00421h
|
||
.word 00842h,00c63h,014a5h,018c6h,01ce7h,02108h,0294ah,02d6bh
|
||
.word 0318ch,039ceh,03defh,04210h,04a52h,04e73h,05294h,05ad6h
|
||
.word 05ef7h,06318h,06b5ah,06f7bh,0739ch,07bdeh,00421h,00842h
|
||
.word 01084h,014a5h,01ce7h,02529h,0294ah,0318ch,035adh,03defh
|
||
.word 04210h,04a52h,05294h,056b5h,05ef7h,06318h,06b5ah,0739ch
|
||
|
||
.if 0
|
||
SUBR UNDPRP_P
|
||
.word 64
|
||
.word 018d5h,07bbbh,07b77h,076f3h,06eb0h,0666fh,05e2dh,051ebh
|
||
.word 049cbh,045a9h,04167h,03947h,03d25h,03d03h,03105h,030e3h
|
||
.word 028c3h,02c80h,02081h,01861h,01840h,01420h,00c00h,07fffh
|
||
.word 06b39h,06717h,062f6h,05ad5h,05272h,04a51h,0420fh,03deeh
|
||
.word 039cdh,035ach,0318bh,0316ah,02949h,02107h,01ce6h,014c5h
|
||
.word 014a4h,00c83h,00862h,00841h,00441h,00420h,0781eh,0701ch
|
||
.word 0681ah,06419h,05c17h,05415h,05014h,04812h,04010h,0380eh
|
||
.word 0340dh,02c0bh,02409h,02008h,01806h,01004h,00c03h,00401h
|
||
.endif
|
||
|
||
SUBR UNDBLK_P
|
||
.word 64
|
||
.word 018d5h,07bbbh,07b77h,076f3h,06eb0h,0666fh,05e2dh,051ebh
|
||
.word 049cbh,045a9h,04167h,03947h,03d25h,03d03h,03105h,030e3h
|
||
.word 028c3h,02c80h,02081h,01861h,01840h,01420h,00c00h,07fffh
|
||
.word 06b39h,06717h,062f6h,05ad5h,05272h,04a51h,0420fh,03deeh
|
||
.word 039cdh,035ach,0318bh,0316ah,02949h,02107h,01ce6h,014c5h
|
||
.word 014a4h,00c83h,00862h,00841h,00441h,00420h,0739ch,06b5ah
|
||
.word 06318h,05ef7h,056b5h,05294h,04a52h,04631h,03defh,039ceh
|
||
.word 0318ch,0294ah,02529h,01ce7h,018c6h,01084h,00c63h,00421h
|
||
|
||
SUBR UNDGRN_P
|
||
SUBR UNDBLU_P
|
||
.word 64
|
||
.word 00H,07BBBH,07B77H,076F3H,06EB0H,0666FH,05E2DH,051EBH
|
||
.word 049CBH,045A9H,04167H,03947H,03D25H,03D03H,03105H,030E3H
|
||
.word 028C3H,02C80H,02081H,01861H,01840H,01420H,0C00H,07FFFH
|
||
.word 06B39H,06717H,062F6H,05AD5H,05272H,04A51H,0420FH,03DEEH
|
||
.word 039CDH,035ACH,0318BH,0316AH,02949H,02107H,01CE6H,014C5H
|
||
.word 014A4H,0C83H,0862H,0841H,0441H,0420H,0125FH,0E1FH
|
||
.word 09DFH,099FH,095FH,093DH,091BH,08F9H,095H,073H
|
||
.word 051H,02FH,02DH,0BH,09H,07H,06H,04H
|
||
|
||
.if 0
|
||
SUBR YOKRED_P
|
||
.word 64
|
||
.word 00000h,07fffh,0739ch,06b5ah,06318h,05ad6h,05294h,04a52h
|
||
.word 04210h,039ceh,0318ch,0294ah,02108h,014a5h,00c63h,00421h
|
||
.word 00400h,07f9ah,07b14h,07ef1h,07acfh,076b0h,0768eh,06e4bh
|
||
.word 06a4dh,0622ch,0660bh,05a0ch,059eah,051a8h,05187h,04988h
|
||
.word 04966h,04124h,04102h,03904h,038e2h,030a1h,03480h,02881h
|
||
.word 02840h,02400h,01400h,07e91h,07daah,07905h,070c3h,06ce4h
|
||
.word 064a2h,06081h,05ca2h,05860h,05840h,05460h,05040h,04c60h
|
||
.word 04c40h,04420h,04000h,03c20h,03c00h,03400h,02c00h,02000h
|
||
.endif
|
||
|
||
SUBR YOKPRP_P
|
||
.word 64
|
||
.word 00000h,07fffh,0739ch,06b5ah,06318h,05ad6h,05294h,04a52h
|
||
.word 04210h,039ceh,0318ch,0294ah,02108h,014a5h,00c63h,00421h
|
||
.word 00400h,07f9ah,07b14h,07ef1h,07acfh,076b0h,0768eh,06e4bh
|
||
.word 06a4dh,0622ch,0660bh,05a0ch,059eah,051a8h,05187h,04988h
|
||
.word 04966h,04124h,04102h,03904h,038e2h,030a1h,03480h,02881h
|
||
.word 02840h,02400h,01400h,06e9bh,06dbbh,0691ah,060d8h,05cf7h
|
||
.word 054b5h,05094h,04cb3h,04872h,04852h,04471h,04050h,03c6fh
|
||
.word 03c4fh,0342dh,0300ch,02c2bh,02c0bh,02409h,01c07h,01004h
|
||
|
||
SUBR YOKBLU_P
|
||
.word 64
|
||
.word 00H,07FFFH,0739CH,06B5AH,06318H,05AD6H,05294H,04A52H
|
||
.word 04210H,039CEH,0318CH,0294AH,02108H,014A5H,0C63H,0421H
|
||
.word 0400H,07F9AH,07B14H,07EF1H,07ACFH,076B0H,0768EH,06E4BH
|
||
.word 06A4DH,0622CH,0660BH,05A0CH,059EAH,051A8H,05187H,04988H
|
||
.word 04966H,04124H,04102H,03904H,038E2H,030A1H,03480H,02881H
|
||
.word 02840H,02400H,01400H,0267FH,01E3FH,015DFH,0D9FH,053FH
|
||
.word 0DFH,0BEH,0BDH,09BH,079H,077H,056H,054H
|
||
.word 032H,030H,0FH,0DH,0BH,09H,08H,06H
|
||
|
||
SUBR YOKGRN_P
|
||
.word 64
|
||
.word 00H,07FFFH,0739CH,06B5AH,06318H,05AD6H,05294H,04A52H
|
||
.word 04210H,039CEH,0318CH,0294AH,02108H,014A5H,0C63H,0421H
|
||
.word 0400H,07F9AH,07B14H,07EF1H,07ACFH,076B0H,0768EH,06E4BH
|
||
.word 06A4DH,0622CH,0660BH,05A0CH,059EAH,051A8H,05187H,04988H
|
||
.word 04966H,04124H,04102H,03904H,038E2H,030A1H,03480H,02881H
|
||
.word 02840H,02400H,01400H,043B0H,0338CH,02789H,01B66H,0B62H
|
||
.word 0340H,0320H,02E0H,02C0H,02A0H,0280H,0240H,0220H
|
||
.word 0200H,01C0H,01C0H,01A0H,0160H,0140H,0120H,0E0H
|
||
|
||
.if 0
|
||
SUBR SHNRED_P
|
||
.word 63
|
||
.word 018d5h,07fddh,07f98h,07f58h,07f34h,07ad1h,07ab0h,0768fh
|
||
.word 06e90h,06e6eh,06e4dh,0622ch,05e0ch,059eah,05dc9h,055cah
|
||
.word 051a8h,04d89h,04d87h,04567h,04925h,04124h,03925h,03d03h
|
||
.word 038e2h,038c1h,030e4h,030c3h,03480h,02460h,02420h,01c40h
|
||
.word 01400h,00400h,076d6h,0720fh,06dabh,07128h,070c5h,06c42h
|
||
.word 06800h,06400h,05800h,05000h,04800h,03800h,02800h,01800h
|
||
.word 07fffh,0739ch,06b5ah,06318h,05ad6h,05294h,04631h,03defh
|
||
.word 035adh,02d6bh,02529h,01ce7h,014a5h,00c63h,00421h
|
||
.endif
|
||
|
||
SUBR SHNPRP_P
|
||
.word 63
|
||
.word 018d5h,07fddh,07f98h,07f58h,07f34h,07ad1h,07ab0h,0768fh
|
||
.word 06e90h,06e6eh,06e4dh,0622ch,05e0ch,059eah,05dc9h,055cah
|
||
.word 051a8h,04d89h,04d87h,04567h,04925h,04124h,03925h,03d03h
|
||
.word 038e2h,038c1h,030e4h,030c3h,03480h,02460h,02420h,01c40h
|
||
.word 01400h,00400h,076d6h,07210h,06dabh,064b9h,05c77h,05816h
|
||
.word 05415h,04c13h,04410h,03c0eh,0340ch,02409h,01405h,00401h
|
||
.word 07fffh,0739ch,06b5ah,06318h,05ad6h,05294h,04631h,03defh
|
||
.word 035adh,02d6bh,02529h,01ce7h,014a5h,00c63h,00421h
|
||
|
||
SUBR SHNBLU_P
|
||
.word 64
|
||
.word 00H,07FDDH,07F98H,07F58H,07F34H,07AD1H,07AB0H,0768FH
|
||
.word 06E90H,06E6EH,06E4DH,0622CH,05E0CH,059EAH,05DC9H,055CAH
|
||
.word 051A8H,04D89H,04D87H,04567H,04925H,04124H,03925H,03D03H
|
||
.word 038E2H,038C1H,030E4H,030C3H,03480H,02460H,02420H,01C40H
|
||
.word 01400H,0400H,06B5FH,052BFH,03A1EH,0259EH,0113DH,0FDH
|
||
.word 0DAH,0D7H,0D4H,0B1H,0AEH,08BH,068H,045H
|
||
.word 07FFFH,0739CH,06B5AH,06318H,05AD6H,05294H,04631H,03DEFH
|
||
.word 035ADH,02D6BH,02529H,01CE7H,014A5H,0C63H,0421H,00H
|
||
|
||
SUBR SHNGRN_P
|
||
.word 64
|
||
.word 00H,07FDDH,07F98H,07F58H,07F34H,07AD1H,07AB0H,0768FH
|
||
.word 06E90H,06E6EH,06E4DH,0622CH,05E0CH,059EAH,05DC9H,055CAH
|
||
.word 051A8H,04D89H,04D87H,04567H,04925H,04124H,03925H,03D03H
|
||
.word 038E2H,038C1H,030E4H,030C3H,03480H,02460H,02420H,01C40H
|
||
.word 01400H,0400H,063B8H,04F93H,0378DH,02368H,01344H,0340H
|
||
.word 02E0H,0280H,0220H,01C0H,0160H,0120H,0C0H,060H
|
||
.word 07FFFH,0739CH,06B5AH,06318H,05AD6H,05294H,04631H,03DEFH
|
||
.word 035ADH,02D6BH,02529H,01CE7H,014A5H,0C63H,0421H,00H
|
||
|
||
.if 0
|
||
SUBR BAMBLU_P
|
||
.word 64
|
||
.word 000e7h,07fffh,04a52h,04210h,039ceh,0318ch,02d6bh,02529h
|
||
.word 01ce7h,014a5h,00c63h,00842h,07d46h,07126h,06cc2h,06126h
|
||
.word 060c4h,06c41h,060a2h,05c41h,05083h,04c41h,03c20h,03020h
|
||
.word 01800h,077fah,0327eh,01996h,00d59h,01153h,00512h,000f1h
|
||
.word 000cfh,0006dh,07f79h,07f55h,07b13h,07ad1h,0728fh,0766dh
|
||
.word 06a4dh,0626bh,065e9h,059c9h,05187h,04d87h,05165h,04585h
|
||
.word 04901h,04103h,03903h,034c1h,02840h,01000h,07befh,07fc2h
|
||
.word 07f82h,07ee1h,07e60h,07dc0h,07d20h,064e0h,04ca0h,04080h
|
||
.endif
|
||
|
||
SUBR BAMFRE_P
|
||
.word 64
|
||
.word 00000h,07d60h,07de0h,07e60h,07ee0h,07f60h,07fe0h,07f40h
|
||
.word 07ec0h,07e20h,07da0h,07d00h,07d60h,07dc0h,07e20h,07e80h
|
||
.word 07ee0h,07f20h,07f80h,07fe0h,07fa0h,07f60h,07f40h,07f00h
|
||
.word 07ec0h,07e80h,07e60h,07e20h,07de0h,07da0h,07d60h,07d40h
|
||
.word 07d80h,07dc0h,07e20h,07e60h,07ec0h,07f00h,07f40h,07fa0h
|
||
.word 07fe0h,07f80h,07f20h,07ea0h,07e40h,07de0h,07d80h,07d20h
|
||
.word 07d60h,07dc0h,07e20h,07e80h,07ee0h,07f20h,07f80h,07fe0h
|
||
.word 07f80h,07f20h,07ec0h,07e80h,07e20h,07dc0h,07d60h,07d00h
|
||
|
||
SUBR BAMYLW_P
|
||
.word 64
|
||
.word 000e7h,07fffh,04a52h,04210h,039ceh,0318ch,02d6bh,02529h
|
||
.word 01ce7h,014a5h,00c63h,00842h,07d46h,07126h,06cc2h,06126h
|
||
.word 060c4h,06c41h,060a2h,05c41h,05083h,04c41h,03c20h,03020h
|
||
.word 01800h,077f6h,077f1h,07bd0h,07fa7h,07f82h,06b01h,05a60h
|
||
.word 045e0h,03560h,07f79h,07f55h,07b13h,07ad1h,0728fh,0766dh
|
||
.word 06a4dh,0626bh,065e9h,059c9h,05187h,04d87h,05165h,04585h
|
||
.word 04901h,04103h,03903h,034c1h,02840h,01000h,07befh,07fc2h
|
||
.word 07f82h,07ee1h,07e60h,07dc0h,07d20h,064e0h,04ca0h,04080h
|
||
|
||
SUBR BAMPRP_P
|
||
.word 64
|
||
.word 00H,07FFFH,04A52H,04210H,039CEH,0318CH,02D6BH,02529H
|
||
.word 01CE7H,014A5H,0C63H,0842H,07D46H,07126H,06CC2H,06126H
|
||
.word 060C4H,06C41H,060A2H,05C41H,05083H,04C41H,03C20H,03020H
|
||
.word 01800H,077FAH,07DDFH,07C1FH,0701CH,06419H,05816H,04C13H
|
||
.word 04010H,0340DH,07F79H,07F55H,07B13H,07AD1H,0728FH,0766DH
|
||
.word 06A4DH,0626BH,065E9H,059C9H,05187H,04D87H,05165H,04585H
|
||
.word 04901H,04103H,03903H,034C1H,02840H,01000H,07BEFH,07FC2H
|
||
.word 07F82H,07EE1H,07E60H,07DC0H,07D20H,064E0H,04CA0H,04080H
|
||
|
||
SUBR BAMRED_P
|
||
.word 64
|
||
.word 00H,07FFFH,04A52H,04210H,039CEH,0318CH,02D6BH,02529H
|
||
.word 01CE7H,014A5H,0C63H,0842H,07D46H,07126H,06CC2H,06126H
|
||
.word 060C4H,06C41H,060A2H,05C41H,05083H,04C41H,03C20H,03020H
|
||
.word 01800H,077FAH,07D6BH,07C00H,07000H,06400H,05400H,04800H
|
||
.word 03C00H,03000H,07F79H,07F55H,07B13H,07AD1H,0728FH,0766DH
|
||
.word 06A4DH,0626BH,065E9H,059C9H,05187H,04D87H,05165H,04585H
|
||
.word 04901H,04103H,03903H,034C1H,02840H,01000H,07BEFH,07FC2H
|
||
.word 07F82H,07EE1H,07E60H,07DC0H,07D20H,064E0H,04CA0H,04080H
|
||
|
||
SUBR DNKPRP_P
|
||
.word 64
|
||
.word 0318ch,07fffh,06f7bh,05ef7h,04e73h,03defh,02d6bh,02529h
|
||
.word 01ce7h,014a5h,00c63h,00421h,07febh,07fa5h,07b41h,06ec0h
|
||
.word 06260h,03effh,02abfh,01a7ch,00a39h,00217h,001f4h,001b2h
|
||
.word 00170h,0012eh,000ech,004abh,0046ah,00468h,07ef9h,07e55h
|
||
.word 07dd1h,07cc8h,07400h,06c00h,06400h,05c00h,05400h,04c00h
|
||
.word 04400h,03800h,03000h,02021h,07fbfh,0769dh,06d9bh,064b9h
|
||
.word 05c17h,05014h,04812h,04010h,0340dh,02c0bh,02409h,01806h
|
||
.word 01004h,0626eh,05a0eh,045a9h,04566h,03926h,01c83h,01841h
|
||
|
||
.if 0
|
||
SUBR DNKBLU_P
|
||
.word 64
|
||
.word 00000h,07fffh,06f7bh,05ef7h,04e73h,03defh,02d6bh,02529h
|
||
.word 01ce7h,014a5h,00c63h,00421h,07febh,07fa5h,07b41h,06ec0h
|
||
.word 06260h,05f8fh,0536bh,04748h,03705h,02ae3h,01ec0h,01a80h
|
||
.word 01640h,01600h,011c1h,01181h,00d41h,00d01h,07ef9h,07e55h
|
||
.word 07dd1h,07cc8h,07400h,06c00h,06400h,05c00h,05400h,04c00h
|
||
.word 04400h,03800h,03000h,02021h,067bfh,03afeh,0227dh,001bbh
|
||
.word 00179h,00136h,000f4h,000d2h,0008fh,0006dh,0004bh,00028h
|
||
.word 00027h,0626eh,05a0eh,045a9h,04566h,03926h,01c83h,01841h
|
||
.endif
|
||
|
||
SUBR DNKGRN_P
|
||
.word 64
|
||
.word 00H,07FFFH,06F7BH,05EF7H,04E73H,03DEFH,02D6BH,02529H
|
||
.word 01CE7H,014A5H,0C63H,0421H,07FEBH,07FA5H,07B41H,06EC0H
|
||
.word 06260H,05F8FH,0536BH,04748H,03705H,02AE3H,01EC0H,01A80H
|
||
.word 01640H,01600H,011C1H,01181H,0D41H,0D01H,07EF9H,07E55H
|
||
.word 07DD1H,07CC8H,07400H,06C00H,06400H,05C00H,05400H,04C00H
|
||
.word 04400H,03800H,03000H,02021H,05FB7H,03B8EH,01765H,0340H
|
||
.word 0300H,02C0H,0280H,0240H,0200H,01A0H,0160H,0120H
|
||
.word 0E0H,0626EH,05A0EH,045A9H,04566H,03926H,01C83H,01841H
|
||
|
||
SUBR DNKGRY_P
|
||
.word 64
|
||
.word 00H,07FFFH,06F7BH,05EF7H,04E73H,03DEFH,02D6BH,02529H
|
||
.word 01CE7H,014A5H,0C63H,0421H,07FEBH,07FA5H,07B41H,06EC0H
|
||
.word 06260H,05F8FH,0536BH,04748H,03705H,02AE3H,01EC0H,01A80H
|
||
.word 01640H,01600H,011C1H,01181H,0D41H,0D01H,07EF9H,07E55H
|
||
.word 07DD1H,07CC8H,07400H,06C00H,06400H,05C00H,05400H,04C00H
|
||
.word 04400H,03800H,03000H,02021H,06318H,05AD6H,05294H,04A52H
|
||
.word 04210H,039CEH,0318CH,0294AH,02529H,01CE7H,014A5H,0C63H
|
||
.word 0421H,0626EH,05A0EH,045A9H,04566H,03926H,01C83H,01841H
|
||
|
||
.if 0
|
||
SUBR LEXWHT_P
|
||
.word 64
|
||
.word 00000h,07fddh,07fbch,07f55h,07af4h,07ab2h,07ab0h,07a6eh
|
||
.word 06e4dh,0722ch,06a2dh,0660dh,05e0dh,061ebh,05dc9h,059a9h
|
||
.word 05189h,05167h,04546h,04103h,03d04h,03505h,02cc3h,02c81h
|
||
.word 02440h,01800h,00400h,0529ah,039dbh,0319ah,02955h,018d1h
|
||
.word 0084dh,0042ah,06d8ch,06d07h,06863h,04c42h,03863h,03800h
|
||
.word 02800h,07bdeh,0739ch,06739h,056b5h,04631h,02529h,014a5h
|
||
.word 00c63h,07fffh,077bdh,06f7bh,06739h,05ef7h,05ad6h,05294h
|
||
.word 04a52h,04210h,039ceh,0318ch,0294ah,02108h,018c6h,014a5h
|
||
.endif
|
||
|
||
SUBR LEXPRP_P
|
||
.word 64
|
||
.word 00H,07FDDH,07FBCH,07F55H,07AF4H,07AB2H,07AB0H,07A6EH
|
||
.word 06E4DH,0722CH,06A2DH,0660DH,05E0DH,061EBH,05DC9H,059A9H
|
||
.word 05189H,05167H,04546H,04103H,03D04H,03505H,02CC3H,02C82H
|
||
.word 02442H,01842H,0842H,0667AH,05D78H,058B6H,05415H,04411H
|
||
.word 0340DH,0280AH,06D8CH,06D07H,06863H,04C42H,03863H,03800H
|
||
.word 02800H,07BDEH,0739CH,06739H,056B5H,04631H,02529H,014A5H
|
||
.word 0C63H,07FFFH,07F9FH,07F1FH,07E9FH,0763DH,071DCH,0697AH
|
||
.word 06559H,05D57H,05555H,04D53H,04551H,04150H,0394EH,0314CH
|
||
|
||
SUBR LEXYEL_P
|
||
.word 64
|
||
.word 00H,07FDDH,07FBCH,07F55H,07AF4H,07AB2H,07AB0H,07A6EH
|
||
.word 06E4DH,0722CH,06A2DH,0660DH,05E0DH,061EBH,05DC9H,059A9H
|
||
.word 05189H,05167H,04546H,04103H,03D04H,03505H,02CC3H,02C81H
|
||
.word 02440H,01800H,0400H,07FF9H,07FF0H,07FA8H,07F20H,06E80H
|
||
.word 055E0H,03D40H,06D8CH,06D07H,06863H,04C42H,03863H,03800H
|
||
.word 02800H,07BDEH,0739CH,06739H,056B5H,04631H,02529H,014A5H
|
||
.word 0C63H,07FFFH,07FFBH,07FF6H,07FD2H,07F8DH,07F69H,07F24H
|
||
.word 07F02H,07EE2H,07662H,069C2H,05942H,04CE2H,03C62H,03042H
|
||
|
||
SUBR LEXRED_P
|
||
.word 64
|
||
.word 00H,07FDDH,07FBCH,07F55H,07AF4H,07AB2H,07AB0H,07A6EH
|
||
.word 06E4DH,0722CH,06A2DH,0660DH,05E0DH,061EBH,05DC9H,059A9H
|
||
.word 05189H,05167H,04546H,04103H,03D04H,03505H,02CC3H,02C81H
|
||
.word 02440H,01800H,0400H,07F18H,079EFH,074C6H,06C00H,05400H
|
||
.word 04000H,02800H,06D8CH,06D07H,06863H,04C42H,03863H,03800H
|
||
.word 02800H,07BDEH,0739CH,06739H,056B5H,04631H,02529H,014A5H
|
||
.word 0C63H,07FFFH,07F9CH,07F18H,07EB5H,07A52H,075EFH,071ADH
|
||
.word 06D4AH,06D08H,068A5H,06463H,06042H,04842H,03042H,01842H
|
||
|
||
|
||
|
||
.IF 1
|
||
|
||
|
||
|
||
|
||
|
||
;SUBR LEXYEL_P
|
||
; .word 64
|
||
; .word 00000h,07fddh,07fbch,07f55h,07af4h,07ab2h,07ab0h,07a6eh
|
||
; .word 06e4dh,0722ch,06a2dh,0660dh,05e0dh,061ebh,05dc9h,059a9h
|
||
; .word 05189h,05167h,04546h,04103h,03d04h,03505h,02cc3h,02c81h
|
||
; .word 02440h,01800h,00400h,0529ah,039dbh,0319ah,02955h,018d1h
|
||
; .word 0084dh,0042ah,06d8ch,06d07h,06863h,04c42h,03863h,03800h
|
||
; .word 02800h,07bdeh,0739ch,06739h,056b5h,04631h,02529h,014a5h
|
||
; .word 00c63h,07fa0h,07b40h,07300h,06ec0h,06680h,06240h,05a00h
|
||
; .word 055c0h,04da0h,04960h,04140h,03d00h,034e0h,030c0h,028a0h
|
||
|
||
; SUBR LEXPRP_P
|
||
; .word 64
|
||
; .word 0250eh,07bbch,07b9bh,07b34h,076d3h,07691h,0768fh,0764dh
|
||
; .word 06a2ch,06e0bh,0660ch,061ech,059ech,05dcah,059a8h,05588h
|
||
; .word 04d68h,04d46h,04125h,03ce2h,038e3h,030e4h,028a2h,02861h
|
||
; .word 02021h,01421h,00421h,0667ah,05d78h,058b6h,05415h,04411h
|
||
; .word 0340dh,0280ah,06d8ch,06d07h,06863h,04c42h,03863h,03800h
|
||
; .word 02800h,07bdeh,0739ch,06739h,056b5h,04631h,02529h,014a5h
|
||
; .word 00c63h,07fdfh,07f3fh,07abeh,0723ch,069dah,06579h,05d17h
|
||
; .word 058f6h,050f4h,048f2h,040f0h,038eeh,034edh,02cebh,024e9h
|
||
|
||
|
||
SUBR BAMGRN_P
|
||
.word 64
|
||
.word 00H,07FFFH,04A52H,04210H,039CEH,0318CH,02D6BH,02529H
|
||
.word 01CE7H,014A5H,0C63H,0842H,07D46H,07126H,06CC2H,06126H
|
||
.word 060C4H,06C41H,060A2H,05C41H,05083H,04C41H,03C20H,03020H
|
||
.word 01800H,077FAH,03E0H,0380H,0320H,02C0H,0240H,01E0H
|
||
.word 0180H,0120H,07F79H,07F55H,07B13H,07AD1H,0728FH,0766DH
|
||
.word 06A4DH,0626BH,065E9H,059C9H,05187H,04D87H,05165H,04585H
|
||
.word 04901H,04103H,03903H,034C1H,02840H,01000H,07BEFH,07FC2H
|
||
.word 07F82H,07EE1H,07E60H,07DC0H,07D20H,064E0H,04CA0H,04080H
|
||
|
||
SUBR BAMPNK_P
|
||
.word 64
|
||
.word 00H,07FFFH,04A52H,04210H,039CEH,0318CH,02D6BH,02529H
|
||
.word 01CE7H,014A5H,0C63H,0842H,07D46H,07126H,06CC2H,06126H
|
||
.word 060C4H,06C41H,060A2H,05C41H,05083H,04C41H,03C20H,03020H
|
||
.word 01800H,077FAH,07D70H,07CF0H,07C71H,07C12H,07010H,0640DH
|
||
.word 0580BH,05009H,07F79H,07F55H,07B13H,07AD1H,0728FH,0766DH
|
||
.word 06A4DH,0626BH,065E9H,059C9H,05187H,04D87H,05165H,04585H
|
||
.word 04901H,04103H,03903H,034C1H,02840H,01000H,07BEFH,07FC2H
|
||
.word 07F82H,07EE1H,07E60H,07DC0H,07D20H,064E0H,04CA0H,04080H
|
||
|
||
SUBR BAMORG_P
|
||
.word 64
|
||
.word 00H,07FFFH,04A52H,04210H,039CEH,0318CH,02D6BH,02529H
|
||
.word 01CE7H,014A5H,0C63H,0842H,07D46H,07126H,06CC2H,06126H
|
||
.word 060C4H,06C41H,060A2H,05C41H,05083H,04C41H,03C20H,03020H
|
||
.word 01800H,077FAH,07E80H,07E40H,07E20H,07DE0H,07180H,06940H
|
||
.word 05D00H,054C0H,07F79H,07F55H,07B13H,07AD1H,0728FH,0766DH
|
||
.word 06A4DH,0626BH,065E9H,059C9H,05187H,04D87H,05165H,04585H
|
||
.word 04901H,04103H,03903H,034C1H,02840H,01000H,07BEFH,07FC2H
|
||
.word 07F82H,07EE1H,07E60H,07DC0H,07D20H,064E0H,04CA0H,04080H
|
||
|
||
|
||
SUBR BAMGRY_P
|
||
.word 64
|
||
.word 00H,07FFFH,04A52H,04210H,039CEH,0318CH,02D6BH,02529H
|
||
.word 01CE7H,014A5H,0C63H,0842H,07D46H,07126H,06CC2H,06126H
|
||
.word 060C4H,06C41H,060A2H,05C41H,05083H,04C41H,03C20H,03020H
|
||
.word 01800H,077FAH,05EF7H,05294H,04A52H,03DEFH,035ADH,0294AH
|
||
.word 02108H,014A5H,07F79H,07F55H,07B13H,07AD1H,0728FH,0766DH
|
||
.word 06A4DH,0626BH,065E9H,059C9H,05187H,04D87H,05165H,04585H
|
||
.word 04901H,04103H,03903H,034C1H,02840H,01000H,07BEFH,07FC2H
|
||
.word 07F82H,07EE1H,07E60H,07DC0H,07D20H,064E0H,04CA0H,04080H
|
||
|
||
SUBR DNKPNK_P
|
||
.word 64
|
||
.word 00H,07FFFH,06F7BH,05EF7H,04E73H,03DEFH,02D6BH,02529H
|
||
.word 01CE7H,014A5H,0C63H,0421H,07FEBH,07FA5H,07B41H,06EC0H
|
||
.word 06260H,05F8FH,0536BH,04748H,03705H,02AE3H,01EC0H,01A80H
|
||
.word 01640H,01600H,011C1H,01181H,0D41H,0D01H,07EF9H,07E55H
|
||
.word 07DD1H,07CC8H,07400H,06C00H,06400H,05C00H,05400H,04C00H
|
||
.word 04400H,03800H,03000H,02021H,07EDCH,07E19H,07D77H,07CB4H
|
||
.word 07C12H,07410H,06C0FH,0640EH,05C0CH,0540BH,04C0AH,04409H
|
||
.word 03C08H,0626EH,05A0EH,045A9H,04566H,03926H,01C83H,01841H
|
||
|
||
SUBR DNKORG_P
|
||
.word 64
|
||
.word 00H,07FFFH,06F7BH,05EF7H,04E73H,03DEFH,02D6BH,02529H
|
||
.word 01CE7H,014A5H,0C63H,0421H,07FEBH,07FA5H,07B41H,06EC0H
|
||
.word 06260H,05F8FH,0536BH,04748H,03705H,02AE3H,01EC0H,01A80H
|
||
.word 01640H,01600H,011C1H,01181H,0D41H,0D01H,07EF9H,07E55H
|
||
.word 07DD1H,07CC8H,07400H,06C00H,06400H,05C00H,05400H,04C00H
|
||
.word 04400H,03800H,03000H,02021H,07F99H,07F12H,07EACH,07E45H
|
||
.word 07DE0H,071A0H,06960H,05D40H,05100H,048C0H,03CA0H,03080H
|
||
.word 02860H,0626EH,05A0EH,045A9H,04566H,03926H,01C83H,01841H
|
||
|
||
SUBR DNKRED_P
|
||
.word 64
|
||
.word 00H,07FFFH,06F7BH,05EF7H,04E73H,03DEFH,02D6BH,02529H
|
||
.word 01CE7H,014A5H,0C63H,0421H,07FEBH,07FA5H,07B41H,06EC0H
|
||
.word 06260H,05F8FH,0536BH,04748H,03705H,02AE3H,01EC0H,01A80H
|
||
.word 01640H,01600H,011C1H,01181H,0D41H,0D01H,07EF9H,07E55H
|
||
.word 07DD1H,07CC8H,07400H,06C00H,06400H,05C00H,05400H,04C00H
|
||
.word 04400H,03800H,03000H,02021H,07ED6H,07A10H,0794AH,07484H
|
||
.word 07400H,06800H,05C00H,05000H,04400H,03800H,02C00H,02000H
|
||
.word 01400H,0626EH,05A0EH,045A9H,04566H,03926H,01C83H,01841H
|
||
|
||
SUBR DNKYEL_P
|
||
.word 64
|
||
.word 00H,07FFFH,06F7BH,05EF7H,04E73H,03DEFH,02D6BH,02529H
|
||
.word 01CE7H,014A5H,0C63H,0421H,07FEBH,07FA5H,07B41H,06EC0H
|
||
.word 06260H,05F8FH,0536BH,04748H,03705H,02AE3H,01EC0H,01A80H
|
||
.word 01640H,01600H,011C1H,01181H,0D41H,0D01H,07EF9H,07E55H
|
||
.word 07DD1H,07CC8H,07400H,06C00H,06400H,05C00H,05400H,04C00H
|
||
.word 04400H,03800H,03000H,02021H,07FF6H,07FEEH,07FC7H,07FA0H
|
||
.word 07740H,06EE0H,066A0H,05E60H,05600H,04DC0H,04580H,03D40H
|
||
.word 03520H,0626EH,05A0EH,045A9H,04566H,03926H,01C83H,01841H
|
||
|
||
|
||
SUBR HRTORG_P
|
||
.word 64
|
||
.word 00H,07F9AH,07B16H,07EF3H,076B2H,06E90H,06E6FH,06670H
|
||
.word 06A4EH,0624EH,0662DH,05E2EH,0660BH,05E0CH,05DEBH,055EDH
|
||
.word 051CAH,05586H,04DAAH,04988H,04967H,04126H,03D25H,03904H
|
||
.word 034E4H,030A2H,02CA3H,02482H,02441H,01863H,01021H,0800H
|
||
.word 07FFFH,077BDH,06F7BH,06739H,05EF7H,056B5H,04E73H,04631H
|
||
.word 03DEFH,035ADH,02D6BH,02529H,01CE7H,014A5H,0C63H,0421H
|
||
.word 07F98H,07F33H,07EEFH,07EABH,07A67H,07A03H,079C0H,071A0H
|
||
.word 06980H,06560H,05D40H,05520H,04D00H,044E0H,03CC0H,038C0H
|
||
|
||
|
||
SUBR HRTRED_P
|
||
.word 64
|
||
.word 00H,07F9AH,07B16H,07EF3H,076B2H,06E90H,06E6FH,06670H
|
||
.word 06A4EH,0624EH,0662DH,05E2EH,0660BH,05E0CH,05DEBH,055EDH
|
||
.word 051CAH,05586H,04DAAH,04988H,04967H,04126H,03D25H,03904H
|
||
.word 034E4H,030A2H,02CA3H,02482H,02441H,01863H,01021H,0800H
|
||
.word 07FFFH,077BDH,06F7BH,06739H,05EF7H,056B5H,04E73H,04631H
|
||
.word 03DEFH,035ADH,02D6BH,02529H,01CE7H,014A5H,0C63H,0421H
|
||
.word 07B9CH,07AF7H,07A52H,079CEH,0794AH,078A5H,07842H,06800H
|
||
.word 06000H,05800H,05000H,04800H,04000H,03800H,03000H,02800H
|
||
|
||
SUBR HRTGRY_P
|
||
.word 64
|
||
.word 00H,07F9AH,07B16H,07EF3H,076B2H,06E90H,06E6FH,06670H
|
||
.word 06A4EH,0624EH,0662DH,05E2EH,0660BH,05E0CH,05DEBH,055EDH
|
||
.word 051CAH,05586H,04DAAH,04988H,04967H,04126H,03D25H,03904H
|
||
.word 034E4H,030A2H,02CA3H,02482H,02441H,01863H,01021H,0800H
|
||
.word 07FFFH,077BDH,06F7BH,06739H,05EF7H,056B5H,04E73H,04631H
|
||
.word 03DEFH,035ADH,02D6BH,02529H,01CE7H,014A5H,0C63H,0421H
|
||
.word 06F7BH,06739H,06318H,05AD6H,05294H,04E73H,04631H,03DEFH
|
||
.word 035ADH,0318CH,0294AH,02108H,01CE7H,014A5H,0C63H,0842H
|
||
|
||
SUBR HRTYEL_P
|
||
.word 64
|
||
.word 00H,07F9AH,07B16H,07EF3H,076B2H,06E90H,06E6FH,06670H
|
||
.word 06A4EH,0624EH,0662DH,05E2EH,0660BH,05E0CH,05DEBH,055EDH
|
||
.word 051CAH,05586H,04DAAH,04988H,04967H,04126H,03D25H,03904H
|
||
.word 034E4H,030A2H,02CA3H,02482H,02441H,01863H,01021H,0800H
|
||
.word 07FFFH,077BDH,06F7BH,06739H,05EF7H,056B5H,04E73H,04631H
|
||
.word 03DEFH,035ADH,02D6BH,02529H,01CE7H,014A5H,0C63H,0421H
|
||
.word 06F58H,06F54H,06F2FH,06F0BH,06EE6H,06EC2H,06EA0H,06A60H
|
||
.word 06220H,059E0H,055A0H,04D60H,04940H,04100H,03CC0H,034A0H
|
||
|
||
SUBR LEXGRN_P
|
||
.word 64
|
||
.word 00H,07FDDH,07FBCH,07F55H,07AF4H,07AB2H,07AB0H,07A6EH
|
||
.word 06E4DH,0722CH,06A2DH,0660DH,05E0DH,061EBH,05DC9H,059A9H
|
||
.word 05189H,05167H,04546H,04103H,03D04H,03505H,02CC3H,02C81H
|
||
.word 02440H,01800H,0400H,03F6FH,02709H,0EA3H,0240H,01E0H
|
||
.word 0180H,0140H,06D8CH,06D07H,06863H,04C42H,03863H,03800H
|
||
.word 02800H,07BDEH,0739CH,06739H,056B5H,04631H,02529H,014A5H
|
||
.word 0C63H,07BFEH,067F9H,053D4H,03F8FH,02F4BH,02328H,016E5H
|
||
.word 0EA3H,0E63H,0E23H,0DE3H,0DA3H,0D63H,0D23H,0D03H
|
||
|
||
SUBR LEXPNK_P
|
||
.word 64
|
||
.word 00H,07FDDH,07FBCH,07F55H,07AF4H,07AB2H,07AB0H,07A6EH
|
||
.word 06E4DH,0722CH,06A2DH,0660DH,05E0DH,061EBH,05DC9H,059A9H
|
||
.word 05189H,05167H,04546H,04103H,03D04H,03505H,02CC3H,02C81H
|
||
.word 02440H,01800H,0400H,07F9EH,07E5AH,07D37H,07C34H,06830H
|
||
.word 0502CH,03828H,06D8CH,06D07H,06863H,04C42H,03863H,03800H
|
||
.word 02800H,07BDEH,0739CH,06739H,056B5H,04631H,02529H,014A5H
|
||
.word 0C63H,07FFFH,07F9EH,07F3DH,07EDCH,07E7BH,07E19H,07DB8H
|
||
.word 07D57H,07CF5H,07C94H,07C52H,0684FH,0544CH,03C48H,02845H
|
||
|
||
SUBR LEXORG_P
|
||
.word 64
|
||
.word 00H,07FDDH,07FBCH,07F55H,07AF4H,07AB2H,07AB0H,07A6EH
|
||
.word 06E4DH,0722CH,06A2DH,0660DH,05E0DH,061EBH,05DC9H,059A9H
|
||
.word 05189H,05167H,04546H,04103H,03D04H,03505H,02CC3H,02C81H
|
||
.word 02440H,01800H,0400H,07FB9H,07F10H,07E68H,07E00H,06D80H
|
||
.word 05520H,03CC0H,06D8CH,06D07H,06863H,04C42H,03863H,03800H
|
||
.word 02800H,07BDEH,0739CH,06739H,056B5H,04631H,02529H,014A5H
|
||
.word 0C63H,07FFFH,07FDBH,07F98H,07F54H,07F30H,07EECH,07EA9H
|
||
.word 07E65H,07E22H,075E2H,069A2H,05962H,04D42H,03D02H,030C2H
|
||
|
||
SUBR LEXGRY_P
|
||
.word 64
|
||
.word 00H,07FDDH,07FBCH,07F55H,07AF4H,07AB2H,07AB0H,07A6EH
|
||
.word 06E4DH,0722CH,06A2DH,0660DH,05E0DH,061EBH,05DC9H,059A9H
|
||
.word 05189H,05167H,04546H,04103H,03D04H,03505H,02CC3H,02C81H
|
||
.word 02440H,01800H,0400H,0739CH,06318H,05294H,04210H,0318CH
|
||
.word 02108H,014A5H,06D8CH,06D07H,06863H,04C42H,03863H,03800H
|
||
.word 02800H,07BDEH,0739CH,06739H,056B5H,04631H,02529H,014A5H
|
||
.word 0C63H,07FFFH,077BDH,06F7BH,06739H,05EF7H,05AD6H,05294H
|
||
.word 04A52H,04210H,039CEH,0318CH,0294AH,02108H,018C6H,014A5H
|
||
|
||
|
||
SUBR RZRPNK_P
|
||
.word 64
|
||
.word 00H,07FDEH,04A50H,041EDH,035CDH,02D8CH,01D07H,018E6H
|
||
.word 014C5H,010A4H,0C83H,0862H,0821H,00H,07FFEH,07FDAH
|
||
.word 07F98H,07F55H,07F54H,07F35H,07F12H,07EF3H,07ED0H,07ED1H
|
||
.word 07AD2H,07EAFH,07E8EH,07290H,0766EH,0724EH,06A4EH,06E2DH
|
||
.word 0620CH,065EAH,05DEBH,05DCAH,059CAH,055A8H,05188H,04D67H
|
||
.word 04125H,04502H,038E3H,03461H,02061H,01C20H,01000H,07FE8H
|
||
.word 07FA0H,07EE0H,065E0H,03D80H,07E19H,07DB8H,07D77H,07915H
|
||
.word 074B3H,06871H,0604FH,0542DH,04C2BH,04409H,03808H,03006H
|
||
|
||
SUBR RZRORG_P
|
||
.word 64
|
||
.word 00H,07FDEH,04A50H,041EDH,035CDH,02D8CH,01D07H,018E6H
|
||
.word 014C5H,010A4H,0C83H,0862H,0821H,00H,07FFEH,07FDAH
|
||
.word 07F98H,07F55H,07F54H,07F35H,07F12H,07EF3H,07ED0H,07ED1H
|
||
.word 07AD2H,07EAFH,07E8EH,07290H,0766EH,0724EH,06A4EH,06E2DH
|
||
.word 0620CH,065EAH,05DEBH,05DCAH,059CAH,055A8H,05188H,04D67H
|
||
.word 04125H,04502H,038E3H,03461H,02061H,01C20H,01000H,07FE8H
|
||
.word 07FA0H,07EE0H,065E0H,03D80H,07E44H,07DE0H,07DA0H,07980H
|
||
.word 06D40H,06120H,054E0H,04CC0H,040A0H,03480H,02C60H,02040H
|
||
|
||
SUBR RZRGRY_P
|
||
.word 64
|
||
.word 00H,07FDEH,04A50H,041EDH,035CDH,02D8CH,01D07H,018E6H
|
||
.word 014C5H,010A4H,0C83H,0862H,0821H,00H,07FFEH,07FDAH
|
||
.word 07F98H,07F55H,07F54H,07F35H,07F12H,07EF3H,07ED0H,07ED1H
|
||
.word 07AD2H,07EAFH,07E8EH,07290H,0766EH,0724EH,06A4EH,06E2DH
|
||
.word 0620CH,065EAH,05DEBH,05DCAH,059CAH,055A8H,05188H,04D67H
|
||
.word 04125H,04502H,038E3H,03461H,02061H,01C20H,01000H,07FE8H
|
||
.word 07FA0H,07EE0H,065E0H,03D80H,05AD6H,04A52H,03DEFH,02D6BH
|
||
.word 01CE7H,018C6H,014A5H,01084H,0C63H,0842H,0421H,0421H
|
||
|
||
SUBR RZRYEL_P
|
||
.word 64
|
||
.word 00H,07FDEH,04A50H,041EDH,035CDH,02D8CH,01D07H,018E6H
|
||
.word 014C5H,010A4H,0C83H,0862H,0821H,00H,07FFEH,07FDAH
|
||
.word 07F98H,07F55H,07F54H,07F35H,07F12H,07EF3H,07ED0H,07ED1H
|
||
.word 07AD2H,07EAFH,07E8EH,07290H,0766EH,0724EH,06A4EH,06E2DH
|
||
.word 0620CH,065EAH,05DEBH,05DCAH,059CAH,055A8H,05188H,04D67H
|
||
.word 04125H,04502H,038E3H,03461H,02061H,01C20H,01000H,07FE8H
|
||
.word 07FA0H,07EE0H,065E0H,03D80H,07BA0H,07720H,076C0H,07260H
|
||
.word 07200H,06DC0H,06180H,05940H,04D00H,040E0H,038A0H,02C80H
|
||
|
||
SUBR SHNPNK_P
|
||
.word 64
|
||
.word 00H,07FDDH,07F98H,07F58H,07F34H,07AD1H,07AB0H,0768FH
|
||
.word 06E90H,06E6EH,06E4DH,0622CH,05E0CH,059EAH,05DC9H,055CAH
|
||
.word 051A8H,04D89H,04D87H,04567H,04925H,04124H,03925H,03D03H
|
||
.word 038E2H,038C1H,030E4H,030C3H,03480H,02460H,02420H,01C40H
|
||
.word 01400H,0400H,07F5DH,07E9BH,07DFAH,07D58H,07C97H,07C16H
|
||
.word 07414H,06812H,06010H,0580FH,04C0DH,0440BH,0380AH,03008H
|
||
.word 07FFFH,0739CH,06B5AH,06318H,05AD6H,05294H,04631H,03DEFH
|
||
.word 035ADH,02D6BH,02529H,01CE7H,014A5H,0C63H,0421H,00H
|
||
|
||
SUBR SHNORG_P
|
||
.word 64
|
||
.word 00H,07FDDH,07F98H,07F58H,07F34H,07AD1H,07AB0H,0768FH
|
||
.word 06E90H,06E6EH,06E4DH,0622CH,05E0CH,059EAH,05DC9H,055CAH
|
||
.word 051A8H,04D89H,04D87H,04567H,04925H,04124H,03925H,03D03H
|
||
.word 038E2H,038C1H,030E4H,030C3H,03480H,02460H,02420H,01C40H
|
||
.word 01400H,0400H,07EA8H,07E86H,07E64H,07E43H,07E01H,07DE0H
|
||
.word 075C0H,069A0H,06180H,05940H,04D20H,04500H,038E0H,030C0H
|
||
.word 07FFFH,0739CH,06B5AH,06318H,05AD6H,05294H,04631H,03DEFH
|
||
.word 035ADH,02D6BH,02529H,01CE7H,014A5H,0C63H,0421H,00H
|
||
|
||
SUBR SHNGRY_P
|
||
.word 64
|
||
.word 00H,07FDDH,07F98H,07F58H,07F34H,07AD1H,07AB0H,0768FH
|
||
.word 06E90H,06E6EH,06E4DH,0622CH,05E0CH,059EAH,05DC9H,055CAH
|
||
.word 051A8H,04D89H,04D87H,04567H,04925H,04124H,03925H,03D03H
|
||
.word 038E2H,038C1H,030E4H,030C3H,03480H,02460H,02420H,01C40H
|
||
.word 01400H,0400H,06318H,05AD6H,05294H,04A52H,04210H,039CEH
|
||
.word 035ADH,02D6BH,02529H,01CE7H,014A5H,0C63H,0421H,00H
|
||
.word 07FFFH,0739CH,06B5AH,06318H,05AD6H,05294H,04631H,03DEFH
|
||
.word 035ADH,02D6BH,02529H,01CE7H,014A5H,0C63H,0421H,00H
|
||
|
||
SUBR SHNYEL_P
|
||
.word 64
|
||
.word 00H,07FDDH,07F98H,07F58H,07F34H,07AD1H,07AB0H,0768FH
|
||
.word 06E90H,06E6EH,06E4DH,0622CH,05E0CH,059EAH,05DC9H,055CAH
|
||
.word 051A8H,04D89H,04D87H,04567H,04925H,04124H,03925H,03D03H
|
||
.word 038E2H,038C1H,030E4H,030C3H,03480H,02460H,02420H,01C40H
|
||
.word 01400H,0400H,07FD8H,07FB3H,07F8EH,07F89H,07F84H,07F80H
|
||
.word 07300H,06AA0H,05E20H,055E0H,04980H,03D20H,034E0H,028A0H
|
||
.word 07FFFH,0739CH,06B5AH,06318H,05AD6H,05294H,04631H,03DEFH
|
||
.word 035ADH,02D6BH,02529H,01CE7H,014A5H,0C63H,0421H,00H
|
||
|
||
|
||
SUBR UNDPNK_P
|
||
.word 64
|
||
.word 00H,07BBBH,07B77H,076F3H,06EB0H,0666FH,05E2DH,051EBH
|
||
.word 049CBH,045A9H,04167H,03947H,03D25H,03D03H,03105H,030E3H
|
||
.word 028C3H,02C80H,02081H,01861H,01840H,01420H,0C00H,07FFFH
|
||
.word 06B39H,06717H,062F6H,05AD5H,05272H,04A51H,0420FH,03DEEH
|
||
.word 039CDH,035ACH,0318BH,0316AH,02949H,02107H,01CE6H,014C5H
|
||
.word 014A4H,0C83H,0862H,0841H,0441H,0420H,07E9DH,07E3CH
|
||
.word 07DFBH,07D9AH,07D5AH,07D19H,07CB8H,07C95H,07493H,05C0DH
|
||
.word 0540CH,04C0AH,04409H,03C08H,03406H,02C05H,02404H,01C03H
|
||
|
||
SUBR UNDORG_P
|
||
.word 64
|
||
.word 00H,07BBBH,07B77H,076F3H,06EB0H,0666FH,05E2DH,051EBH
|
||
.word 049CBH,045A9H,04167H,03947H,03D25H,03D03H,03105H,030E3H
|
||
.word 028C3H,02C80H,02081H,01861H,01840H,01420H,0C00H,07FFFH
|
||
.word 06B39H,06717H,062F6H,05AD5H,05272H,04A51H,0420FH,03DEEH
|
||
.word 039CDH,035ACH,0318BH,0316AH,02949H,02107H,01CE6H,014C5H
|
||
.word 014A4H,0C83H,0862H,0841H,0441H,0420H,07E65H,07E44H
|
||
.word 07E22H,07E21H,07E00H,07DE0H,075C0H,06DA0H,06980H,05920H
|
||
.word 05100H,048E0H,040C0H,038C0H,030A0H,02880H,02060H,01C40H
|
||
|
||
SUBR UNDYEL_P
|
||
.word 64
|
||
.word 00H,07BBBH,07B77H,076F3H,06EB0H,0666FH,05E2DH,051EBH
|
||
.word 049CBH,045A9H,04167H,03947H,03D25H,03D03H,03105H,030E3H
|
||
.word 028C3H,02C80H,02081H,01861H,01840H,01420H,0C00H,07FFFH
|
||
.word 06B39H,06717H,062F6H,05AD5H,05272H,04A51H,0420FH,03DEEH
|
||
.word 039CDH,035ACH,0318BH,0316AH,02949H,02107H,01CE6H,014C5H
|
||
.word 014A4H,0C83H,0862H,0841H,0441H,0420H,07FEBH,07FC8H
|
||
.word 07FA5H,07F82H,07F60H,07700H,06EC0H,06660H,05E20H,055C0H
|
||
.word 04D80H,04540H,03D20H,034E0H,02CA0H,02480H,01C60H,01440H
|
||
|
||
SUBR UNDRED_P
|
||
.word 64
|
||
.word 0318ch,07bbbh,07b77h,076f3h,06eb0h,0666fh,05e2dh,051ebh
|
||
.word 049cbh,045a9h,04167h,03947h,03d25h,03d03h,03105h,030e3h
|
||
.word 028c3h,02c80h,02081h,01861h,01840h,01420h,00c00h,07bddh
|
||
.word 06b39h,06717h,062f6h,05ad5h,05272h,04a51h,0420fh,03deeh
|
||
.word 039cdh,035ach,0318bh,0316ah,02949h,02107h,01ce6h,014c5h
|
||
.word 014a4h,00c83h,00862h,00841h,00441h,00420h,07cc6h,07cc6h
|
||
.word 07cc6h,078c6h,06ca5h,06084h,05863h,04c42h,04421h,03800h
|
||
.word 03000h,02c00h,02400h,02000h,01800h,01000h,00c00h,00400h
|
||
|
||
SUBR YOKPNK_P
|
||
.word 64
|
||
.word 00H,07FFFH,0739CH,06B5AH,06318H,05AD6H,05294H,04A52H
|
||
.word 04210H,039CEH,0318CH,0294AH,02108H,014A5H,0C63H,0421H
|
||
.word 0400H,07F9AH,07B14H,07EF1H,07ACFH,076B0H,0768EH,06E4BH
|
||
.word 06A4DH,0622CH,0660BH,05A0CH,059EAH,051A8H,05187H,04988H
|
||
.word 04966H,04124H,04102H,03904H,038E2H,030A1H,03480H,02881H
|
||
.word 02840H,02400H,01400H,07EDCH,07E7BH,07E1AH,07DBAH,07D5AH
|
||
.word 07CFAH,078D8H,070B7H,06CB5H,06894H,06473H,05C71H,05850H
|
||
.word 0544FH,04C2DH,0482CH,0440BH,03C0AH,03809H,03408H,02C07H
|
||
|
||
SUBR YOKORG_P
|
||
.word 64
|
||
.word 00H,07FFFH,0739CH,06B5AH,06318H,05AD6H,05294H,04A52H
|
||
.word 04210H,039CEH,0318CH,0294AH,02108H,014A5H,0C63H,0421H
|
||
.word 0400H,07F9AH,07B14H,07EF1H,07ACFH,076B0H,0768EH,06E4BH
|
||
.word 06A4DH,0622CH,0660BH,05A0CH,059EAH,051A8H,05187H,04988H
|
||
.word 04966H,04124H,04102H,03904H,038E2H,030A1H,03480H,02881H
|
||
.word 02840H,02400H,01400H,07F10H,07ECDH,07E89H,07E46H,07E22H
|
||
.word 07DE0H,079C0H,071A0H,06D80H,06560H,06140H,05920H,05500H
|
||
.word 04D00H,048E0H,040C0H,044C0H,03CC0H,038A0H,03480H,02C80H
|
||
|
||
SUBR YOKGRY_P
|
||
.word 64
|
||
.word 00H,07FFFH,0739CH,06B5AH,06318H,05AD6H,05294H,04A52H
|
||
.word 04210H,039CEH,0318CH,0294AH,02108H,014A5H,0C63H,0421H
|
||
.word 0400H,07F9AH,07B14H,07EF1H,07ACFH,076B0H,0768EH,06E4BH
|
||
.word 06A4DH,0622CH,0660BH,05A0CH,059EAH,051A8H,05187H,04988H
|
||
.word 04966H,04124H,04102H,03904H,038E2H,030A1H,03480H,02881H
|
||
.word 02840H,02400H,01400H,05AD6H,05294H,04E73H,04A52H,04210H
|
||
.word 03DEFH,039CEH,0318CH,02D6BH,0294AH,02108H,01CE7H,018C6H
|
||
.word 014A5H,0C63H,01084H,0C63H,0421H,00H,00H,00H
|
||
|
||
SUBR YOKYEL_P
|
||
.word 64
|
||
.word 00H,07FFFH,0739CH,06B5AH,06318H,05AD6H,05294H,04A52H
|
||
.word 04210H,039CEH,0318CH,0294AH,02108H,014A5H,0C63H,0421H
|
||
.word 0400H,07F9AH,07B14H,07EF1H,07ACFH,076B0H,0768EH,06E4BH
|
||
.word 06A4DH,0622CH,0660BH,05A0CH,059EAH,051A8H,05187H,04988H
|
||
.word 04966H,04124H,04102H,03904H,038E2H,030A1H,03480H,02881H
|
||
.word 02840H,02400H,01400H,07B8FH,07B6CH,07B48H,07B45H,07B21H
|
||
.word 07B20H,076E0H,06EA0H,06A60H,06640H,05E00H,059C0H,051A0H
|
||
.word 04D60H,04940H,04100H,04500H,040E0H,038C0H,034A0H,02C80H
|
||
|
||
.ENDIF
|
||
******************************************************************************
|
||
|
||
.end
|
||
|