;  ravi.asm
	org	0
X0000:	ljmp	X0082		; 0000   02 00 82   
	reti			; 0003   32         
	org	0bh
	reti			; 000b   32         
	org	13h
	reti			; 0013   32         
	org	1bh
	reti			; 001b   32         
	org	23h
	reti			; 0023   32         
	org	2bh
	reti			; 002b   32         
X002c:	lcall	X0031		; 002c   12 00 31   
X002f:	sjmp	X002f		; 002f   80 fe      
X0031:	mov	th0,#0ffh	; 0031   75 8c ff   
	mov	tl0,#0ffh	; 0034   75 8a ff   
	mov	r2,th0		; 0037   aa 8c      
	mov	r3,#0		; 0039   7b 00      
	mov	rb0r3,r2	; 003b   8a 03      
	mov	r2,#0		; 003d   7a 00      
	mov	rb1r0,#10h	; 003f   75 08 10   
	mov	rb1r1,#27h	; 0042   75 09 27   
	mov	dpl,r2		; 0045   8a 82      
	mov	dph,r3		; 0047   8b 83      
	lcall	X0055		; 0049   12 00 55   
	mov	r2,dpl		; 004c   aa 82      
	mov	r3,dph		; 004e   ab 83      
	mov	p1,r2		; 0050   8a 90 	;=======> R2 = 0x06     
X0052:	sjmp	X0052		; 0052   80 fe  ;(Using JSIM.EXE)    
	ret			; 0054   22         
X0055:	mov	r2,#10h		; 0055   7a 10      
	clr	a		; 0057   e4         
	mov	r3,a		; 0058   fb         
	mov	r4,a		; 0059   fc         
X005a:	mov	a,dpl		; 005a   e5 82      
	add	a,acc		; 005c   25 e0      
	mov	dpl,a		; 005e   f5 82      
	mov	a,dph		; 0060   e5 83      
	rlc	a		; 0062   33         
	mov	dph,a		; 0063   f5 83      
	mov	a,r3		; 0065   eb         
	rlc	a		; 0066   33         
	mov	r3,a		; 0067   fb         
	mov	a,r4		; 0068   ec         
	rlc	a		; 0069   33         
	mov	r4,a		; 006a   fc         
	mov	a,r3		; 006b   eb         
	subb	a,rb1r0		; 006c   95 08      
	mov	b,a		; 006e   f5 f0      
	mov	a,r4		; 0070   ec         
	subb	a,rb1r1		; 0071   95 09      
	jc	X007b		; 0073   40 06      
	mov	r4,a		; 0075   fc         
	mov	r3,b		; 0076   ab f0      
	orl	dpl,#1		; 0078   43 82 01   
X007b:	djnz	r2,X005a	; 007b   da dd      
	ret			; 007d   22         
X007e:	mov	dpl,#0		; 007e   75 82 00   
	ret			; 0081   22         
X0082:	mov	sp,#9		; 0082   75 81 09   
	lcall	X007e		; 0085   12 00 7e   
	mov	a,dpl		; 0088   e5 82      
	jz	X008f		; 008a   60 03      
	ljmp	X002c		; 008c   02 00 2c   
X008f:	mov	r1,#0		; 008f   79 00      
	mov	a,r1		; 0091   e9         
	orl	a,#0		; 0092   44 00      
	jz	X00b1		; 0094   60 1b      
	mov	r2,#0		; 0096   7a 00      
	mov	dptr,#X00ca	; 0098   90 00 ca   
	mov	r0,#0		; 009b   78 00      
	mov	p2,#0		; 009d   75 a0 00   
X00a0:	clr	a		; 00a0   e4         
	movc	a,@a+dptr	; 00a1   93         
	movx	@r0,a		; 00a2   f2         
	inc	dptr		; 00a3   a3         
	inc	r0		; 00a4   08         
	cjne	r0,#0,X00aa	; 00a5   b8 00 02   
	inc	p2		; 00a8   05 a0      
X00aa:	djnz	r1,X00a0	; 00aa   d9 f4      
	djnz	r2,X00a0	; 00ac   da f2      
	mov	p2,#0ffh	; 00ae   75 a0 ff   
X00b1:	mov	r0,#0		; 00b1   78 00      
	mov	a,r0		; 00b3   e8         
	orl	a,#0		; 00b4   44 00      
	jz	X00c4		; 00b6   60 0c      
	mov	r1,#0		; 00b8   79 00      
	mov	dptr,#X0000	; 00ba   90 00 00   
	clr	a		; 00bd   e4         
X00be:	movx	@dptr,a		; 00be   f0         
	inc	dptr		; 00bf   a3         
	djnz	r0,X00be	; 00c0   d8 fc      
	djnz	r1,X00be	; 00c2   d9 fa      
X00c4:	mov	@r0,a		; 00c4   f6         
	djnz	r0,X00c4	; 00c5   d8 fd      
	ljmp	X002c		; 00c7   02 00 2c   
X00ca	equ	0cah
	end