
;*     
;    ,
;    - . ,
;    - . .

;-------   ----------------

;    
; .  :
;0 [1] X 
;1 [1] Y 
;2 [1] Len  
;3 [1] Hgt  
;4 [1] #00   
;     
;5 [3]   
;8 [3]   
;11[3]   
;14[3]   
;17[3]  . 
;20[1] #00  , 
;        .

;-------------------------------------
;   
;    
;   ,
;    
; +5  .
; :
;0 [1] Len  
;1 [1] Hgt  
;2 [1] ,  
;      .
;3 [1]    .
;4 [1] 
;       0(0/1)  
;            /
;       1(0/1)DEC/HEX 
;       5(0/1)/.
;            .
;       6(0/1)  
;           /.
;5 [2]    .
;7 [1]    . 
;8 [1] #00  
;9 [1]   
;10[1] X(pic).. 
;11[1] Y(zn) .. 
;12[1] #01  
;13[1]     
;      #00=68,#08=48  ..
;14[1] ⨫ 
         0=1  ᮢ ࠬ
         1=1  ᥣ ᢥ
	 2=1  ᢥ
 15  稭 ⠡  
        +0   (1..254), ᫨ 0   ⠡
        +1 न X  ⭮⥫쭮 孥
            㣫   
        +2 न Y
        +3     (1..32)
        +4     (1..24)

;-------------------------------------

;  , ..
;   +8   
;0 [1]    
;       ,  #00  .
;1 [3]   
;4 [n]  

;  , ..
;  . +11   
;0 [1]   ,
;        #00,  
;1 [1] X   
;2 [1] Y   
;3 [1] Len  
;4 [1] Hgt  

; ,  .
;  .+14   
;   .
;    .
;    
; :
;#06,Atribute -   
;#07,X,Y -    
;       X(Pix),Y(zn)
;#08,Flag -  :
;       0(0/1)  
;            /
;       1(0/1)DEC/HEX 
;       5(0/1)/.
;            .
;       6(0/1)  
;           /.
;#09,Shrift -  .
 #0A 㪠뢠  ,  ᫪
     ப 㤥 業஢ 
     業 .
;
;   #00, 
;   ,
;  #00
;#01(FBox),X,Y,Len,Hgt = 
;   ,   X(pic)
;   Y(pic)  Len(pic) 
;    Hgt(pic).
;#02(FBox8),X,Y,Len,Hgt = 
;   ,   X(zn)
;   Y(zn)  Len(zn) 
;    Hgt(zn).
;#03(FSym),X(zn),Y(zn),sym 
;      .
;#04(FSpr),X(zn),Y(zn),Len(zn),Hgt(zn),
;   Page,Addres   
;   .

;  , ..
;  .+17   .
;0 [1] Key   
;       ( ), #00
;         .
;1 [1] X(zn)
;2 [1] Y(zn)
;    ,
;   
; (6,7,8,9,0,N,M,SS)
;  , 
;  ,  
;    X,Y
;   
; "Fire".

;------------------------------------
;        
;  256 , 8 
;  .
;0 [1] Page ,  .
;1 [1] .  
;2 [1]    
;3 [1]   
;4 [3]    
;7 [1]    

;------------------------------------
;         
;  256 , 4  
;  .
;0 [1] =#00,  .
;        7(0/1)./
;        .
;        7  <>0
;1 [1]   
;2 [1] .   
;3 [1] .   

;-----------------------------
;      
;   4,#C000

;   
; :
;0 [1]    .
;         #00.
;1 [3]   .(  뫪  )
;   

;Triger;+0
;0 [3]    
;3 [1];  /#00=End
;4 [1]; X
;5 [1]; Y

;Jumper;+3
;0 [3]    
;3 [1];  
;4 [1]; X
;5 [1]; Y
; :
;0,-1

;IndiNum;+6  
;0 [3]    
;3 [1]   
;        0(0/1)=DB/DW
;        3,4
;          DEC
;       =00 
;       =10  
;       =11  
;4 [1]  X  
;5 [1]  Y

;LineO;+9  
;0 [1]  X  
;1 [1]  Y
;2 [1]     
;3 [1]     
;4 [3]     
;7 [1]  

;SBWert;+12  
;0 [1]  X  
;1 [1]  Y
;2 [1]  Hgt 
;3 [2]  #0000
;5 [1]     .
;6 [2]  #0000
;8 [2]  , .
;         
;        .
;10[2]    
;       
;(+10)=((Hgt-2)*8-Len)/(AllStr-Hgt)
;(+5)=(Hgt-2)*8*(Hgt/AllStr)

;SBWind;+15  .
;0 [1]  X   .
;1 [1]  Y
;2 [1]  Len(zn)
;3 [1]  Hgt(zn)
;4 [3]    
;7 [1]     
;8 [2]    .
;10[3]    .
;        .

;MkCat;+18  
;0 [1]  X .
;1 [1]  Y
;2 [3]       
;4 [3]      
;7 [3]      
;        


;Button;+21 
;0 [1]  X  
;1 [1]  Y
;2 [1]  Len  
;3 [1]  Hgt
;4 [3]   

;Cancel;+24 
;        
;0 [3]   
;        

;Close;+27   
;0 [3]    ,
;          

;Msg;+30      
;  
;    
; .
;+0 [1] X(pic)
;+1 [1] Y(zn)
;+2 [3]   
;+5 [1]    .
;+6 [1]  
; +7 [1]  
; +8 [2]  

;OpenWindow;+33
;    
; 
;+0 [1] X(zn)  
;+1 [1] Y(zn)
;+2 [1] Len(zn)
;+3 [1] Hgt(zn)
;+4 [3]   
;+7 [3]  

 ⮡    ᢮ ᮡ⢥ 쥪, 㦭 
⥫ 쥪 ⠭ 㦭  ࠡ稪.
 ࠡ稪  室 । ᫥騥 :
- LY,IX =  ⥫ ࠩ ( 祭 
  ⥫  室 IX 㬥  21) , ஬
  ਭ 쥪.
- B =  ᮡ, । 쥪.
  00 ᮢ 쥪.
  01 ந襫 饫祪   .
   (㣨 ᮡ ᠭ  ᮮ⢥饬 ࠧ)
- HY = ࠬ ᮡ.  ᮡ⨩ 0  1  ࠬ஢
   ।.
- C,DE =  ⥫ 쥪, 㪠뢠  , 騥
   ⥫ 쥪 ࠧ  ᮬ 쥪.

   쥪, ॠ騩  ᮡ⨥ Sob, 룫廊
᫥. ࠧ:
Object
       ld a,b
       cp Sob
       jr z,Object00   ;室  ࠡ ᮡ

       xor a           ; 室  , 
                       ;। ᮡ⨥ 1, ⮡ 㪠,
                       ;  쥪    
                       ;ॠ஢.
       ret
Object00
       [믮塞 㦭 ⢨]
       xor a
       ret

 ᫨  ࠡ⪥ ᮡ 1 室 ஢   
 ந襫 饫祪,   㯠 ਬ୮ ⠪:
Prowerka

Object
       ld a,b
       cp 1
       ret nz

       call CallFn      ;砥  BC न 
       db 48            ;⭮⥫쭮 孥 .
       
       ld de,YX         ;ᨬ  ॣ ࠬ
       ld hl,HgtLen     ;"" ⭮⥫쭮 孥 
                        ;㣫 
       call CallFn      ;஢塞   न BC 
       db 34            ; DE(y,x),HL(Hgt,Len)
                        ;Carry=1 .
       jr c,ObjectClick
       xor a            ;  
       ret

ObjectClick             ; 

       [믮塞 室 ⢨]

       ld a,1           ;ᮮ頥 ⥬,    
       or a             ;।  ᮡ⨥ ᫥騬
       ret              ;쥪⠬  室.
       
       