;
				;	Disassembled by:
				;		DASMx object code disassembler
				;		(c) Copyright 1996-2003   Conquest Consultants
				;		Version 1.40 (Oct 18 2003)
				;
				;	File:		D:\visual_50_kb_8048.bin
				;
				;	Size:		1024 bytes
				;	Checksum:	C450
				;	CRC-32:		244EE196
				;
				;	Date:		Sun Mar 17 00:02:49 2024
				;
				;	CPU:		Intel 8048 (MCS-48 family)
				;
				;
				;
					org	00000H
				;
0000 : 27		"'"		clr	a
0001 : 04 11		"  "		jmp	L0011
0003 : 04 0A		"  "		jmp	L000A
0005				L0005:
0005 : 44 19		"D "		jmp	L0219
				;
0007 : 16 05		"  "		jtf	L0005
0009 : 93		" "		retr
				;
000A				L000A:
000A : D5		" "		sel	rb1
000B : B8 14		"  "		mov	r0,#014H
000D : B0 A6		"  "		mov	@r0,#0A6H
000F : 15		" "		dis	i
0010 : 93		" "		retr
				;
0011				L0011:
0011 : 9A CF		"  "		anl	p2,#0CFH
0013 : B8 3F		" ?"		mov	r0,#03FH
0015				L0015:
0015 : A0		" "		mov	@r0,a
0016 : E8 15		"  "		djnz	r0,L0015
0018 : D5		" "		sel	rb1
0019 : BE 3F		" ?"		mov	r6,#03FH
001B : BF 3F		" ?"		mov	r7,#03FH
001D : C5		" "		sel	rb0
001E : B9 30		" 0"		mov	r1,#030H
0020 : B8 1F		"  "		mov	r0,#01FH
0022 : 55		"U"		strt	t
0023 : 25		"%"		en	tcnti
0024 : 05		" "		en	i
0025				L0025:
0025 : 18		" "		inc	r0
0026 : F8		" "		mov	a,r0
0027 : D3 2C		" ,"		xrl	a,#02CH
0029 : 96 2D		" -"		jnz	L002D
002B : 34 79		"4y"		call	L0179
002D				L002D:
002D : 54 10		"T "		call	L0210
002F : C6 25		" %"		jz	L0025
0031 : AB		" "		mov	r3,a
0032 : BA C0		"  "		mov	r2,#0C0H
0034				L0034:
0034 : EA 34		" 4"		djnz	r2,L0034
0036 : 3F		"?"		movd	p7,a
0037 : 54 10		"T "		call	L0210
0039 : 9A FE		"  "		anl	p2,#0FEH
003B : 3F		"?"		movd	p7,a
003C : 5B		"["		anl	a,r3
003D : C6 25		" %"		jz	L0025
003F : AB		" "		mov	r3,a
0040 : BA 01		"  "		mov	r2,#001H
0042 : F8		" "		mov	a,r0
0043 : 47		"G"		swap	a
0044 : 77		"w"		rr	a
0045 : 53 78		"Sx"		anl	a,#078H
0047 : AF		" "		mov	r7,a
0048 : FA		" "		mov	a,r2
0049				L0049:
0049 : 5B		"["		anl	a,r3
004A : 96 55		" U"		jnz	L0055
004C				L004C:
004C : FB		" "		mov	a,r3
004D : C6 25		" %"		jz	L0025
004F : FA		" "		mov	a,r2
0050 : E7		" "		rl	a
0051 : AA		" "		mov	r2,a
0052 : 1F		" "		inc	r7
0053 : 04 49		" I"		jmp	L0049
				;
0055				L0055:
0055 : 37		"7"		cpl	a
0056 : 5B		"["		anl	a,r3
0057 : AB		" "		mov	r3,a
0058 : FA		" "		mov	a,r2
0059 : 50		"P"		anl	a,@r0
005A : C6 82		"  "		jz	L0082
005C : F9		" "		mov	a,r1
005D : AE		" "		mov	r6,a
005E				L005E:
005E : FF		" "		mov	a,r7
005F : D1		" "		xrl	a,@r1
0060 : 96 66		" f"		jnz	L0066
0062 : FE		" "		mov	a,r6
0063 : A9		" "		mov	r1,a
0064 : 04 4C		" L"		jmp	L004C
				;
0066				L0066:
0066 : F9		" "		mov	a,r1
0067 : 17		" "		inc	a
0068 : 53 37		"S7"		anl	a,#037H
006A : A9		" "		mov	r1,a
006B : DE		" "		xrl	a,r6
006C : 96 5E		" ^"		jnz	L005E
006E : FA		" "		mov	a,r2
006F : D0		" "		xrl	a,@r0
0070 : A0		" "		mov	@r0,a
0071 : FF		" "		mov	a,r7
0072 : 96 78		" x"		jnz	L0078
0074 : 23 82		"# "		mov	a,#082H
0076 : 54 C8		"T "		call	L02C8
0078				L0078:
0078 : FF		" "		mov	a,r7
0079 : DC		" "		xrl	a,r4
007A : 96 80		"  "		jnz	L0080
007C : AC		" "		mov	r4,a
007D : D5		" "		sel	rb1
007E : AB		" "		mov	r3,a
007F : C5		" "		sel	rb0
0080				L0080:
0080 : 04 4C		" L"		jmp	L004C
				;
0082				L0082:
0082 : FA		" "		mov	a,r2
0083 : D0		" "		xrl	a,@r0
0084 : A0		" "		mov	@r0,a
0085 : FF		" "		mov	a,r7
0086 : A1		" "		mov	@r1,a
0087 : F9		" "		mov	a,r1
0088 : 17		" "		inc	a
0089 : 53 37		"S7"		anl	a,#037H
008B : A9		" "		mov	r1,a
008C : F8		" "		mov	a,r0
008D : D3 20		"  "		xrl	a,#020H
008F : 96 96		"  "		jnz	L0096
0091 : FF		" "		mov	a,r7
0092 : 52 96		"R "		jb2	L0096
0094 : 96 4C		" L"		jnz	L004C
0096				L0096:
0096 : FF		" "		mov	a,r7
0097 : AC		" "		mov	r4,a
0098 : 27		"'"		clr	a
0099 : D5		" "		sel	rb1
009A : AB		" "		mov	r3,a
009B : C5		" "		sel	rb0
009C : FF		" "		mov	a,r7
009D : 96 A5		"  "		jnz	L00A5
009F : 23 81		"# "		mov	a,#081H
00A1 : 54 C8		"T "		call	L02C8
00A3 : 04 4C		" L"		jmp	L004C
				;
00A5				L00A5:
00A5 : 97		" "		clr	c
00A6 : 03 C0		"  "		add	a,#0C0H
00A8 : F6 AC		"  "		jc	L00AC
00AA : 24 0D		"$ "		jmp	L010D
				;
00AC				L00AC:
00AC : 97		" "		clr	c
00AD : FF		" "		mov	a,r7
00AE : 03 B8		"  "		add	a,#0B8H
00B0 : F6 B9		"  "		jc	L00B9
00B2 : FF		" "		mov	a,r7
00B3 : 03 BD		"  "		add	a,#0BDH
00B5 : E6 B9		"  "		jnc	L00B9
00B7 : 24 0D		"$ "		jmp	L010D
				;
00B9				L00B9:
00B9 : D5		" "		sel	rb1
00BA : FD		" "		mov	a,r5
00BB : C5		" "		sel	rb0
00BC : 53 03		"S "		anl	a,#003H
00BE : AE		" "		mov	r6,a
00BF : 96 C6		"  "		jnz	L00C6
00C1 : 14 EF		"  "		call	L00EF
00C3 : E3		" "		movp3	a,@a
00C4 : 04 FB		"  "		jmp	L00FB
				;
00C6				L00C6:
00C6 : D3 01		"  "		xrl	a,#001H
00C8 : 96 E3		"  "		jnz	L00E3
00CA : 14 EF		"  "		call	L00EF
00CC : 43 40		"C@"		orl	a,#040H
00CE : E3		" "		movp3	a,@a
00CF : AE		" "		mov	r6,a
00D0 : D3 60		" `"		xrl	a,#060H
00D2 : 96 D6		"  "		jnz	L00D6
00D4 : 24 57		"$W"		jmp	L0157
				;
00D6				L00D6:
00D6 : FE		" "		mov	a,r6
00D7 : 97		" "		clr	c
00D8 : 03 85		"  "		add	a,#085H
00DA : E6 E0		"  "		jnc	L00E0
00DC : 97		" "		clr	c
00DD : FE		" "		mov	a,r6
00DE : 44 D8		"D "		jmp	L02D8
				;
00E0				L00E0:
00E0 : FE		" "		mov	a,r6
00E1 : 04 FB		"  "		jmp	L00FB
				;
00E3				L00E3:
00E3 : FE		" "		mov	a,r6
00E4 : D3 02		"  "		xrl	a,#002H
00E6 : 96 F6		"  "		jnz	L00F6
00E8 : 14 EF		"  "		call	L00EF
00EA : 43 80		"C "		orl	a,#080H
00EC : E3		" "		movp3	a,@a
00ED : 04 FB		"  "		jmp	L00FB
				;
00EF				L00EF:
00EF : FF		" "		mov	a,r7
00F0 : 53 1F		"S "		anl	a,#01FH
00F2 : 4D		"M"		orl	a,r5
00F3 : 53 3F		"S?"		anl	a,#03FH
00F5 : 93		" "		retr
				;
00F6				L00F6:
00F6 : FF		" "		mov	a,r7
00F7 : 4D		"M"		orl	a,r5
00F8 : 43 C0		"C "		orl	a,#0C0H
00FA : E3		" "		movp3	a,@a
00FB				L00FB:
00FB : AE		" "		mov	r6,a
00FC : 97		" "		clr	c
00FD : 03 C0		"  "		add	a,#0C0H
00FF : F6 03		"  "		jc	L0103
0101 : 24 57		"$W"		jmp	L0157
				;
0103				L0103:
0103 : FD		" "		mov	a,r5
0104 : D2 08		"  "		jb6	L0108
0106 : 24 57		"$W"		jmp	L0157
				;
0108				L0108:
0108 : FE		" "		mov	a,r6
0109 : 53 1F		"S "		anl	a,#01FH
010B : 24 58		"$X"		jmp	L0158
				;
010D				L010D:
010D : FF		" "		mov	a,r7
010E : 43 80		"C "		orl	a,#080H
0110 : 54 80		"T "		call	L0280
0112 : AE		" "		mov	r6,a
0113 : 97		" "		clr	c
0114 : 03 86		"  "		add	a,#086H
0116 : F6 30		" 0"		jc	L0130
0118 : FE		" "		mov	a,r6
0119 : 03 9E		"  "		add	a,#09EH
011B : E6 30		" 0"		jnc	L0130
011D : FD		" "		mov	a,r5
011E : B2 22		" ""		jb5	L0122
0120 : 24 26		"$&"		jmp	L0126
				;
0122				L0122:
0122 : FE		" "		mov	a,r6
0123 : D3 20		"  "		xrl	a,#020H
0125 : AE		" "		mov	r6,a
0126				L0126:
0126 : FD		" "		mov	a,r5
0127 : D2 2B		" +"		jb6	L012B
0129 : 24 57		"$W"		jmp	L0157
				;
012B				L012B:
012B : FE		" "		mov	a,r6
012C				L012C:
012C : 53 1F		"S "		anl	a,#01FH
012E				L012E:
012E : 24 58		"$X"		jmp	L0158
				;
0130				L0130:
0130 : FE		" "		mov	a,r6
0131 : 97		" "		clr	c
0132 : 03 7C		" |"		add	a,#07CH
0134 : E6 3E		" >"		jnc	L013E
0136 : 97		" "		clr	c
0137 : FE		" "		mov	a,r6
0138 : 03 60		" `"		add	a,#060H
013A : F6 3E		" >"		jc	L013E
013C : 24 46		"$F"		jmp	L0146
				;
013E				L013E:
013E : FE		" "		mov	a,r6
013F : 97		" "		clr	c
0140 : 03 41		" A"		add	a,#041H
0142 : F6 46		" F"		jc	L0146
0144 : 24 57		"$W"		jmp	L0157
				;
0146				L0146:
0146 : FD		" "		mov	a,r5
0147 : B2 4B		" K"		jb5	L014B
0149 : 24 4E		"$N"		jmp	L014E
				;
014B				L014B:
014B : FE		" "		mov	a,r6
014C : 17		" "		inc	a
014D : AE		" "		mov	r6,a
014E				L014E:
014E : FD		" "		mov	a,r5
014F : D2 53		" S"		jb6	L0153
0151 : 24 57		"$W"		jmp	L0157
				;
0153				L0153:
0153 : FE		" "		mov	a,r6
0154 : D3 02		"  "		xrl	a,#002H
0156 : AE		" "		mov	r6,a
0157				L0157:
0157 : FE		" "		mov	a,r6
0158				L0158:
0158 : 54 C8		"T "		call	L02C8
015A : F8		" "		mov	a,r0
015B : 43 70		"Cp"		orl	a,#070H
015D : 54 80		"T "		call	L0280
015F : 5A		"Z"		anl	a,r2
0160 : 96 64		" d"		jnz	L0164
0162 : 24 68		"$h"		jmp	L0168
				;
0164				L0164:
0164 : D5		" "		sel	rb1
0165 : BB 32		" 2"		mov	r3,#032H
0167 : C5		" "		sel	rb0
0168				L0168:
0168 : FF		" "		mov	a,r7
0169 : D3 04		"  "		xrl	a,#004H
016B : C6 77		" w"		jz	L0177
016D : D5		" "		sel	rb1
016E : FD		" "		mov	a,r5
016F : 37		"7"		cpl	a
0170 : D2 76		" v"		jb6	L0176
0172 : B9 2F		" /"		mov	r1,#02FH
0174 : B1 01		"  "		mov	@r1,#001H
0176				L0176:
0176 : C5		" "		sel	rb0
0177				L0177:
0177 : 04 4C		" L"		jmp	L004C
				;
0179				L0179:
0179 : D5		" "		sel	rb1
017A : FC		" "		mov	a,r4
017B : F2 C5		"  "		jb7	L01C5
017D				L017D:
017D : D5		" "		sel	rb1
017E : B9 16		"  "		mov	r1,#016H
0180 : F1		" "		mov	a,@r1
0181 : 96 99		"  "		jnz	L0199
0183 : FF		" "		mov	a,r7
0184 : DE		" "		xrl	a,r6
0185 : C6 99		"  "		jz	L0199
0187 : FE		" "		mov	a,r6
0188 : 96 8C		"  "		jnz	L018C
018A : FF		" "		mov	a,r7
018B : AE		" "		mov	r6,a
018C				L018C:
018C : FF		" "		mov	a,r7
018D : A9		" "		mov	r1,a
018E : 07		" "		dec	a
018F : 43 38		"C8"		orl	a,#038H
0191 : AF		" "		mov	r7,a
0192 : F1		" "		mov	a,@r1
0193 : B9 17		"  "		mov	r1,#017H
0195 : A1		" "		mov	@r1,a
0196 : C9		" "		dec	r1
0197 : B1 AF		"  "		mov	@r1,#0AFH
0199				L0199:
0199 : C5		" "		sel	rb0
019A : B8 20		"  "		mov	r0,#020H
019C : FD		" "		mov	a,r5
019D : 53 1F		"S "		anl	a,#01FH
019F : AD		" "		mov	r5,a
01A0 : F0		" "		mov	a,@r0
01A1 : 53 06		"S "		anl	a,#006H
01A3 : C6 A9		"  "		jz	L01A9
01A5 : FD		" "		mov	a,r5
01A6 : 43 20		"C "		orl	a,#020H
01A8 : AD		" "		mov	r5,a
01A9				L01A9:
01A9 : F0		" "		mov	a,@r0
01AA : 37		"7"		cpl	a
01AB : 72 B1		"r "		jb3	L01B1
01AD : FD		" "		mov	a,r5
01AE : 43 40		"C@"		orl	a,#040H
01B0 : AD		" "		mov	r5,a
01B1				L01B1:
01B1 : D5		" "		sel	rb1
01B2 : FD		" "		mov	a,r5
01B3 : C5		" "		sel	rb0
01B4 : 92 BA		"  "		jb4	L01BA
01B6 : 9A EF		"  "		anl	p2,#0EFH
01B8 : 24 BC		"$ "		jmp	L01BC
				;
01BA				L01BA:
01BA : 8A 10		"  "		orl	p2,#010H
01BC				L01BC:
01BC : B2 C2		"  "		jb5	L01C2
01BE : 9A DF		"  "		anl	p2,#0DFH
01C0 : 24 C4		"$ "		jmp	L01C4
				;
01C2				L01C2:
01C2 : 8A 20		"  "		orl	p2,#020H
01C4				L01C4:
01C4 : 93		" "		retr
				;
01C5				L01C5:
01C5 : 03 18		"  "		add	a,#018H
01C7 : AC		" "		mov	r4,a
01C8 : FB		" "		mov	a,r3
01C9 : C6 E1		"  "		jz	L01E1
01CB : EB E1		"  "		djnz	r3,L01E1
01CD : BB 03		"  "		mov	r3,#003H
01CF : FD		" "		mov	a,r5
01D0 : 37		"7"		cpl	a
01D1 : D2 D7		"  "		jb6	L01D7
01D3 : B9 2F		" /"		mov	r1,#02FH
01D5 : B1 01		"  "		mov	@r1,#001H
01D7				L01D7:
01D7 : FE		" "		mov	a,r6
01D8 : 17		" "		inc	a
01D9 : 43 38		"C8"		orl	a,#038H
01DB : 53 3F		"S?"		anl	a,#03FH
01DD : A9		" "		mov	r1,a
01DE : F1		" "		mov	a,@r1
01DF : 54 C8		"T "		call	L02C8
01E1				L01E1:
01E1 : FD		" "		mov	a,r5
01E2 : F2 E6		"  "		jb7	L01E6
01E4 : 24 F6		"$ "		jmp	L01F6
				;
01E6				L01E6:
01E6 : 23 7F		"# "		mov	a,#07FH
01E8 : 35		"5"		dis	tcnti
01E9 : 5D		"]"		anl	a,r5
01EA : AD		" "		mov	r5,a
01EB : 25		"%"		en	tcnti
01EC : 16 F0		"  "		jtf	L01F0
01EE : 24 F2		"$ "		jmp	L01F2
				;
01F0				L01F0:
01F0 : 54 19		"T "		call	L0219
01F2				L01F2:
01F2 : B9 2F		" /"		mov	r1,#02FH
01F4 : B1 19		"  "		mov	@r1,#019H
01F6				L01F6:
01F6 : B9 2F		" /"		mov	r1,#02FH
01F8 : F1		" "		mov	a,@r1
01F9 : 96 FD		"  "		jnz	L01FD
01FB : 44 03		"D "		jmp	L0203
				;
01FD				L01FD:
01FD : 07		" "		dec	a
01FE : A1		" "		mov	@r1,a
01FF : 9A BF		"  "		anl	p2,#0BFH
0201 : 44 05		"D "		jmp	L0205
				;
0203				L0203:
0203 : 8A 40		" @"		orl	p2,#040H
0205				L0205:
0205 : C5		" "		sel	rb0
0206 : 27		"'"		clr	a
0207 : 37		"7"		cpl	a
0208 : A1		" "		mov	@r1,a
0209 : F9		" "		mov	a,r1
020A : 17		" "		inc	a
020B : 53 37		"S7"		anl	a,#037H
020D : A9		" "		mov	r1,a
020E : 24 7D		"$}"		jmp	L017D
				;
0210				L0210:
0210 : F8		" "		mov	a,r0
0211 : 39		"9"		outl	p1,a
0212 : 3C		"<"		movd	p4,a
0213 : 89 FF		"  "		orl	p1,#0FFH
0215 : 09		" "		in	a,p1
0216 : 37		"7"		cpl	a
0217 : D0		" "		xrl	a,@r0
0218 : 93		" "		retr
				;
0219				L0219:
0219 : D5		" "		sel	rb1
021A : AA		" "		mov	r2,a
021B : 23 FC		"# "		mov	a,#0FCH
021D : 62		"b"		mov	t,a
021E : B8 16		"  "		mov	r0,#016H
0220 : F0		" "		mov	a,@r0
0221 : C6 42		" B"		jz	L0242
0223 : 03 FC		"  "		add	a,#0FCH
0225 : A0		" "		mov	@r0,a
0226 : C7		" "		mov	a,psw
0227 : D2 42		" B"		jb6	L0242
0229 : F0		" "		mov	a,@r0
022A : 47		"G"		swap	a
022B : B3		" "		jmpp	@a						;INFO: indirect jump
				;
022C : 9A 7F		"  "		anl	p2,#07FH
022E : 44 42		"DB"		jmp	L0242
				;
0230 : 18		" "		inc	r0
0231 : F0		" "		mov	a,@r0
0232 : 77		"w"		rr	a
0233 : A0		" "		mov	@r0,a
0234 : F2 3A		" :"		jb7	L023A
0236 : 9A 7F		"  "		anl	p2,#07FH
0238 : 44 42		"DB"		jmp	L0242
				;
023A				L023A:
023A : 8A 80		"  "		orl	p2,#080H
023C : 44 42		"DB"		jmp	L0242
				;
023E : 27		"'"		clr	a
023F : A0		" "		mov	@r0,a
0240 : 8A 80		"  "		orl	p2,#080H
0242				L0242:
0242 : B8 14		"  "		mov	r0,#014H
0244 : F0		" "		mov	a,@r0
0245 : C6 6D		" m"		jz	L026D
0247 : 03 FC		"  "		add	a,#0FCH
0249 : A0		" "		mov	@r0,a
024A : C7		" "		mov	a,psw
024B : D2 6D		" m"		jb6	L026D
024D : F0		" "		mov	a,@r0
024E : 47		"G"		swap	a
024F : B3		" "		jmpp	@a						;INFO: indirect jump
				;
0250 : 86 6D		" m"		jni	L026D
0252 : 27		"'"		clr	a
0253 : A0		" "		mov	@r0,a
0254 : 05		" "		en	i
0255 : 44 6D		"Dm"		jmp	L026D
				;
0257 : 18		" "		inc	r0
0258 : F0		" "		mov	a,@r0
0259 : 77		"w"		rr	a
025A : 86 61		" a"		jni	L0261
025C : 43 80		"C "		orl	a,#080H
025E : A0		" "		mov	@r0,a
025F : 44 6D		"Dm"		jmp	L026D
				;
0261				L0261:
0261 : 53 7F		"S "		anl	a,#07FH
0263 : A0		" "		mov	@r0,a
0264 : 44 6D		"Dm"		jmp	L026D
				;
0266 : 27		"'"		clr	a
0267				L0267:
0267 : A0		" "		mov	@r0,a
0268 : B8 15		"  "		mov	r0,#015H
026A : F0		" "		mov	a,@r0
026B : AD		" "		mov	r5,a
026C : 05		" "		en	i
026D				L026D:
026D : CC		" "		dec	r4
026E : FA		" "		mov	a,r2
026F : 93		" "		retr
				;
0270 : A0		" "		mov	@r0,a
0271 : FF		" "		mov	a,r7
0272 : 7D		"}"		addc	a,r5
0273 : 3F		"?"		movd	p7,a
0274 : 3C		"<"		movd	p4,a
0275 : 3E		">"		movd	p6,a
0276 : 3F		"?"		movd	p7,a
0277 : 3F		"?"		movd	p7,a
0278 : 3F		"?"		movd	p7,a
0279 : FF		" "		mov	a,r7
027A : FF		" "		mov	a,r7
027B : FF		" "		mov	a,r7
027C : 00		" "		nop
027D : 00		" "		nop
027E : 00		" "		nop
027F : 00		" "		nop
0280				L0280:
0280 : A3		" "		movp	a,@a
0281 : 93		" "		retr
				;
0282 : 00		" "		nop
0283 : 00		" "		nop
0284 : 80		" "		movx	a,@r0
0285 : AC		" "		mov	r4,a
0286 : 94 90		"  "		call	L0490
0288 : B9 AD		"  "		mov	r1,#0ADH
028A : AE		" "		mov	r6,a
028B : 83		" "		ret
				;
028C : B2 B5		"  "		jb5	L02B5
028E : FC		" "		mov	a,r4
028F : F8		" "		mov	a,r0
0290 : 08		" "		ins	a,bus
0291 : 88 B0		"  "		orl	bus,#0B0H
0293 : B6 B3		"  "		jf0	L02B3
0295 : 7F		" "		addc	a,r7
0296 : F4 F0		"  "		call	L07F0
				;
0298 : B7		" "		db	0B7H
				;
0299 : B8 0A		"  "		mov	r0,#00AH
029B : B4 B1		"  "		call	L05B1
029D : 6F		"o"		add	a,r7
029E : EC E8		"  "		djnz	r4,L02E8
02A0 : 98 9C		"  "		anl	bus,#09CH
02A2 : 6C		"l"		add	a,r4
02A3 : 20		" "		xch	a,@r0
02A4 : 0D		" "		movd	a,p5
02A5 : 75		"u"		ent0	clk
02A6 : E4 E0		"  "		jmp	L07E0
				;
02A8 : 00		" "		nop
02A9 : 6E		"n"		add	a,r6
02AA : 6A		"j"		add	a,r2
02AB : 70		"p"		addc	a,@r0
02AC : 6B		"k"		add	a,r3
02AD : 74 DC		"t "		call	L03DC
02AF : D8		" "		xrl	a,r0
02B0 : 62		"b"		mov	t,a
02B1 : 76 67		"vg"		jf1	L0267
02B3				L02B3:
02B3 : 69		"i"		add	a,r1
02B4 : 68		"h"		add	a,r0
02B5				L02B5:
02B5 : 65		"e"		stop	tcnt
02B6 : D4 D0		"  "		call	L06D0
				;
02B8 : 63		"c"		db	063H
				;
02B9 : 78		"x"		addc	a,r0
02BA : 64 72		"dr"		jmp	L0372
				;
02BC : 66		"f"		db	066H
				;
02BD : 8C		" "		orld	p4,a
02BE : CC		" "		dec	r4
02BF : C8		" "		dec	r0
02C0 : 00		" "		nop
02C1 : 00		" "		nop
02C2 : 00		" "		nop
02C3 : 84 73		" s"		jmp	L0473
				;
02C5 : 1B		" "		inc	r3
02C6 : C4 C0		"  "		jmp	L06C0
				;
02C8				L02C8:
02C8 : D5		" "		sel	rb1
02C9 : 2E		"."		xch	a,r6
02CA : C6 D6		"  "		jz	L02D6
02CC : A9		" "		mov	r1,a
02CD : 07		" "		dec	a
02CE : 43 38		"C8"		orl	a,#038H
02D0 : 2E		"."		xch	a,r6
02D1 : A1		" "		mov	@r1,a
02D2 : FE		" "		mov	a,r6
02D3 : DF		" "		xrl	a,r7
02D4 : 96 D7		"  "		jnz	L02D7
02D6				L02D6:
02D6 : AE		" "		mov	r6,a
02D7				L02D7:
02D7 : 93		" "		retr
				;
02D8				L02D8:
02D8 : D3 7E		" ~"		xrl	a,#07EH
02DA : C6 DE		"  "		jz	L02DE
02DC : 24 57		"$W"		jmp	L0157
02DE				L02DE:
02DE : 04 E0		"  "		jmp	L00E0
				;
02E0 : 66		"f"		db	066H
				;
02E1 : 57		"W"		da	a
02E2 : 57		"W"		da	a
02E3 : 57		"W"		da	a
02E4 : 57		"W"		da	a
02E5 : 57		"W"		da	a
02E6 : 57		"W"		da	a
02E7 : 57		"W"		da	a
02E8				L02E8:
02E8 : 57		"W"		da	a
02E9 : 50		"P"		anl	a,@r0
02EA : 00		" "		nop
02EB : 00		" "		nop
02EC : 00		" "		nop
02ED : 00		" "		nop
02EE : 00		" "		nop
02EF : 00		" "		nop
02F0 : 3E		">"		movd	p6,a
02F1 : 30		"0"		xchd	a,@r0
02F2 : 30		"0"		xchd	a,@r0
02F3 : 30		"0"		xchd	a,@r0
02F4 : 30		"0"		xchd	a,@r0
02F5 : 30		"0"		xchd	a,@r0
02F6 : 30		"0"		xchd	a,@r0
02F7 : 30		"0"		xchd	a,@r0
02F8 : 30		"0"		xchd	a,@r0
02F9 : 2C		","		xch	a,r4
02FA : 00		" "		nop
02FB : 00		" "		nop
02FC : 00		" "		nop
02FD : 00		" "		nop
02FE : 00		" "		nop
02FF : 00		" "		nop
0300 : 37		"7"		cpl	a
				;
0301 : 38		"8"		db	038H
				;
0302 : 2F		"/"		xch	a,r7
0303 : 00		" "		nop
0304 : 00		" "		nop
0305 : 00		" "		nop
0306 : 00		" "		nop
0307 : 00		" "		nop
0308 : 35		"5"		dis	tcnti
0309 : 36 2E		"6."		jt0	L032E
030B : 60		"`"		add	a,@r0
030C : 5C		"\"		anl	a,r4
030D : 27		"'"		clr	a
030E : 3D		"="		movd	p5,a
030F : 79		"y"		addc	a,r1
				;
0310 : 33		"3"		db	033H
				;
0311 : 34 2C		"4,"		call	L012C
0313 : 2D		"-"		xch	a,r5
0314 : 77		"w"		rr	a
				;
0315 : 3B		";"		db	03BH
				;
0316 : 30		"0"		xchd	a,@r0
0317 : 5D		"]"		anl	a,r5
0318 : 31		"1"		xchd	a,@r1
0319 : 32 6D		"2m"		jb1	L036D
031B : 39		"9"		outl	p1,a
031C : 71		"q"		addc	a,@r1
031D : 61		"a"		add	a,@r1
031E : 7A		"z"		addc	a,r2
031F : 5B		"["		anl	a,r3
0320 : 26 2A		"&*"		jnt0	L032A
0322 : 3F		"?"		movd	p7,a
0323 : 00		" "		nop
0324 : 00		" "		nop
0325 : 00		" "		nop
0326 : 00		" "		nop
0327 : 00		" "		nop
0328 : 25		"%"		en	tcnti
0329 : 5E		"^"		anl	a,r6
032A				L032A:
032A : 3E		">"		movd	p6,a
032B : 7E		"~"		addc	a,r6
032C : 7C		"|"		addc	a,r4
				;
032D : 22		"""		db	022H
				;
032E				L032E:
032E : 2B		"+"		xch	a,r3
032F				L032F:
032F : 59		"Y"		anl	a,r1
0330 : 23 24		"#$"		mov	a,#024H
0332 : 3C		"<"		movd	p4,a
0333 : 5F		"_"		anl	a,r7
0334 : 57		"W"		da	a
0335 : 3A		":"		outl	p2,a
0336 : 29		")"		xch	a,r1
0337 : 7D		"}"		addc	a,r5
0338 : 21		"!"		xch	a,@r1
0339 : 40		"@"		orl	a,@r0
033A				L033A:
033A : 4D		"M"		orl	a,r5
033B : 28		"("		xch	a,r0
033C : 51		"Q"		anl	a,@r1
033D : 41		"A"		orl	a,@r1
033E				L033E:
033E : 5A		"Z"		anl	a,r2
033F				L033F:
033F : 7B		"{"		addc	a,r3
0340 : 7D		"}"		addc	a,r5
0341 : 21		"!"		xch	a,@r1
0342 : 3D		"="		movd	p5,a
0343 : 00		" "		nop
0344 : 00		" "		nop
0345 : 00		" "		nop
0346 : 00		" "		nop
0347 : 00		" "		nop
0348 : 28		"("		xch	a,r0
0349 : 5D		"]"		anl	a,r5
034A : 3A		":"		outl	p2,a
034B : 3E		">"		movd	p6,a
034C : 24 7C		"$|"		jmp	L017C
				;
034E : 2D		"-"		xch	a,r5
034F : 79		"y"		addc	a,r1
				;
0350 : 22		"""		db	022H
				;
0351 : 27		"'"		clr	a
				;
0352 : 3B		";"		db	03BH
				;
0353 : 29		")"		xch	a,r1
0354 : 7A		"z"		addc	a,r2
0355 : 6D		"m"		add	a,r5
0356 : 40		"@"		orl	a,@r0
0357 : 60		"`"		add	a,@r0
0358 : 26 7B		"&{"		jnt0	L037B
035A : 2C		","		xch	a,r4
035B : 5C		"\"		anl	a,r4
035C : 61		"a"		add	a,@r1
035D : 71		"q"		addc	a,@r1
035E : 77		"w"		rr	a
035F : 5E		"^"		anl	a,r6
0360 : 37		"7"		cpl	a
				;
0361 : 38		"8"		db	038H
				;
0362 : 2B		"+"		xch	a,r3
0363 : 00		" "		nop
0364 : 00		" "		nop
0365 : 00		" "		nop
0366 : 00		" "		nop
0367 : 00		" "		nop
0368 : 35		"5"		dis	tcnti
0369 : 36 2F		"6/"		jt0	L032F
036B : 3C		"<"		movd	p4,a
036C : 23 25		"#%"		mov	a,#025H
036E : 5F		"_"		anl	a,r7
036F : 59		"Y"		anl	a,r1
				;
0370 : 33		"3"		db	033H
				;
0371 : 34 2E		"4."		call	L012E
0373 : 5B		"["		anl	a,r3
0374 : 5A		"Z"		anl	a,r2
0375 : 4D		"M"		orl	a,r5
0376 : 30		"0"		xchd	a,@r0
0377 : 2A		"*"		xch	a,r2
0378 : 31		"1"		xchd	a,@r1
0379 : 32 3F		"2?"		jb1	L033F
037B				L037B:
037B : 39		"9"		outl	p1,a
037C : 41		"A"		orl	a,@r1
037D : 51		"Q"		anl	a,@r1
037E : 57		"W"		da	a
037F : 7E		"~"		addc	a,r6
0380 : 37		"7"		cpl	a
				;
0381 : 38		"8"		db	038H
				;
0382 : 2D		"-"		xch	a,r5
0383 : 00		" "		nop
0384 : 00		" "		nop
0385 : 00		" "		nop
0386 : 00		" "		nop
0387 : 00		" "		nop
0388 : 35		"5"		dis	tcnti
0389 : 36 2E		"6."		jt0	L032E
038B : 3C		"<"		movd	p4,a
038C : 27		"'"		clr	a
038D : 7B		"{"		addc	a,r3
038E : 60		"`"		add	a,@r0
038F : 79		"y"		addc	a,r1
				;
0390 : 33		"3"		db	033H
				;
0391 : 34 2C		"4,"		call	L012C
0393 : 2B		"+"		xch	a,r3
0394 : 77		"w"		rr	a
0395 : 7C		"|"		addc	a,r4
0396 : 30		"0"		xchd	a,@r0
0397 : 7E		"~"		addc	a,r6
0398 : 31		"1"		xchd	a,@r1
0399 : 32 6D		"2m"		jb1	L036D
039B : 39		"9"		outl	p1,a
039C : 71		"q"		addc	a,@r1
039D : 61		"a"		add	a,@r1
039E : 7A		"z"		addc	a,r2
039F : 7D		"}"		addc	a,r5
03A0 : 2F		"/"		xch	a,r7
03A1 : 28		"("		xch	a,r0
03A2 : 5F		"_"		anl	a,r7
03A3 : 00		" "		nop
03A4 : 00		" "		nop
03A5 : 00		" "		nop
03A6 : 00		" "		nop
03A7 : 00		" "		nop
03A8 : 25		"%"		en	tcnti
03A9 : 26 3A		"&:"		jnt0	L033A
03AB : 3E		">"		movd	p6,a
03AC : 2A		"*"		xch	a,r2
03AD : 5B		"["		anl	a,r3
03AE : 40		"@"		orl	a,@r0
03AF : 59		"Y"		anl	a,r1
03B0 : 23 24		"#$"		mov	a,#024H
				;
03B2 : 3B		";"		db	03BH
				;
03B3 : 3F		"?"		movd	p7,a
03B4 : 57		"W"		da	a
03B5 : 5C		"\"		anl	a,r4
03B6 : 3D		"="		movd	p5,a
03B7 : 5E		"^"		anl	a,r6
03B8 : 21		"!"		xch	a,@r1
				;
03B9 : 22		"""		db	022H
				;
03BA : 4D		"M"		orl	a,r5
03BB : 29		")"		xch	a,r1
03BC : 51		"Q"		anl	a,@r1
03BD : 41		"A"		orl	a,@r1
03BE : 5A		"Z"		anl	a,r2
03BF : 5D		"]"		anl	a,r5
03C0 : 37		"7"		cpl	a
				;
03C1 : 38		"8"		db	038H
				;
03C2 : 2F		"/"		xch	a,r7
03C3 : 00		" "		nop
03C4 : 00		" "		nop
03C5 : 00		" "		nop
03C6 : 00		" "		nop
03C7 : 00		" "		nop
03C8 : 35		"5"		dis	tcnti
03C9 : 36 2E		"6."		jt0	L032E
03CB : 40		"@"		orl	a,@r0
03CC : 3A		":"		outl	p2,a
03CD : 7D		"}"		addc	a,r5
03CE : 5E		"^"		anl	a,r6
03CF : 79		"y"		addc	a,r1
				;
03D0 : 33		"3"		db	033H
				;
03D1 : 34 2C		"4,"		call	L012C
03D3 : 2D		"-"		xch	a,r5
03D4 : 77		"w"		rr	a
03D5 : 7C		"|"		addc	a,r4
03D6 : 30		"0"		xchd	a,@r0
				;
03D7 : 3B		";"		db	03BH
				;
03D8 : 31		"1"		xchd	a,@r1
03D9 : 32 6D		"2m"		jb1	L036D
03DB : 39		"9"		outl	p1,a
03DC				L03DC:
03DC : 71		"q"		addc	a,@r1
03DD : 61		"a"		add	a,@r1
03DE : 7A		"z"		addc	a,r2
03DF : 7B		"{"		addc	a,r3
03E0 : 27		"'"		clr	a
03E1 : 28		"("		xch	a,r0
03E2 : 3F		"?"		movd	p7,a
03E3 : 00		" "		nop
03E4 : 00		" "		nop
03E5 : 00		" "		nop
03E6 : 00		" "		nop
03E7 : 00		" "		nop
03E8 : 25		"%"		en	tcnti
03E9 : 26 3E		"&>"		jnt0	L033E
03EB : 60		"`"		add	a,@r0
03EC : 2A		"*"		xch	a,r2
03ED : 5D		"]"		anl	a,r5
03EE : 7E		"~"		addc	a,r6
03EF : 59		"Y"		anl	a,r1
03F0 : 23 24		"#$"		mov	a,#024H
03F2 : 3C		"<"		movd	p4,a
03F3 : 3D		"="		movd	p5,a
03F4 : 57		"W"		da	a
03F5 : 5C		"\"		anl	a,r4
03F6 : 5F		"_"		anl	a,r7
03F7 : 2B		"+"		xch	a,r3
03F8 : 21		"!"		xch	a,@r1
				;
03F9 : 22		"""		db	022H
				;
03FA : 4D		"M"		orl	a,r5
03FB : 29		")"		xch	a,r1
03FC : 51		"Q"		anl	a,@r1
03FD : 41		"A"		orl	a,@r1
03FE : 5A		"Z"		anl	a,r2
03FF : 5B		"["		anl	a,r3

;--------------------------------------------------------------
Symbol table
============

Value		Type	Name
-----		----	----
0005		Code	L0005
000A		Code	L000A
0011		Code	L0011
0015		Code	L0015
0025		Code	L0025
002D		Code	L002D
0034		Code	L0034
0049		Code	L0049
004C		Code	L004C
0055		Code	L0055
005E		Code	L005E
0066		Code	L0066
0078		Code	L0078
0080		Code	L0080
0082		Code	L0082
0096		Code	L0096
00A5		Code	L00A5
00AC		Code	L00AC
00B9		Code	L00B9
00C6		Code	L00C6
00D6		Code	L00D6
00E0		Code	L00E0
00E3		Code	L00E3
00EF		Code	L00EF
00F6		Code	L00F6
00FB		Code	L00FB
0103		Code	L0103
0108		Code	L0108
010D		Code	L010D
0122		Code	L0122
0126		Code	L0126
012B		Code	L012B
012C		Code	L012C
012E		Code	L012E
0130		Code	L0130
013E		Code	L013E
0146		Code	L0146
014B		Code	L014B
014E		Code	L014E
0153		Code	L0153
0157		Code	L0157
0158		Code	L0158
0164		Code	L0164
0168		Code	L0168
0176		Code	L0176
0177		Code	L0177
0179		Code	L0179
017C		Code	L017C
017D		Code	L017D
018C		Code	L018C
0199		Code	L0199
01A9		Code	L01A9
01B1		Code	L01B1
01BA		Code	L01BA
01BC		Code	L01BC
01C2		Code	L01C2
01C4		Code	L01C4
01C5		Code	L01C5
01D7		Code	L01D7
01E1		Code	L01E1
01E6		Code	L01E6
01F0		Code	L01F0
01F2		Code	L01F2
01F6		Code	L01F6
01FD		Code	L01FD
0203		Code	L0203
0205		Code	L0205
0210		Code	L0210
0219		Code	L0219
023A		Code	L023A
0242		Code	L0242
0261		Code	L0261
0267		Code	L0267
026D		Code	L026D
0280		Code	L0280
02B3		Code	L02B3
02B5		Code	L02B5
02C8		Code	L02C8
02D6		Code	L02D6
02D7		Code	L02D7
02D8		Code	L02D8
02DE		Code	L02DE
02E8		Code	L02E8
032A		Code	L032A
032E		Code	L032E
032F		Code	L032F
033A		Code	L033A
033E		Code	L033E
033F		Code	L033F
036D		Code	L036D
0372		Code	L0372
037B		Code	L037B
03DC		Code	L03DC
0473		Code	L0473
0490		Code	L0490
05B1		Code	L05B1
06C0		Code	L06C0
06D0		Code	L06D0
07E0		Code	L07E0
07F0		Code	L07F0

Number of symbols:			100

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