.386p
CODE32 SEGMENT PARA PUBLIC USE32
ASSUME cs:CODE32, ds:CODE32

		PUBLIC 	_main
		PUBLIC	sound	;where is sound
		EXTRN	part1	:NEAR
		EXTRN	part2	:NEAR
		EXTRN	part3	:NEAR
		EXTRN	part4	:NEAR
		EXTRN	part5	:NEAR
		EXTRN	part6	:NEAR

		include pmode.inc
		include	timer.ext
	
;		sound	db 0	;0-nosound 1-sb/gus
		sound	db 1	;1-sb/gus

_main:
		sti

		mov	al,byte ptr gs:[23]
		mov	sound,al

		call	set_mode13
		call	start_timer
		call	_mem	;memory for bit-sort

	pkej:	
		call	part1
		call	part2
		call	part3
		call	part4
		call	part5
		call	part6

		call	stop_timer

		mov	v86r_ax,3h
		mov	al,10h
		int	33h

		jmp 	_exit

		PUBLIC	gold
		PUBLIC	stal
	gold:	include	mapa\gold	;env-golden
	stal:	include mapa\stal

		include	3engine.ext

CODE32 ENDS
END