.data
fullrect RECT <0,0,400,300>
.code
DrawProc	proc uses ebx esi
     
     ; No longer erase the background each time drawn (to preserve the "footprints")
      
     ;	invoke	GetStockObject, WHITE_BRUSH
     ;invoke	FillRect, hBackDC, ADDR fullrect, eax
	
	invoke	BitBlt, hBackDC, 0,0,400,300, hStepDC, 0,0,SRCCOPY
	xor		ebx, ebx
	.WHILE	ebx < MAX_SMILIES
		mov		esi, dword ptr [offset SmileyArray + 4 * ebx]
		method	esi, CSmiley, move       ; Now CSmiley objects to be worked with..
		method	esi, CSmiley, draw
		inc		ebx
	.ENDW
ret
DrawProc	endp
