;
			.686
			.MODEL	FLAT, STDCALL
			OPTION	CASEMAP:NONE
;
			PUBLIC	ClsCash
;
			INCLUDE	<windows.inc>
			INCLUDE	<kernel32.inc>
;
_TEXT		SEGMENT
;
			ALIGN	16
ClsCash		PROC	; No Parameter
			PUSH	EBX
			PUSH	ECX
			PUSH	EDI
			INVOKE	VirtualAlloc, NULL, 67108864, MEM_COMMIT, PAGE_READWRITE
			OR		EAX, EAX
			JZ		short WinErr
			MOV		EBX, EAX
			MOV		EDI, EAX
			MOV		EAX, 1
			MOV		ECX, 67108864	; 64MB
@@:			MOV		[ EDI ], EAX
			ADD		EDI, 4
			ADD		EAX, 1
			SUB		ECX, 4
			JNZ		short @B
			INVOKE	VirtualFree, EBX, 67108864, MEM_DECOMMIT
			INVOKE	VirtualFree, EBX, 0, MEM_RELEASE
			XOR		EAX, EAX
			JMP		short ExitCls
;
WinErr:		INVOKE	GetLastError
ExitCls:	POP		EDI
			POP		ECX
			POP		EBX
			RET
ClsCash		ENDP
;
_TEXT		ENDS
;
			END