; This file was generated by MenuetBASIC Compiler
; Author: Jarek Pelczar
; E-mail: jarekp3@wp.pl
; 
; Input file: dostest.bas
; Output file: dostest.asm
; Additional flags: -fdos-app 
org 0
App_Header:
	mov ax,cs
	mov ds,ax
	mov es,ax
	mov ss,ax
	mov esp,app_stack
	mov eax,65
	mov dword [I],eax
L1:
	mov eax,70
	cmp eax,dword [I]
	jb L2
	mov eax,dword [I]
	mov dword [J],eax
L3:
	mov eax,dword [I]
	push eax
	mov eax,5
	add eax,dword [esp]
	add esp,4
	cmp eax,dword [J]
	jb L4
	mov eax,dword [J]
	push eax
	push ebp
	mov ebp,esp
	call PUTCH
	mov esp,ebp
	pop ebp
	add esp,4
	inc dword [J]
	jmp L3
L4:
	mov eax,10
	push eax
	push ebp
	mov ebp,esp
	call PUTCH
	mov esp,ebp
	pop ebp
	add esp,4
	mov eax,13
	push eax
	push ebp
	mov ebp,esp
	call PUTCH
	mov esp,ebp
	pop ebp
	add esp,4
	inc dword [I]
	jmp L1
L2:
	jmp INTERNAL_app_exit
PUTCH:
	mov eax,dword [ebp+4]
	mov dword [ZNAK],eax
; Begin of user asm block

 mov ah,0xE
 mov bx,7
 mov al,byte [ZNAK]
 int 0x10
; End of user asm block
	ret
INTERNAL_app_exit:
	mov eax,0x4C00 ; Dos exit 
	int 0x21
VAR_POOL_SIZE dd VAR_POOL_END-VAR_POOL_BEGIN
I_END:
times 1024 db 0
app_stack:
VAR_POOL_BEGIN:
dummy_variable dd 0
I dd 0
J dd 0
ZNAK dd 0
VAR_POOL_END:
