unit1.asm

Green brightness grasps the bag implement

	mov       dword ptr [ebp-104],edx
	mov       word ptr [ebp-60],44
	mov       edx,offset s@+81
	lea       eax,dword ptr [ebp-20]
	call      @@System@AnsiString@$bctr$qqrpxc
	inc       dword ptr [ebp-48]
	mov       edx,dword ptr [eax]
	mov       eax,dword ptr [ebp-104]
	mov       eax,dword ptr [eax]
	mov       ecx,dword ptr [eax]
	call      dword ptr [ecx+52]
	dec       dword ptr [ebp-48]
	lea       eax,dword ptr [ebp-20]
	mov       edx,2
	call      @@System@AnsiString@$bdtr$qqrv
	?debug L 268
	mov       word ptr [ebp-60],56
	mov       edx,offset s@+83
	lea       eax,dword ptr [ebp-24]
	call      @@System@AnsiString@$bctr$qqrpxc
	inc       dword ptr [ebp-48]
	lea       edx,dword ptr [ebp-24]
	lea       eax,dword ptr [ebp-4]
	call      @@System@AnsiString@$basg$qqrrx17System@AnsiString
	dec       dword ptr [ebp-48]
	lea       eax,dword ptr [ebp-24]
	mov       edx,2
	call      @@System@AnsiString@$bdtr$qqrv
	?debug L 270
@73:
	mov       word ptr [ebp-60],68
	lea       eax,dword ptr [ebp-28]
	call      @@System@AnsiString@$bctr$qqrv
	mov       ecx,eax
	inc       dword ptr [ebp-48]
	mov       edx,dword ptr [ebp-88]
	xor       eax,eax
	mov       al,byte ptr [edx+_myrecvbuf]
	mov       edx,2
	call      @@Sysutils@IntToHex$qqrii
	lea       ecx,dword ptr [ebp-28]
	push      ecx
	lea       eax,dword ptr [ebp-32]
	call      @@System@AnsiString@$bctr$qqrv
	mov       ecx,eax
	inc       dword ptr [ebp-48]
	lea       eax,dword ptr [ebp-4]
	pop       edx
	call      @@System@AnsiString@$badd$xqqrrx17System@AnsiString
	lea       ecx,dword ptr [ebp-32]
	push      ecx
	lea       eax,dword ptr [ebp-40]
	call      @@System@AnsiString@$bctr$qqrv
	push      eax
	inc       dword ptr [ebp-48]
	mov       edx,offset s@+84
	lea       eax,dword ptr [ebp-36]
	call      @@System@AnsiString@$bctr$qqrpxc
	inc       dword ptr [ebp-48]
	lea       edx,dword ptr [ebp-36]
	pop       ecx
	pop       eax
	call      @@System@AnsiString@$badd$xqqrrx17System@AnsiString
	lea       edx,dword ptr [ebp-40]
	lea       eax,dword ptr [ebp-4]
	call      @@System@AnsiString@$basg$qqrrx17System@AnsiString
	dec       dword ptr [ebp-48]
	lea       eax,dword ptr [ebp-40]
	mov       edx,2
	call      @@System@AnsiString@$bdtr$qqrv
	dec       dword ptr [ebp-48]
	lea       eax,dword ptr [ebp-36]
	mov       edx,2
	call      @@System@AnsiString@$bdtr$qqrv
	dec       dword ptr [ebp-48]
	lea       eax,dword ptr [ebp-32]
	mov       edx,2
	call      @@System@AnsiString@$bdtr$qqrv
	dec       dword ptr [ebp-48]
	lea       eax,dword ptr [ebp-28]
	mov       edx,2
	call      @@System@AnsiString@$bdtr$qqrv
	?debug L 271
	mov       ecx,dword ptr [ebp-88]
	inc       ecx
	mov       dword ptr [ebp-96],ecx
	?debug L 272
	mov       eax,dword ptr [ebp-80]
	dec       eax
	cmp       eax,dword ptr [ebp-96]
	jge       short @74
	?debug L 274
	mov       edx,dword ptr [_form0]
	mov       ecx,dword ptr [edx+724]
	add       ecx,520
	mov       dword ptr [ebp-108],ecx
	mov       eax,dword ptr [ebp-108]
	mov       eax,dword ptr [eax]
	mov       edx,dword ptr [ebp-4]
	mov       ecx,dword ptr [eax]
	call      dword ptr [ecx+52]
	?debug L 277
@74:
	inc       dword ptr [ebp-92]
	inc       dword ptr [ebp-88]
@72:
	mov       eax,dword ptr [ebp-80]
	dec       eax
	cmp       eax,dword ptr [ebp-88]
	jge       @71
	?debug L 282
	dec       dword ptr [ebp-48]
	lea       eax,dword ptr [ebp-4]
	mov       edx,2
	call      @@System@AnsiString@$bdtr$qqrv
	mov       word ptr [ebp-60],0
	?debug L 284
@76:
@69:
	call      @recvHookOn
	?debug L 285
	mov       eax,dword ptr [ebp-80]
	mov       edx,dword ptr [ebp-76]
	mov       dword ptr fs:[0],edx
	?debug L 286
@78:
@77:
	mov       esp,ebp
	pop       ebp
	ret       16
	?debug L 0
@@Myrecv$qqsuipcii	endp
@Myrecv$qqsuipcii	ends
_TEXT	ends
$$BSYMS	segment byte public use32 'DEBSYM'
	dw	64
	dw	517
	dw	0
	dw	0
	dw	0
	dw	0
	dw	0
	dw	0
	dd	?patch74
	dd	?patch75
	dd	?patch76
	df	@@Myrecv$qqsuipcii
	dw	0
	dw	4164
	dw	0
	dw	82
	dw	0
	dw	0
	dw	0
	db	17
	db	64
	db	77
	db	121
	db	114
	db	101
	db	99
	db	118
	db	36
	db	113
	db	113
	db	115
	db	117
	db	105
	db	112
	db	99
	db	105
	db	105
	dw	18
	dw	512
	dw	8
	dw	0
	dw	117
	dw	0
	dw	83
	dw	0
	dw	0
	dw	0
	dw	18
	dw	512
	dw	12
	dw	0
	dw	1136
	dw	0
	dw	84
	dw	0
	dw	0
	dw	0
	dw	18
	dw	512
	dw	16
	dw	0
	dw	116
	dw	0
	dw	85
	dw	0
	dw	0
	dw	0
	dw	18
	dw	512
	dw	20
	dw	0
	dw	116
	dw	0
	dw	86
	dw	0
	dw	0
	dw	0
	dw	18
	dw	512
	dw	65456
	dw	65535
	dw	116
	dw	0
	dw	87
	dw	0
	dw	0
	dw	0
	dw	24
	dw	519
	dw	0
	dw	0
	dw	0
	dw	0
	dd	?patch77
	df	@70
	dw	0
	dw	0
	dw	18
	dw	512
	dw	65532
	dw	65535
	dw	65528
	dw	65535
	dw	88
	dw	0
	dw	0
	dw	0
	dw	18
	dw	512
	dw	65440
	dw	65535
	dw	116
	dw	0
	dw	89
	dw	0
	dw	0
	dw	0
	dw	18
	dw	512
	dw	65444
	dw	65535
	dw	116
	dw	0
	dw	90
	dw	0
	dw	0
	dw	0
	dw	18
	dw	512
	dw	65448
	dw	65535
	dw	116
	dw	0
	dw	91
	dw	0
	dw	0
	dw	0
?patch77	equ	@76-@70
	dw	2
	dw	6
?patch74	equ	@78-@@Myrecv$qqsuipcii+6
?patch75	equ	0
?patch76	equ	@78-@@Myrecv$qqsuipcii
	dw	2
	dw	6
	dw	4
	dw	531
	dw	0
$$BSYMS	ends
_DATA	segment dword public use32 'DATA'
@_$DCGH$@Myrecvfrom$qqsuipciip8sockaddrpi	segment virtual
	align	2
@@_$DCGH$@Myrecvfrom$qqsuipciip8sockaddrpi	label	dword
	dd	@@$xt$17System@AnsiString
	dd	4
	dd	-4
	dd	0
	dd	@@$xt$17System@AnsiString
	dd	4
	dd	-8
	dd	@@$xt$17System@AnsiString
	dd	4
	dd	-12
	dd	@@$xt$17System@AnsiString
	dd	4
	dd	-16
	dd	0
	dd	@@$xt$17System@AnsiString
	dd	4
	dd	-4
	dd	0
	dd	@@$xt$17System@AnsiString
	dd	4
	dd	-20
	dd	0
	dd	@@$xt$17System@AnsiString
	dd	4
	dd	-24
	dd	0
	dd	@@$xt$17System@AnsiString
	dd	4
	dd	-28
	dd	@@$xt$17System@AnsiString
	dd	4
	dd	-32
	dd	@@$xt$17System@AnsiString
	dd	4
	dd	-36
	dd	@@$xt$17System@AnsiString
	dd	4
	dd	-40
	dd	0
@_$DCGH$@Myrecvfrom$qqsuipciip8sockaddrpi	ends
_DATA	ends
_DATA	segment dword public use32 'DATA'
@_$ECTHH$@Myrecvfrom$qqsuipciip8sockaddrpi	segment virtual
	align	2
@@_$ECTHH$@Myrecvfrom$qqsuipciip8sockaddrpi	label	dword
	dd	0
	dd	-76
	dw	0
	dw	5
	dd	0
	dd	@@_$DCGH$@Myrecvfrom$qqsuipciip8sockaddrpi+16
	dw	0
	dw	5
	dd	0
	dd	@@_$DCGH$@Myrecvfrom$qqsuipciip8sockaddrpi+56
	dw	0
	dw	5
	dd	0
	dd	@@_$DCGH$@Myrecvfrom$qqsuipciip8sockaddrpi
	dw	32
	dw	5
	dd	1
	dd	@@_$DCGH$@Myrecvfrom$qqsuipciip8sockaddrpi+72
	dw	32
	dw	5
	dd	1
	dd	@@_$DCGH$@Myrecvfrom$qqsuipciip8sockaddrpi+88
	dw	32
	dw	5
	dd	1
	dd	@@_$DCGH$@Myrecvfrom$qqsuipciip8sockaddrpi+104
@_$ECTHH$@Myrecvfrom$qqsuipciip8sockaddrpi	ends
_DATA	ends
_TEXT	segment dword public use32 'CODE'
@Myrecvfrom$qqsuipciip8sockaddrpi	segment virtual
@@Myrecvfrom$qqsuipciip8sockaddrpi	proc	near
?live16415@0:
	?debug L 288
	push      ebp
	mov       ebp,esp
	add       esp,-108
@79:
	mov       eax,offset @@_$ECTHH$@Myrecvfrom$qqsuipciip8sockaddrpi
	call      @__InitExceptBlockLDTC
	?debug L 296
	xor       edx,edx
	mov       dword ptr [ebp-80],edx
	?debug L 297
	call      @recvfromHookOff
	?debug L 298
	push      dword ptr [ebp+28]
	push      dword ptr [ebp+24]
	push      dword ptr [ebp+20]
	push      dword ptr [ebp+16]
	push      dword ptr [ebp+12]
	push      dword ptr [ebp+8]
	call      @recvfrom
	mov       dword ptr [ebp-80],eax
	?debug L 299
	push      dword ptr [ebp+16]
	push      dword ptr [ebp+12]
	push      offset _myrecvfrombuf
	call      @_memcpy
	add       esp,12
	?debug L 300
	cmp       dword ptr [_ok],0
	je        @80
	cmp       byte ptr [_isnewok],1
	jne       @80
	?debug L 302
	mov       ecx,dword ptr [_form0]
	mov       eax,dword ptr [ecx+724]
	add       eax,520
	mov       dword ptr [ebp-84],eax
	mov       word ptr [ebp-60],8
	lea       eax,dword ptr [ebp-16]
	call      @@System@AnsiString@$bctr$qqrv
	push      eax
	inc       dword ptr [ebp-48]
	mov       edx,offset s@+95
	lea       eax,dword ptr [ebp-12]
	call      @@System@AnsiString@$bctr$qqrpxc
	inc       dword ptr [ebp-48]
	lea       edx,dword ptr [ebp-12]
	push      edx
	mov       edx,offset s@+86
	lea       eax,dword ptr [ebp-8]
	call      @@System@AnsiString@$bctr$qqrpxc
	inc       dword ptr [ebp-48]
	pop       edx
	pop       ecx
	call      @@System@AnsiString@$badd$xqqrrx17System@AnsiString
	lea       edx,dword ptr [ebp-16]
	mov       edx,dword ptr [edx]
	mov       eax,dword ptr [ebp-84]
	mov       eax,dword ptr [eax]
	mov       ecx,dword ptr [eax]
	call      dword ptr [ecx+52]
	dec       dword ptr [ebp-48]
	lea       eax,dword ptr [ebp-16]
	mov       edx,2
	call      @@System@AnsiString@$bdtr$qqrv
	dec       dword ptr [ebp-48]
	lea       eax,dword ptr [ebp-12]
	mov       edx,2
	call      @@System@AnsiString@$bdtr$qqrv
	dec       dword ptr [ebp-48]
	lea       eax,dword ptr [ebp-8]
	mov       edx,2
	call      @@System@AnsiString@$bdtr$qqrv
	?debug L 304
@81:
	mov       dword ptr [ebp-92],1
	?debug L 305
	mov       word ptr [ebp-60],20
	lea       eax,dword ptr [ebp-4]
	call      @@System@AnsiString@$bctr$qqrv
	inc       dword ptr [ebp-48]
	mov       word ptr [ebp-60],32
	?debug L 306
	xor       edx,edx
	mov       dword ptr [ebp-88],edx
	jmp       @83
	?debug L 307
@82:
	cmp       dword ptr [ebp-92],16
	jle       @84
	?debug L 308
	mov       ecx,dword ptr [_form0]
	mov       eax,dword ptr [ecx+724]
	add       eax,520
	mov       dword ptr [ebp-100],eax
	mov       edx,dword ptr [ebp-100]
	mov       eax,dword ptr [edx]
	mov       edx,dword ptr [ebp-4]
	mov       ecx,dword ptr [eax]
	call      dword ptr [ecx+52]
	?debug L 309
	mov       dword ptr [ebp-92],1
	?debug L 311
	mov       eax,dword ptr [_form0]
	mov       edx,dword ptr [eax+724]
	add       edx,520
	mov       dword ptr [ebp-104],edx
	mov       word ptr [ebp-60],44
	mov       edx,offset s@+104
	lea       eax,dword ptr [ebp-20]
	call      @@System@AnsiString@$bctr$qqrpxc
	inc       dword ptr [ebp-48]
	mov       edx,dword ptr [eax]
	mov       eax,dword ptr [ebp-104]
	mov       eax,dword ptr [eax]
	mov       ecx,dword ptr [eax]
	call      dword ptr [ecx+52]
	dec       dword ptr [ebp-48]
	lea       eax,dword ptr [ebp-20]
	mov       edx,2
	call      @@System@AnsiString@$bdtr$qqrv
	?debug L 312
	mov       word ptr [ebp-60],56
	mov       edx,offset s@+106
	lea       eax,dword ptr [ebp-24]
	call      @@System@AnsiString@$bctr$qqrpxc
	inc       dword ptr [ebp-48]
	lea       edx,dword ptr [ebp-24]
	lea       eax,dword ptr [ebp-4]
	call      @@System@AnsiString@$basg$qqrrx17System@AnsiString
	dec       dword ptr [ebp-48]
	lea       eax,dword ptr [ebp-24]
	mov       edx,2
	call      @@System@AnsiString@$bdtr$qqrv
	?debug L 314
@84:
	mov       word ptr [ebp-60],68
	lea       eax,dword ptr [ebp-28]
	call      @@System@AnsiString@$bctr$qqrv
	mov       ecx,eax
	inc       dword ptr [ebp-48]
	mov       edx,dword ptr [ebp-88]
	xor       eax,eax
	mov       al,byte ptr [edx+_myrecvfrombuf]
	mov       edx,2
	call      @@Sysutils@IntToHex$qqrii
	lea       ecx,dword ptr [ebp-28]
	push      ecx
	lea       eax,dword ptr [ebp-32]
	call      @@System@AnsiString@$bctr$qqrv
	mov       ecx,eax
	inc       dword ptr [ebp-48]
	lea       eax,dword ptr [ebp-4]
	pop       edx
	call      @@System@AnsiString@$badd$xqqrrx17System@AnsiString
	lea       ecx,dword ptr [ebp-32]
	push      ecx
	lea       eax,dword ptr [ebp-40]
	call      @@System@AnsiString@$bctr$qqrv
	push      eax
	inc       dword ptr [ebp-48]
	mov       edx,offset s@+107
	lea       eax,dword ptr [ebp-36]
	call      @@System@AnsiString@$bctr$qqrpxc
	inc       dword ptr [ebp-48]
	lea       edx,dword ptr [ebp-36]
	pop       ecx
	pop       eax
	call      @@System@AnsiString@$badd$xqqrrx17System@AnsiString
	lea       edx,dword ptr [ebp-40]
	lea       eax,dword ptr [ebp-4]
	call      @@System@AnsiString@$basg$qqrrx17System@AnsiString
	dec       dword ptr [ebp-48]
	lea       eax,dword ptr [ebp-40]
	mov       edx,2
	call      @@System@AnsiString@$bdtr$qqrv
	dec       dword ptr [ebp-48]
	lea       eax,dword ptr [ebp-36]
	mov       edx,2
	call      @@System@AnsiString@$bdtr$qqrv
	dec       dword ptr [ebp-48]
	lea       eax,dword ptr [ebp-32]
	mov       edx,2
	call      @@System@AnsiString@$bdtr$qqrv
	dec       dword ptr [ebp-48]
	lea       eax,dword ptr [ebp-28]
	mov       edx,2
	call      @@System@AnsiString@$bdtr$qqrv
	?debug L 315
	mov       ecx,dword ptr [ebp-88]
	inc       ecx
	mov       dword ptr [ebp-96],ecx
	?debug L 316
	mov       eax,dword ptr [ebp-80]
	dec       eax
	cmp       eax,dword ptr [ebp-96]
	jge       short @85
	?debug L 318
	mov       edx,dword ptr [_form0]
	mov       ecx,dword ptr [edx+724]
	add       ecx,520
	mov       dword ptr [ebp-108],ecx
	mov       eax,dword ptr [ebp-108]
	mov       eax,dword ptr [eax]
	mov       edx,dword ptr [ebp-4]
	mov       ecx,dword ptr [eax]
	call      dword ptr [ecx+52]
	?debug L 321
@85:
	inc       dword ptr [ebp-92]
	inc       dword ptr [ebp-88]
@83:
	mov       eax,dword ptr [ebp-80]
	dec       eax
	cmp       eax,dword ptr [ebp-88]
	jge       @82
	?debug L 326
	dec       dword ptr [ebp-48]
	lea       eax,dword ptr [ebp-4]
	mov       edx,2
	call      @@System@AnsiString@$bdtr$qqrv
	mov       word ptr [ebp-60],0
	?debug L 328
@87:
@80:
	call      @recvfromHookOn
	?debug L 329
	mov       eax,dword ptr [ebp-80]
	mov       edx,dword ptr [ebp-76]
	mov       dword ptr fs:[0],edx
	?debug L 330
@89:
@88:
	mov       esp,ebp
	pop       ebp
	ret       24
	?debug L 0
@@Myrecvfrom$qqsuipciip8sockaddrpi	endp
@Myrecvfrom$qqsuipciip8sockaddrpi	ends
_TEXT	ends
$$BSYMS	segment byte public use32 'DEBSYM'
	dw	80
	dw	517
	dw	0
	dw	0
	dw	0
	dw	0
	dw	0
	dw	0
	dd	?patch78
	dd	?patch79
	dd	?patch80
	df	@@Myrecvfrom$qqsuipciip8sockaddrpi
	dw	0
	dw	4166
	dw	0
	dw	92
	dw	0
	dw	0
	dw	0
	db	33
	db	64
	db	77
	db	121
	db	114
	db	101
	db	99
	db	118
	db	102
	db	114
	db	111
	db	109
	db	36
	db	113
	db	113
	db	115
	db	117
	db	105
	db	112
	db	99
	db	105
	db	105
	db	112
	db	56
	db	115
	db	111
	db	99
	db	107
	db	97
	db	100
	db	100
	db	114
	db	112
	db	105
	dw	18
	dw	512
	dw	8
	dw	0
	dw	117
	dw	0
	dw	93
	dw	0
	dw	0
	dw	0
	dw	18
	dw	512
	dw	12
	dw	0
	dw	1136
	dw	0
	dw	94
	dw	0
	dw	0
	dw	0
	dw	18
	dw	512
	dw	16
	dw	0
	dw	116
	dw	0
	dw	95
	dw	0
	dw	0
	dw	0
	dw	18
	dw	512
	dw	20
	dw	0
	dw	116
	dw	0
	dw	96
	dw	0
	dw	0
	dw	0
	dw	18
	dw	512
	dw	24
	dw	0
	dw	65527
	dw	65535
	dw	97
	dw	0
	dw	0
	dw	0
	dw	18
	dw	512
	dw	28
	dw	0
	dw	1140
	dw	0