WebSVN – Kolibri OS – Blame – /programs/games/tanks/trunk/tanks.asm

Rev	Author	Line No.	Line
31	halyavin	1	;************************************************************
		2	;GAME TANKS CRETED BY ANDREW_PROGRAMMER AKA ANDREY IGNATYEV
		3	;*******************/8/2005******************************
		4	use32
		5	org 0x0
		6	include 'lang.inc'
485	heavyiron	7	include '..\..\..\macros.inc'
31	halyavin	8	db 'MENUET01'
		9	dd 0x1
		10	dd START
		11	dd I_END
		12	dd 0x4000+6404003+5020203+512+640+1+2420203+1
		13	dd 0x4000
		14	dd 0x0
		15	dd 0x0
		16	START:
		17	mov eax,40
		18	mov ebx,111b
485	heavyiron	19	mcall
31	halyavin	20	;----------------------------------------------------------
		21	;---------load all sprites from arrays to memory-----------
		22	;----------------------------------------------------------
		23	and [number_sprite],0
		24	xor eax,eax
		25	nextfile:
		26	mov ebx,[spisok+4*eax]
		27	mov ecx,50
		28	mov esi,ebx
		29	add esi,2
		30	mov edi,0x4000+(6404003)+(502020*3)+10
		31	rep movsb ;copy palitra to memory
		32	mov esi,ebx
		33	add esi,52
		34	xor ecx,ecx
		35	mov cl,byte [ebx]
		36	mov edi,0x4000+(6404003)+(502020*3)+512
		37	push eax
		38	call unpakin
		39	pop eax
		40	mov ecx,20*20
		41	mov esi,0x4000+(6404003)+(502020*3)+512
		42	mov edi,[number_sprite]
		43	imul edi,32020
		44	add edi,0x4000+(6404003)
		45	unp:
		46	xor ebx,ebx
		47	mov bl,byte[esi]
		48	lea ebx,[ebx+ebx*2]
		49	add ebx,0x4000+(6404003)+(502020*3)+10
		50	mov edx,[ebx]
		51	mov [edi],edx
		52	add esi,1
		53	add edi,3
		54	dec ecx
		55	jnz unp
		56	inc [number_sprite]
		57	inc eax
		58	cmp [number_sprite],26;total number of pictures equal 26
		59	jne nextfile
		60	;----------------------------------------------------------
		61	;------rotate sprites of tanks to pi/2---------------------
		62	;----------------------------------------------------------
		63	mov [sp_pos],0x4000+(6404003)+182020*3
		64	and [num_blocks],0
		65	next_block_rotate:
		66	mov [number_sprite],0
		67	next_sprite_rotate:
		68	mov [x],19
		69	and [y],0
		70	rotate_90:
		71	mov ebx,[number_sprite]
		72	mov esi,[y]
		73	imul esi,60
		74	imul ebx,1200
		75	add esi,ebx ;esi=number_sprite1200+y60
		76	add esi,dword [sp_pos]
		77	mov edi,0x4000+(6404003)+(502020*3)
		78	mov ecx,15
		79	rep movsd
		80	mov edi,[number_sprite]
		81	imul edi,1200
		82	add edi,dword [sp_pos]
		83	add edi,82020*3
		84	mov ebx,[x]
		85	lea ebx,[ebx+2*ebx]
		86	add edi,ebx
		87	mov esi,0x4000+(6404003)+(502020*3)
		88	mov ecx,20*3
		89	vertical:
		90	xor eax,eax
		91	mov al,byte[esi+2]
		92	mov [edi+2],al
		93	xor eax,eax
		94	mov ax,word[esi]
		95	mov [edi],ax
		96	add edi,60
		97	add esi,3
		98	sub ecx,3
		99	jnz vertical
		100	dec [x]
		101	inc [y]
		102	cmp [x],-1
		103	jne rotate_90
		104	inc [number_sprite]
		105	cmp [number_sprite],9
		106	jne next_sprite_rotate
		107	add [sp_pos],82020*3
		108	inc [num_blocks]
		109	cmp [num_blocks],3
		110	jne next_block_rotate
		111	;---------------------------------------------------------
		112	restart_level:
		113	call drawwin
		114	;Start game(demo scen)
		115	mov [y],18
		116	@1:
		117	mov [x],30
		118	@2:
		119	mov esi,[x]
		120	mov edi,[y]
		121	imul esi,20*3
		122	imul edi,20(6403)
		123	add edi,esi
		124	add edi,0x4000
		125	mov esi,0x4000+(6404003)+1200
		126	mov [counter],20
		127	mov eax,esi
		128	mov ebx,edi
		129	@3:
		130	mov esi,eax
		131	mov edi,ebx
		132	mov ecx,15
		133	rep movsd
		134	add eax,20*3
		135	add ebx,640*3
		136	dec [counter]
		137	jnz @3
		138	dec [x]
		139	jnz @2
		140	dec [y]
		141	jnz @1
		142	;draw script ****TANKS*****
		143	mov eax,54
		144	@11:
		145	mov esi,5
		146	mov edi,80
		147	xor ebx,ebx
		148	xor edx,edx
		149	mov bl,byte[TANKS_script+2*eax] ;dx
		150	mov dl,byte[TANKS_script+2*eax+1] ;dy
		151	imul ebx,20
		152	imul edx,20
		153	add esi,ebx
		154	add edi,edx
		155	lea esi,[esi+2*esi]
		156	lea edi,[edi+2*edi]
		157	imul edi,640
		158	add edi,esi
		159	add edi,0x4000
		160	mov esi,0x4000+(6404003)
		161	mov ebx,esi
		162	mov edx,edi
		163	mov [counter],20
		164	@22:
		165	mov esi,ebx
		166	mov edi,edx
		167	mov ecx,15
		168	rep movsd
		169	add ebx,20*3
		170	add edx,640*3
		171	dec [counter]
		172	jnz @22
		173	dec eax
		174	cmp eax,-1
		175	jne @11
		176	mov eax,7
		177	mov ebx,0x4000
		178	mov ecx,640*65536+400
		179	mov edx,0*65536+20
485	heavyiron	180	mcall
31	halyavin	181	call menu
		182	;----------------------------
		183	new_level:
		184	call drawwin
		185	mov [SpriteInfo+72+8],dword 100 ;Xo
		186	mov [SpriteInfo+72+36],dword 100 ;Yo
		187	mov edx,[number_level]
		188	call load_level
		189	;--------------------------
		190	and [strike_action],0
		191	and [bazas],0
		192	and [y],0
		193	mov eax,8
		194	next_y:
		195	and [x],0
		196	next_x:
		197	mov esi,[y]
		198	shl esi,5
		199	add esi,[x]
		200	add esi,0x4000+(6404003)+(502020*3)+512
		201	xor ebx,ebx
		202	mov bl,byte[esi]
		203	cmp bl,7
		204	jne no_baza
		205	mov ecx,[x]
		206	mov edx,[y]
		207	inc ecx
		208	inc [bazas]
		209	add eax,4
		210	imul ecx,20
		211	imul edx,20
		212	mov [SpriteInfo+9*eax+0],dword 3
		213	mov [SpriteInfo+9*eax+4],dword 1
		214	mov [SpriteInfo+9*eax+8],dword ecx
		215	mov [SpriteInfo+9*eax+12],dword edx
		216	mov [SpriteInfo+9*eax+16],dword 5
		217	mov [SpriteInfo+9*eax+28],dword -5
		218	mov edx,eax
		219	shr edx,2
		220	mov [LifesTanks+edx],byte 3;three lifes
		221	mov [PulyTanks+edx],byte 1 ;can draw animation of "puly"
		222	no_baza:
		223	inc [x]
		224	cmp [x],32
		225	jne next_x
		226	inc [y]
		227	cmp [y],20
		228	jne next_y
		229	mov [LifesPlayer],3*4
		230	and [score],0
		231	;----------------------------------------------------------
		232	;--------------------main loop-----------------------------
		233	;----------------------------------------------------------
		234	maincycle:
		235	;save fon
		236	mov eax,23*4
		237	SaveFonForSprites:
		238	mov ebx,[SpriteInfo+9*eax+4]
		239	test ebx,ebx ;if ebx<>0 then can save
		240	jz NoSaveFon
		241	mov esi,[SpriteInfo+9*eax+8] ; cordinat x
		242	mov edi,[SpriteInfo+9*eax+12] ; cordinat y
		243	mov edx,eax
		244	shr edx,2
		245	call SaveFon
		246	NoSaveFon:
		247	sub eax,4
		248	cmp eax,-4
		249	jne SaveFonForSprites
		250	;put sprites
		251	mov eax,23*4
		252	PutSprites:
		253	mov ebx,[SpriteInfo+9*eax+4]
		254	test ebx,ebx
		255	jz NoPutSprite
		256	and ebx,10000b
		257	test ebx,ebx ; move to transparent shablon ?
		258	jnz NoPutSprite
		259	mov esi,[SpriteInfo+9*eax+8] ; x
		260	mov edi,[SpriteInfo+9*eax+12] ; y
		261	mov edx,[SpriteInfo+9*eax+0] ;number sprite in sprites table
		262	shl edx,2
		263	add edx,[SpriteInfo+9eax+24] ;edx=4NumSprites+phas
		264	call PutSprite
		265	NoPutSprite:
		266	sub eax,4
		267	cmp eax,-4
		268	jne PutSprites
		269	;put image
		270	call clock
		271	mov ebx,[time]
		272	sub ebx,[time_frame_old]
		273	cmp ebx,5
		274	jl NoPutScreen
		275	mov ebx,[time]
		276	mov [time_frame_old],ebx
		277	mov eax,7
		278	mov ebx,0x4000
		279	mov ecx,640*65536+400
		280	mov edx,0*65536+20
485	heavyiron	281	mcall
31	halyavin	282	NoPutScreen:
		283	;put fon
		284	mov eax,23*4
		285	PutFonForSprites:
		286	mov ebx,[SpriteInfo+9*eax+4]
		287	test ebx,ebx
		288	jz NoPutFon
		289	mov esi,[SpriteInfo+9*eax+8]
		290	mov edi,[SpriteInfo+9*eax+12]
		291	mov edx,eax
		292	shr edx,2
		293	call PutFon
		294	NoPutFon:
		295	sub eax,4
		296	cmp eax,-4
		297	jne PutFonForSprites
		298	;change phas(if need)
		299	mov eax,23*4
		300	ChangePhasSprites:
		301	push eax
		302	call clock
		303	pop eax
		304	mov ebx,[SpriteInfo+9*eax+16] ;time of animation
		305	mov ecx,[SpriteInfo+9*eax+20] ;time of last frame
		306	mov edx,[time]
		307	sub edx,ecx
		308	cmp edx,ebx
		309	jl no_change_phas
		310	mov ebx,[time]
		311	mov [SpriteInfo+9*eax+20],ebx ;save new time
		312	;------------------------------
		313	mov esi,[SpriteInfo+9*eax+8]
		314	mov edi,[SpriteInfo+9*eax+12]
		315	mov ecx,[SpriteInfo+9*eax+28]
		316	mov edx,[SpriteInfo+9*eax+32]
		317	add esi,ecx ;x=x+dx
		318	add edi,edx ;y=y+dy
		319	mov [SpriteInfo+9*eax+8],dword esi
		320	mov [SpriteInfo+9*eax+12],dword edi
		321	;-------------------------------
		322	mov edx,[SpriteInfo+9*eax+24] ;phas
		323	add edx,1
		324	cmp edx,4
		325	jne no_limit_phas
		326	xor edx,edx
		327	mov [SpriteInfo+9*eax+24],dword edx
		328	mov [SpriteInfo+9*eax+4],dword edx
		329	jmp no_change_phas
		330	no_limit_phas:
		331	mov [SpriteInfo+9*eax+24],dword edx
		332	no_change_phas:
		333	sub eax,4
		334	cmp eax,-4
		335	jne ChangePhasSprites
		336	;-------------------------------------------------
		337	;----------------keys-----------------------------
		338	;-------------------------------------------------
		339	mov eax,23
		340	mov ebx,3
485	heavyiron	341	mcall
31	halyavin	342	cmp eax,1
		343	jne keypressed
		344	call drawwin
		345	jmp action
		346	keypressed:
		347	cmp eax,2
		348	jne action
		349	and [_dx],0
		350	and [_dy],0
		351	mov eax,2
485	heavyiron	352	mcall
31	halyavin	353	shr eax,8
		354	;---------
		355	cmp eax,32
		356	jne key2
		357	cmp [strike_action],0
		358	jne action
		359	mov [SpriteInfo+36+4],dword 1 ;can draw sprite "puly"
		360	mov [strike_action],1 ;sprite is active
		361	mov eax,[SpriteInfo+72+8]
		362	mov ebx,[SpriteInfo+72+12]
		363	mov ecx,[SpriteInfo+72+28]
		364	mov edx,[SpriteInfo+72+32]
		365	add eax,ecx
		366	add ebx,edx
		367	mov [SpriteInfo+36+8],dword eax
		368	mov [SpriteInfo+36+12],dword ebx
		369	jmp action
		370	key2:cmp eax,176
		371	jne key3
		372	mov [SpriteInfo+8*9+0],dword 8
		373	mov [SpriteInfo+8*9+4],dword 1
		374	mov [SpriteInfo+8*9+28],dword -5
		375	mov [SpriteInfo+8*9+32],dword 0
		376	mov [_dx],0
		377	mov [_dy],10
		378	cmp [strike_action],0
		379	jne action
		380	mov [SpriteInfo+36+28],dword -5
		381	mov [SpriteInfo+36+32],dword 0
		382	jmp action
		383	key3:cmp eax,179
		384	jne key4
		385	mov [SpriteInfo+8*9+0],dword 4
		386	mov [SpriteInfo+8*9+4],dword 1
		387	mov [SpriteInfo+8*9+28],dword 5
		388	mov [SpriteInfo+8*9+32],dword 0
		389	mov [_dx],15
		390	mov [_dy],10
		391	cmp [strike_action],0
		392	jne action
		393	mov [SpriteInfo+36+28],dword 5
		394	mov [SpriteInfo+36+32],dword 0
		395	jmp action
		396	key4:cmp eax,178
		397	jne key5
		398	mov [SpriteInfo+8*9+0],dword 2
		399	mov [SpriteInfo+8*9+4],dword 1
		400	mov [SpriteInfo+8*9+28],dword 0
		401	mov [SpriteInfo+8*9+32],dword -5
		402	mov [_dx],10
		403	mov [_dy],1
		404	cmp [strike_action],0
		405	jne action
		406	mov [SpriteInfo+36+28],dword 0
		407	mov [SpriteInfo+36+32],dword -5
		408	jmp action
		409	key5:cmp eax,177
		410	jne key6
		411	mov [SpriteInfo+8*9+0],dword 6
		412	mov [SpriteInfo+8*9+4],dword 1
		413	mov [SpriteInfo+8*9+28],dword 0
		414	mov [SpriteInfo+8*9+32],dword 5
		415	mov [_dy],15
		416	mov [_dx],10
		417	cmp [strike_action],0
		418	jne action
		419	mov [SpriteInfo+36+28],dword 0
		420	mov [SpriteInfo+36+32],dword 5
		421	jmp action
		422	key6:cmp eax,27
		423	jne action
		424	mov eax,-1
485	heavyiron	425	mcall
31	halyavin	426	action:
		427	mov [SpriteInfo+72+4],dword 1
		428	mov [SpriteInfo+72+16],dword 5 ;usal speed of tank
		429	mov esi,[SpriteInfo+8*9+8] ;cordinat x of sprite
		430	mov edi,[SpriteInfo+8*9+12] ;cordinat y of sprite
		431	mov ecx,[SpriteInfo+72+28]
		432	mov edx,[SpriteInfo+72+32]
		433	add ecx,[_dx]
		434	add edx,[_dy]
		435	add esi,ecx ;x=x+_dx+dx
		436	add edi,edx ;y=y+_dy+dy
		437	call map_x_y
		438	cmp ecx,6
		439	jne no_woter
		440	mov [SpriteInfo+72+16],dword 7 ;in water tank slow move
		441	no_woter:
		442	cmp ecx,4
		443	jne no_palma
		444	mov [SpriteInfo+72+4],dword 10000b;if bit 4 than transparent sprite
		445	no_palma:
		446	cmp ecx,8
		447	jne no_derevo
		448	mov [SpriteInfo+72+4],dword 10000b
		449	no_derevo:
		450	test edx,edx
		451	jnz ani
		452	mov [SpriteInfo+8*9+28],dword 0
		453	mov [SpriteInfo+8*9+32],dword 0
		454	;-------------------------------------------------
		455	ani:
		456	mov eax,[strike_action]
		457	test eax,eax
		458	jz no_anim_strike
		459	mov esi,[SpriteInfo+36+8]
		460	mov edi,[SpriteInfo+36+12]
		461	mov ecx,[SpriteInfo+36+28]
		462	mov edx,[SpriteInfo+36+32]
		463	add esi,ecx
		464	add edi,edx
		465	call map_x_y
		466	cmp cl,0
		467	jne no_stena
		468	mov [ebx],byte 2 ;trava
		469	jmp bum
		470	no_stena:
		471	cmp cl,1
		472	jne no_brony
		473	jmp bum
		474	no_brony:
		475	cmp cl,7
		476	jne anim_action_puly
		477	sub [bazas],1
		478	mov [ebx],byte 2 ;trava
		479	bum:
		480	mov esi,[SpriteInfo+36+8]
		481	mov edi,[SpriteInfo+36+12]
		482	mov [SpriteInfo+4],dword 1
		483	mov [SpriteInfo+8],dword esi
		484	mov [SpriteInfo+12],dword edi
		485	mov [SpriteInfo+36+4],dword 0
		486	mov [end_bum],1
		487	jmp no_anim_strike
		488	anim_action_puly:
		489	mov [SpriteInfo+36+4],dword 1
		490	no_anim_strike:
		491	;-------------------------------------------------
		492	;�஢��塞 �� ⨢��
		493	mov esi,[SpriteInfo+4*9+8]
		494	mov edi,[SpriteInfo+4*9+12]
		495	mov [x],esi ;��न�� x �㫨
		496	mov [y],edi ;��न�� y �㫨
		497	mov eax,3*4
		498	bum_tank:
		499	mov ebx,eax
		500	shr ebx,2
		501	xor ecx,ecx
		502	mov cl,byte [LifesTanks+ebx]
		503	cmp ecx,0
		504	jz no_strike
		505	mov esi,[SpriteInfo+9*eax+8] ;x
		506	mov edi,[SpriteInfo+9*eax+12] ;y
		507	sub esi,[x]
		508	sub edi,[y]
		509	cmp esi,5
		510	ja no_strike
		511	cmp edi,5
		512	ja no_strike
		513	add [score],5
		514	cmp [score],20
		515	jl no_bonus
		516	add [LifesPlayer],4
		517	and [score],0
		518	no_bonus:
		519	dec ecx;,1
		520	mov [LifesTanks+ebx],cl ;life=life-1
		521	mov esi,[x]
		522	mov edi,[y]
		523	mov [SpriteInfo+4],dword 1
		524	mov [SpriteInfo+8],dword esi
		525	mov [SpriteInfo+12],dword edi
		526	mov [SpriteInfo+36+4],dword 0
		527	mov [end_bum],1
		528	no_strike:
		529	add eax,4
		530	cmp eax,10*4
		531	jne bum_tank
		532	;-------------------------------------------------
		533	xor eax,eax
		534	mov al,[end_bum]
		535	test eax,eax
		536	jz no_end_strike
		537	mov eax,[SpriteInfo+24]
		538	cmp eax,3
		539	jne no_end_strike
		540	and [strike_action],0
		541	and [end_bum],0
		542	mov edx,[number_level]
		543	mov ecx,15
		544	call load_level
		545	no_end_strike:
		546	;----------------------------
		547	;�஢��塞,�� ⨢�� ப�
		548	mov eax,3*4
		549	mov esi,[SpriteInfo+72+8]
		550	mov edi,[SpriteInfo+72+12]
		551	mov [x],esi
		552	mov [y],edi
		553	strike_to_player:
		554	mov ebx,eax
		555	add ebx,28
		556	mov esi,[SpriteInfo+9*ebx+8]
		557	mov edi,[SpriteInfo+9*ebx+12]
		558	sub esi,[x]
		559	sub edi,[y]
		560	cmp esi,5
		561	ja no_strike_to_player
		562	cmp edi,5
		563	ja no_strike_to_player
		564	mov esi,[x]
		565	mov edi,[y]
		566	mov [SpriteInfo+9*ebx+4],dword 0
		567	add ebx,28
		568	mov [SpriteInfo+9*ebx+4],dword 1
		569	mov [SpriteInfo+9*ebx+8],dword esi
		570	mov [SpriteInfo+9*ebx+12],dword edi
		571	sub [LifesPlayer],1
		572	cmp [LifesPlayer],0
		573	jne no_game_over
		574	call end_game
		575	jmp restart_level
		576	no_game_over:
		577	no_strike_to_player:
		578	add eax,4
		579	cmp eax,10*4
		580	jne strike_to_player
		581	;----------------------------
		582	xor eax,eax
		583	mov al,[bazas]
		584	test eax,eax
		585	jnz no_end_level
		586	call you_won
		587	inc [number_level]
		588	cmp [number_level],25
		589	jne no_end_game
		590	mov eax,-1
485	heavyiron	591	mcall
31	halyavin	592	no_end_game:
		593	jmp new_level
		594	no_end_level:
		595	;-------------------------------------------------
		596	;------------ logic of tanks----------------------
		597	;-------------------------------------------------
		598	mov eax,12
		599	next_bad_tank:
		600	mov ebx,eax
		601	shr ebx,2
		602	xor ecx,ecx
		603	mov cl,byte[LifesTanks+ebx]
		604	test ecx,ecx
		605	jz no_action_bad_tank
		606	mov ebx,[SpriteInfo+9*eax+4]
		607	test ebx,ebx
		608	jnz no_action_bad_tank
		609	;---------------------
		610	mov esi,[SpriteInfo+9*eax+8]
		611	mov edi,[SpriteInfo+9*eax+12]
		612	mov [x],esi
		613	mov [y],edi
		614	mov ecx,[SpriteInfo+9*eax+28]
		615	mov edx,[SpriteInfo+9*eax+32]
		616	;ᬮ�ਬ �� ।� ⠭��-��⨢��
		617	cmp ecx,0
		618	ja more_null_x
		619	lea ecx,[ecx+2*ecx]
		620	jmp test_y
		621	more_null_x:
		622	shl ecx,2
		623	add ecx,15
		624	test_y:
		625	cmp edx,0
		626	ja more_null_y
		627	lea edx,[edx+2*edx]
		628	jmp add_numbers
		629	more_null_y:
		630	shl edx,2
		631	add edx,15
		632	add_numbers:
		633	;--------------------
		634	add esi,ecx
		635	add edi,edx
		636	call map_x_y
		637	cmp ecx,4
		638	jne no_palma_p
		639	mov [SpriteInfo+9*eax+4],dword 10000b
		640	no_palma_p:
		641	cmp ecx,8
		642	jne no_derevo_p
		643	mov [SpriteInfo+9*eax+4],dword 10000b
		644	no_derevo_p:
		645	;�᫨ �� ⠭�� ९��⢨�,� ��
		646	;��ࠢ��
		647	test edx,edx
		648	jnz lab1
		649	;�஢��塞 - �� ⠭� � �㯨�(3 ��ࢫ�� )
		650	and [tupik],0
		651	mov esi,[x]
		652	mov edi,[y]
		653	add esi,(20+15)
		654	add edi,10
		655	call map_x_y
		656	test edx,edx
		657	jnz direct1
		658	inc [tupik]
		659	direct1:
		660	mov esi,[x]
		661	mov edi,[y]
		662	add esi,10
		663	add edi,(20+15)
		664	call map_x_y
		665	test edx,edx
		666	jnz direct2
		667	inc [tupik]
		668	direct2:
		669	mov esi,[x]
		670	mov edi,[y]
		671	add esi,-15
		672	add edi,10
		673	call map_x_y
		674	test edx,edx
		675	jnz direct3
		676	inc [tupik]
		677	direct3:
		678	mov esi,[x]
		679	mov edi,[y]
		680	add esi,10
		681	add edi,-15
		682	call map_x_y
		683	test edx,edx
		684	jnz direct4
		685	inc [tupik]
		686	direct4:
		687	cmp [tupik],3
		688	je no_move0
		689	;------------------
		690	;strategy1
		691	mov esi,[x]
		692	mov edi,[y]
		693	add esi,(20+15)
		694	add edi,10
		695	call map_x_y
		696	test edx,edx
		697	jnz no_strategy1
		698	mov esi,[x]
		699	mov edi,[y]
		700	add esi,10
		701	add edi,-15
		702	call map_x_y
		703	jnz no_strategy1
		704	jmp no_move3 ;going to left
		705	no_strategy1:
		706	;------------------
		707	mov esi,[x]
		708	mov edi,[y]
		709	add esi,-15
		710	add edi,10
		711	call map_x_y
		712	test edx,edx
		713	jnz no_strategy2
		714	mov esi,[x]
		715	mov edi,[y]
		716	add esi,10
		717	add edi,-15
		718	call map_x_y
		719	test edx,edx
		720	jnz no_strategy2
		721	jmp no_move2
		722	no_strategy2:
		723	;------------------
		724	mov esi,[x]
		725	mov edi,[y]
		726	add edi,(20+15)
		727	add esi,10
		728	call map_x_y
		729	test edx,edx
		730	jnz no_strategy3
		731	mov esi,[x]
		732	mov edi,[y]
		733	add esi,-15
		734	add edi,10
		735	call map_x_y
		736	test edx,edx
		737	jnz no_strategy3
		738	jmp no_move1
		739	no_strategy3:
		740	;-------------------------------------------------
		741	no_move0:
		742	mov esi,[x] ; x
		743	mov edi,[y] ; y
		744	add edi,-15 ; (y-20) up
		745	add esi,10
		746	call map_x_y
		747	test edx,edx
		748	jz no_move1
		749	;�� ᢮�� - �� up
		750	mov [SpriteInfo+9*eax+0],dword 3
		751	mov [SpriteInfo+9*eax+28],dword 0
		752	mov [SpriteInfo+9*eax+32],dword -5
		753	jmp lab1
		754	no_move1:
		755	mov esi,[x]
		756	mov edi,[y]
		757	add esi,(20+15) ;x+20
		758	add edi,10
		759	call map_x_y
		760	test edx,edx
		761	jz no_move2
		762	; right
		763	mov [SpriteInfo+9*eax+0],dword 5
		764	mov [SpriteInfo+9*eax+28],dword 5
		765	mov [SpriteInfo+9*eax+32],dword 0
		766	jmp lab1
		767	no_move2:
		768	mov esi,[x]
		769	mov edi,[y]
		770	add esi,10 ;x-20
		771	add edi,(20+15)
		772	call map_x_y
		773	test edx,edx
		774	jz no_move3
		775	; down
		776	mov [SpriteInfo+9*eax+0],dword 7
		777	mov [SpriteInfo+9*eax+28],dword 0
		778	mov [SpriteInfo+9*eax+32],dword 5
		779	jmp lab1
		780	no_move3:
		781	mov esi,[x]
		782	mov edi,[y]
		783	add edi,10 ;y+20
		784	add esi,-15
		785	call map_x_y
		786	test edx,edx
		787	jz no_move4
		788	;�� ᢮��-�� left
		789	mov [SpriteInfo+9*eax+0],dword 9
		790	mov [SpriteInfo+9*eax+28],dword -5
		791	mov [SpriteInfo+9*eax+32],dword 0
		792	jmp lab1
		793	no_move4:
		794	mov [SpriteInfo+9*eax+28],dword 0
		795	mov [SpriteInfo+9*eax+32],dword 0
		796	lab1:
		797	mov edx,dword[SpriteInfo+9*eax+4]
		798	test edx,edx
		799	jnz no_action_bad_tank
		800	mov [SpriteInfo+9*eax+4],dword 1
		801	no_action_bad_tank:
		802	add eax,4
		803	cmp eax,10*4
		804	jne next_bad_tank
		805	;-------------------------------------------------
		806	mov eax,12
		807	next_puly:
		808	mov edx,eax
		809	shr edx,2
		810	xor ecx,ecx
		811	mov cl,byte[PulyTanks+edx]
		812	test ecx,ecx ;can change course of puly ?
		813	jz no_change_course
		814	xor ecx,ecx
		815	mov cl,byte[LifesTanks+edx]
		816	test ecx,ecx ;is tank not destroed ?
		817	jz no_draw_s
		818	mov ecx,[SpriteInfo+9*eax+24] ;tank's phas of animation
		819	test ecx,ecx ; phas=0 ?
		820	jnz no_change_course
		821	mov esi,[SpriteInfo+9*eax+8]
		822	mov edi,[SpriteInfo+9*eax+12]
		823	mov ecx,[SpriteInfo+9*eax+28]
		824	mov edx,[SpriteInfo+9*eax+32]
		825	mov ebx,eax
		826	add ebx,28
		827	mov [SpriteInfo+9*ebx+0],dword 1
		828	mov [SpriteInfo+9*ebx+4],dword 1
		829	mov [SpriteInfo+9*ebx+28],dword ecx
		830	mov [SpriteInfo+9*ebx+32],dword edx
		831	mov [SpriteInfo+9*ebx+16],dword 3
		832	mov [SpriteInfo+9*ebx+8],dword esi
		833	mov [SpriteInfo+9*ebx+12],dword edi
		834	mov ebx,eax
		835	shr ebx,2
		836	mov [PulyTanks+ebx],byte 0
		837	jmp no_draw_s
		838	;-------------------
		839	no_change_course:
		840	mov ebx,eax
		841	add ebx,28
		842	mov ecx,[SpriteInfo+9*ebx+24]
		843	test ecx,ecx
		844	jnz no_draw_s
		845	mov esi,[SpriteInfo+9*ebx+8]
		846	mov edi,[SpriteInfo+9*ebx+12]
		847	mov ecx,[SpriteInfo+9*ebx+28]
		848	mov edx,[SpriteInfo+9*ebx+32]
		849	call map_x_y
		850	cmp ecx,1
		851	je bumm
		852	cmp ecx,0
		853	je strike_to_wall
		854	jmp no_bumm
		855	strike_to_wall:
		856	mov [ebx],byte 2
		857	bumm:
		858	;-------------------
		859	mov ebx,eax
		860	add ebx,28
		861	mov [SpriteInfo+9*ebx+28],dword 0
		862	mov [SpriteInfo+9*ebx+32],dword 0
		863	mov esi,[SpriteInfo+9*ebx+8]
		864	mov edi,[SpriteInfo+9*ebx+12]
		865	add ebx,28
		866	mov [SpriteInfo+9*ebx+4],dword 1
		867	mov [SpriteInfo+9*ebx+8],dword esi
		868	mov [SpriteInfo+9*ebx+12],dword edi
		869	mov [SpriteInfo+9*ebx+16],dword 3
		870	mov [SpriteInfo+9*ebx+28],dword 0
		871	mov [SpriteInfo+9*ebx+32],dword 0
		872	mov ebx,eax
		873	shr ebx,2
		874	mov [PulyTanks+ebx],byte 1
		875	mov edx,[number_level]
		876	mov ecx,15
		877	push eax
		878	call load_level
		879	pop eax
		880	jnp no_draw_s
		881	;-------------------
		882	no_bumm:
		883	mov ebx,eax
		884	add ebx,28
		885	mov [SpriteInfo+9*ebx+4],dword 1 ; can draw sprite of puly
		886	no_draw_s:
		887	add eax,4
		888	cmp eax,10*4
		889	jne next_puly
		890	;-------------------------------------------------
		891	;-------------end of tanks logic------------------
		892	;-------------------------------------------------
		893	mov eax,13
		894	mov ebx,180*65536+220
		895	mov ecx,425*65536+17
		896	mov edx,0xdfffff
485	heavyiron	897	mcall
31	halyavin	898	mov eax,4
		899	mov ebx,190*65536+430
		900	mov ecx,0x1ded00;0
		901	mov edx,Level
		902	mov esi,5
485	heavyiron	903	mcall
31	halyavin	904	mov eax,4
		905	mov ebx,260*65536+430
		906	mov ecx,0x3558ff
		907	mov edx,Lifes
		908	mov esi,5
485	heavyiron	909	mcall
31	halyavin	910	mov eax,4
		911	mov ebx,330*65536+430
		912	mov ecx,0xf93500
		913	mov edx,Score
		914	mov esi,5
485	heavyiron	915	mcall
31	halyavin	916	mov eax,47
		917	mov ebx,3*65536
		918	mov ecx,[number_level]
		919	inc ecx
		920	mov edx,225*65536+430
		921	mov esi,0x1ded00
485	heavyiron	922	mcall
31	halyavin	923	mov eax,47
		924	mov ebx,3*65536
		925	xor ecx,ecx
		926	mov cl,[LifesPlayer]
		927	shr ecx,2
		928	mov edx,295*65536+430
		929	mov esi,0x3558ff
485	heavyiron	930	mcall
31	halyavin	931	mov eax,47
		932	mov ebx,3*65536
		933	xor ecx,ecx
		934	mov cl,byte[score]
		935	mov edx,365*65536+430
		936	mov esi,0xf93500
485	heavyiron	937	mcall
31	halyavin	938	jmp maincycle
		939	;----------------------------------------------------------
		940	;-----------------end of main cycle------------------------
		941	;----------------------------------------------------------
		942	;draw sprite in video memory
		943	PutSprite:
		944	push eax
		945	mov ebx,esi
		946	mov eax,edi
		947	lea ebx,[ebx+2*ebx]
		948	lea eax,[eax+2*eax]
		949	imul eax,640
		950	add eax,0x4000
		951	add eax,ebx
		952	mov [counter],20
		953	mov esi,edx
		954	imul esi,1200
		955	add esi,0x4000+(6404003)+10*1200
		956	mov ebx,esi
		957	mov edi,eax
		958	draw:
		959	mov esi,ebx
		960	mov edi,eax
		961	mov ecx,20
		962	;--------------------
		963	rep_movsb:
		964	xor edx,edx
		965	mov edx,[esi]
		966	and edx,0xffffff
		967	test edx,edx ;0 is transparent color
		968	jz transparent_color
		969	mov [edi],dx
		970	shr edx,16
		971	mov [edi+2],dl
		972	transparent_color:
		973	add esi,3
		974	add edi,3
		975	sub ecx,1
		976	jnz rep_movsb
		977	;--------------------
		978	add eax,640*3
		979	add ebx,20*3
		980	dec [counter]
		981	jnz draw
		982	pop eax
		983	ret
		984	;----------------------------------------------------------
		985	SaveFon:
		986	push eax
		987	lea esi,[esi+2*esi]
		988	lea edi,[edi+2*edi]
		989	imul edi,640
		990	add esi,edi
		991	add esi,0x4000
		992	mov edi,edx
		993	imul edi,1200
		994	add edi,0x4000+(6404003)+(502020*3)+512+641
		995	mov [counter],20
		996	mov eax,esi
		997	mov ebx,edi
		998	save_to:
		999	mov esi,eax
		1000	mov edi,ebx
		1001	mov ecx,15
		1002	rep movsd
		1003	add eax,640*3
		1004	add ebx,20*3
		1005	dec [counter]
		1006	jnz save_to
		1007	pop eax
		1008	ret
		1009	;----------------------------------------------------------
		1010	PutFon:
		1011	push eax
		1012	lea esi,[esi+2*esi]
		1013	lea edi,[edi+2*edi]
		1014	imul edi,640
		1015	add edi,esi
		1016	add edi,0x4000
		1017	mov esi,edx
		1018	imul esi,1200
		1019	add esi,0x4000+(6404003)+(502020*3)+512+641
		1020	mov [counter],20
		1021	mov eax,esi
		1022	mov ebx,edi
		1023	put_to:
		1024	mov esi,eax
		1025	mov edi,ebx
		1026	mov ecx,15
		1027	rep movsd
		1028	add eax,20*3
		1029	add ebx,640*3
		1030	dec [counter]
		1031	jnz put_to
		1032	pop eax
		1033	ret
		1034	;----------------------------------------------------------
		1035	;get time in 1/100 sec
		1036	clock: mov eax,26
		1037	mov ebx,9
485	heavyiron	1038	mcall
31	halyavin	1039	mov [time],eax
		1040	ret
		1041	;----------------------------------------------------------
		1042	;-----------------load level to memory---------------------
		1043	;----------------------------------------------------------
		1044	load_level:
		1045	cmp ecx,15
		1046	je no_load_level
		1047	mov eax,edx
		1048	mov ebx,[levels+4*eax]
		1049	mov esi,ebx
		1050	add esi,2
		1051	xor ecx,ecx
		1052	xor eax,eax
		1053	mov cl,byte[ebx]
		1054	mov al,byte[ebx+1]
		1055	add ecx,eax
		1056	mov edi,0x4000+(6404003)+(502020*3)+512
		1057	call unpakin
		1058	no_load_level:
		1059	and [y],0
		1060	c_y:
		1061	and [x],0
		1062	c_x:
		1063	mov eax,[x]
		1064	mov ebx,[y]
		1065	shl ebx,5
		1066	add eax,ebx
		1067	add eax,0x4000+(6404003)+(502020*3)+512
		1068	mov ecx,eax
		1069	xor eax,eax
		1070	mov al,byte [ecx]
		1071	imul eax,1200
		1072	add eax,0x4000+(6404003)
		1073	mov ebx,[x]
		1074	imul ebx,20*3
		1075	mov ecx,[y]
		1076	imul ecx,203640
		1077	add ebx,ecx
		1078	add ebx,0x4000
		1079	mov esi,eax
		1080	mov edi,ebx
		1081	;----------------------------
		1082	mov edx,20
		1083	next_line:
		1084	mov esi,eax
		1085	mov edi,ebx
		1086	mov ecx,15
		1087	rep movsd
		1088	add eax,20*3
		1089	add ebx,(640*3)
		1090	dec edx
		1091	jnz next_line
		1092	;----------------------------
		1093	inc [x]
		1094	cmp [x],32
		1095	jne c_x
		1096	inc [y]
		1097	cmp [y],20
		1098	jne c_y
		1099	ret
		1100	;----------------------------------------------------------
		1101	map_x_y:
		1102	push eax
		1103	mov ecx,20
		1104	mov eax,esi
		1105	cdq
		1106	idiv ecx
		1107	mov esi,eax
		1108	mov eax,edi
		1109	cdq
		1110	idiv ecx
		1111	mov edi,eax
		1112	;------------------
		1113	mov ebx,edi
		1114	shl ebx,5
		1115	add ebx,esi
		1116	add ebx,0x4000+(6404003)+(502020*3)+512
		1117	xor ecx,ecx
		1118	mov cl,byte[ebx]
		1119	cmp cl,0
		1120	je false_draw
		1121	cmp cl,1
		1122	je false_draw
		1123	cmp cl,3
		1124	je false_draw
		1125	cmp cl,7
		1126	je false_draw
		1127	mov edx,1
		1128	jmp lab2
		1129	false_draw:
		1130	xor edx,edx
		1131	lab2:
		1132	pop eax
		1133	ret
		1134	;----------------------------------------------------------
		1135	you_won:
		1136	mov eax,13
		1137	mov ebx,1*65536+640
		1138	mov ecx,20*65536+400
		1139	mov edx,0xc6e9
485	heavyiron	1140	mcall
31	halyavin	1141	mov eax,4
		1142	mov ebx,220*65536+190
		1143	mov ecx,0xffffff
		1144	mov edx,won1
		1145	mov esi,29
485	heavyiron	1146	mcall
31	halyavin	1147	mov eax,4
		1148	mov ebx,220*65536+200
		1149	mov ecx,0xffffff
		1150	mov edx,won2
		1151	mov esi,29
485	heavyiron	1152	mcall
31	halyavin	1153	mov eax,4
		1154	mov ebx,220*65536+210
		1155	mov ecx,0xffffff
		1156	mov edx,won3
		1157	mov esi,29
485	heavyiron	1158	mcall
31	halyavin	1159	mov eax,5
		1160	mov ebx,100
485	heavyiron	1161	mcall
31	halyavin	1162	ret
		1163	;----------------------------------------------------------
		1164	end_game:
		1165	mov eax,13
		1166	mov ebx,0*65536+640
		1167	mov ecx,20*65536+400
		1168	mov edx,0
485	heavyiron	1169	mcall
31	halyavin	1170	mov eax,4
		1171	mov ebx,280*65536+200
		1172	mov ecx,0xffffff
		1173	mov edx,game_over
		1174	mov esi,9
485	heavyiron	1175	mcall
31	halyavin	1176	mov eax,5
		1177	mov ebx,150
485	heavyiron	1178	mcall
31	halyavin	1179	ret
		1180	;----------------------------------------------------------
		1181	drawwin:
		1182	mov eax,12
		1183	mov ebx,1
485	heavyiron	1184	mcall
31	halyavin	1185	;��㥬 �� 室�� 梥�
		1186	mov eax,0
		1187	mov ebx,50*65536+640
		1188	mov ecx,50*65536+480
		1189	mov edx,0x03AABBCC
		1190	mov esi,0x805080d0
		1191	mov edi,0x005080d0
485	heavyiron	1192	mcall
31	halyavin	1193	;��襬 ��
		1194	mov eax,4
		1195	mov ebx,5*65536+5
		1196	mov ecx,0x10ffffff
		1197	mov edx,name
		1198	mov esi,42
485	heavyiron	1199	mcall
31	halyavin	1200	ret
		1201	;----------------------------------------------------------
		1202	menu:
		1203	cycle_menu:
		1204	mov eax,13
		1205	mov ebx,235*65536+140
		1206	mov ecx,230*65536+20
		1207	mov edx,0xed16
485	heavyiron	1208	mcall
31	halyavin	1209	mov eax,4
		1210	mov ebx,255*65536+235
		1211	mov ecx,0xff0200
		1212	mov edx,start_menu
		1213	mov esi,11
485	heavyiron	1214	mcall
31	halyavin	1215	mov eax,47
		1216	mov ebx,3*65536
		1217	mov ecx,[number_level]
		1218	mov edx,345*65536+235
		1219	mov esi,0xff0200
485	heavyiron	1220	mcall
31	halyavin	1221	still:
		1222	mov eax,10
485	heavyiron	1223	mcall
31	halyavin	1224	cmp eax,2
		1225	jne still
		1226	mov eax,2
485	heavyiron	1227	mcall
31	halyavin	1228	shr eax,8
		1229	cmp eax,32
		1230	je start_game
		1231	cmp eax,176
		1232	jne no_left
		1233	dec [number_level]
		1234	and [number_level],11111b
		1235	jmp cycle_menu
		1236	no_left:
		1237	cmp eax,179
		1238	jne no_right
		1239	inc [number_level]
		1240	and [number_level],11111b
		1241	jmp cycle_menu
		1242	no_right:
		1243	cmp eax,27
		1244	jne cycle_menu
		1245	mov eax,-1
485	heavyiron	1246	mcall
31	halyavin	1247	start_game:
		1248	ret
		1249	;----------------------------------------------------------
		1250	;--------------unpak pix engin-----------------------------
		1251	;----------------------------------------------------------
		1252	unpakin:
		1253	NextLitlColor:
		1254	xor edx,edx
		1255	mov dl,byte[esi]
		1256	xor eax,eax
		1257	xor ebx,ebx
		1258	mov al,dl
		1259	mov bl,al
		1260	shr al,4
		1261	and al,0xf
		1262	mov [LitlCounter],al
		1263	and bl,0xf
		1264	mov [LitlColor],bl
		1265	xor eax,eax
		1266	;----------------------
		1267	mov al,[LitlColor]
		1268	beg:mov [edi],al
		1269	add edi,1
		1270	add [LitlCounter],-1
		1271	cmp [LitlCounter],-1
		1272	jne beg
		1273	inc esi
		1274	dec ecx
		1275	jnz NextLitlColor
		1276	ret
		1277	LitlCounter db 0
		1278	LitlColor db 0
		1279	;----------------------------------------------------------
		1280	time dd 0
		1281	time_frame_old dd 0
		1282	number_sprite dd 0
		1283	number_level dd 0
		1284	counter db 0
		1285	sp_pos dd 0
		1286	num_blocks dd 0
		1287	;-------------------
		1288	x dd 0
		1289	y dd 0
		1290	_dx dd 0
		1291	_dy dd 0
		1292	strike_action dd 0
		1293	end_bum db 0
		1294	bazas db 0
		1295	name db ' game TANKS creted by andrew_programmer'
		1296	won1 db '*****************************'
		1297	won2 db '* YOU WON LEVEL !!! *'
		1298	won3 db '*****************************'
		1299	game_over db 'GAME OVER'
		1300	Lifes db 'LIFES'
		1301	Level db 'LEVEL'
		1302	Score db 'SCORE'
		1303	start_menu db 'START LEVEL'
		1304	LifesTanks rb 16
		1305	PulyTanks rb 16
		1306	LifesPlayer db 0
		1307	tupik db 0
		1308	score db 0
		1309	SpriteInfo:
		1310	dd 0,0,0,0,4,0,0,0,0
		1311	dd 1,0,100,80,3,0,0,0,0
		1312	dd 2,1,100,100,5,0,0,0,0
		1313	dd 0,0,0,0,0,0,0,0,0
		1314	dd 0,0,0,0,0,0,0,0,0
		1315	dd 0,0,0,0,0,0,0,0,0
		1316	dd 0,0,0,0,0,0,0,0,0
		1317	dd 0,0,0,0,0,0,0,0,0
		1318	dd 0,0,0,0,0,0,0,0,0
		1319	dd 0,0,0,0,0,0,0,0,0
		1320	dd 0,0,0,0,0,0,0,0,0
		1321	dd 0,0,0,0,0,0,0,0,0
		1322	dd 0,0,0,0,0,0,0,0,0
		1323	dd 0,0,0,0,0,0,0,0,0
		1324	dd 0,0,0,0,0,0,0,0,0
		1325	dd 0,0,0,0,0,0,0,0,0
		1326	dd 0,0,0,0,0,0,0,0,0
		1327	dd 0,0,0,0,0,0,0,0,0
		1328	dd 0,0,0,0,0,0,0,0,0
		1329	dd 0,0,0,0,0,0,0,0,0
		1330	dd 0,0,0,0,0,0,0,0,0
		1331	dd 0,0,0,0,0,0,0,0,0
		1332	dd 0,0,0,0,0,0,0,0,0
		1333	dd 0,0,0,0,0,0,0,0,0
		1334	dd 0,0,0,0,0,0,0,0,0
		1335	TANKS_script:
		1336	db 1,1,2,1,3,1,4,1,5,1,3,2,3,3,3,4,3,5 ;T
		1337	db 7,3,7,4,7,5,8,2,8,4,9,1,9,4,10,2,10,4,11,3,11,4,11,5 ;A
		1338	db 13,1,13,2,13,3,13,4,13,5,14,1,15,2,16,3,17,1,17,2,17,3,17,4,17,5 ;N
		1339	db 19,1,19,2,19,3,19,4,19,5,20,3,21,2,22,1,22,3,23,4,23,5 ;K
		1340	db 25,4,26,2,26,5,27,1,27,3,27,5,27,1,28,4,28,1,29,2 ;S
		1341
		1342	;----------------------------------------------------------
		1343	;-----------------------data-------------------------------
		1344	;----------------------------------------------------------
		1345	water:
		1346	db 247,0,0,0,0,0,255,0
		1347	db 0,128,0,255,128,0,128,255
		1348	db 0,255,0,0,255,255,0,0
		1349	db 0,0,0,0,0,0,0,0
		1350	db 0,0,0,0,0,0,0,0
		1351	db 0,0,0,0,0,0,0,0
		1352	db 0,0,7,0,2,1,19,2
		1353	db 1,2,1,2,17,2,1,18
		1354	db 35,49,19,2,49,2,17,2
		1355	db 17,3,6,5,19,2,19,17
		1356	db 18,35,18,1,2,51,5,1
		1357	db 2,5,3,6,18,1,19,5
		1358	db 3,17,2,19,6,5,19,6
		1359	db 1,3,33,19,6,3,5,3
		1360	db 2,17,51,2,1,19,18,3
		1361	db 6,67,18,1,2,3,5,35
		1362	db 1,2,17,19,5,6,5,6
		1363	db 3,1,18,51,2,3,18,3
		1364	db 6,3,5,6,19,5,19,1
		1365	db 19,33,18,1,18,3,6,3
		1366	db 6,67,1,2,1,2,65,2
		1367	db 1,19,5,3,21,3,17,34
		1368	db 1,66,1,18,67,2,17,2
		1369	db 33,2,1,18,1,2,1,34
		1370	db 1,2,1,18,1,18,17,2
		1371	db 33,34,17,50,17,2,17,66
		1372	db 1,2,1,19,5,3,2,17
		1373	db 2,17,50,17,34,19,6,3
		1374	db 6,19,1,2,65,19,6,3
		1375	db 17,3,5,19,5,35,18,17
		1376	db 3,6,3,5,19,18,3,6
		1377	db 5,19,5,19,18,17,3,21
		1378	db 3,21,2,1,35,21,19,17
		1379	db 2,1,2,3,6,3,6,5
		1380	db 3,1,18,1,35,2,17,50
		1381	db 1,3,5,6,35,1,2,1
		1382	db 2,1,2,17,2,17,2,17
		1383	db 2,51,16
		1384	voda1:
		1385	db 137,0,0,0,0,255,255,0
		1386	db 255,128,0,0,0,0,0,0
		1387	db 0,0,0,0,0,0,0,0
		1388	db 0,0,0,0,0,0,0,0
		1389	db 0,0,0,0,0,0,0,0
		1390	db 0,0,0,0,0,0,0,0
		1391	db 0,0,3,0,2,17,18,17
		1392	db 18,65,18,17,2,33,2,97
		1393	db 2,1,2,33,18,17,18,49
		1394	db 18,65,2,65,18,17,2,17
		1395	db 2,33,18,33,2,113,18,17
		1396	db 18,17,2,49,18,17,18,145
		1397	db 34,33,18,49,18,17,18,145
		1398	db 2,65,2,65,18,17,18,17
		1399	db 2,17,34,49,18,97,2,113
		1400	db 2,49,18,1,2,49,2,1
		1401	db 18,17,2,1,34,65,2,97
		1402	db 2,113,2,65,18,17,2,49
		1403	db 18,1,2,33,18,1,2,81
		1404	db 18,193,18,81,18,17,18,129
		1405	db 18,145,18,1,2,81,34,17
		1406	db 18,65,34,1,18,145,2,129
		1407	db 18,49,18,33,2,33,34,81
		1408	db 18,97,2,1,16
		1409	trava:
		1410	db 214,0,0,0,0,0,255,0
		1411	db 0,128,0,0,0,0,0,0
		1412	db 0,0,0,0,0,0,0,0
		1413	db 0,0,0,0,0,0,0,0
		1414	db 0,0,0,0,0,0,0,0
		1415	db 0,0,0,0,0,0,0,0
		1416	db 0,0,3,0,2,33,2,1
		1417	db 2,1,2,17,2,1,34,17
		1418	db 18,1,18,1,2,49,2,17
		1419	db 2,33,2,1,2,33,2,17
		1420	db 34,17,18,1,2,1,18,33
		1421	db 2,17,34,17,18,33,18,17
		1422	db 50,97,2,33,2,33,18,1
		1423	db 18,17,50,1,2,1,50,1
		1424	db 18,65,2,33,18,1,18,17
		1425	db 18,17,82,33,2,1,2,1
		1426	db 2,33,2,49,18,1,18,1
		1427	db 2,1,2,33,2,17,2,1
		1428	db 2,65,2,1,18,1,2,17
		1429	db 2,17,34,1,66,1,18,17
		1430	db 2,17,2,17,2,33,2,1
		1431	db 18,1,2,1,34,1,2,1
		1432	db 18,1,18,17,2,33,34,17
		1433	db 50,17,2,17,66,1,2,17
		1434	db 2,17,2,17,2,17,50,17
		1435	db 50,1,34,33,2,81,2,49
		1436	db 2,33,34,1,18,33,18,1
		1437	db 66,33,2,1,50,17,2,1
		1438	db 2,1,2,1,2,49,34,33
		1439	db 2,1,18,1,18,33,18,1
		1440	db 2,17,2,17,50,17,2,1
		1441	db 2,1,2,1,2,1,2,1
		1442	db 2,17,2,17,2,17,18,17
		1443	db 2,16
		1444	tan22:
		1445	db 116,0,0,0,0,128,0,255
		1446	db 192,192,192,64,128,255,128,128
		1447	db 128,0,255,0,0,128,0,0
		1448	db 255,255,0,0,0,0,0,0
		1449	db 0,0,0,0,0,0,0,0
		1450	db 0,0,0,0,0,0,0,0
		1451	db 0,0,8,0,112,51,8,224
		1452	db 0,19,144,8,96,19,144,8
		1453	db 64,8,0,19,144,8,32,8
		1454	db 0,8,0,19,32,8,32,24
		1455	db 2,20,18,8,39,19,39,8
		1456	db 18,20,82,55,19,55,82,20
		1457	db 18,7,6,23,19,23,6,7
		1458	db 18,20,82,6,23,51,23,6
		1459	db 146,23,83,23,82,20,18,23
		1460	db 19,22,19,23,18,20,82,23
		1461	db 19,22,19,23,82,20,18,23
		1462	db 83,23,18,20,82,23,83,23
		1463	db 146,39,51,39,82,20,18,151
		1464	db 18,20,66,8,151,8,50,8
		1465	db 48,21,87,21,8,224,224,240
		1466	tan21:
		1467	db 116,0,0,0,0,128,0,255
		1468	db 192,192,192,64,128,255,128,128
		1469	db 128,0,255,0,0,128,0,0
		1470	db 255,255,0,0,0,0,0,0
		1471	db 0,0,0,0,0,0,0,0
		1472	db 0,0,0,0,0,0,0,0
		1473	db 0,0,8,0,112,51,8,224
		1474	db 0,19,144,8,96,19,144,8
		1475	db 64,8,0,19,144,8,32,8
		1476	db 0,8,0,19,32,8,32,24
		1477	db 66,8,39,19,39,8,82,20
		1478	db 18,55,19,55,18,20,82,7
		1479	db 6,23,19,23,6,7,82,20
		1480	db 18,6,23,51,23,6,18,20
		1481	db 82,23,83,23,146,23,19,22
		1482	db 19,23,82,20,18,23,19,22
		1483	db 19,23,18,20,82,23,83,23
		1484	db 82,20,18,23,83,23,18,20
		1485	db 82,39,51,39,146,151,82,20
		1486	db 2,8,151,8,2,20,2,8
		1487	db 48,21,87,21,8,224,224,240
		1488	tan12:
		1489	db 116,0,0,0,0,128,0,255
		1490	db 192,192,192,64,128,255,128,128
		1491	db 128,0,255,0,0,128,0,0
		1492	db 0,0,0,0,0,0,0,0
		1493	db 0,0,0,0,0,0,0,0
		1494	db 0,0,0,0,0,0,0,0
		1495	db 0,0,7,0,112,51,7,224
		1496	db 0,19,144,7,96,19,144,7
		1497	db 64,7,0,19,144,7,32,7
		1498	db 0,7,0,19,32,7,0,55
		1499	db 2,20,18,7,33,19,33,7
		1500	db 18,20,82,49,19,49,82,20
		1501	db 18,1,6,17,19,17,6,1
		1502	db 18,20,82,6,17,51,17,6
		1503	db 146,17,83,17,82,20,18,17
		1504	db 19,22,19,17,18,20,82,17
		1505	db 19,22,19,17,82,20,18,17
		1506	db 83,17,18,20,82,17,83,17
		1507	db 146,33,51,33,82,20,18,145
		1508	db 18,20,66,7,145,7,50,7
		1509	db 48,21,81,21,7,224,224,240
		1510	tan11:
		1511	db 116,0,0,0,0,128,0,255
		1512	db 192,192,192,64,128,255,128,128
		1513	db 128,0,255,0,0,128,0,0
		1514	db 0,0,0,0,0,0,0,0
		1515	db 0,0,0,0,0,0,0,0
		1516	db 0,0,0,0,0,0,0,0
		1517	db 0,0,7,0,112,51,7,224
		1518	db 0,19,144,7,96,19,144,7
		1519	db 64,7,0,19,144,7,32,7
		1520	db 0,7,0,19,32,7,32,23
		1521	db 66,7,33,19,33,7,82,20
		1522	db 18,49,19,49,18,20,82,1
		1523	db 6,17,19,17,6,1,82,20
		1524	db 18,6,17,51,17,6,18,20
		1525	db 82,17,83,17,146,17,19,22
		1526	db 19,17,82,20,18,17,19,22
		1527	db 19,17,18,20,82,17,83,17
		1528	db 82,20,18,17,83,17,18,20
		1529	db 82,33,51,33,146,145,82,20
		1530	db 2,7,145,7,2,20,2,7
		1531	db 48,21,81,21,7,224,224,240
		1532	sten3:
		1533	db 104,0,0,0,0,128,128,128
		1534	db 192,192,192,0,0,0,0,0
		1535	db 0,0,0,0,0,0,0,0
		1536	db 0,0,0,0,0,0,0,0
		1537	db 0,0,0,0,0,0,0,0
		1538	db 0,0,0,0,0,0,0,0
		1539	db 0,0,3,0,226,66,65,2
		1540	db 81,2,65,2,81,2,81,2
		1541	db 65,2,81,2,81,2,65,2
		1542	db 1,226,66,33,2,81,2,81
		1543	db 2,65,2,81,2,81,2,65
		1544	db 2,81,2,81,2,17,226,66
		1545	db 1,2,81,2,81,2,65,2
		1546	db 81,2,81,2,65,2,81,2
		1547	db 81,2,49,226,66,65,2,97
		1548	db 2,65,2,65,2,97,2,65
		1549	db 2,65,2,97,2,65,226,82
		1550	db 33,2,81,2,81,2,65,2
		1551	db 81,2,81,2,65,2,81,2
		1552	db 81,2,17,16
		1553	sten1:
		1554	db 111,0,0,0,0,128,128,128
		1555	db 192,192,192,0,0,255,255,255
		1556	db 255,64,128,255,0,0,0,0
		1557	db 0,0,0,0,0,0,0,0
		1558	db 0,0,0,0,0,0,0,0
		1559	db 0,0,0,0,0,0,0,0
		1560	db 0,0,6,0,227,67,53,3
		1561	db 133,3,69,34,5,3,5,98
		1562	db 5,3,5,98,5,3,5,98
		1563	db 5,3,5,50,53,3,133,3
		1564	db 69,227,67,133,3,133,3,114
		1565	db 5,3,5,98,5,3,114,5
		1566	db 3,5,98,5,3,133,3,133
		1567	db 227,83,69,3,133,3,53,50
		1568	db 5,3,5,98,5,3,5,98
		1569	db 5,3,5,98,5,3,5,34
		1570	db 69,3,133,3,53,227,67,101
		1571	db 3,133,3,21,82,5,3,5
		1572	db 98,5,3,5,98,5,3,5
		1573	db 98,5,3,5,2,101,3,133
		1574	db 3,21,16
		1575	puly1:
		1576	db 48,0,0,0,0,0,255,255
		1577	db 128,0,255,0,0,255,64,128
		1578	db 255,0,0,0,0,0,0,0
		1579	db 0,0,0,0,0,0,0,0
		1580	db 0,0,0,0,0,0,0,0
		1581	db 0,0,0,0,0,0,0,0
		1582	db 0,0,5,0,224,224,224,224
		1583	db 224,224,224,224,96,49,224,17
		1584	db 20,17,192,17,4,18,4,17
		1585	db 176,1,4,50,4,1,176,17
		1586	db 4,18,4,17,192,17,20,17
		1587	db 224,49,224,224,224,224,224,224
		1588	db 224,224,224,240
		1589	pesok:
		1590	db 120,0,0,0,0,0,255,255
		1591	db 0,64,128,0,128,128,64,128
		1592	db 128,64,128,255,0,0,0,0
		1593	db 0,0,0,0,0,0,0,0
		1594	db 0,0,0,0,0,0,0,0
		1595	db 0,0,0,0,0,0,0,0
		1596	db 0,0,6,0,225,81,2,33
		1597	db 2,65,2,3,33,2,1,5
		1598	db 49,5,49,2,129,3,225,97
		1599	db 3,17,2,33,2,1,5,33
		1600	db 2,1,5,129,5,65,2,65
		1601	db 2,225,97,2,33,3,17,2
		1602	db 49,3,145,2,177,3,49,5
		1603	db 81,5,1,2,33,2,65,3
		1604	db 17,2,17,3,145,2,209,3
		1605	db 81,2,49,5,33,2,177,3
		1606	db 145,2,17,2,5,113,2,225
		1607	db 1,2,33,3,17,3,49,3
		1608	db 17,3,161,2,1,5,97,2
		1609	db 177,2,49,2,33,5,33,2
		1610	db 193,2,49,3,33,2,81,3
		1611	db 1,5,1,16
		1612	palma:
		1613	db 209,0,0,0,0,0,255,0
		1614	db 0,128,0,0,255,255,64,128
		1615	db 128,64,128,255,0,0,0,0
		1616	db 0,0,0,0,0,0,0,0
		1617	db 0,0,0,0,0,0,0,0
		1618	db 0,0,0,0,0,0,0,0
		1619	db 0,0,6,0,2,33,2,1
		1620	db 2,1,2,17,2,1,34,17
		1621	db 18,1,18,1,51,1,2,17
		1622	db 2,1,35,1,2,33,115,2
		1623	db 51,21,19,1,2,35,69,35
		1624	db 53,35,18,3,21,67,5,3
		1625	db 21,19,1,18,19,2,5,3
		1626	db 50,1,3,5,3,5,67,17
		1627	db 3,1,19,17,67,5,99,34
		1628	db 3,2,35,5,3,5,3,5
		1629	db 3,5,3,5,35,1,18,1
		1630	db 2,19,5,35,5,3,5,35
		1631	db 21,19,33,19,5,35,5,35
		1632	db 5,51,5,3,34,35,17,51
		1633	db 20,3,5,35,5,3,2,1
		1634	db 35,18,3,5,3,36,5,19
		1635	db 1,35,1,18,3,17,2,3
		1636	db 2,52,35,50,1,2,17,2
		1637	db 17,2,1,52,3,34,17,50
		1638	db 1,34,33,36,49,2,49,2
		1639	db 33,34,1,36,17,18,1,66
		1640	db 33,2,1,2,1,36,1,2
		1641	db 1,2,1,2,1,2,49,66
		1642	db 36,18,1,18,33,18,1,2
		1643	db 17,84,2,17,2,1,2,1
		1644	db 2,1,2,1,2,1,84,2
		1645	db 17,18,17,2,16
		1646	kamni:
		1647	db 210,0,0,0,0,0,255,0
		1648	db 0,128,0,64,128,255,64,128
		1649	db 128,0,0,0,0,0,0,0
		1650	db 0,0,0,0,0,0,0,0
		1651	db 0,0,0,0,0,0,0,0
		1652	db 0,0,0,0,0,0,0,0
		1653	db 0,0,5,0,2,33,2,1
		1654	db 2,35,1,2,1,34,17,18
		1655	db 1,18,1,2,17,51,1,2
		1656	db 33,2,1,2,33,2,1,67
		1657	db 4,3,2,1,2,1,18,33
		1658	db 2,17,2,83,4,17,18,17
		1659	db 50,17,131,2,33,18,1,18
		1660	db 17,83,20,3,18,1,18,65
		1661	db 2,67,4,19,4,3,18,17
		1662	db 82,99,4,35,2,49,18,1
		1663	db 18,1,2,1,2,17,35,4
		1664	db 2,1,2,65,2,1,18,1
		1665	db 2,17,2,17,34,1,66,1
		1666	db 18,17,2,17,2,17,2,33
		1667	db 2,1,18,1,2,1,2,19
		1668	db 1,2,1,18,1,18,19,2
		1669	db 33,18,35,4,3,18,17,2
		1670	db 1,67,2,1,2,99,1,2
		1671	db 17,2,35,4,3,34,35,4
		1672	db 3,4,3,1,2,17,83,1
		1673	db 67,20,19,4,3,2,17,51
		1674	db 4,115,4,35,2,1,83,4
		1675	db 67,34,33,2,35,1,3,4
		1676	db 19,1,18,1,2,17,2,17
		1677	db 50,17,2,1,2,1,2,1
		1678	db 2,1,2,1,2,17,2,17
		1679	db 2,17,18,17,2,16
		1680	drevo:
		1681	db 240,0,0,0,0,0,255,0
		1682	db 0,128,0,255,0,128,0,64
		1683	db 128,64,128,128,128,0,128,255
		1684	db 128,128,0,0,0,0,0,0
		1685	db 0,0,0,0,0,0,0,0
		1686	db 0,0,0,0,0,0,0,0
		1687	db 0,0,8,0,2,33,2,1
		1688	db 2,19,1,35,34,17,18,1
		1689	db 18,1,2,17,3,38,7,22
		1690	db 3,1,2,1,2,33,2,1
		1691	db 19,7,6,23,6,23,3,6
		1692	db 18,33,2,17,2,3,7,19
		1693	db 6,3,54,7,19,50,33,3
		1694	db 22,7,6,3,6,7,22,3
		1695	db 23,2,1,18,17,22,7,6
		1696	db 7,3,7,3,7,22,7,6
		1697	db 35,17,35,54,55,6,23,22
		1698	db 19,18,19,7,3,7,6,7
		1699	db 22,7,3,22,3,22,7,3
		1700	db 18,19,23,3,182,3,33,3
		1701	db 22,3,7,6,7,6,7,22
		1702	db 7,6,7,22,3,34,7,22
		1703	db 7,22,3,39,38,7,6,7
		1704	db 19,2,1,3,7,6,23,38
		1705	db 7,38,39,6,7,3,1,2
		1706	db 19,54,3,38,3,70,3,2
		1707	db 1,2,1,3,7,6,7,19
		1708	db 4,5,4,19,6,7,6,3
		1709	db 1,50,1,34,3,1,36,17
		1710	db 3,22,2,49,2,33,34,21
		1711	db 4,33,18,1,66,33,2,1
		1712	db 52,17,2,1,2,1,2,1
		1713	db 2,49,18,20,5,4,5,4
		1714	db 18,1,18,33,18,1,2,1
		1715	db 132,1,2,1,2,1,2,1
		1716	db 2,1,36,5,20,5,4,21
		1717	db 36,17,2,16
		1718	bum41:
		1719	db 141,0,0,0,0,128,255,255
		1720	db 0,255,255,0,0,255,128,0
		1721	db 255,0,0,0,0,0,0,0
		1722	db 0,0,0,0,0,0,0,0
		1723	db 0,0,0,0,0,0,0,0
		1724	db 0,0,0,0,0,0,0,0
		1725	db 0,0,5,0,80,21,50,21
		1726	db 16,5,96,21,130,69,32,50
		1727	db 33,4,1,66,0,21,16,5
		1728	db 34,1,2,17,18,1,66,53
		1729	db 34,17,2,17,18,1,18,4
		1730	db 18,37,50,33,2,33,2,17
		1731	db 50,21,2,4,18,65,50,1
		1732	db 50,5,50,33,2,49,2,17
		1733	db 50,21,2,81,18,33,2,17
		1734	db 130,113,2,17,130,33,18,1
		1735	db 194,65,2,33,66,4,2,5
		1736	db 65,2,97,34,1,18,5,18
		1737	db 1,34,1,18,1,2,17,18
		1738	db 1,34,21,2,4,17,34,49
		1739	db 82,37,18,1,18,49,34,4
		1740	db 50,37,50,1,18,49,66,53
		1741	db 0,66,1,114,37,64,18,17
		1742	db 2,4,50,69,80,5,82,53
		1743	db 64
		1744	bum31:
		1745	db 114,0,0,0,0,128,255,255
		1746	db 0,255,255,0,0,255,128,0
		1747	db 255,0,0,0,0,0,0,0
		1748	db 0,0,0,0,0,0,0,0
		1749	db 0,0,0,0,0,0,0,0
		1750	db 0,0,0,0,0,0,0,0
		1751	db 0,0,5,0,80,53,18,21
		1752	db 144,53,82,85,48,5,18,3
		1753	db 18,4,66,5,0,21,16,21
		1754	db 146,4,18,85,3,18,3,2
		1755	db 49,82,53,98,3,66,1,18
		1756	db 53,178,3,1,4,18,21,2
		1757	db 3,114,3,50,1,18,21,34
		1758	db 4,50,3,130,21,210,3,18
		1759	db 3,98,3,194,21,130,3,114
		1760	db 21,18,4,18,3,146,3,2
		1761	db 21,2,3,114,3,34,1,18
		1762	db 37,34,3,2,4,98,4,2
		1763	db 3,2,53,226,101,50,4,98
		1764	db 69,0,37,146,53,80,37,2
		1765	db 3,18,101,80,165,64
		1766	bum21:
		1767	db 134,0,0,0,0,128,255,255
		1768	db 0,255,255,0,0,255,128,0
		1769	db 255,0,0,0,0,0,0,0
		1770	db 0,0,0,0,0,0,0,0
		1771	db 0,0,0,0,0,0,0,0
		1772	db 0,0,0,0,0,0,0,0
		1773	db 0,0,5,0,80,117,144,69
		1774	db 50,101,48,37,34,4,50,21
		1775	db 0,21,16,37,130,4,2,133
		1776	db 18,4,49,66,101,66,19,2
		1777	db 3,18,1,18,69,18,4,18
		1778	db 3,2,3,18,19,1,4,2
		1779	db 69,34,35,2,83,1,18,53
		1780	db 2,4,2,3,18,3,2,3
		1781	db 2,3,2,3,18,4,53,34
		1782	db 99,2,19,34,53,34,3,2
		1783	db 19,2,51,18,4,2,53,2
		1784	db 4,1,51,2,3,18,19,34
		1785	db 53,2,4,18,3,2,83,2
		1786	db 4,18,69,66,19,2,3,34
		1787	db 1,2,101,18,4,98,4,2
		1788	db 133,82,4,34,165,18,4,66
		1789	db 101,0,85,50,101,80,213,80
		1790	db 165,64
		1791	bum11:
		1792	db 79,0,0,0,0,128,255,255
		1793	db 0,255,255,0,0,255,0,0
		1794	db 0,0,0,0,0,0,0,0
		1795	db 0,0,0,0,0,0,0,0
		1796	db 0,0,0,0,0,0,0,0
		1797	db 0,0,0,0,0,0,0,0
		1798	db 0,0,4,0,80,100,176,196
		1799	db 80,196,0,20,16,100,50,100
		1800	db 0,84,2,49,18,1,164,34
		1801	db 51,18,1,148,2,115,1,2
		1802	db 116,2,147,1,100,1,2,147
		1803	db 18,84,1,2,147,2,1,84
		1804	db 18,147,2,1,100,1,147,1
		1805	db 2,100,18,115,2,1,132,34
		1806	db 51,34,1,148,130,196,50,116
		1807	db 0,228,36,32,228,20,80,196
		1808	db 96,164,64
		1809	baza1:
		1810	db 192,0,0,0,0,0,255,0
		1811	db 0,128,0,255,0,128,255,128
		1812	db 128,255,0,0,255,128,0,255
		1813	db 255,0,128,0,255,0,0,255
		1814	db 0,255,255,0,0,0,0,0
		1815	db 0,0,0,0,0,0,0,0
		1816	db 0,0,11,0,2,33,2,1
		1817	db 2,1,2,17,2,1,34,17
		1818	db 18,1,18,1,2,49,2,17
		1819	db 2,33,2,1,2,17,232,9
		1820	db 4,17,2,8,201,8,3,9
		1821	db 4,2,1,8,41,150,8,19
		1822	db 9,2,1,57,6,101,7,6
		1823	db 8,3,10,3,9,2,8,41
		1824	db 6,5,84,7,6,8,35,9
		1825	db 2,8,41,6,5,84,7,6
		1826	db 8,35,9,2,8,41,6,5
		1827	db 84,7,6,8,3,21,9,1
		1828	db 8,41,6,5,84,7,6,8
		1829	db 3,21,9,2,8,41,6,5
		1830	db 84,7,6,8,35,9,2,8
		1831	db 41,6,5,103,6,8,3,10
		1832	db 3,9,1,8,57,134,8,35
		1833	db 9,1,8,201,8,3,10,3
		1834	db 9,2,232,35,9,2,9,131
		1835	db 10,19,10,3,9,4,3,9
		1836	db 1,2,25,19,22,131,9,4
		1837	db 9,33,9,35,22,131,25,1
		1838	db 18,1,233,9,2,1,2,1
		1839	db 2,1,2,17,2,17,2,17
		1840	db 18,17,2,16
		1841	;-----------------------------------
		1842	;-----here begin levels-------------
		1843	;-----------------------------------
		1844	lev01:
		1845	db 171,0
		1846	db 225,225,33,150,7,2,1,7
		1847	db 41,192,17,150,18,1,57,144
		1848	db 1,16,17,182,1,57,112,33
		1849	db 16,17,38,225,65,96,17,6
		1850	db 1,6,1,7,5,80,1,7
		1851	db 117,1,96,17,38,1,18,80
		1852	db 1,69,24,21,1,96,17,38
		1853	db 1,112,1,34,40,37,1,96
		1854	db 17,38,128,1,19,224,17,38
		1855	db 1,112,1,0,3,96,1,96
		1856	db 17,38,1,224,32,1,96,17
		1857	db 38,1,224,32,65,0,49,38
		1858	db 129,0,145,6,7,6,1,32
		1859	db 17,86,48,1,148,70,1,32
		1860	db 17,86,48,1,148,22,1,22
		1861	db 1,32,17,6,1,54,4,3
		1862	db 16,1,116,16,70,1,32,17
		1863	db 70,35,16,1,20,17,36,32
		1864	db 70,1,8,7,8,17,70,66
		1865	db 1,100,112,1,40,17,70,2
		1866	db 7,34,1,116,96,1,40,225
		1867	db 225,33,16
		1868	lev02:
		1869	db 255,3
		1870	db 225,225,33,5,49,3,225,161
		1871	db 5,38,5,3,64,89,0,40
		1872	db 54,50,33,5,38,5,3,32
		1873	db 35,34,3,16,8,67,6,50
		1874	db 33,5,38,5,3,34,16,3
		1875	db 36,3,2,35,36,3,66,33
		1876	db 5,22,21,3,34,3,0,3
		1877	db 36,3,2,3,7,36,5,3
		1878	db 2,1,35,33,5,22,21,3
		1879	db 7,2,0,2,19,5,20,3
		1880	db 2,51,21,3,66,33,5,22
		1881	db 21,35,0,2,3,7,5,20
		1882	db 18,3,24,3,22,67,2,33
		1883	db 5,17,25,48,2,51,2,35
		1884	db 24,3,22,9,16,19,2,33
		1885	db 5,2,1,25,49,2,3,56
		1886	db 3,54,67,0,3,16,33,5
		1887	db 2,49,22,1,6,3,22,1
		1888	db 8,3,17,88,3,48,33,5
		1889	db 18,4,54,1,6,3,22,1
		1890	db 8,3,7,1,99,57,33,5
		1891	db 18,4,22,1,5,1,54,1
		1892	db 8,3,70,51,57,33,5,18
		1893	db 4,0,17,5,113,51,0,3
		1894	db 38,9,32,33,5,17,4,16
		1895	db 1,32,1,37,49,32,3,54
		1896	db 19,0,33,5,0,20,16,1
		1897	db 2,1,0,20,1,24,34,0
		1898	db 33,7,38,3,16,33,5,0
		1899	db 33,0,1,2,113,18,32,83
		1900	db 16,33,5,16,7,16,1,146
		1901	db 33,128,33,114,65,98,225,225
		1902	db 193,16
		1903	lev03:
		1904	db 118,0
		1905	db 225,225,33,85,50,35,162,86
		1906	db 17,5,7,53,166,34,7,8
		1907	db 18,86,17,85,34,19,6,19
		1908	db 50,72,2,86,193,6,225,1
		1909	db 6,33,160,230,54,17,18,128
		1910	db 102,65,102,17,7,2,128,102
		1911	db 1,166,17,160,230,54,225,113
		1912	db 6,145,214,224,0,17,214,96
		1913	db 81,32,17,214,96,1,7,38
		1914	db 17,16,17,214,224,0,113,6
		1915	db 225,145,82,198,1,144,17,82
		1916	db 1,182,1,48,1,54,0,17
		1917	db 18,38,2,7,2,166,1,48
		1918	db 1,54,0,17,114,230,6,1
		1919	db 7,48,225,225,33,16
		1920	lev04:
		1921	db 146,0
		1922	db 225,225,33,89,1,176,89,1
		1923	db 57,17,89,1,176,25,7,41
		1924	db 1,57,17,89,1,9,65,57
		1925	db 64,34,1,25,1,9,17,89
		1926	db 1,25,7,5,9,1,57,48
		1927	db 35,33,9,1,9,17,89,1
		1928	db 73,1,233,1,9,17,89,225
		1929	db 113,9,17,233,233,17,233,233
		1930	db 17,217,129,105,17,217,1,100
		1931	db 1,105,17,41,81,64,1,7
		1932	db 73,4,1,105,17,41,1,7
		1933	db 41,1,64,1,89,4,1,105
		1934	db 17,41,1,36,25,64,1,25
		1935	db 1,41,4,145,41,1,52,1
		1936	db 64,41,1,7,34,1,98,17
		1937	db 41,81,64,129,18,7,50,17
		1938	db 233,121,3,20,50,17,233,121
		1939	db 35,17,25,17,233,233,225,225
		1940	db 33,16
		1941	lev05:
		1942	db 229,0
		1943	db 225,225,33,224,224,17,0,134
		1944	db 50,72,34,24,2,40,2,0
		1945	db 17,0,134,34,83,2,56,2
		1946	db 40,2,0,17,0,134,18,19
		1947	db 56,3,2,24,2,8,2,56
		1948	db 0,17,0,22,8,86,19,6
		1949	db 72,3,40,2,8,2,56,0
		1950	db 17,0,22,8,50,22,18,6
		1951	db 40,35,2,24,2,8,2,56
		1952	db 0,17,0,22,72,22,18,54
		1953	db 3,6,56,2,8,2,32,8
		1954	db 0,17,0,40,86,18,40,6
		1955	db 3,6,88,2,7,8,0,8
		1956	db 0,17,0,40,6,7,70,2
		1957	db 40,6,3,54,8,54,8,0
		1958	db 8,0,17,0,56,38,8,22
		1959	db 40,7,86,8,54,8,0,8
		1960	db 0,17,0,2,51,56,6,40
		1961	db 2,166,8,0,8,0,17,0
		1962	db 50,3,34,8,6,40,2,6
		1963	db 66,70,16,8,0,17,0,18
		1964	db 7,2,72,22,7,8,0,6
		1965	db 66,70,0,24,0,17,0,6
		1966	db 51,120,0,6,66,8,54,0
		1967	db 24,0,17,0,118,3,64,6
		1968	db 104,22,7,0,24,0,17,0
		1969	db 118,83,6,136,16,24,0,17
		1970	db 0,230,22,19,136,0,17,224
		1971	db 224,225,225,33,16
		1972	lev06:
		1973	db 149,0
		1974	db 225,225,33,176,1,18,19,192
		1975	db 17,0,7,18,112,1,2,7
		1976	db 2,16,3,160,17,0,34,112
		1977	db 1,18,51,160,17,0,1,144
		1978	db 97,160,17,0,1,224,192,17
		1979	db 0,1,224,192,17,0,145,48
		1980	db 230,17,48,7,66,1,48,209
		1981	db 6,17,48,82,1,48,1,68
		1982	db 96,22,17,144,1,48,1,4
		1983	db 7,18,3,96,22,17,144,1
		1984	db 48,1,4,34,3,48,7,41
		1985	db 6,17,144,1,48,1,20,96
		1986	db 57,6,17,16,129,48,1,20
		1987	db 96,4,41,6,17,16,1,40
		1988	db 50,64,1,128,4,32,6,17
		1989	db 16,1,7,8,66,64,145,4
		1990	db 32,6,17,16,177,144,1,70
		1991	db 17,224,128,1,70,17,224,144
		1992	db 70,225,225,33,16
		1993	lev07:
		1994	db 159,0
		1995	db 225,225,33,0,7,229,197,17
		1996	db 64,225,113,21,17,64,1,37
		1997	db 134,133,1,21,17,32,33,37
		1998	db 6,37,33,7,6,133,1,21
		1999	db 17,37,1,37,1,5,134,133
		2000	db 1,21,17,133,209,5,49,21
		2001	db 17,5,1,229,197,17,5,1
		2002	db 133,1,229,37,17,5,1,85
		2003	db 1,229,85,17,5,65,21,1
		2004	db 21,1,101,113,38,17,5,1
		2005	db 32,37,1,149,1,7,8,53
		2006	db 1,38,17,5,1,8,16,37
		2007	db 1,21,1,7,85,1,3,2
		2008	db 53,1,38,17,5,1,8,16
		2009	db 21,193,3,69,1,38,17,5
		2010	db 1,8,1,0,229,3,69,1
		2011	db 38,17,5,1,7,232,117,1
		2012	db 38,17,5,1,232,8,129,38
		2013	db 17,5,225,33,7,98,38,17
		2014	db 229,69,150,225,225,33,16
		2015	lev08:
		2016	db 209,0
		2017	db 225,225,33,36,7,228,84,1
		2018	db 48,17,164,195,4,1,48,17
		2019	db 164,3,166,3,4,1,0,7
		2020	db 2,0,17,164,3,166,3,4
		2021	db 1,0,18,0,17,165,3,166
		2022	db 3,4,1,48,17,165,3,166
		2023	db 3,4,1,48,17,165,3,166
		2024	db 3,4,1,48,17,54,3,82
		2025	db 3,6,1,4,99,6,3,4
		2026	db 1,48,17,54,3,82,3,6
		2027	db 1,4,3,7,21,22,3,6
		2028	db 3,4,1,0,7,2,0,17
		2029	db 6,7,22,3,82,3,6,1
		2030	db 4,3,37,22,3,6,3,4
		2031	db 1,0,18,0,17,54,3,82
		2032	db 3,6,1,4,3,70,3,6
		2033	db 3,4,1,48,17,54,3,82
		2034	db 3,6,1,4,3,6,67,6
		2035	db 3,4,1,48,17,54,115,6
		2036	db 1,4,3,102,3,4,1,48
		2037	db 17,198,1,4,3,102,3,4
		2038	db 1,48,17,6,161,2,1,4
		2039	db 3,102,3,4,1,48,17,6
		2040	db 7,130,1,2,1,4,131,4
		2041	db 1,48,17,38,114,1,2,193
		2042	db 48,17,38,226,178,225,225,33
		2043	db 16
		2044	lev09:
		2045	db 162,0
		2046	db 225,225,33,229,5,214,17,21
		2047	db 33,7,149,1,198,17,21,208
		2048	db 1,32,150,17,226,2,1,18
		2049	db 80,70,17,2,83,130,1,18
		2050	db 0,7,34,0,70,17,2,3
		2051	db 144,1,0,18,1,18,0,50
		2052	db 0,70,17,2,3,144,1,0
		2053	db 18,1,18,0,50,0,70,17
		2054	db 2,3,32,7,50,16,1,0
		2055	db 66,0,50,0,70,17,2,3
		2056	db 32,66,16,1,0,66,0,7
		2057	db 130,17,2,3,144,1,48,18
		2058	db 64,82,17,18,144,1,0,7
		2059	db 50,0,2,32,82,17,18,144
		2060	db 1,0,66,0,1,64,50,17
		2061	db 178,1,0,66,0,2,80,34
		2062	db 17,178,1,96,6,80,34,145
		2063	db 0,34,113,150,17,7,82,1
		2064	db 0,34,230,38,17,98,16,226
		2065	db 82,17,98,16,226,82,225,225
		2066	db 33,16
		2067	lev10:
		2068	db 205,0
		2069	db 225,225,33,224,224,17,0,2
		2070	db 83,64,233,9,0,17,0,2
		2071	db 3,34,0,7,64,233,9,0
		2072	db 17,0,2,3,34,96,73,7
		2073	db 153,0,17,224,32,1,41,50
		2074	db 41,0,17,2,145,16,18,32
		2075	db 1,41,50,41,0,17,2,1
		2076	db 134,16,18,32,1,41,50,41
		2077	db 0,17,2,1,6,41,70,16
		2078	db 1,2,32,1,7,25,50,41
		2079	db 0,17,2,1,6,89,22,16
		2080	db 18,32,49,50,41,0,17,2
		2081	db 1,6,89,22,16,1,2,32
		2082	db 1,41,50,41,0,17,2,1
		2083	db 54,41,22,16,1,2,32,1
		2084	db 41,50,41,0,17,2,1,54
		2085	db 41,22,16,1,2,32,1,41
		2086	db 50,41,0,17,2,1,54,7
		2087	db 25,22,16,18,32,1,41,2
		2088	db 7,16,41,0,17,2,1,54
		2089	db 41,22,16,1,2,224,17,2
		2090	db 1,54,41,22,16,1,2,224
		2091	db 17,2,1,134,16,18,100,6
		2092	db 98,17,2,1,160,1,2,100
		2093	db 6,1,82,17,226,118,1,7
		2094	db 66,225,225,33,16
		2095	lev11:
		2096	db 228,0
		2097	db 225,225,33,230,230,17,6,104
		2098
		2099	db 1,104,6,1,7,152,6,17
		2100
		2101	db 6,104,1,104,6,1,24,1
		2102
		2103	db 120,6,17,6,104,1,8,102
		2104
		2105	db 49,8,64,24,6,17,6,104
		2106
		2107	db 1,8,6,72,38,40,0,88
		2108
		2109	db 6,17,6,8,97,8,6,33
		2110
		2111	db 56,6,40,64,24,6,17,6
		2112
		2113	db 8,1,104,6,1,64,1,6
		2114
		2115	db 104,0,24,6,17,6,8,1
		2116
		2117	db 104,6,1,0,40,0,1,6
		2118
		2119	db 104,0,24,6,17,6,8,1
		2120
		2121	db 7,88,6,1,0,40,0,1
		2122
		2123	db 6,40,16,24,0,24,6,17
		2124
		2125	db 6,8,33,72,6,1,0,8
		2126
		2127	db 7,8,0,1,6,40,0,40
		2128
		2129	db 0,24,6,17,6,136,6,1
		2130
		2131	db 0,40,0,1,6,40,0,40
		2132
		2133	db 0,24,6,17,166,1,0,40
		2134
		2135	db 0,1,6,40,64,7,8,6
		2136
		2137	db 17,6,8,49,6,56,1,64
		2138
		2139	db 1,6,152,6,17,6,8,7
		2140
		2141	db 24,1,6,56,97,182,17,6
		2142
		2143	db 56,1,6,168,6,24,80,40
		2144
		2145	db 17,6,56,1,198,24,0,56
		2146
		2147	db 0,40,17,6,72,6,216,0
		2148
		2149	db 56,0,40,17,102,120,1,7
		2150
		2151	db 56,0,1,7,8,1,0,40
		2152
		2153	db 225,225,33,16
		2154	lev12:
		2155	db 157,0
		2156	db 225,225,33,66,1,217,36,98
		2157
		2158	db 17,66,1,217,36,50,3,18
		2159
		2160	db 17,66,1,41,161,36,33,50
		2161
		2162	db 17,66,1,41,1,196,1,2
		2163
		2164	db 1,50,17,66,1,41,1,196
		2165
		2166	db 1,2,1,50,17,2,65,41
		2167
		2168	db 1,148,49,2,1,50,17,2
		2169
		2170	db 1,7,24,25,33,4,145,7
		2171
		2172	db 34,1,50,17,2,1,40,25
		2173
		2174	db 1,7,20,1,7,178,1,50
		2175
		2176	db 17,2,97,32,1,194,1,50
		2177
		2178	db 17,162,1,194,1,50,17,162
		2179
		2180	db 1,2,3,18,145,50,209,2
		2181
		2182	db 3,18,1,7,178,17,7,36
		2183
		2184	db 19,98,3,18,1,98,3,66
		2185
		2186	db 17,68,3,4,130,1,194,17
		2187
		2188	db 36,35,4,130,1,194,17,114
		2189
		2190	db 129,34,3,82,3,18,17,18
		2191
		2192	db 3,66,1,7,226,66,17,226
		2193
		2194	db 226,225,225,33,16
		2195	lev13:
		2196	db 233,0
		2197	db 225,225,33,224,224,17,0,53
		2198
		2199	db 225,49,16,1,21,0,17,0
		2200
		2201	db 53,1,230,22,1,16,1,21
		2202
		2203	db 0,17,0,53,1,230,22,1
		2204
		2205	db 16,1,21,0,17,0,53,1
		2206
		2207	db 38,177,22,1,16,1,21,0
		2208
		2209	db 17,0,5,1,21,1,38,1
		2210
		2211	db 7,133,1,22,1,16,1,21
		2212
		2213	db 0,17,0,5,1,21,1,38
		2214
		2215	db 1,6,1,7,101,1,22,1
		2216
		2217	db 16,1,21,0,17,0,5,1
		2218
		2219	db 21,1,70,1,117,1,22,1
		2220
		2221	db 16,1,21,0,17,0,5,1
		2222
		2223	db 21,1,38,1,6,1,5,7
		2224
		2225	db 85,1,22,1,16,1,21,0
		2226
		2227	db 17,0,5,1,21,1,38,1
		2228
		2229	db 38,81,5,1,38,16,1,21
		2230
		2231	db 0,17,0,5,1,21,1,38
		2232
		2233	db 1,70,7,53,1,22,1,16
		2234
		2235	db 1,7,5,0,17,0,5,1
		2236
		2237	db 21,1,38,177,22,1,16,1
		2238
		2239	db 21,0,17,0,5,1,21,1
		2240
		2241	db 230,22,1,16,1,21,0,17
		2242
		2243	db 0,5,1,21,1,7,230,6
		2244
		2245	db 1,16,1,21,0,17,0,5
		2246
		2247	db 1,21,225,49,16,1,21,0
		2248
		2249	db 17,0,5,1,7,5,224,80
		2250
		2251	db 1,21,0,17,0,5,225,145
		2252
		2253	db 21,0,17,224,224,225,225,33
		2254
		2255	db 16
		2256	lev14:
		2257	db 152,0
		2258	db 225,225,33,7,102,144,57,112
		2259
		2260	db 17,118,48,7,40,16,7,41
		2261
		2262	db 112,17,118,0,104,208,17,22
		2263
		2264	db 49,232,128,17,22,1,25,1
		2265
		2266	db 8,196,8,128,17,22,1,25
		2267
		2268	db 1,8,196,8,128,17,38,0
		2269
		2270	db 9,1,8,20,7,148,8,128
		2271
		2272	db 17,6,32,9,1,8,196,72
		2273
		2274	db 64,17,6,0,41,1,8,196
		2275
		2276	db 72,64,17,6,0,41,1,8
		2277
		2278	db 196,8,7,40,64,17,6,32
		2279
		2280	db 9,1,232,128,17,70,1,0
		2281
		2282	db 81,120,128,17,64,1,80,1
		2283
		2284	db 224,16,17,64,1,89,1,16
		2285
		2286	db 86,32,70,0,17,80,89,1
		2287
		2288	db 16,86,32,70,0,17,86,1
		2289
		2290	db 7,57,1,32,70,32,70,0
		2291
		2292	db 17,7,70,97,118,32,70,0
		2293
		2294	db 17,230,86,128,225,225,33,16
		2295
		2296	lev15:
		2297	db 242,0
		2298	db 225,225,33,182,224,32,17,22
		2299
		2300	db 69,70,0,54,0,54,0,54
		2301
		2302	db 0,20,17,22,69,32,22,0
		2303
		2304	db 54,0,54,0,54,0,20,17
		2305
		2306	db 22,69,0,5,4,22,0,1
		2307
		2308	db 38,0,54,0,54,0,20,17
		2309
		2310	db 22,69,0,3,4,22,0,1
		2311
		2312	db 38,0,54,0,33,6,0,20
		2313
		2314	db 17,22,69,0,3,4,22,0
		2315
		2316	db 17,7,6,0,54,0,1,7
		2317
		2318	db 22,0,20,17,22,69,0,3
		2319
		2320	db 4,22,0,1,38,0,54,0
		2321
		2322	db 1,38,0,20,17,22,80,3
		2323
		2324	db 4,22,0,1,38,0,54,0
		2325
		2326	db 1,38,0,20,17,22,0,83
		2327
		2328	db 4,22,0,54,0,54,0,49
		2329
		2330	db 0,20,17,22,0,3,84,22
		2331
		2332	db 0,54,0,56,0,54,0,20
		2333
		2334	db 17,22,0,3,84,22,0,54
		2335
		2336	db 0,56,0,54,0,20,17,22
		2337
		2338	db 0,3,7,68,22,0,54,0
		2339
		2340	db 8,7,24,0,54,0,25,17
		2341
		2342	db 22,0,83,4,22,0,54,0
		2343
		2344	db 56,0,54,0,7,9,17,22
		2345
		2346	db 112,22,0,54,0,54,0,54
		2347
		2348	db 0,25,17,182,0,54,0,54
		2349
		2350	db 0,54,0,20,17,192,54,0
		2351
		2352	db 54,0,54,0,20,225,1,7
		2353
		2354	db 22,0,54,0,54,0,20,17
		2355
		2356	db 7,2,116,224,32,20,225,225
		2357
		2358	db 33,16
		2359
		2360	;-----------------------------------
		2361	spisok:
		2362	dd sten1
		2363	dd sten3
		2364	dd trava
		2365	dd kamni
		2366	dd palma
		2367	dd water
		2368	dd voda1
		2369	dd baza1
		2370	dd drevo
		2371	dd pesok
		2372	dd bum11; here begin animate sprites
		2373	dd bum21
		2374	dd bum31
		2375	dd bum41
		2376	dd puly1
		2377	dd puly1
		2378	dd puly1
		2379	dd puly1
		2380	dd tan11
		2381	dd tan12
		2382	dd tan11
		2383	dd tan12
		2384	dd tan21
		2385	dd tan22
		2386	dd tan21
		2387	dd tan22
		2388	;-----------------------------------
		2389	levels:
		2390	dd lev01
		2391	dd lev02
		2392	dd lev03
		2393	dd lev04
		2394	dd lev05
		2395	dd lev06
		2396	dd lev07
		2397	dd lev08
		2398	dd lev09
		2399	dd lev10
		2400	dd lev11
		2401	dd lev12
		2402	dd lev13
		2403	dd lev14
		2404	dd lev15
		2405	dd lev02
		2406	dd lev02
		2407	dd lev02
		2408	dd lev02
		2409	dd lev02
		2410	dd lev02
		2411	dd lev02
		2412	dd lev02
		2413	dd lev02
		2414	dd lev02
		2415	dd lev02
		2416	dd lev02
		2417	dd lev02
		2418	dd lev02
		2419	I_END:

Subversion Repositories Kolibri OS

(root)/programs/games/tanks/trunk/tanks.asm – Rev 1854