Tolik-Trek/Shared_Includes
1
0
Fork 0
mirror of https://github.com/Tolik-Trek/Shared_Includes.git synced 2026-06-15 09:01:33 +03:00
Code Issues Actions Packages Projects Releases Wiki Activity

Revert "..."

Browse Source 
This reverts commit 8d9f57d8ca.
This commit is contained in:
Anatoliy Belyanskiy 2023-07-17 03:53:25 +10:00
parent 71064f7df2
commit 3ea4849169
2 changed files with 3 additions and 165 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
constants/SP2000.inc
View File

@ -1654,6 +1654,7 @@ SIO:
.Ch_B.Ctrl EQU #1B ; Control register keyboard & mouse CMOUSE .Ch_B.Ctrl EQU #1B ; Control register keyboard & mouse CMOUSE
PIO: PIO:
.Port_A.Data EQU #1C ; Data register LPT 1 .Port_A.Data EQU #1C ; Data register LPT 1
.Port_A.Command EQU #1D ; Command register LPT 1 .Port_A.Command EQU #1D ; Command register LPT 1

167
constants/dss_equ.inc
View File

@ -224,8 +224,8 @@ sys:
.WRITE_PROTECT EQU #18 ; 24 - § é¨â  § ¯¨á¨ .WRITE_PROTECT EQU #18 ; 24 - § é¨â  § ¯¨á¨
.READ_ERROR EQU #19 ; 25 - ®è¨¡ª  ç⥭¨ï .READ_ERROR EQU #19 ; 25 - ®è¨¡ª  ç⥭¨ï
.WRITE_ERROR EQU #1A ; 26 - ®è¨¡ª  § ¯¨á¨ .WRITE_ERROR EQU #1A ; 26 - ®è¨¡ª  § ¯¨á¨
.GENERAL_FAILURE EQU #1B ; 27 - ®΅ι ο ®θ¨΅<C2A8>  ;.GENERAL_FAILURE EQU #1B ; 27 - ®¡é ï ®è¨¡ª 
;.DRIVE_FAILURE EQU #1B ; 27 - α΅®© ¤¨α<C2A8>  .DRIVE_FAILURE EQU #1B ; 27 - á¡®© ¤¨áª 
;.RESERVED_28 EQU #1C ; 28 - § à¥§¥à¢¨à®¢ ­ ;.RESERVED_28 EQU #1C ; 28 - § à¥§¥à¢¨à®¢ ­
;.RESERVED_29 EQU #1D ; 29 - § à¥§¥à¢¨à®¢ ­ ;.RESERVED_29 EQU #1D ; 29 - § à¥§¥à¢¨à®¢ ­
.NOT_ENOUGH_MEMORY EQU #1E ; 30 - ­¥¤®áâ â®ç­® ¯ ¬ï⨠.NOT_ENOUGH_MEMORY EQU #1E ; 30 - ­¥¤®áâ â®ç­® ¯ ¬ïâ¨
@ -342,169 +342,6 @@ _cc:
;--------------------------------------- ;---------------------------------------
; ;
/*
<EFBFBD>­β¥pδ¥©α ¤«ο p ΅®βλ α ¬λθμξ:
‚§ ¨¬®¤¥©αβΆ¨¥ α ¤p ©Ά¥p®¬ ¬λθ¨ ®αγι¥αβΆ«ο¥βαο ―p¨ ―®¬®ι¨ ¨­αβpγ<EFBFBD>樨 RST 30h. ‚ § Ά¨α¨¬®αβ¨ ®β <EFBFBD>®­<EFBFBD>p¥β­®© δγ­<EFBFBD>樨, Ά <EFBFBD> η¥αβΆ¥ Άε®¤­λε ¨ Άλ室­λε ― p ¬¥βp®Ά ¨α―®«μ§γξβαο p §«¨η­λ¥ p¥£¨αβpλ, ―p¨ ν⮬ ­®¬¥p δγ­<EFBFBD>樨 § ¤ ¥βαο Ά p¥£¨αβp¥ C. ‹ξ΅λ¥ ―¥p¥¬¥ι¥­¨ο ¬λθ¨ ¨ ­ ¦ β¨¥ ­  <EFBFBD>« Ά¨θ¨ Ά®α―p¨­¨¬ ¥β α―¥ζ¨ «μ­ ο ―p®£p ¬¬  ¤p ©Ά¥p ¬λθ¨. <EFBFBD> ¦¤®¥ ­ ¦ β¨¥ ¨ ®β―γα<EFBFBD> ­¨¥ <EFBFBD>« Ά¨θ ¨«¨ ―¥p¥¬¥ι¥­¨¥ ¬λθ¨ Άλ§λΆ ¥β ―p¥pλΆ ­¨¥. <EFBFBD>p®£p ¬¬ , ®΅α«γ¦¨Ά ξι ο νβ® ―p¥pλΆ ­¨¥, η¨β ¥β ― <EFBFBD>¥β ¤ ­­λε ®β ¬λθ¨ ¨ ―¥p¥¬¥ι ¥β <EFBFBD>γpα®p ¬λθ¨ Ά § Ά¨α¨¬®αβ¨ ®β ―®«γη¥­­λε ¤ ­­λε.
00h (00) INITIALIZATION (<EFBFBD>­¨ζ¨ «¨§ ζ¨ο ¤p ©Ά¥p  ¬λθ¨)
Άε®¤­λ¥ ¤ ­­λ¥:
C - 00h
Άλ室­λ¥ ¤ ­­λ¥:
A - ¤p ©Ά¥p ­¥ γαβ ­®Ά«¥­, ¥α«¨ CF=1
A - γα―¥θ­ ο ¨­¨ζ¨ «¨§ ζ¨ο, ¤p ©Ά¥p γαβ ­®Ά«¥­, ¥α«¨ CF=0
”γ­<EFBFBD>ζ¨ο ―p®¨§Ά®¤¨β ­ η «μ­γξ ¨­¨ζ¨ «¨§ ζ¨ξ ¤p ©Ά¥p  ¬λθ¨. <EFBFBD>p¨ Ά®§Άp ι¥­¨¨ δ« £  ―¥p¥­®α  ¤p ©Ά¥p ­¥ γαβ ­®Ά«¥­.
01h (01) SHOW MOUSE CURSOR (‚λΆ¥αβ¨ <EFBFBD>γpα®p ¬λθ¨ ­  ν<EFBFBD>p ­)
Άε®¤­λ¥ ¤ ­­λ¥:
C - 01h
Άλ室­λ¥ ¤ ­­λ¥:
A - <EFBFBD>®¤ ®θ¨΅<EFBFBD>¨, ¥α«¨ CF=1
”γ­<EFBFBD>ζ¨ο ΆλΆ®¤¨β ­  ν<EFBFBD>p ­ <EFBFBD>γpα®p ¬λθ¨ ¨ ®βα«¥¦¨Ά ¥β Άα¥ ―¥p¥¬¥ι¥­¨ο <EFBFBD>γpα®p  ¨ ―¥p¥p¨α®ΆλΆ ¥β ¥£®.
02h (02) HIDE MOUSE CURSOR (“΅p βμ <EFBFBD>γpα®p ¬λθ¨ α ν<EFBFBD>p ­ )
Άε®¤­λ¥ ¤ ­­λ¥:
C - 02h
Άλ室­λ¥ ¤ ­­λ¥:
A - <EFBFBD>®¤ ®θ¨΅<EFBFBD>¨, ¥α«¨ CF=1
”γ­<EFBFBD>ζ¨ο αβ¨p ¥β <EFBFBD>γpα®p ¬λθ¨ α ν<EFBFBD>p ­ , ­® ¤p ©Ά¥p ―p®¤®«¦ ¥β ®βα«¥¦¨Ά ­¨¥ ―¥p¥¬¥ι¥­¨ο ¬λθ¨ ¨ ­ ¦ β¨¥ ­  <EFBFBD>­®―<EFBFBD>¨.
03h (03) READ MOUSE STATE (—β¥­¨¥ α®αβ®ο­¨ο ¬λθ¨)
Άε®¤­λ¥ ¤ ­­λ¥:
C - 03h
Άλ室­λ¥ ¤ ­­λ¥:
A - <EFBFBD>®¤ ®θ¨΅<EFBFBD>¨, ¥α«¨ CF=1
A - α®αβ®ο­¨¥ <EFBFBD>­®―®<EFBFBD>
D0 - «¥Ά ο
D1 - ―p Ά ο
HL - x-<EFBFBD>®®p¤¨­ β 
DE - y-<EFBFBD>®®p¤¨­ β 
”γ­<EFBFBD>ζ¨ο Ά®§Άp ι ¥β β¥<EFBFBD>γ騥 <EFBFBD>®®p¤¨­ βλ <EFBFBD>γpα®p  ¬λθ¨ ¨ α®αβ®ο­¨¥ ¥¥ <EFBFBD>­®―®<EFBFBD>. <EFBFBD>®®p¤¨­ βλ Ά®§Άp ι ξβαο Ά β®η<EFBFBD> ε ¨ ¤«ο β¥<EFBFBD>αβ®Άλε p¥¦¨¬®Ά ­¥®΅ε®¤¨¬® ¨ε ¤¥«¨βμ ­  Ά®α¥¬μ ¤«ο ―®«γη¥­¨ο <EFBFBD>®®p¤¨­ β Ά §­ <EFBFBD>®¬¥αβ ε.
04h (04) GOTO MOUSE CURSOR (“αβ ­®Ά<EFBFBD>  <EFBFBD>®®p¤¨­ β <EFBFBD>γpα®p  ¬λθ¨)
Άε®¤­λ¥ ¤ ­­λ¥:
C - 04h
HL - x-<EFBFBD>®®p¤¨­ β 
DE - y-<EFBFBD>®®p¤¨­ β 
Άλ室­λ¥ ¤ ­­λ¥:
A - <EFBFBD>®¤ ®θ¨΅<EFBFBD>¨, ¥α«¨ CF=1
“αβ ­®Ά<EFBFBD>  <EFBFBD>®®p¤¨­ β <EFBFBD>γpα®p  ¬λθ¨. ”γ­<EFBFBD>ζ¨ο ―¥p¥¬¥ι ¥β <EFBFBD>γpα®p ¬λθ¨ Ά § ¤ ­­λ¥ <EFBFBD>®®p¤¨­ βλ.
07h (07) VERT. BOUNDS (‡ ¤ ­¨¥ Ά¥pβ¨<EFBFBD> «μ­λε £p ­¨ζ ―¥p¥¬¥ι¥­¨ο <EFBFBD>γpα®p )
Άε®¤­λ¥ ¤ ­­λ¥:
C - 07h
HL - y-¬¨­¨¬ «μ­ ο
DE - y-¬ <EFBFBD>ᨬ «μ­ ο
Άλ室­λ¥ ¤ ­­λ¥:
A - <EFBFBD>®¤ ®θ¨΅<EFBFBD>¨, ¥α«¨ CF=1
”γ­<EFBFBD>ζ¨ο § ¤ ¥β Ά¥pε­ξξ ¬¨­¨¬ «μ­γξ ¨ ­¨¦­ξξ ¬ <EFBFBD>ᨬ «μ­γξ <EFBFBD>®®p¤¨­ βλ Ά <EFBFBD>®β®pλε ¬®¦¥β ―¥p¥¬¥ι βμαο <EFBFBD>γpα®p ¬λθ¨ ―® Ά¥pβ¨<EFBFBD> «¨.
08h (08) HORZ. BOUNDS (‡ ¤ ­¨¥ £®p¨§®­β «μ­λε £p ­¨ζ ―¥p¥¬¥ι¥­¨ο <EFBFBD>γpα®p )
Άε®¤­λ¥ ¤ ­­λ¥:
C - 08h
HL - x-¬¨­¨¬ «μ­ ο
DE - x-¬ <EFBFBD>ᨬ «μ­ ο
Άλ室­λ¥ ¤ ­­λ¥:
A - <EFBFBD>®¤ ®θ¨΅<EFBFBD>¨, ¥α«¨ CF=1
”γ­<EFBFBD>ζ¨ο § ¤ ¥β «¥Άγξ ¬¨­¨¬ «μ­γξ ¨ ―p Άγξ ¬ <EFBFBD>ᨬ «μ­γξ <EFBFBD>®®p¤¨­ βλ Ά <EFBFBD>®β®pλε ¬®¦¥β ―¥p¥¬¥ι βμαο <EFBFBD>γpα®p ¬λθ¨ ―® £®p¨§®­β «¨.
09h (09) LOAD CURSOR (‡ £pγ§<EFBFBD>  ¨§®΅p ¦¥­¨ο <EFBFBD>γpα®p  ¬λθ¨)
Άε®¤­λ¥ ¤ ­­λ¥:
C - 09h
B = 0
IX - ¨§®΅p ¦¥­¨¥ <EFBFBD>γpα®p 
H - Άλα®β  <EFBFBD>γpα®p 
L - θ¨p¨­  <EFBFBD>γpα®p 
D - Y  <EFBFBD>β¨Ά­ ο β®η<EFBFBD> 
E - X  <EFBFBD>β¨Ά­ ο β®η<EFBFBD> 
Άλ室­λ¥ ¤ ­­λ¥:
A - <EFBFBD>®¤ ®θ¨΅<EFBFBD>¨, ¥α«¨ CF=1
”γ­<EFBFBD>ζ¨ο § £pγ¦ ¥β ­®Ά®¥ ¨§®΅p ¦¥­¨¥ <EFBFBD>γpα®p  ¬λθ¨ Ά ¤p ©Ά¥p ¨ § ¤ βμ  <EFBFBD>β¨Ά­γξ β®η<EFBFBD>γ ¨§®΅p ¦¥­¨ο.
0Ah (10) CURSOR TEXT MODES (“αβ ­®Ά<EFBFBD>  <EFBFBD>γpα®p  ¬λθ¨ Ά β¥<EFBFBD>αβ®Ά®¬ p¥¦¨¬¥)
Άε®¤­λ¥ ¤ ­­λ¥:
C - 0Ah
B = 0
H - AND SIMBOL MASK
L - XOR SIMBOL MASK
D - AND ATTRIBUT MASK
E - XOR ATTRIBUT MASK
Άλ室­λ¥ ¤ ­­λ¥:
A - <EFBFBD>®¤ ®θ¨΅<EFBFBD>¨, ¥α«¨ CF=1
”γ­<EFBFBD>ζ¨ο γαβ ­ Ά«¨Ά ¥β ᨬΆ®« ¨  βp¨΅γβ <EFBFBD>γpα®p  ¬λθ¨ ¤«ο β¥<EFBFBD>αβ®Ά®£® p¥¦¨¬ .
0Bh (11) RETURN CURSOR (<EFBFBD>®«γη¥­¨¥ ¨§®΅p ¦¥­¨ο <EFBFBD>γpα®p  ¬λθ¨)
Άε®¤­λ¥ ¤ ­­λ¥:
C - 0Bh
IX - ΅γδ¥p ¤«ο ¨§®΅p ¦¥­¨ο <EFBFBD>γpα®p 
Άλ室­λ¥ ¤ ­­λ¥:
A - <EFBFBD>®¤ ®θ¨΅<EFBFBD>¨, ¥α«¨ CF=1
H - Άλα®β  <EFBFBD>γpα®p 
L - θ¨p¨­  <EFBFBD>γpα®p 
D - Y  <EFBFBD>β¨Ά­ ο β®η<EFBFBD> 
E - X  <EFBFBD>β¨Ά­ ο β®η<EFBFBD> 
”γ­<EFBFBD>ζ¨ο Ά®§Άp ι ¥β ¨§®΅p ¦¥­¨¥ <EFBFBD>γpα®p  ¬λθ¨ ¨§ ¤p ©Ά¥p .
0Eh (14) GET SENSETIVE (—β¥­¨¥ ηγΆα⢨⥫쭮αβ¨ ¬λθ¨)
Άε®¤­λ¥ ¤ ­­λ¥:
C - 0Eh
Άλ室­λ¥ ¤ ­­λ¥:
A - <EFBFBD>®¤ ®θ¨΅<EFBFBD>¨, ¥α«¨ CF=1
H - ηγΆα⢨⥫쭮αβμ ―® Ά¥pβ¨<EFBFBD> «¨
L - ηγΆα⢨⥫쭮αβμ ―® £®p¨§®­β «¨
”γ­<EFBFBD>ζ¨ο Ά®§Άp ι ¥β §­ η¥­¨ο ηγΆα⢨⥫쭮αβ¨ ―¥p¥¬¥ι¥­¨ο ¬λθ¨ ―® Ά¥pβ¨<EFBFBD> «¨ ¨ £®p¨§®­β «¨.
0Fh (15) SET SENSETIVE (“αβ ­®Ά<EFBFBD>  ηγΆα⢨⥫쭮αβ¨ ¬λθ¨)
Άε®¤­λ¥ ¤ ­­λ¥:
C - 0Fh
H - ηγΆα⢨⥫쭮αβμ ―® Ά¥pβ¨<EFBFBD> «¨
L - ηγΆα⢨⥫쭮αβμ ―® £®p¨§®­β «¨
Άλ室­λ¥ ¤ ­­λ¥:
A - <EFBFBD>®¤ ®θ¨΅<EFBFBD>¨, ¥α«¨ CF=1
”γ­<EFBFBD>ζ¨ο γαβ ­ Ά«¨Ά ¥β §­ η¥­¨ο ηγΆα⢨⥫쭮αβ¨ ―¥p¥¬¥ι¥­¨ο ¬λθ¨ ―® Ά¥pβ¨<EFBFBD> «¨ ¨ £®p¨§®­β «¨.
80h (128) MOUSE HARDWARE INTERRUPT (<EFBFBD>΅p ΅®βη¨<EFBFBD>  ―― p β­®£® ―p¥pλΆ ­¨ο ®β ¬λθ¨)
Άε®¤­λ¥ ¤ ­­λ¥:
C - 80h
Άλ室­λ¥ ¤ ­­λ¥:
A - <EFBFBD>®¤ ®θ¨΅<EFBFBD>¨, ¥α«¨ CF=1
<EFBFBD>® ―p¨ε®¤γ ―p¥pλΆ ­¨ο ®β ¬λθ¨ Άλ§λΆ ¥βαο ¤ ­­ ο δγ­<EFBFBD>ζ¨ο ¤p ©Ά¥p . ‚ α«γη ¥ <EFBFBD>®£¤  βp¥΅γ¥βαο p ΅®β  ―®¤―p®£p ¬¬λ ―p¨ § ―p¥ι¥­­λε ―p¥pλΆ ­¨οε, ¨α―®«μ§γ©β¥ ¤ ­­γξ δγ­<EFBFBD>ζ¨ξ, ¤«ο ¨§΅¥¦ ­¨ο ―®β¥pμ ― <EFBFBD>¥β®Ά ¤ ­­λε ®β ¬λθ¨.
81h (129) CHANGE VIDEO MODE (<EFBFBD>­δ®p¬¨p®Ά ­¨¥ ® ᬥ­¥ p¥¦¨¬  ν<EFBFBD>p ­ )
Άε®¤­λ¥ ¤ ­­λ¥:
C - 81h
A - p¥¦¨¬ ν<EFBFBD>p ­ 
Άλ室­λ¥ ¤ ­­λ¥:
A - <EFBFBD>®¤ ®θ¨΅<EFBFBD>¨, ¥α«¨ CF=1
”γ­<EFBFBD>ζ¨ο ¨­δ®p¬¨pγ¥β ¤p ©Ά¥p ¬λθ¨ ®΅ ¨§¬¥­¥­¨¨ p¥¦¨¬  ν<EFBFBD>p ­ . H®¬¥p  p¥¦¨¬®Ά α®®βΆ¥βαβΆγξβ δγ­<EFBFBD>樨 γαβ ­®Ά<EFBFBD>  p¥¦¨¬  ν<EFBFBD>p ­ .
83h (131) MOUSE REFRESH (<EFBFBD>p¨­γ¤¨β¥«μ­ ο ―¥p¥p¨α®Ά<EFBFBD>  <EFBFBD>γpα®p )
Άε®¤­λ¥ ¤ ­­λ¥:
C - 83h
Άλ室­λ¥ ¤ ­­λ¥:
A - <EFBFBD>®¤ ®θ¨΅<EFBFBD>¨, ¥α«¨ CF=1
”γ­<EFBFBD>ζ¨ο ―¥p¥p¨α®ΆλΆ ¥β ¨§®΅p ¦¥­¨¥ <EFBFBD>γpα®p  ¬λθ¨ ­  ν<EFBFBD>p ­¥ ­¥ ¤®¦¨¤ οαμ ®η¥p¥¤­®£® ―p¥pλΆ ­¨ο.
<EFBFBD>®¤λ ®θ¨΅®<EFBFBD> ®β ¤p ©Ά¥p  ¬λθ¨:
0 - ­¥β ®θ¨΅®<EFBFBD>
1 - ­¥¨§Ά¥αβ­ ο δγ­<EFBFBD>ζ¨ο
2 - § p¥§¥pΆ¨p®Ά ­ 
3 - <EFBFBD>γpα®p 㦥 ­  ν<EFBFBD>p ­¥
4 - <EFBFBD>γpα®p ®βαγβαβΆγ¥β ­  ν<EFBFBD>p ­¥
5 - ¨§®΅p ¦¥­¨¥ <EFBFBD>γpα®p  ᫨θ<EFBFBD>®¬ Ά¥«¨<EFBFBD>®
*/
; <EFBFBD>ਫ®¦¥­¨¥ <EFBFBD>. ’ ¡«¨æ  ¯®§¨æ¨®­­ëå ª®¤®¢ ; <EFBFBD>ਫ®¦¥­¨¥ <EFBFBD>. ’ ¡«¨æ  ¯®§¨æ¨®­­ëå ª®¤®¢