Subversion Repositories Kolibri OS

Compare Revisions

Regard whitespace Rev 2018 → Rev 2017

/programs/games/tanks/trunk/build_ru.bat
1,5 → 1,6
@erase lang.inc
@echo lang fix ru >lang.inc
@fasm tanks.asm tanks
@fasm leveledit.asm leveledit
@erase lang.inc
@pause
/programs/games/tanks/trunk/tanks.asm
1,10 → 1,12
;************************************************************
;*GAME TANKS CRETED BY ANDREW_PROGRAMMER AKA ANDREY IGNATYEV*
;*********************/8/2005********************************
;Leency aka Lipatov Kirill /07/2011
;dunkaist /07/2011
; v1.1
;Leency aka Lipatov Kirill 19.07.2011: update and some fixes
; v1.02
 
; bug: window can't end redraw untill new game wasn't start
; if press close button it goes to infinite loop
 
use32
org 0x0
include 'lang.inc'
344,19 → 346,9
mov ebx,3
mcall
cmp eax,1
je .redraw
cmp eax,2
je .key
cmp eax,3
je .button
jmp action
.button:
mcall 63,1,'o'
mcall -1
.redraw:
jne keypressed
call drawwin
jmp action
.key:
keypressed:
cmp eax,2
jne action
913,7 → 905,7
mov eax,47
mov ebx,3*65536
mov ecx,[number_level]
;inc ecx //leency
inc ecx
mov edx,225*65536+5
mov esi,0x1ded00
mcall
1136,25 → 1128,25
mov edx,0xc6e9
mcall
mov eax,4
mov ebx,255*65536+190
mov ebx,220*65536+190
mov ecx,0xffffff
mov edx,won1
mov esi,29
mcall
mov eax,4
mov ebx,255*65536+200
mov ebx,220*65536+200
mov ecx,0xffffff
mov edx,won2
mov esi,29
mcall
mov eax,4
mov ebx,255*65536+210
mov ebx,220*65536+210
mov ecx,0xffffff
mov edx,won3
mov esi,29
mcall
mov eax,5
mov ebx,400
mov ebx,100
mcall
ret
;----------------------------------------------------------
1171,7 → 1163,7
mov esi,9
mcall
mov eax,5
mov ebx,350
mov ebx,150
mcall
ret
;----------------------------------------------------------
1190,40 → 1182,28
mcall 4,255*65536+235,0xff0200,start_menu,11
mcall 47,3*65536,[number_level],345*65536+235, 0xff0200
mcall 4,465*65536+5,0x888888,description,25
mcall 4,186*65536+5,0x888888,description,49
still:
mov eax,10
mcall
dec eax
jz .redraw
dec eax
jz .key
; jmp .button
;.button:
mcall 63,1,'l'
mcall -1
.redraw:
pop eax
jmp restart_level
.key:
cmp eax,2
jne still
mov eax,2
mcall
shr eax,8
cmp eax,32
je start_game
cmp eax,13
je start_game
cmp eax,176
jne no_left
dec [number_level]
and [number_level],15
and [number_level],11111b
jmp cycle_menu
no_left:
cmp eax,179
jne no_right
inc [number_level]
and [number_level],15
and [number_level],11111b
jmp cycle_menu
no_right:
cmp eax,27
1278,10 → 1258,10
strike_action dd 0
end_bum db 0
bazas db 0
name db 'Tanks v1.1' ,0
description db 'Left/Right - Change level' ,0
name db 'Tanks v1.02' ,0
description db 'SPACE - New Game Left/Right - Change level' ,0
won1 db '*****************************'
won2 db '* YOU WON LEVEL! *'
won2 db '* YOU WON LEVEL !!! *'
won3 db '*****************************'
game_over db 'GAME OVER'
Lifes db 'LIVES'
1828,79 → 1808,7
;-----------------------------------
;-----here begin levels-------------
;-----------------------------------
lev00:
db 146,0
db 225,225,33,89,1,176,89,1
db 57,17,89,1,176,25,7,41
db 1,57,17,89,1,9,65,57
db 64,34,1,25,1,9,17,89
db 1,25,7,5,9,1,57,48
db 35,33,9,1,9,17,89,1
db 73,1,233,1,9,17,89,225
db 113,9,17,233,233,17,233,233
db 17,217,129,105,17,217,1,100
db 1,105,17,41,81,64,1,7
db 73,4,1,105,17,41,1,7
db 41,1,64,1,89,4,1,105
db 17,41,1,36,25,64,1,25
db 1,41,4,145,41,1,52,1
db 64,41,1,7,34,1,98,17
db 41,81,64,129,18,7,50,17
db 233,121,3,20,50,17,233,121
db 35,17,25,17,233,233,225,225
db 33,16
lev01:
db 162,0
db 225,225,33,229,5,214,17,21
db 33,7,149,1,198,17,21,208
db 1,32,150,17,226,2,1,18
db 80,70,17,2,83,130,1,18
db 0,7,34,0,70,17,2,3
db 144,1,0,18,1,18,0,50
db 0,70,17,2,3,144,1,0
db 18,1,18,0,50,0,70,17
db 2,3,32,7,50,16,1,0
db 66,0,50,0,70,17,2,3
db 32,66,16,1,0,66,0,7
db 130,17,2,3,144,1,48,18
db 64,82,17,18,144,1,0,7
db 50,0,2,32,82,17,18,144
db 1,0,66,0,1,64,50,17
db 178,1,0,66,0,2,80,34
db 17,178,1,96,6,80,34,145
db 0,34,113,150,17,7,82,1
db 0,34,230,38,17,98,16,226
db 82,17,98,16,226,82,225,225
db 33,16
lev02:
db 205,0
db 225,225,33,224,224,17,0,2
db 83,64,233,9,0,17,0,2
db 3,34,0,7,64,233,9,0
db 17,0,2,3,34,96,73,7
db 153,0,17,224,32,1,41,50
db 41,0,17,2,145,16,18,32
db 1,41,50,41,0,17,2,1
db 134,16,18,32,1,41,50,41
db 0,17,2,1,6,41,70,16
db 1,2,32,1,7,25,50,41
db 0,17,2,1,6,89,22,16
db 18,32,49,50,41,0,17,2
db 1,6,89,22,16,1,2,32
db 1,41,50,41,0,17,2,1
db 54,41,22,16,1,2,32,1
db 41,50,41,0,17,2,1,54
db 41,22,16,1,2,32,1,41
db 50,41,0,17,2,1,54,7
db 25,22,16,18,32,1,41,2
db 7,16,41,0,17,2,1,54
db 41,22,16,1,2,224,17,2
db 1,54,41,22,16,1,2,224
db 17,2,1,134,16,18,100,6
db 98,17,2,1,160,1,2,100
db 6,1,82,17,226,118,1,7
db 66,225,225,33,16
lev03:
db 171,0
db 225,225,33,150,7,2,1,7
db 41,192,17,150,18,1,57,144
1924,7 → 1832,80
db 1,100,112,1,40,17,70,2
db 7,34,1,116,96,1,40,225
db 225,33,16
lev02:
db 255,3
db 225,225,33,5,49,3,225,161
db 5,38,5,3,64,89,0,40
db 54,50,33,5,38,5,3,32
db 35,34,3,16,8,67,6,50
db 33,5,38,5,3,34,16,3
db 36,3,2,35,36,3,66,33
db 5,22,21,3,34,3,0,3
db 36,3,2,3,7,36,5,3
db 2,1,35,33,5,22,21,3
db 7,2,0,2,19,5,20,3
db 2,51,21,3,66,33,5,22
db 21,35,0,2,3,7,5,20
db 18,3,24,3,22,67,2,33
db 5,17,25,48,2,51,2,35
db 24,3,22,9,16,19,2,33
db 5,2,1,25,49,2,3,56
db 3,54,67,0,3,16,33,5
db 2,49,22,1,6,3,22,1
db 8,3,17,88,3,48,33,5
db 18,4,54,1,6,3,22,1
db 8,3,7,1,99,57,33,5
db 18,4,22,1,5,1,54,1
db 8,3,70,51,57,33,5,18
db 4,0,17,5,113,51,0,3
db 38,9,32,33,5,17,4,16
db 1,32,1,37,49,32,3,54
db 19,0,33,5,0,20,16,1
db 2,1,0,20,1,24,34,0
db 33,7,38,3,16,33,5,0
db 33,0,1,2,113,18,32,83
db 16,33,5,16,7,16,1,146
db 33,128,33,114,65,98,225,225
db 193,16
lev03:
db 118,0
db 225,225,33,85,50,35,162,86
db 17,5,7,53,166,34,7,8
db 18,86,17,85,34,19,6,19
db 50,72,2,86,193,6,225,1
db 6,33,160,230,54,17,18,128
db 102,65,102,17,7,2,128,102
db 1,166,17,160,230,54,225,113
db 6,145,214,224,0,17,214,96
db 81,32,17,214,96,1,7,38
db 17,16,17,214,224,0,113,6
db 225,145,82,198,1,144,17,82
db 1,182,1,48,1,54,0,17
db 18,38,2,7,2,166,1,48
db 1,54,0,17,114,230,6,1
db 7,48,225,225,33,16
lev04:
db 146,0
db 225,225,33,89,1,176,89,1
db 57,17,89,1,176,25,7,41
db 1,57,17,89,1,9,65,57
db 64,34,1,25,1,9,17,89
db 1,25,7,5,9,1,57,48
db 35,33,9,1,9,17,89,1
db 73,1,233,1,9,17,89,225
db 113,9,17,233,233,17,233,233
db 17,217,129,105,17,217,1,100
db 1,105,17,41,81,64,1,7
db 73,4,1,105,17,41,1,7
db 41,1,64,1,89,4,1,105
db 17,41,1,36,25,64,1,25
db 1,41,4,145,41,1,52,1
db 64,41,1,7,34,1,98,17
db 41,81,64,129,18,7,50,17
db 233,121,3,20,50,17,233,121
db 35,17,25,17,233,233,225,225
db 33,16
lev05:
db 229,0
db 225,225,33,224,224,17,0,134
db 50,72,34,24,2,40,2,0
1955,7 → 1936,7
db 118,83,6,136,16,24,0,17
db 0,230,22,19,136,0,17,224
db 224,225,225,33,16
lev05:
lev06:
db 149,0
db 225,225,33,176,1,18,19,192
db 17,0,7,18,112,1,2,7
1976,7 → 1957,7
db 32,6,17,16,177,144,1,70
db 17,224,128,1,70,17,224,144
db 70,225,225,33,16
lev06:
lev07:
db 159,0
db 225,225,33,0,7,229,197,17
db 64,225,113,21,17,64,1,37
1998,7 → 1979,7
db 38,17,5,1,232,8,129,38
db 17,5,225,33,7,98,38,17
db 229,69,150,225,225,33,16
lev07:
lev08:
db 209,0
db 225,225,33,36,7,228,84,1
db 48,17,164,195,4,1,48,17
2027,196 → 2008,320
db 1,48,17,38,114,1,2,193
db 48,17,38,226,178,225,225,33
db 16
lev08:
db 118,0
db 225,225,33,85,50,35,162,86
db 17,5,7,53,166,34,7,8
db 18,86,17,85,34,19,6,19
db 50,72,2,86,193,6,225,1
db 6,33,160,230,54,17,18,128
db 102,65,102,17,7,2,128,102
db 1,166,17,160,230,54,225,113
db 6,145,214,224,0,17,214,96
db 81,32,17,214,96,1,7,38
db 17,16,17,214,224,0,113,6
db 225,145,82,198,1,144,17,82
db 1,182,1,48,1,54,0,17
db 18,38,2,7,2,166,1,48
db 1,54,0,17,114,230,6,1
db 7,48,225,225,33,16
lev09:
db 255,3
db 225,225,33,5,49,3,225,161
db 5,38,5,3,64,89,0,40
db 54,50,33,5,38,5,3,32
db 35,34,3,16,8,67,6,50
db 33,5,38,5,3,34,16,3
db 36,3,2,35,36,3,66,33
db 5,22,21,3,34,3,0,3
db 36,3,2,3,7,36,5,3
db 2,1,35,33,5,22,21,3
db 7,2,0,2,19,5,20,3
db 2,51,21,3,66,33,5,22
db 21,35,0,2,3,7,5,20
db 18,3,24,3,22,67,2,33
db 5,17,25,48,2,51,2,35
db 24,3,22,9,16,19,2,33
db 5,2,1,25,49,2,3,56
db 3,54,67,0,3,16,33,5
db 2,49,22,1,6,3,22,1
db 8,3,17,88,3,48,33,5
db 18,4,54,1,6,3,22,1
db 8,3,7,1,99,57,33,5
db 18,4,22,1,5,1,54,1
db 8,3,70,51,57,33,5,18
db 4,0,17,5,113,51,0,3
db 38,9,32,33,5,17,4,16
db 1,32,1,37,49,32,3,54
db 19,0,33,5,0,20,16,1
db 2,1,0,20,1,24,34,0
db 33,7,38,3,16,33,5,0
db 33,0,1,2,113,18,32,83
db 16,33,5,16,7,16,1,146
db 33,128,33,114,65,98,225,225
db 193,16
db 162,0
db 225,225,33,229,5,214,17,21
db 33,7,149,1,198,17,21,208
db 1,32,150,17,226,2,1,18
db 80,70,17,2,83,130,1,18
db 0,7,34,0,70,17,2,3
db 144,1,0,18,1,18,0,50
db 0,70,17,2,3,144,1,0
db 18,1,18,0,50,0,70,17
db 2,3,32,7,50,16,1,0
db 66,0,50,0,70,17,2,3
db 32,66,16,1,0,66,0,7
db 130,17,2,3,144,1,48,18
db 64,82,17,18,144,1,0,7
db 50,0,2,32,82,17,18,144
db 1,0,66,0,1,64,50,17
db 178,1,0,66,0,2,80,34
db 17,178,1,96,6,80,34,145
db 0,34,113,150,17,7,82,1
db 0,34,230,38,17,98,16,226
db 82,17,98,16,226,82,225,225
db 33,16
lev10:
db 205,0
db 225,225,33,224,224,17,0,2
db 83,64,233,9,0,17,0,2
db 3,34,0,7,64,233,9,0
db 17,0,2,3,34,96,73,7
db 153,0,17,224,32,1,41,50
db 41,0,17,2,145,16,18,32
db 1,41,50,41,0,17,2,1
db 134,16,18,32,1,41,50,41
db 0,17,2,1,6,41,70,16
db 1,2,32,1,7,25,50,41
db 0,17,2,1,6,89,22,16
db 18,32,49,50,41,0,17,2
db 1,6,89,22,16,1,2,32
db 1,41,50,41,0,17,2,1
db 54,41,22,16,1,2,32,1
db 41,50,41,0,17,2,1,54
db 41,22,16,1,2,32,1,41
db 50,41,0,17,2,1,54,7
db 25,22,16,18,32,1,41,2
db 7,16,41,0,17,2,1,54
db 41,22,16,1,2,224,17,2
db 1,54,41,22,16,1,2,224
db 17,2,1,134,16,18,100,6
db 98,17,2,1,160,1,2,100
db 6,1,82,17,226,118,1,7
db 66,225,225,33,16
lev11:
db 228,0
db 225,225,33,230,230,17,6,104
 
db 1,104,6,1,7,152,6,17
 
db 6,104,1,104,6,1,24,1
 
db 120,6,17,6,104,1,8,102
 
db 49,8,64,24,6,17,6,104
 
db 1,8,6,72,38,40,0,88
 
db 6,17,6,8,97,8,6,33
 
db 56,6,40,64,24,6,17,6
 
db 8,1,104,6,1,64,1,6
 
db 104,0,24,6,17,6,8,1
 
db 104,6,1,0,40,0,1,6
 
db 104,0,24,6,17,6,8,1
 
db 7,88,6,1,0,40,0,1
 
db 6,40,16,24,0,24,6,17
 
db 6,8,33,72,6,1,0,8
 
db 7,8,0,1,6,40,0,40
 
db 0,24,6,17,6,136,6,1
 
db 0,40,0,1,6,40,0,40
 
db 0,24,6,17,166,1,0,40
 
db 0,1,6,40,64,7,8,6
 
db 17,6,8,49,6,56,1,64
 
db 1,6,152,6,17,6,8,7
 
db 24,1,6,56,97,182,17,6
 
db 56,1,6,168,6,24,80,40
 
db 17,6,56,1,198,24,0,56
 
db 0,40,17,6,72,6,216,0
 
db 56,0,40,17,102,120,1,7
 
db 56,0,1,7,8,1,0,40
 
db 225,225,33,16
lev11:
lev12:
db 157,0
db 225,225,33,66,1,217,36,98
 
db 17,66,1,217,36,50,3,18
 
db 17,66,1,41,161,36,33,50
 
db 17,66,1,41,1,196,1,2
 
db 1,50,17,66,1,41,1,196
 
db 1,2,1,50,17,2,65,41
 
db 1,148,49,2,1,50,17,2
 
db 1,7,24,25,33,4,145,7
 
db 34,1,50,17,2,1,40,25
 
db 1,7,20,1,7,178,1,50
 
db 17,2,97,32,1,194,1,50
 
db 17,162,1,194,1,50,17,162
 
db 1,2,3,18,145,50,209,2
 
db 3,18,1,7,178,17,7,36
 
db 19,98,3,18,1,98,3,66
 
db 17,68,3,4,130,1,194,17
 
db 36,35,4,130,1,194,17,114
 
db 129,34,3,82,3,18,17,18
 
db 3,66,1,7,226,66,17,226
 
db 226,225,225,33,16
lev12:
lev13:
db 233,0
db 225,225,33,224,224,17,0,53
 
db 225,49,16,1,21,0,17,0
 
db 53,1,230,22,1,16,1,21
 
db 0,17,0,53,1,230,22,1
 
db 16,1,21,0,17,0,53,1
 
db 38,177,22,1,16,1,21,0
 
db 17,0,5,1,21,1,38,1
 
db 7,133,1,22,1,16,1,21
 
db 0,17,0,5,1,21,1,38
 
db 1,6,1,7,101,1,22,1
 
db 16,1,21,0,17,0,5,1
 
db 21,1,70,1,117,1,22,1
 
db 16,1,21,0,17,0,5,1
 
db 21,1,38,1,6,1,5,7
 
db 85,1,22,1,16,1,21,0
 
db 17,0,5,1,21,1,38,1
 
db 38,81,5,1,38,16,1,21
 
db 0,17,0,5,1,21,1,38
 
db 1,70,7,53,1,22,1,16
 
db 1,7,5,0,17,0,5,1
 
db 21,1,38,177,22,1,16,1
 
db 21,0,17,0,5,1,21,1
 
db 230,22,1,16,1,21,0,17
 
db 0,5,1,21,1,7,230,6
 
db 1,16,1,21,0,17,0,5
 
db 1,21,225,49,16,1,21,0
 
db 17,0,5,1,7,5,224,80
 
db 1,21,0,17,0,5,225,145
 
db 21,0,17,224,224,225,225,33
 
db 16
lev13:
lev14:
db 152,0
db 225,225,33,7,102,144,57,112
 
db 17,118,48,7,40,16,7,41
 
db 112,17,118,0,104,208,17,22
 
db 49,232,128,17,22,1,25,1
 
db 8,196,8,128,17,22,1,25
 
db 1,8,196,8,128,17,38,0
 
db 9,1,8,20,7,148,8,128
 
db 17,6,32,9,1,8,196,72
 
db 64,17,6,0,41,1,8,196
 
db 72,64,17,6,0,41,1,8
 
db 196,8,7,40,64,17,6,32
 
db 9,1,232,128,17,70,1,0
 
db 81,120,128,17,64,1,80,1
 
db 224,16,17,64,1,89,1,16
 
db 86,32,70,0,17,80,89,1
 
db 16,86,32,70,0,17,86,1
 
db 7,57,1,32,70,32,70,0
 
db 17,7,70,97,118,32,70,0
 
db 17,230,86,128,225,225,33,16
lev14:
 
lev15:
db 242,0
db 225,225,33,182,224,32,17,22
 
db 69,70,0,54,0,54,0,54
 
db 0,20,17,22,69,32,22,0
 
db 54,0,54,0,54,0,20,17
 
db 22,69,0,5,4,22,0,1
 
db 38,0,54,0,54,0,20,17
 
db 22,69,0,3,4,22,0,1
 
db 38,0,54,0,33,6,0,20
 
db 17,22,69,0,3,4,22,0
 
db 17,7,6,0,54,0,1,7
 
db 22,0,20,17,22,69,0,3
 
db 4,22,0,1,38,0,54,0
 
db 1,38,0,20,17,22,80,3
 
db 4,22,0,1,38,0,54,0
 
db 1,38,0,20,17,22,0,83
 
db 4,22,0,54,0,54,0,49
 
db 0,20,17,22,0,3,84,22
 
db 0,54,0,56,0,54,0,20
 
db 17,22,0,3,84,22,0,54
 
db 0,56,0,54,0,20,17,22
 
db 0,3,7,68,22,0,54,0
 
db 8,7,24,0,54,0,25,17
 
db 22,0,83,4,22,0,54,0
 
db 56,0,54,0,7,9,17,22
 
db 112,22,0,54,0,54,0,54
 
db 0,25,17,182,0,54,0,54
 
db 0,54,0,20,17,192,54,0
 
db 54,0,54,0,20,225,1,7
 
db 22,0,54,0,54,0,20,17
 
db 7,2,116,224,32,20,225,225
 
db 33,16
 
;-----------------------------------
2249,7 → 2354,6
dd tan22
;-----------------------------------
levels:
dd lev00
dd lev01
dd lev02
dd lev03
2264,5 → 2368,19
dd lev12
dd lev13
dd lev14
dd lev07 ; :(
I_END:
dd lev15
dd lev02
dd lev02
dd lev02
dd lev02
dd lev02
dd lev02
dd lev02
dd lev02
dd lev02
dd lev02
dd lev02
dd lev02
dd lev02
dd lev02
I_END: