 NLIST D
 LIST E,CASE
; Version: 2.0          Compiler: 880908 P     Code Gen: 880914c z P
; Source: queue        Prog:              Date:  15-FEB-1997 18:49:21
 NAME queue
 DSEG
 DEFS 00000H
GLOB_: EXTRN ENTZ2_
 XSEG
CONST_: CSEG
M_queue: EXTPUB q_init
q_init:;   line 22
 PUSH IX
 PUSH DE
 PUSH HL
 LD   IX,00004H
 ADD  IX,SP
 PUSH HL
;   line 24
 POP  DE
 PUSH HL
;   line 25
 EX   DE,HL
 LD   HL,00008H
 ADD  HL,DE
 PUSH HL
 EX   DE,HL
 LD   DE,0000CH
 ADD  HL,DE
 LD   C,L
 LD   B,H
 POP  HL
 LD   (HL),C
 INC  HL
 LD   (HL),B
;   line 26
 POP  DE
 PUSH DE
 LD   HL,0000AH
 ADD  HL,DE
 PUSH HL
 EX   DE,HL
 LD   DE,00008H
 ADD  HL,DE
 LD   A,(HL)
 INC  HL
 LD   H,(HL)
 LD   L,A
 LD   E,(IX+0FFFEH)
 LD   D,(IX+0FFFFH)
 ADD  HL,DE
 LD   DE,0000CH
 XOR  A
 SBC  HL,DE
 LD   C,L
 LD   B,H
 POP  HL
 LD   (HL),C
 INC  HL
 LD   (HL),B
;   line 28
 POP  HL
 PUSH HL
 PUSH HL
 INC  HL
 INC  HL
 POP  DE
 PUSH DE
 PUSH HL
 LD   HL,00008H
 ADD  HL,DE
 LD   E,(HL)
 INC  HL
 LD   D,(HL)
 POP  HL
 LD   (HL),E
 INC  HL
 LD   (HL),D
 POP  HL
 LD   (HL),E
 INC  HL
 LD   (HL),D
;   line 29
 POP  DE
 PUSH DE
 LD   HL,00006H
 ADD  HL,DE
 PUSH HL
 LD   L,(IX+0FFFEH)
 LD   H,(IX+0FFFFH)
 LD   DE,0000CH
 XOR  A
 SBC  HL,DE
 EX   DE,HL
 POP  HL
 LD   (HL),E
 INC  HL
 LD   (HL),D
;   line 30
 POP  HL
 PUSH HL
 INC  HL
 INC  HL
 INC  HL
 INC  HL
 LD   E,A
 LD   D,A
 LD   (HL),E
 INC  HL
 LD   (HL),D
;   line 31
 POP  HL
 PUSH HL
 POP  DE
 POP  DE
 POP  DE
 POP  IX
 RET
 EXTPUB q_push
q_push:;   line 42
 PUSH IX
 PUSH BC
 PUSH DE
 PUSH HL
 LD   IX,00006H
 ADD  IX,SP
 PUSH HL
;   line 46
 EX   DE,HL
 LD   HL,00006H
 ADD  HL,DE
 LD   E,(HL)
 INC  HL
 LD   D,(HL)
 LD   L,C
 LD   H,B
 INC  HL
 INC  HL
 CALL IUGRT_
 JR   C,Q_1 ;
;   line 47
 LD   DE,00001H
 LD   HL,00008H
 ADD  HL,SP
 LD   SP,HL
 EX   DE,HL
 POP  IX
 RET
Q_1:;   line 49
 LD   L,(IX+0FFFAH)
 LD   H,(IX+0FFFBH)
 INC  HL
 INC  HL
 LD   E,(HL)
 PUSH HL
 INC  HL
 LD   D,(HL)
 LD   L,E
 LD   H,D
 INC  DE
 LD   C,L
 LD   B,H
 POP  HL
 LD   (HL),E
 INC  HL
 LD   (HL),D
 LD   L,C
 LD   H,B
 LD   A,(IX+0FFFEH)
 LD   (HL),A
;   line 50
 LD   E,(IX+0FFFAH)
 LD   D,(IX+0FFFBH)
 LD   HL,0000AH
 ADD  HL,DE
 LD   E,(HL)
 INC  HL
 LD   D,(HL)
 LD   L,(IX+0FFFAH)
 LD   H,(IX+0FFFBH)
 INC  HL
 INC  HL
 LD   A,(HL)
 INC  HL
 LD   H,(HL)
 LD   L,A
 CALL IUGEQ_
 JR   C,Q_2 ;
;   line 51
 LD   L,(IX+0FFFAH)
 LD   H,(IX+0FFFBH)
 INC  HL
 INC  HL
 PUSH HL
 LD   L,(IX+0FFFAH)
 LD   H,(IX+0FFFBH)
 LD   DE,00008H
 ADD  HL,DE
 LD   E,(HL)
 INC  HL
 LD   D,(HL)
 POP  HL
 LD   (HL),E
 INC  HL
 LD   (HL),D
Q_2:;   line 53
 LD   L,(IX+0FFFAH)
 LD   H,(IX+0FFFBH)
 INC  HL
 INC  HL
 LD   E,(HL)
 PUSH HL
 INC  HL
 LD   D,(HL)
 LD   L,E
 LD   H,D
 INC  DE
 LD   C,L
 LD   B,H
 POP  HL
 LD   (HL),E
 INC  HL
 LD   (HL),D
 LD   L,C
 LD   H,B
 PUSH HL
 LD   L,(IX+0FFFEH)
 LD   H,(IX+0FFFFH)
 LD   DE,00008H
 CALL IUSHR_
 LD   A,L
 POP  HL
 LD   (HL),A
;   line 54
 LD   E,(IX+0FFFAH)
 LD   D,(IX+0FFFBH)
 LD   HL,0000AH
 ADD  HL,DE
 LD   E,(HL)
 INC  HL
 LD   D,(HL)
 LD   L,(IX+0FFFAH)
 LD   H,(IX+0FFFBH)
 INC  HL
 INC  HL
 LD   A,(HL)
 INC  HL
 LD   H,(HL)
 LD   L,A
 CALL IUGEQ_
 JR   C,Q_3 ;
;   line 55
 LD   L,(IX+0FFFAH)
 LD   H,(IX+0FFFBH)
 INC  HL
 INC  HL
 LD   E,(IX+0FFFAH)
 LD   D,(IX+0FFFBH)
 PUSH HL
 LD   HL,00008H
 ADD  HL,DE
 LD   E,(HL)
 INC  HL
 LD   D,(HL)
 POP  HL
 LD   (HL),E
 INC  HL
 LD   (HL),D
Q_3:;   line 58
 LD   HL,00000H
 POP  DE
 PUSH HL
Q_5: POP  DE
 PUSH DE
 LD   L,(IX+0FFFEH)
 LD   H,(IX+0FFFFH)
 CALL IUGRT_
 JP   C,Q_4
 JR    Q_6 ;
Q_7: POP  HL
 PUSH HL
 INC  HL
 POP  DE
 PUSH HL
 JR    Q_5 ;
Q_6:;   line 60
 LD   L,(IX+0FFFAH)
 LD   H,(IX+0FFFBH)
 INC  HL
 INC  HL
 LD   E,(HL)
 PUSH HL
 INC  HL
 LD   D,(HL)
 LD   L,E
 LD   H,D
 INC  DE
 LD   C,L
 LD   B,H
 POP  HL
 LD   (HL),E
 INC  HL
 LD   (HL),D
 LD   L,C
 LD   H,B
 LD   E,(IX+0FFFCH)
 LD   D,(IX+0FFFDH)
 PUSH HL
 LD   L,E
 LD   H,D
 INC  DE
 LD   (IX+0FFFCH),E
 LD   (IX+0FFFDH),D
 LD   A,(HL)
 POP  HL
 LD   (HL),A
;   line 61
 LD   E,(IX+0FFFAH)
 LD   D,(IX+0FFFBH)
 LD   HL,0000AH
 ADD  HL,DE
 LD   E,(HL)
 INC  HL
 LD   D,(HL)
 LD   L,(IX+0FFFAH)
 LD   H,(IX+0FFFBH)
 INC  HL
 INC  HL
 LD   A,(HL)
 INC  HL
 LD   H,(HL)
 LD   L,A
 CALL IUGEQ_
 JR   C,Q_9 ;
;   line 62
 LD   L,(IX+0FFFAH)
 LD   H,(IX+0FFFBH)
 INC  HL
 INC  HL
 LD   E,(IX+0FFFAH)
 LD   D,(IX+0FFFBH)
 PUSH HL
 LD   HL,00008H
 ADD  HL,DE
 LD   E,(HL)
 INC  HL
 LD   D,(HL)
 POP  HL
 LD   (HL),E
 INC  HL
 LD   (HL),D
Q_9: JP    Q_7
Q_4:;   line 64
 LD   E,(IX+0FFFAH)
 LD   D,(IX+0FFFBH)
 LD   HL,00006H
 ADD  HL,DE
 LD   E,(IX+0FFFEH)
 LD   D,(IX+0FFFFH)
 INC  DE
 INC  DE
 PUSH HL
 LD   A,(HL)
 INC  HL
 LD   H,(HL)
 LD   L,A
 XOR  A
 SBC  HL,DE
 EX   DE,HL
 POP  HL
 LD   (HL),E
 INC  HL
 LD   (HL),D
;   line 65
 LD   L,(IX+0FFFAH)
 LD   H,(IX+0FFFBH)
 INC  HL
 INC  HL
 INC  HL
 INC  HL
 LD   E,(HL)
 PUSH HL
 INC  HL
 LD   D,(HL)
 INC  DE
 POP  HL
 LD   (HL),E
 INC  HL
 LD   (HL),D
;   line 66
 LD   E,A
 LD   D,A
 LD   HL,00008H
 ADD  HL,SP
 LD   SP,HL
 LD   L,A
 LD   H,A
 POP  IX
 RET
 EXTPUB q_pop
q_pop:;   line 76
 PUSH IX
 PUSH DE
 PUSH HL
 LD   IX,00004H
 ADD  IX,SP
 PUSH HL
 PUSH HL
;   line 81
 LD   E,(HL)
 PUSH HL
 INC  HL
 LD   D,(HL)
 LD   L,E
 LD   H,D
 INC  DE
 LD   C,L
 LD   B,H
 POP  HL
 LD   (HL),E
 INC  HL
 LD   (HL),D
 LD   L,C
 LD   H,B
 LD   L,(HL)
 LD   H,00000H
 POP  DE
 PUSH HL
;   line 82
 LD   E,(IX+0FFFCH)
 LD   D,(IX+0FFFDH)
 LD   HL,0000AH
 ADD  HL,DE
 LD   E,(HL)
 INC  HL
 LD   D,(HL)
 LD   L,(IX+0FFFCH)
 LD   H,(IX+0FFFDH)
 LD   A,(HL)
 INC  HL
 LD   H,(HL)
 LD   L,A
 CALL IUGEQ_
 JR   C,Q_10 ;
;   line 83
 LD   L,(IX+0FFFCH)
 LD   H,(IX+0FFFDH)
 LD   E,L
 LD   D,H
 PUSH HL
 LD   HL,00008H
 ADD  HL,DE
 LD   E,(HL)
 INC  HL
 LD   D,(HL)
 POP  HL
 LD   (HL),E
 INC  HL
 LD   (HL),D
Q_10:;   line 85
 LD   L,(IX+0FFFCH)
 LD   H,(IX+0FFFDH)
 LD   E,(HL)
 PUSH HL
 INC  HL
 LD   D,(HL)
 LD   L,E
 LD   H,D
 INC  DE
 LD   C,L
 LD   B,H
 POP  HL
 LD   (HL),E
 INC  HL
 LD   (HL),D
 LD   L,C
 LD   H,B
 LD   A,(HL)
 ADD  A,A
 ADD  A,A
 ADD  A,A
 ADD  A,A
 ADD  A,A
 ADD  A,A
 ADD  A,A
 ADD  A,A
 LD   L,A
 LD   H,00000H
 POP  DE
 PUSH DE
 ADD  HL,DE
 POP  DE
 PUSH HL
;   line 86
 LD   E,(IX+0FFFCH)
 LD   D,(IX+0FFFDH)
 LD   HL,0000AH
 ADD  HL,DE
 LD   E,(HL)
 INC  HL
 LD   D,(HL)
 LD   L,(IX+0FFFCH)
 LD   H,(IX+0FFFDH)
 LD   A,(HL)
 INC  HL
 LD   H,(HL)
 LD   L,A
 CALL IUGEQ_
 JR   C,Q_11 ;
;   line 87
 LD   L,(IX+0FFFCH)
 LD   H,(IX+0FFFDH)
 LD   E,L
 LD   D,H
 PUSH HL
 LD   HL,00008H
 ADD  HL,DE
 LD   E,(HL)
 INC  HL
 LD   D,(HL)
 POP  HL
 LD   (HL),E
 INC  HL
 LD   (HL),D
Q_11:;   line 90
 POP  HL
 PUSH HL
 LD   A,H
 OR   L
 JR   NZ,Q_12 ;
;   line 91
 LD   DE,00000H
 LD   HL,00008H
 ADD  HL,SP
 LD   SP,HL
 EX   DE,HL
 POP  IX
 RET
Q_12:;   line 94
 LD   HL,00000H
 LD   (IX+0FFFAH),L
 LD   (IX+0FFFBH),H
Q_14: LD   E,(IX+0FFFAH)
 LD   D,(IX+0FFFBH)
 POP  HL
 PUSH HL
 CALL IGRT_
 JP   C,Q_13
 JR    Q_15 ;
Q_16: LD   L,(IX+0FFFAH)
 LD   H,(IX+0FFFBH)
 INC  HL
 LD   (IX+0FFFAH),L
 LD   (IX+0FFFBH),H
 JR    Q_14 ;
Q_15:;   line 96
 LD   L,(IX+0FFFEH)
 LD   H,(IX+0FFFFH)
 LD   E,L
 LD   D,H
 INC  HL
 LD   (IX+0FFFEH),L
 LD   (IX+0FFFFH),H
 EX   DE,HL
 PUSH HL
 LD   L,(IX+0FFFCH)
 LD   H,(IX+0FFFDH)
 LD   E,(HL)
 PUSH HL
 INC  HL
 LD   D,(HL)
 LD   L,E
 LD   H,D
 INC  DE
 LD   C,L
 LD   B,H
 POP  HL
 LD   (HL),E
 INC  HL
 LD   (HL),D
 LD   L,C
 LD   H,B
 LD   A,(HL)
 POP  HL
 LD   (HL),A
;   line 97
 LD   E,(IX+0FFFCH)
 LD   D,(IX+0FFFDH)
 LD   HL,0000AH
 ADD  HL,DE
 LD   E,(HL)
 INC  HL
 LD   D,(HL)
 LD   L,(IX+0FFFCH)
 LD   H,(IX+0FFFDH)
 LD   A,(HL)
 INC  HL
 LD   H,(HL)
 LD   L,A
 CALL IUGEQ_
 JR   C,Q_18 ;
;   line 98
 LD   L,(IX+0FFFCH)
 LD   H,(IX+0FFFDH)
 LD   E,L
 LD   D,H
 PUSH HL
 LD   HL,00008H
 ADD  HL,DE
 LD   E,(HL)
 INC  HL
 LD   D,(HL)
 POP  HL
 LD   (HL),E
 INC  HL
 LD   (HL),D
Q_18: JP    Q_16
Q_13:;   line 100
 LD   E,(IX+0FFFCH)
 LD   D,(IX+0FFFDH)
 LD   HL,00006H
 ADD  HL,DE
 POP  DE
 PUSH DE
 INC  DE
 INC  DE
 PUSH HL
 LD   A,(HL)
 INC  HL
 LD   H,(HL)
 LD   L,A
 ADD  HL,DE
 EX   DE,HL
 POP  HL
 LD   (HL),E
 INC  HL
 LD   (HL),D
;   line 101
 LD   L,(IX+0FFFCH)
 LD   H,(IX+0FFFDH)
 INC  HL
 INC  HL
 INC  HL
 INC  HL
 LD   E,(HL)
 PUSH HL
 INC  HL
 LD   D,(HL)
 DEC  DE
 POP  HL
 LD   (HL),E
 INC  HL
 LD   (HL),D
;   line 104
 LD   L,(IX+0FFFEH)
 LD   H,(IX+0FFFFH)
 XOR  A
 LD   (HL),A
;   line 105
 POP  DE
 PUSH DE
 LD   HL,00008H
 ADD  HL,SP
 LD   SP,HL
 EX   DE,HL
 POP  IX
 RET
 EXTPUB q_count
q_count:;   line 113
 PUSH HL
;   line 114
 INC  HL
 INC  HL
 INC  HL
 INC  HL
 LD   A,(HL)
 INC  HL
 LD   H,(HL)
 LD   L,A
 POP  DE
 RET
 EXTPUB q_free
q_free:;   line 122
 PUSH HL
;   line 123
 EX   DE,HL
 LD   HL,00006H
 ADD  HL,DE
 LD   A,(HL)
 INC  HL
 LD   H,(HL)
 LD   L,A
 POP  DE
 RET
 DSEG
 ORG  GLOB_
 XSEG
 ORG  CONST_
 EXTRN IGRT_
 EXTRN IUGRT_
 EXTRN IUGEQ_
 EXTRN IUSHR_
 END    ;  Code Bytes: 943 (12), Data Bytes: 0, Constant Bytes: 0
