_DATA SEGMENT
	nazwaPliku byte "d:/Stachurski.dat", 0
	zakres dword 1000
	bufor byte 128 dup(?)
	rBufor dword 128
	zapisano dword 0

_DATA ENDS
;------------
_TEXT SEGMENT
main proc

	; pre los
	call GetTickCount ;zwraca w czas w milisekundach od ostatniego uruchomienia systemu
	invoke nseed, eax ; ustawienie wartości inicującej generator liczb pseudolosowych

	; losowanie i wpisywanie liczb do bufora
	mov ecx, 20
	mov edi, offset bufor
petla:
	push ecx
	invoke nrandom, zakres	; wylosowana liczba w eax

	invoke dwtoa, eax, edi

	add edi, 4

	pop ecx
	loop petla

	; utworzenie pliku "d:/Stachurski.dat"
	invoke CreateFileA, offset nazwaPliku, GENERIC_WRITE, 0, 0, CREATE_ALWAYS, 0, 0
	;push eax

	; zapis bufora do pliku
	invoke WriteFile, eax, offset bufor, rBufor, offset zapisano, 0


	; koniec
	invoke ExitProcess, 0
main endp