$TITLE ('MCIOS: ZCL 98.04.09')



b_Temp8  bit     00h
b_Temp7  bit     01h
b_Temp6  bit     02h
b_Temp5  bit     03h
b_Temp4  bit     04h
b_Temp3  bit     05h
b_Temp2  bit     06h
b_Temp1  bit     07h

b_Temp16  bit     08h
b_Temp15  bit     09h
b_Temp14 bit     0ah
b_Temp13 bit     0bh
b_Temp12 bit     0ch
b_Temp11 bit     0dh
b_Temp10 bit     0eh
b_Temp9 bit     0fh

b_Temp24 bit     10h
b_Temp23 bit     11h
b_Temp22 bit     12h
b_Temp21 bit     13h
b_Temp20 bit     14h
b_Temp19 bit     15h
b_Temp18 bit     16h
b_Temp17 bit     17h

b_Temp32 bit     18h
b_Temp31 bit     19h
b_Temp30 bit     1ah
b_Temp29 bit     1bh
b_Temp28 bit     1ch
b_Temp27 bit     1dh
b_Temp26 bit     1eh
b_Temp25 bit     1fh

b_Temp40 bit     20h
b_Temp39 bit     21h
b_Temp38 bit     22h
b_Temp37 bit     23h
b_Temp36 bit     24h
b_Temp35 bit     25h
b_Temp34 bit     26h
b_Temp33 bit     27h

b_Temp48 bit     28h
b_Temp47 bit     29h
b_Temp46 bit     2ah
b_Temp45 bit     2bh
b_Temp44 bit     2ch
b_Temp43 bit     2dh
b_Temp42 bit     2eh
b_Temp41 bit     2fh

b_Temp56 bit     30h
b_Temp55 bit     31h
b_Temp54 bit     32h
b_Temp53 bit     33h
b_Temp52 bit     34h
b_Temp51 bit     35h
b_Temp50 bit     36h
b_Temp49 bit     37h

b_Temp64 bit     38h
b_Temp63 bit     39h
b_Temp62 bit     3ah
b_Temp61 bit     3bh
b_Temp60 bit     3ch
b_Temp59 bit     3dh
b_Temp58 bit     3eh
b_Temp57 bit     3fh

public b_Temp64 ,b_Temp1 ,b_Temp2 ,b_Temp3 ,b_Temp4  ,b_Temp5  ,b_Temp6 ,b_Temp7 ,b_Temp8  
public b_Temp9 ,b_Temp10 ,b_Temp11,b_Temp12 ,b_Temp13 ,b_Temp14  ,b_Temp15 ,b_Temp16 ,b_Temp17  
public b_Temp18 ,b_Temp19 ,b_Temp20 ,b_Temp21 ,b_Temp22  ,b_Temp23  ,b_Temp24 ,b_Temp25 ,b_Temp26  
public b_Temp27 ,b_Temp28 ,b_Temp29 ,b_Temp30 ,b_Temp31  ,b_Temp32  ,b_Temp33 ,b_Temp34 ,b_Temp35  
public b_Temp36 ,b_Temp37 ,b_Temp38 ,b_Temp39 ,b_Temp40  ,b_Temp41  ,b_Temp42 ,b_Temp43 ,b_Temp44  
public b_Temp45 ,b_Temp46 ,b_Temp47 ,b_Temp48 ,b_Temp49  ,b_Temp50  ,b_Temp51 ,b_Temp52 ,b_Temp53  
public b_Temp54 ,b_Temp55 ,b_Temp56 ,b_Temp57 ,b_Temp58  ,b_Temp59  ,b_Temp60 ,b_Temp61 ,b_Temp62  
public b_Temp63 



p_cCharToBit  data     20h
public p_cCharToBit


b_Bit8  bit     40h
b_Bit7  bit     41h
b_Bit6  bit     42h
b_Bit5  bit     43h
b_Bit4  bit     44h
b_Bit3  bit     45h
b_Bit2  bit     46h
b_Bit1  bit     47h

b_Bit16  bit     48h
b_Bit15  bit     49h
b_Bit14 bit     4ah
b_Bit13 bit     4bh
b_Bit12 bit     4ch
b_Bit11 bit     4dh
b_Bit10 bit     4eh
b_Bit9 bit     4fh

b_Bit24 bit     50h
b_Bit23 bit     51h
b_Bit22 bit     52h
b_Bit21 bit     53h
b_Bit20 bit     54h
b_Bit19 bit     55h
b_Bit18 bit     56h
b_Bit17 bit     57h

b_Bit32 bit     58h
b_Bit31 bit     59h
b_Bit30 bit     5ah
b_Bit29 bit     5bh
b_Bit28 bit     5ch
b_Bit27 bit     5dh
b_Bit26 bit     5eh
b_Bit25 bit     5fh

b_Bit40 bit     60h
b_Bit39 bit     61h
b_Bit38 bit     62h
b_Bit37 bit     63h
b_Bit36 bit     64h
b_Bit35 bit     65h
b_Bit34 bit     66h
b_Bit33 bit     67h

b_Bit48 bit     68h
b_Bit47 bit     69h
b_Bit46 bit     6ah
b_Bit45 bit     6bh
b_Bit44 bit     6ch
b_Bit43 bit     6dh
b_Bit42 bit     6eh
b_Bit41 bit     6fh

b_Bit56 bit     70h
b_Bit55 bit     71h
b_Bit54 bit     72h
b_Bit53 bit     73h
b_Bit52 bit     74h
b_Bit51 bit     75h
b_Bit50 bit     76h
b_Bit49 bit     77h

b_Bit64 bit     78h
b_Bit63 bit     79h
b_Bit62 bit     7ah
b_Bit61 bit     7bh
b_Bit60 bit     7ch
b_Bit59 bit     7dh
b_Bit58 bit     7eh
b_Bit57 bit     7fh

public b_Bit64 ,b_Bit1 ,b_Bit2 ,b_Bit3 ,b_Bit4  ,b_Bit5  ,b_Bit6 ,b_Bit7 ,b_Bit8  
public b_Bit9 ,b_Bit10 ,b_Bit11,b_Bit12 ,b_Bit13 ,b_Bit14  ,b_Bit15 ,b_Bit16 ,b_Bit17  
public b_Bit18 ,b_Bit19 ,b_Bit20 ,b_Bit21 ,b_Bit22  ,b_Bit23  ,b_Bit24 ,b_Bit25 ,b_Bit26  
public b_Bit27 ,b_Bit28 ,b_Bit29 ,b_Bit30 ,b_Bit31  ,b_Bit32  ,b_Bit33 ,b_Bit34 ,b_Bit35  
public b_Bit36 ,b_Bit37 ,b_Bit38 ,b_Bit39 ,b_Bit40  ,b_Bit41  ,b_Bit42 ,b_Bit43 ,b_Bit44  
public b_Bit45 ,b_Bit46 ,b_Bit47 ,b_Bit48 ,b_Bit49  ,b_Bit50  ,b_Bit51 ,b_Bit52 ,b_Bit53  
public b_Bit54 ,b_Bit55 ,b_Bit56 ,b_Bit57 ,b_Bit58  ,b_Bit59  ,b_Bit60 ,b_Bit61 ,b_Bit62  
public b_Bit63 



p_cBitToChar  data     28h
public p_cBitToChar


p_cRightInitData   data 08h
p_cLeftInitData    data 0ch
p_cExpaindPermutation  data 10h
p_cCompressPermutation data 16h
public p_cRightInitData,p_cLeftInitData
public p_cExpaindPermutation
public p_cCompressPermutation


p_cChildKey idata 80h
pbChallengeData  idata 224   
public pbChallengeData,p_cChildKey


END