  5.07  
      

 1.  
ALASM  p ६  ᪮쪨 ⥪⠬
 ࠧ ࠭ . 室  ।஢ 
࠭  㣮 ⢫  paGe [࠭]
  ssENTER ( ᯨ᪠).
࠭ 㬥  ᪥ ᨬ쭮 祭,
।  ࠩ ७ .
 訥 3  ᮮ⢥ ⠬ 0-2  #7FFD.
 ᪥ ᥬ ஢    ᥬ 쬨
⠬  ࠭ ࠩ.  १ 뢮 
࠭   XXXX kB mask XX. ᫠ 㪠뢠, ᪮쪮 
㯭 ᥬ     ࠭ ⢥ 
.  ⨬ ⠬ ᪨ ࠭  PAGE  .
⥪  ࠡ     #6dff!

 2.   
믮    ࢠ ⨥ BREAK.
᫨  १     
⥪,  뤠    ࠭.

 Quit [][,࠭]
室  ᥬ. ᫨ ࠬ  , ந室 室
⨯ RET,  JP  ""  "࠭".

 Debug
맮 ⫠稪 STS7.0.

 Run [][,࠭]
 ணࠬ.  㬮砭 ""=祭 ᫥
४⨢ ORG, "࠭"=0.

 Work [drv:][filename[.ext]]
㧪 䠩  ⥪ ࠭.  㬮砭 ७ "H".
"filename"  ।⠢ ᮡ .  ⮬ 砥 㤥
㦥 ᫥ 䠩,   㤮⢮.
᫨ "filename"  , 짮⥫
롨ࠥ 䠩  ⠫ ஬.

 Catalogue [drv:][mask]
⮡ࠦ ⠫ ᪠.  㬮砭 mask="*.*" ( 䠩).
ଠ ᪨:  "?" ।,    樨 
室  ᨬ.  "*" ।,    
 ᨬ ந.  ⨦ ࠭⥫ ("." 
 ப) ।,   ஡.
Catalogue C - , ⮡ 㢨 ࠬ ᪠,  
 ⠫

 Name [newfilename[.ext]]
८ ⥪騩 ⥪.

 Edit [᪮:][ 䠩]
஢ ⥪  ⥪饩 ࠭. ᫨ 
" 䠩", 䠩  ⠪  㦠  ⥪ ࠭.
᫨  䠩  ᪥  ,  ⥪饩 ࠭ ᮧ
 䠩   .

 merGe [᪮:] 䠩
㧪 䠩 ଠ ALASM   ⥪饣 䠩.

 counT 䬥᪮ ࠦ
⠥ ࠦ.

 sYmbol [᪠|=᫮ ࠦ]
᮪ ⮪  ᪥   祭. ⠥ ⮫쪮 ᫥
樨.
᫮ - 祭 ⪨
NoDef - ⪠  뫠 ।,  뫠 ᯮ짮
Macro - ⪠   
Wrong - ଠ ⪨  । - 訡 樨.

 Assemble
 ⥪  ⥪饩 ࠭.

 Save [+|!][drv:]
  .  㪠 "+"  ⥪騩  㪠
᪮ 뢠   䠩.  "!"  .
 ⮫쪮 ⥪騩.

 Move
믮 TR-DOS'  MOVE.
   #7400.

 Info
뢠  ᨨ, ᯨ᮪ ⥬ ࠭  
ᯨ᮪ 䠩  .  ਧ  䠩
'+',  ⠪  稪 訡  ࠭, , ᫨
 ,  ப ⥪.

 Page [࠭]
 ࠭ ⠭ ⥪饩.

 driVe drv
 ᪮ ⠭ ⥪騬.

 Jumb [+]
 ࠬ ᪠ ⥪  ⥪饩 ࠭  楫 
४⨢ "-"  "+" (  ⮬᪨ ந 
㧪  䠩  ᪠).  ࠬ஬ + ᪠ 
⥪  .

 ssENTER
롮 ।㥬 䠩  室  .

 Ban [+]
⪠ ࠭ ⥪ (  ⥪⮢).

騥  ૥:
 conFig
ன.  ࠭    ⥫ ᬠ.

 impOrt [drv:][mask]
 ⥪⮢ 䠩  ७ ଠ ALASM.
樮쭮 ॢ ⮪  孨 ॣ  ० ப 
  祪. ।  䠩 
ᮮ⢥饣 ᪥ ᯨ᪠.
 砥 ९ ࠭ ⠢
 䠩   ஢   ࠭.

 eXport [+][drv:]
뢠   ⥪騩 室 ( )  ⥪⮬.

 3.  
 । ࠭ ࠧ  
।஢  ப ,  뢮  ࠭ 
 ⥪饣 䠩, ⢮ ᢮   ⮩ ࠭,
ꥬ ᮤন ଠ  ⥪饩 ப  ⥪, ࠧ
⥪  ⥪騩 ० ।஢ (Ins/Ovr).

᮪  । ( Extend):
 Quit - 室  .
 Assemble, counT -  ⠬.
 Begin, End -  砫/ ⥪.
 Search [ப ᨬ]
. 稭  樨, ᫥饩  ஬ 
த   ⥪.    த 
ssI, 祬 ᫨     ⥪,   
 砫. ᫨ ࠬ "ப ᨬ"  㪠, 㤥
ᯮ짮 ப,    ࠧ.
 sYmbol [砫  ⪨]
 । ⪨. ।,  ⪠ 室 
砫 ப.
 Xreplace ப1ப2
 ப1  ப2.
Y-, N-᪠ , G- , BREAK-ࢠ.
 coDe XXX>[ ᨬ]
  ⥪ ᨬ  ந . XXX 뢠 
ᨬ  ஬.
 Restore
⠢ ᮤন ଠ  .
 ࠧ襭  ଠ 뢠.
 Clear
⪠ ଠ.
 Ins/ovr
⠢/. ﭨ  ࠭  䨣.
 Undo
⬥  ப ( ⮫쪮  ⥪ ப).
⨬.
 Labels
 ࠭ 뤠  ⪨, 騥  砫  ப.
  㦭    BREAK.

  ० ।஢:
ssI - த ᪠
ssSP - 㤠 ⥪.ப. ப ७  ଠ
ssQ,E - Home,End
ssW - ஢ ⥪.ப  ଠ. ᫨ 
        ଠ 饭,   頥
csSP - ⠡  Rus/Lat ( 䨣  ᬥ ⠬)
cs1 - Rus/Lat  ⠡
cs2 - ⠢ ஡   . ⠫쭠 
        ப ᤢ ࠢ
ssENTER -  ,    
cs8    - ᯮ ᨬ ।饩 

 ⠢:
 ⠢ ᨬ ந  ᤢ ⪠ ᫮
ࠢ.  ⠥ ᫥⥫쭮 ᨬ,  
  ஡ . ਬ,   ⪨  ப
 ,   㤥 ꥧ ࠢ.
  -  頥   ஡ ᫥.
 ࠢ -  頥   ஡ ࠢ
  ᫥  ⠡樨, ᫨ ப ࠢ .
 nter ࠧ뢠 ப. ᫨ ࠢ   ப
,  ᫥ 室  ᫥  ᤢ 
 ⠡ (8 ᨬ) - ⮫ . ᫨  
8- 樨, ᫥ ࠧ뢠 ࠭ ⠡.
 cs9 㤠 ᨬ  ஬. ᫨ ப ࠢ ,
 ந ᪫  ᫥饩 ப (᫨ १ 
 64 ᨬ)
 cs0 ᫨   砫 ப - ᪫  ।饩.

 4.  
	ORG	[,࠭]
⠭  樨.  㬮砭 ࠬ "࠭"
,  砫 樨 =0.

⪠   EQU 祭
ᢠ ⪥ 祭, ⭮ ࠬ "祭".

	DISP	
⠭ ,  ஬  ࠡ ணࠬ.
	ENT	
᢮  ࠡ ணࠬ ⥪饣  樨.
ਬ:
SCREEN	EQU	#4000
	ORG	#8000
	LD	HL,BEGIN             ;뫪   ࠭
	LD	DE,SCREEN            ;  ணࠬ 
	LD	BC,END-BEGIN         ;[A] 뢠
	LDIR	
	CALL	SCREEN
	DI	
	HALT	
BEGIN  	DISP	SCREEN
MARKA	DEC	A
	HALT	
	JP	NZ,MARKA             ;JP  砩
	RET	
       	ENT	
END
饥 ᬥ饭 樨 (shift=org-disp) 㧭 ⠪:
a	ORG	0
	ENT	
shift	ORG	a+shift
	DISP	a

	INCLUDE	"drv: 䠩"[,࠭]
祭  㥬 䠩 ⥫쭮 室,
饣  ᪥   " 䠩".  ⮬ 㪠
䠩 㦠  ࠭, । ࠬ஬ "࠭"
( 㬮砭 - ⥪).  砭 樨 祭
  த  ப, ᫥饩 ᫥ 
४⨢.   㤥 㦠  ᪠, ᫨
 㦥 室  室 ࠭. "" -  䠩.
ਬ:
	LDIR	
	INCLUDE	"TOKENIZE",1
	OTDR	
	INCLUDE	"ALASM2"
	HALT	
砫 㤥 ⪮஢ LDIR, ⮬ ⥪ "TOKENIZE.H",
㦥  ࠭ 1, ⮬ OTDR, ⥬  ⥪.࠭
㤥 㦥  ⪮஢ ⥪ "ALASM2.H", ᫥ 祣
 ᪠ 㤥 ⠭ ᭮ 䠩   த
  HALT.

	MAIN	" 䠩"[,࠭]
 ᭮ 䠩 樨. ४⨢ MAIN  
ࢮ ᯮ ४⨢ 稭 䠩.
 "."  "*"   "?".
ਬ:
	MAIN	"MAKE6?7",6
	LDIR	
᫥   ASSEMBLE  ।
ணࠬ MAKE6*7, 室饩  ࠭ 6,
⥬ 室騩   INCLUDE 뢠 稭
ணࠬ,   ४⨢ MAIN   LDIR.
 砥 䠩 MAIN , ⮬ ᫥
ᥬ஢ LDIR ந室   
த 樨.

	INCBIN	"᪮: 䠩"[,]
祭  㥬 ணࠬ    ᪠
ࠧ஬ ""    㬮砭   ⠫.

	DUP	᫮
뢠 砫 ,  室 ஢
"᫮" ࠧ 
	EDUP	
뢠  塞 .  
.
ਬ:
	DUP	32
	LDI	
	LD	A,B
	OR	C
	JR	Z,$+3
	LD	(HL),D
	EDUP	
  DUP  EDUP ⪮ 32 ࠧ

	REPEAT	
        <⥫>
	UNTIL0	<ࠦ>
 <⥫>,  <ࠦ>  0

	DB	[,ᯨ᮪ ]
ਬ:
	DB	"",13,10,"",13,10,"뫠",13,10,"ᮡ",13,10 
	DEFB	" ꥫ",13,10," 䠪..."

	DW	᫮[,ᯨ᮪ ᫮]
ਬ:
	DW	ALASKA,BUFFER,12,#BD15,32767,.NUMB1
	DEFW	12345,34567

	DS	⢮ ७[,ᯨ᮪ ]
᮪  ( 㬮砭 㫥 )   ⥪騩
 樨. ᫮ 横 = "⢮ ७".
ਬ:
	DS	10,#E5
	DEFS	32,#ED,#B0

	DD	[#]hex[hex]
⭮ ࠭ ⭠ ᥫ.
	DD	1D4FDC,4223
⭮
	DB	#1D,#4F,#DC,#42,#23

        +<>
   =#2C..#2F!
 㧪 ⥪  ᪠  ᪠  稥   "+"
 砫  ப.   樨  祭
"+"    "-",  ⠢  ய᪠
ப  ᫥饬 ᥬ஢.
ਬ:
	LD	HL,#DB00
         +SAVEADR	 	
         +  	ORG	#DB00,7
+           	INCBIN	"sts70r"
+	ORG	SAVEADR
	JP	(HL)
⫠稪 㧨 ⮫쪮  ࢮ 樨

⪠=ࠦ
()᢮ 祭 ⪥.
ਬ:
SHLUSS=0
	ORG	32768
	DUP	#4000
	DEFW	SHLUSS
SHLUSS=SHLUSS+1
	EDUP	
  #8000  㢥稢騬 ᫮ 0..16384

	IF0	<ࠦ>
        <⥫1>
	ELSE	
        <⥫2>
	ENDIF	
᫨ <ࠦ>=0,   <⥫1>,  <⥫2>

	IFN	<ࠦ>
        <⥫1>
	ELSE	
        <⥫2>
	ENDIF	
 ,  .
᪠  ᫮ 樨 ( 254)

	LOCAL	
        <⥫>
	ENDL	
  ⮪.  ⪨  । ⮩
୮ ᪮     (஬ ⮪,
稭  ᨬ @ -   ⪨). ᪠ 
 樨.
᫨  ।  ⮪ । ⪨  ,
  頫 ࠭ ⮩ 樨,  ⠪ ⪨
 묨:
	LD	HL,LABEL
	LOCAL	
LABEL
	ENDL	

	MACRO	<_a>
        <⥫>
	ENDM	
। .
 ⥫ :
\0..\9 - ࠬ  0,1,2,..9
\C - ⥪騩 ᨬ
\N - ३  ᫥騩 ᨬ (祣  뤠)
\S<char> - ப  ⥪饣 ᨬ  ᨬ <char>
\P - ᤢ ப ࠬ஢   ࠬ. 뤠
ꥤ ࠬ.
\R - ⬥  \P.

        <_> [ࠬ1[,ࠬ2[...]]]
ᯮ짮 .
⥫ ࠬ஢ - 
(祭  窨  ⠥).
	MACRO	DOWN
	LOCAL	
	INC	\C
	LD	A,\C
	AND	7
	JR	NZ,LABEL
	LD	A,\N\C
	SUB	#E0
	LD	\C,A
	SBC	A,A
	AND	-8
	ADD	A,\R\C
	LD	\C,A
LABEL
	ENDL	
	ENDM	
   楤 DOWN HL  DOWN DE ஢  
 - DOWN HL, DOWN DE  ..
 ᫮ﬨ ⨯
	IF0	"  "-"\1  "

	IF0	?macroname\1-2
 ।   ६ ᫮ ࠬ஢.

	DISPLAY	[/L,]["any text",][[/D|/H|/A,][/T,]ࠦ]
⮡ࠦ ⥪  ᫠   ᥬ஢. 
/D, /H  /A ⠭ ଠ 뢮   ᫥饣
᫠.  ᫠ 뢮  ⥪饩 ⥬ ᫥. /D -
筮 ᫮, /H - ⭠筮, /A -  
⥬.
/L 㪠뢠,  室     ப.
/T 뢮 ᭠砫 ᠬ ࠦ, ⮬  祭.
ਬ:
	DISPLAY	"code size: ",/D,end-start
	DISPLAY	/A,"abc+xyz=",abc+xyz
	DISPLAY	"simple"," text"

	DISPLAY	"࠭  "
	DISPLAY	/L,"ࠢ"

	DISPLAY	/A,/T,abc+xyz
⭮
	DISPLAY	/A,"abc+xyz",abc+xyz

	RUN	[,࠭]
뢠  ६ ࠭樨 㪠 楤.
 ⮬ Post-⪨   ⠭,  ALASM   #8000.

 IX  IY: HX,HY,LX,LY.
: INF;SLI;OUT (C),0;EXA;EXD;JZ;JNZ;JC;JNC
