kolibrios-gitea/programs/media/animage/trunk/init_data.inc

;---------------------------------------------------------
;--------initializate data and params of program----------
;---------------------------------------------------------
	mov	[Scroll1CoordinatX],8+1
	mov	[Scroll2CoordinatY],20+15+1+50+3
	mov	[Window_SizeX],640
	mov	[Window_SizeY],220
	mov	[Window_CordinatX],50
	mov	[Window_CordinatY],50
	mov	[WorkScreen_SizeX],100
	mov	[WorkScreen_SizeY],100
	mov	[MaxWorkScreen_SizeX],100
	mov	[MaxWorkScreen_SizeY],100
	and	[PosX],0
	and	[PosY],0
	mov	[Picture_SizeX],640;400
	mov	[Picture_SizeY],400;280
	mov	[k],1

;   mov [ScreenPointer],I_END ; S = 0, L = 3600000 + 60000 + 500000 = 4160000 = 3,97 Mb
;   mov [PointerToPicture],     I_END+(1200*1000*3)+50*(20*20*3)+500000 ; S = 4160000, L = 768000 = 750 Kb
;   mov [PointerToCopyPicture], I_END+(1200*1000*3)+50*(20*20*3)+500000+(640*400*3) ; S = 4928000, L = 768000 = 750 Kb
;   mov [PointerToCopyPicture2],I_END+(1200*1000*3)+50*(20*20*3)+500000+(640*400*3)*2 ; S = 5696000, L = 768000 = 750 Kb
;   mov [PointerToEditBufer],   I_END+(1200*1000*3)+50*(20*20*3)+500000+(640*400*3)*3 ; S = 6464000, L = 768000 = 750 Kb
;   mov [PointerToSpriteBufer], I_END+(1200*1000*3)+50*(20*20*3)+500000+(640*400*3)*4 ; S = 7232000, L = 768000 = 750 Kb
;   mov [PointerToPalette],     I_END+(1200*100*3)+50*(20*20*3)+1  ; S = 420001
;   mov [ReserveArray],         I_END+(1200*1000)*3+50*(20*20*3)+8 ; S = 3660008

	mcall	68,12,4096
	mov	[ScreenPointer],eax

	and	[save_flag],0
	mov	[line_width],1
	mov	[lastik_is_active],0
	and	[crossing],0
	and	[finishing_crossing],0
	and	[number_undo],0
	and	[instrument_used],0
	and	[DrawSprite_flag],0
finit