		 <CopperFeet>   C࠭: 1	(1-480)    : 4intel_w.a80     ६ : 21:42:59    23/11/1999 

;--    .        DEC A                 .        RET NC;         .                              .        LD A,(IX+x)          
      { /--            .        INC BC                .        PUSH IX               . ;--------------              .        OR A                 
                             .        CP (IX+energy)        .        CALL N_IX             .                              .        JR Z,mah16b          
MGTB   DEFW MAG00            .        PUSH BC               .        CALL HL_IX0           . MAG15  ;k> ࠪ     .        PUSH BC              
       DEFW mgnone;1         .        RET ;NC-           .        LD A,(IX+typ)         .        LD A,(kMAGIC+0)       .        CALL DIST2           
       DEFW mgnone;2         .                              .        POP IX                .        OR A                  .        POP BC               
       DEFW MAG03            .                              .        CP 18                 .        RET Z                 .        CP 10+1 ;ࠤ 
       DEFW MAG04            . ;========= ⮢====== .        JR Z,mga03b1          .        isMM$ MANA            .       {         
       DEFW MAG05            .       {                      .        CP 21                 .        ;  楫    .        JR NC,mah16b         
       DEFW mgnone;6         .                              .        RET NZ                .        CALL HL_IX0           .        CALL cmpPART         
       DEFW MAG07            . MAG03  ;h>릮             . mga03b1CALL DIST2            .        PUSH IX               .        JR NZ,mah16b;  ࠧ
       DEFW MAG08            .        LD A,(kMAGIC+0)       .        CP 2                  .        LD B,7                .       {        
       DEFW mgnone;9         .        OR A                  .        RET C;㦥 冷       . mah15a CALL RND              .        ;⠪㥬       
       DEFW AVii10;10        .        RET Z                 .        CALL IX_strt_         .        AND #1F               .        CALL HL_IX0          
       DEFW SHTL11;11        .        isMM$ MANA/2          .        LD (IX+com),31        .        ADD A,#8              .        POP IX               
       ;                     .        ;                     .        RET                   .        CALL B_IX             .        CALL IXt_HL          
       DEFW mgnone;12        .        CALL isinACT          .                              .        LD A,(IX+x)           .        CALL IX_mov          
       DEFW mgnone;13        .        RET NZ                .                              .        OR A                  .        JR mag04c            
       DEFW mgnone;14        .        ;                     . ;--------------              .        JR Z,mah15b           .        ;                    
       DEFW MAG15            . mga03a CALL RND ;   .                              .        PUSH BC               . mah16b DJNZ mah16a          
       DEFW MAG16            .       {             . MAG05  ;h>஥         .        CALL DIST2            .        POP IX               
       DEFW MAG17            .        RRCA                  .        LD A,(kMAGIC+2)       .        POP BC                .        ;                    
       DEFW mgnone;18        .        JR C,mga03b           .        OR A                  .        CP 7+1 ;ࠤ 쭮 .        ;ᬮ,   
       DEFW MAG19            .        ;)᫨ 冷 / .        RET Z                 .       {   (  .       {               
       DEFW MAG20            .       {ࠪ - 룭    .        ;஢ ?       .       {)                   . mag04c LD BC,0 ;B-祫/祫.
       DEFW AVii21;21        .        CALL HL_IX0           .        LD A,(IX+health)      .        JR C,mah15b           .       {, C-           
       DEFW AVii22;22        .        DEC H                 .        CP 23                 .        ;⠪㥬        .        CALL HL_IX0          
       DEFW SHTL23;23        .        DEC L                 .        RET NC                .        CALL HL_IX0           .        DEC H                
                             .        CALL GMAP2            .        isMM$ MANA            .        POP IX                .        DEC L                
                             .        CALL mgaOW3           .        LD (IX+com),33        .        JR mah15e             .        CALL GMAP2           
MAGICIAN;஢ઠ  .        CALL mgaOW3           .        RET                   . mah15b DJNZ mah15a           .        CALL mgaOW4          
      { ਬ     .        CALL mgaOW3           .                              .        POP IX                .        CALL mgaOW4          
       LD A,(TIC6)           .        LD DE,61              . ;--------------              .        ;                     .        CALL mgaOW4          
       ADD A,_NHER           .        ADD HL,DE             .                              .        ;  - 饬  .        LD DE,61             
       CALL N_IX             .        CALL mgaOW3           . MAG00  ;h>祭 孨  .       {祫              .        ADD HL,DE            
       LD B,8 ; 8  48    .        INC L                 .       {                   .        LD B,5                .        CALL mgaOW4          
mgcn0  LD A,(IX+x)           .        CALL mgaOW3           .        LD A,(IX+com)         . mah15mxCALL mah15su          .        INC L                
       OR A                  .        LD DE,61              .        CP 37                 .        DJNZ mah15mx          .        CALL mgaOW4          
       JR Z,mgcn1            .        ADD HL,DE             .        RET Z ;㦥       .        RET                   .        LD DE,61             
       PUSH BC               .        CALL mgaOW3           .        ;                     .        ;                     .        ADD HL,DE            
       LD A,(IX+typ)         .        CALL mgaOW3           .        LD C,_NHER            . mah15suCALL RND              .        CALL mgaOW4          
       LD HL,MGTB            .        CALL mgaOW3           .        CALL it_PRE4          .        AND 63                .        CALL mgaOW4          
       CALL WT               .        RET                   .        PUSH IX               .        LD L,A                .        CALL mgaOW4          
       LD (JP_SUB+1),HL      .        ;                     .        LD C,A ;    .        CALL RND              .        LD A,C               
       CALL JP_SUB           . mgaOW3 LD A,(HL)             .        CALL N_IX             .        AND 63                .        OR A                 
       POP BC                .        INC HL                .        ;                     .        LD H,A                .        RET NZ ;冷  
mgcn1  LD DE,_LHER*6         .        SUB #80 ;        . itZi02 LD A,(IX+x)           .        PUSH HL               .       { -  뢠 
       ADD IX,DE             .        RET C                 .        OR A                  .        CALL GMAP2            .        LD A,B               
       DJNZ mgcn0            .        CP _NHER              .        JR Z,itZi03           .        LD A,(HL)             .        CP 1                 
mgnone RET                   .        RET NC                .        ;ॡ ६?    .        POP HL                .        RET C ; 冷  
                             .        PUSH HL               .        LD A,(IX+typ)         .        SUB #80               .        JR NZ,mag04a         
;---                         .        PUSH IX               .        LD HL,HEALTH          .        RET C                 .        ;冷 : 
                             .        CALL N_IX             .        CALL WT               .        CP _NHER              .       { - 뢠          
isMM$  MAC                   .        CALL HL_IX0           .        LD A,L                .        RET NC                .        LD A,(IX+health)     
       CALL isMAGMA          .        EX DE,HL              .        CP (IX+health)        .        CALL DIST2            .        CP 23                
       DEFB =0               .        LD A,(IX+typ)         .        JR Z,itZi03           .        CP 11 ;ࠤ   .        RET NC               
       ENDM                  .        POP IX                .        ; ६?   .       {                     . mag04a CALL IX_start        
                             .        POP HL                .        LD HL,AT_TYP          .        RET C                 . mag04e LD A,(MAGnum)        
isMMW$ MAC                   .        CP 16 ;મ/?  .        CALL gPAR             .        ;⠪㥬              .        LD (IX+com),A        
       CALL isMAGMW          .        RET C                 .        AND rem               . mah15e CALL IXt_HL           .        RET                  
       DEFB =0               .        CP 18                 .        JR Z,itZi03           .        CALL IX_stop          .                             
       ENDM                  .        RET NC                .        ;⠭ 㯭? .        LD (IX+com),34        . mgaOW4 LD A,(HL)            
                             .        ;                     .       {                      .        RET                   .        CP 2                 
isMAGMA; 筮  .        ; 窨 룠, .        EXX                   .                              .        JR Z,mgw42           
      {                      .       { .㤠񭭮   .        CALL DIST2            .                              .        INC L                
       POP BC                .       {                   .        EXX                   . ;--------------              .        SUB #80 ;       
       LD A,(BC)             .        CALL HL_IX0           .        OR A                  .                              .        RET C                
       DEC A                 .        LD BC,9*256 ;B --  .        JR Z,itZi03 ;ᠬ  . MAG04  ;h>ᠬ  .        CP _NHER             
       INC BC                .       {⮪, C=0 -. .       {             .       {                   .        JR C,mgw41           
       CP (IX+energy)        .       {                    .        CP 4+1                .        LD A,32               .        INC C ;          
       RET NC ;!!            . mgrawa0PUSH BC               .        JR C,itZi04           .        JR mag16_             .        RET                  
       PUSH BC               .        LD C,(IX+x)           .        CP 12                 .        ;                     . mgw41  INC B ;祫           
       RET                   .        CALL RNDshf3          .        JR NC,itZi03          . MAG16  ;k>ᠬ ࠪ .        RET                  
                             .        LD L,A                .        ;    .       {                     . mgw42  M2toM1$              
isinACTLD A,(IX+com) ;   .        LD C,(IX+y)           .       { 室?           .        LD A,35               .        LD A,(HL)            
      {? Z-              .        CALL RNDshf3          .        EXX                   . mag16_ LD (MAGnum),A         .        M1toM2$              
       CP 4                  .        LD H,A                .        CALL cmpPART          .        LD A,(kMAGIC+1)       .        AND #7F              
       RET Z                 .        CALL DISTde           .        EXX                   .        OR A                  .        SUB 120              
       CP 28                 .        POP BC                .        JR NZ,itZi03          .        RET Z                 .        JR C,mgw43           
       RET Z                 .        CP C                  . itZi04 ;諨 쭮 - ६ .        isMM$ MANA            .        PUSH HL              
       CP 26                 .        JR C,mgrawa1          .       {஢            .        ;                     .        EX DE,HL             
       RET ;z/nz             .        LD C,A                .        CALL HL_IX0           .        CALL RND              .        LD HL,GSAT           
                             .        LD (IX+tarX),L        .        POP IX                .        AND %10101            .        CALL WT              
offWizACT;᫨ 襡   .        LD (IX+tarY),H        .        CALL IX_strt_         .        JR NZ,mag04c          .        ADD HL,DE            
      {⠪,    . mgrawa1DJNZ mgrawa0          .        LD (IX+tarN),C        .        ;஡ ⠪  .        LD A,(HL)            
      { ࢠ - ࢠ .        ;룠             .        LD (IX+com),37        .       {                 .        POP HL               
      {                  .        CALL ix_93a           .        RET                   .        LD A,(IX+com)         .        CP #40               
       LD A,(IX+com)         .        LD (IX+com),31        .        ;                     .        CP 2                  .        JR C,mgw43           
       CP 28                 .        POP DE;!!             . itZi03 ADD IX,DE             .        JR NC,mag04c          .        CP #60               
       RET NZ                .        RET                   .        INC C                 .        CALL HL_IX0           .        JR NC,mgw43          
       JP Z,IX_stop          .        ;                     .        INC C                 .        PUSH IX               .        INC B ; 祫    
                             . mga03b ;)᫨ ⠪ ⥭ .        INC C                 .        LD B,11               . mgw43  INC L                
isMAGMW; 筮  .       {/ - ⠭  .        INC C                 . mah16a CALL RND              .        RET                  
      {  襡         .       {冷             .        DJNZ itZi02           .        AND #1F               .                             
       POP BC                .        LD A,(IX+tarN)        .        POP IX                .        ADD A,#8              .                             
       LD A,(BC)             .        CP #80                .        RET                   .        CALL B_IX             . ;--------------             
		 <CopperFeet>   C࠭: 2	(481-960)    : 4intel_w.a80     ६ : 21:42:59    23/11/1999 

                             .                              .        LD A,(IX+typ)         .        LD A,17               .        LD A,C               
MAG17  ;k>蠩 ⨢   . MAG07  ;h>           .        LD HL,HEALTH          .        LD C,_NHER            .        CP #FF               
       LD A,(kMAGIC+2)       .        CALL offWizACT        .        CALL WT               . itU00  CP (IX+com)           .        RET NC               
       OR A                  .        LD A,(IX+prof) ;/ .        LD A,L                .        RET Z ;㦥 믮  .        LD HL,(en_IX)        
       RET Z                 .       {⠪?                  .        CP (IX+health)        .        ;                     .        CALL IX_strt_        
       isMM$ MANA/2          .        CP 10                 .        JR Z,it103            .        LD (MAGnum),A         .        LD (IX+com),12       
       ;                     .        JR Z,mag07df          .        ; 祭?   .        CALL it_PRE4          .        RET                  
       LD B,17               .        ;⠪騩            .        LD HL,AT_TY2          .        PUSH IX               .                             
mag17a CALL RND              .        CP 13                 .        CALL gPAR             .        CALL N_IX             . ;...................        
       AND 63                .        JR Z,mag07_2          .        AND medic             .        ;                     .                             
       CP _NHER              .        JR NC,mag07_3         .        JR Z,it103            . itU02  LD A,(IX+x)           . it_PRE4; 蠣 4; C=0/_NHER
       JR NC,mag17c          .        ;                     .        ;⠭ 㯭? .        OR A                  .       {                     
       PUSH IX               . mag07_1LD A,(kMAGIC+3)       .       {                      .        JR Z,itU03            .        LD DE,_LHER*4        
       CALL N_IX             .        OR A                  .        EXX                   .        ; ⠪?             .        LD B,_NHER/4         
       OR A                  .        RET Z                 .        CALL DIST2            .        CALL isinACT          .        CALL RND             
       JR Z,mag17b           .        isMM$ MANA/8 ;.1    .        EXX                   .        JR NZ,itU03           .        AND 3                
       isAVIA$               .        JR itHEALTH           .        CP 8+1                .        ;    .        JR it_prex           
       JR Z,mag17b           .        ;                     .        JR C,it104            .       {?                 .                             
       CALL HL_IX0           . mag07_2LD A,(kMAGIC+4)       .        CP 18                 .        LD A,(IX+speed)       . it_PRE2; 蠣 2; C=0/_NHER
       POP IX                .        OR A                  .        JR NC,it103           .        AND %11110000         .       {                     
       PUSH BC               .        JR Z,mag07_1          .        ;    .        JR NZ,itU03           .        LD DE,_LHER*2        
       CALL DIST2            .        isMMW$ MANA/2 ;.2   .       { 室?           .        ;⠭ 㯭? .        LD B,_NHER/2         
       POP BC                .        JR NC,mag07_1         .        EXX                   .       {                      .        CALL RND             
       CP 5+1 ;⠭  .        JP  C,itTORMOZ        .        CALL cmpPART          .        EXX                   .        AND 1                
      {              .        ;                     .        EXX                   .        CALL DIST2            . it_prexADD A,C              
       JR NC,mag17c          . mag07_3LD A,(kMAGIC+5)       .        JR NZ,it103           .        EXX                   .        EXX                  
       LD (IX+com),36        .        OR A                  .        ;諨 쭮 -  .        CP 7+1                .        CALL HL_IX0          
       RET                   .        JR Z,mag07_1          .       {                   .        JR C,itU04            .        EXX                  
mag17b POP IX                . mag07_3xisMMW$ MANA  ;.3   . it104  CALL HL_IX0           .        CP 14                 .        LD C,#FF ;쭠
mag17c DJNZ mag17a           .        JR NC,mag07_1         .        POP IX                .        JR NC,itU03           .       { ⠭           
       RET                   .        JP  C,itTRANSF        .        CALL IX_strt_         .        ;    .        RET                  
                             .        ;                     .        LD (IX+com),16 ;&10   .       { 室?           .                             
;======== ३===== . mag07df;࠭             .        RET                   .        EXX                   . ;---------         
      {=====                 .        CALL RND              .        ;                     .        CALL cmpPART          .                             
                             .        AND %1110             . it103  ADD IX,DE             .        EXX                   . AVii10 ;\                   
MAG08  ;h>              .        JR NZ,mag07_1         .        DJNZ it102            .        JR NZ,itU03           . AVii21 ;\                   
       LD A,15               .        LD A,(kMAGIC+5)       .        POP IX                .        ;諨 쭮 -  . AVii22 ; -  ࠭ 
       JR mgz20a             .        OR A                  .        RET                   .       {                   .       {  浪
                             .        JR Z,mag07_1          .                              . itU04  CALL HL_IX0           .       {                    
;--------------              .        JR NZ,mag07_3x        .                              .        POP IX                .        LD A,(IX+typ)        
                             .                              .                              .        CALL IX_strt_         .        LD HL,HEALTH         
MAG20  ;k>               . ;--------------              . itTROO ; 㯮         .        LD A,(MAGnum)         .        CALL WT              
       LD A,21               .                              .        LD C,_NHER            .        LD (IX+com),A         .        LD A,(IX+health)     
mgz20a CP (IX+com)           . MAG19  ;k>૮             .        CALL it_PRE4          .        RET                   .        CP L                 
       RET Z ;㦥 믮  .        CALL offWizACT        .        PUSH IX               .        ;                     .        RET NC;  ଥ      
       LD (MAGnum),A ;   .        LD A,(IX+prof) ;/ .        CALL N_IX             . itU03  ADD IX,DE             .        LD A,(IX+com)        
       CALL offWizACT        .       {⠪?                  .        ;                     .        DJNZ itU02            .        OR A  ;, ᫨ ᢮
       ;                     .        CP 10                 . itTR02 LD A,(IX+x)           .        POP IX                .       {                
       LD A,(kMAGIC+8)       .        JR Z,mag19df          .        OR A                  .        RET                   .        JR Z,avvi0           
       OR A                  .        ;⠪騩            .        JR NZ,itTR03          .                              .        CP 29                
       RET Z                 .        CP 13                 .        LD A,(IX+y)           .                              .        JR Z,avvi0           
       isMM$ MANA/2          .        JR Z,mag19_2          .        OR A                  . itTRANSF;ॢ饭 㭣  .        CP 3                 
       ;롮 楫   .        JR NC,mag19_3         .        JR Z,itTR03           .       { 祫             .        RET NZ               
      {/ࠦ           .        ;                     .        ;  ⠭ .        LD C,0                .        ;                    
       LD C,0                . mag19_1LD A,(kMAGIC+3)       .       {?                  .        CALL it_PRE4          . avvi0  ;ࠢ ᠬ  
       CALL it_PRE4          .        OR A                  .        LD A,(IX+oldtyp)      .        PUSH IX               .       { ( . 
       PUSH IX               .        RET Z                 .        CP 12                 .        CALL N_IX             .       {)             
       CALL N_IX             .        isMM$ MANA/8 ;.1    .        JR C,itTR03           .        ;                     .        CALL HL_IX0          
       ;                     .        JR itHEALTH           .        CP 21                 . itSF02 LD A,(IX+x)           .        PUSH IX              
mgz20b LD A,(IX+x)           .        ;                     .        JR NC,itTR03          .        OR A                  .        ;                    
       OR A                  . mag19_2LD A,(kMAGIC+4)       .        ;⠭ 㯭? .        JR Z,itSF03           .        LD BC,#20FF ;C= 
       JR Z,mgz20c           .        OR A                  .       {                      .        ;  ࠭ .       {                
       LD A,(IX+speed)       .        JR Z,mag19_1          .        EXX                   .       {஢?               .        LD DE,8              
       AND %11110000         .        isMMW$ MANA/2 ;.2   .        CALL DISTt            .        LD HL,AT_TY2          .        LD IX,KBUILD         
       JR NZ,mgz20c ;楫  .        JR NC,mag19_1         .        EXX                   .        CALL gPAR             . abii0  LD A,(IX+2)          
      {       .        JP  C,itDEFEND        .        CP 5+1                .        AND turn              .        ; ?       
       EXX                   .        ;                     .        JR C,itTR04           .        JR Z,itSF03           .        CP 3                 
       CALL DIST2            . mag19_3LD A,(kMAGIC+5)       .        CP 17                 .        ;⠭ 㯭? .        JR Z,abii1           
       EXX                   .        OR A                  .        JR NC,itTR03          .       {                      . abii4  CP 3+8               
       CP 14+1 ;.    .        JR Z,mag19_1          .        ;    .        EXX                   .        JR NZ,abii2          
       JR NC,mgz20c          . mag19_3xisMMW$ MANA/2 ;.3  .       { 室?           .        CALL DIST2            .        ;  
       CP C                  .        JR NC,mag19_1         .        EXX                   .        EXX                   .       {쭮?               
       JR NC,mgz20c          .        JR  C,itTROO          .        CALL cmpPARTt         .        CP C                  . abii1  LD A,(IX+x)          
       LD L,A                .        ;                     .        EXX                   .        JR NC,itSF03 ;. .        OR A                 
       EXX                   . mag19df;࠭             .        JR NZ,itTR03          .       {                     .        JR Z,abii2           
       CALL cmpPART          .        CALL RND              .        ;諨  - ⠭ .        CP 4+1                .        PUSH BC              
       EXX                   .        AND %1110             .       {                 .        JR C,itSF04           .        CALL DIST2           
       JR NZ,mgz20c          .        JR NZ,mag19_1         . itTR04 CALL HL_IXt           .        CP 12                 .        POP BC               
       LD C,L                .        LD A,(kMAGIC+5)       .        POP IX                .        JR NC,itSF03          .        CP C                 
       CALL HL_IX0           .        OR A                  .        CALL IX_strt_         .        ;    .        JR NC,abii2          
       LD (en_IX),HL         .        JR Z,mag19_1          .        LD (IX+com),18        .       { 室?           .        LD C,A               
mgz20c ADD IX,DE             .        JR NZ,mag19_3x        .        RET                   .        LD L,A                .        EXX                  
       DJNZ mgz20b           .                              .        ;                     .        EXX                   .        CALL HL_IX0          
       POP IX                . ;=========================== . itTR03 ADD IX,DE             .        CALL cmpPART          .        EXX                  
       ;                     .       {====                  .        DJNZ itTR02           .        EXX                   . abii2  ADD IX,DE            
       LD A,C                .                              .        POP IX                .        JR NZ,itSF03          .        DJNZ abii0           
       CP #FF                . itHEALTH;஢            .        RET                   .        ;諨  - ࠭ .        POP IX               
       RET NC                .        LD C,_NHER            .                              .       {஢              .        LD A,C               
       LD HL,(en_IX)         .        CALL it_PRE2          .                              . itSF04 LD C,L                .        CP #FF               
       CALL IX_strt_         .        PUSH IX               .                              .        CALL HL_IX0           .        RET Z;㤠         
       LD A,(MAGnum)         .        CALL N_IX             . itTORMOZ;ମ          .        LD (en_IX),HL         .        ;                    
       LD (IX+com),A         .        ;                     .        LD A,11               .        ;                     .        LD A,(IX+prof) ;
       RET                   . it102  LD A,(IX+x)           .        LD C,0                . itSF03 ADD IX,DE             .       {騥  
                             .        OR A                  .        JR itU00              .        DJNZ itSF02           .       { ⠪묨          
;======== 襡== .        JR Z,it103            .                              .        POP IX                .        OR A                 
      {====                  .        ;ॡ 祭?   . itDEFEND;         .        ;                     .        JR NZ,avvi9          
		 <CopperFeet>   C࠭: 3	(961-1440)    : 4intel_w.a80     ६ : 21:42:59    23/11/1999 

       INC (IX+prof)         .                              .                              .                              .                             
avvi9  ;                     .                              .                              .                              .                             
       EXX                   .                              .                              .                              .                             
       CALL DIST2            .                              .                              .                              .                             
       CP 2+1                .                              .                              .                              .                             
       RET C                 .                              .                              .                              .                             
       CALL IXt_HL           .                              .                              .                              .                             
       JP IX_mov             .                              .                              .                              .                             
                             .                              .                              .                              .                             
SHTL11 ;\                    .                              .                              .                              .                             
SHTL23 ; ⫮    .                              .                              .                              .                             
                             .                              .                              .                              .                             
       RET                   .                              .                              .                              .                             
