forked from KolibriOS/kolibrios
fix engrish
git-svn-id: svn://kolibrios.org@4697 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
hidnplayr
parent
26b2217e55
commit
8c3cc24496
@ -7,6 +7,8 @@
|
|||||||
;
|
;
|
||||||
; Compile with FASM
|
; Compile with FASM
|
||||||
;
|
;
|
||||||
|
format binary as ""
|
||||||
|
|
||||||
bgcolor equ 0x0074744A ;thx
|
bgcolor equ 0x0074744A ;thx
|
||||||
fgcolor equ 0x00E7C750 ;to
|
fgcolor equ 0x00E7C750 ;to
|
||||||
fg2color equ 0x00E0B0A0 ;colorref
|
fg2color equ 0x00E0B0A0 ;colorref
|
||||||
@ -103,39 +105,39 @@ macro latin1 [arg]
|
|||||||
}
|
}
|
||||||
use32
|
use32
|
||||||
|
|
||||||
org 0x0
|
org 0x0
|
||||||
|
|
||||||
db 'MENUET01' ; 8 byte id
|
db 'MENUET01' ; 8 byte id
|
||||||
dd 0x01 ; header version
|
dd 0x01 ; header version
|
||||||
dd START ; start of code
|
dd START ; start of code
|
||||||
dd I_END ; size of image
|
dd I_END ; size of image
|
||||||
dd 0x100000 ; memory for app
|
dd 0x100000 ; memory for app
|
||||||
dd 0x7fff0 ; esp
|
dd 0x7fff0 ; esp
|
||||||
dd 0x0 , 0x0 ; I_Param , I_Icon
|
dd 0x0 , 0x0 ; I_Param , I_Icon
|
||||||
|
|
||||||
START: ; start of execution
|
START: ; start of execution
|
||||||
jmp red
|
jmp red
|
||||||
|
|
||||||
still:
|
still:
|
||||||
mcall 10 ; wait here for event
|
mcall 10 ; wait here for event
|
||||||
cmp eax,1 ; redraw request ?
|
cmp eax,1 ; redraw request ?
|
||||||
je red
|
je red
|
||||||
cmp eax,2 ; key in buffer ?
|
cmp eax,2 ; key in buffer ?
|
||||||
je key
|
je key
|
||||||
cmp eax,3 ; button in buffer ?
|
cmp eax,3 ; button in buffer ?
|
||||||
je button
|
je button
|
||||||
jmp still
|
jmp still
|
||||||
|
|
||||||
red: ; redraw
|
red: ; redraw
|
||||||
call draw_window
|
call draw_window
|
||||||
call draw_board
|
call draw_board
|
||||||
call draw_message
|
call draw_message
|
||||||
jmp still
|
jmp still
|
||||||
|
|
||||||
key: ; key
|
key: ; key
|
||||||
mcall 2 ; just read it and ignore
|
mcall 2 ; just read it and ignore
|
||||||
jmp still
|
jmp still
|
||||||
button: ; button
|
button: ; button
|
||||||
call get_input
|
call get_input
|
||||||
jmp still
|
jmp still
|
||||||
|
|
||||||
@ -143,11 +145,11 @@ still:
|
|||||||
|
|
||||||
get_input:
|
get_input:
|
||||||
pusha
|
pusha
|
||||||
mcall 17 ; get id
|
mcall 17 ; get id
|
||||||
|
|
||||||
cmp ah,1 ; button id=1 ?
|
cmp ah,1 ; button id=1 ?
|
||||||
jne .noclose
|
jne .noclose
|
||||||
mcall -1 ; close this program
|
mcall -1 ; close this program
|
||||||
.noclose:
|
.noclose:
|
||||||
cmp ah,4
|
cmp ah,4
|
||||||
jne .moderate
|
jne .moderate
|
||||||
@ -177,16 +179,16 @@ pusha
|
|||||||
.board:
|
.board:
|
||||||
cmp [stat],2
|
cmp [stat],2
|
||||||
jge .getno
|
jge .getno
|
||||||
shr eax,8 ; -> 24bit id
|
shr eax,8 ; -> 24bit id
|
||||||
cmp eax,10
|
cmp eax,10
|
||||||
jle .getno
|
jle .getno
|
||||||
cmp eax,150
|
cmp eax,150
|
||||||
jg .getno
|
jg .getno
|
||||||
sub eax,10
|
sub eax,10
|
||||||
mov edi,eax
|
mov edi,eax
|
||||||
add edi,map
|
add edi,map
|
||||||
cmp [edi], byte 1
|
cmp [edi], byte 1
|
||||||
jg .nogerade
|
jg .nogerade
|
||||||
xor byte [edi], 1
|
xor byte [edi], 1
|
||||||
call draw_board
|
call draw_board
|
||||||
jmp .getno
|
jmp .getno
|
||||||
@ -203,12 +205,12 @@ pusha
|
|||||||
popa
|
popa
|
||||||
ret
|
ret
|
||||||
;//// end of event detection
|
;//// end of event detection
|
||||||
get_direction: ;Setzt Richtungs-Konstanten
|
get_direction: ;Setzt Richtungs-Konstanten
|
||||||
pusha ;IN:
|
pusha ;IN:
|
||||||
mov eax,[esp+28] ;eax - Richtung IN
|
mov eax,[esp+28] ;eax - Richtung IN
|
||||||
mov ebx,[esp+16] ;ebx - Teilchen (Map-Wert)
|
mov ebx,[esp+16] ;ebx - Teilchen (Map-Wert)
|
||||||
cmp ebx,0 ;OUT:
|
cmp ebx,0 ;OUT:
|
||||||
jne .no0 ;eax - Richtung OUT
|
jne .no0 ;eax - Richtung OUT
|
||||||
cmp eax,14
|
cmp eax,14
|
||||||
jne .o0
|
jne .o0
|
||||||
jmp .setout
|
jmp .setout
|
||||||
@ -291,7 +293,7 @@ jne .no8
|
|||||||
mov [stat],1
|
mov [stat],1
|
||||||
jmp .setout
|
jmp .setout
|
||||||
.no8:
|
.no8:
|
||||||
cmp ebx,16 ; cross 2x
|
cmp ebx,16 ; cross 2x
|
||||||
jne .col
|
jne .col
|
||||||
add [score],10 ; + 10 bonus points
|
add [score],10 ; + 10 bonus points
|
||||||
jmp .setout
|
jmp .setout
|
||||||
@ -329,21 +331,21 @@ cmp eax,3
|
|||||||
jne .nothing
|
jne .nothing
|
||||||
call get_input
|
call get_input
|
||||||
.nothing:
|
.nothing:
|
||||||
cmp [stat],0 ;bugfix 210806
|
cmp [stat],0 ;bugfix 210806
|
||||||
jnz .exitsub ;bugfix 210806
|
jnz .exitsub ;bugfix 210806
|
||||||
dec ecx
|
dec ecx
|
||||||
jnz .down
|
jnz .down
|
||||||
dec [time]
|
dec [time]
|
||||||
jnz .udown
|
jnz .udown
|
||||||
.exitsub: ;bugfix 210806
|
.exitsub: ;bugfix 210806
|
||||||
popa
|
popa
|
||||||
ret
|
ret
|
||||||
|
|
||||||
wassermarsch:
|
wassermarsch:
|
||||||
pusha
|
pusha
|
||||||
.restart:
|
.restart:
|
||||||
mov esi,map+16 ;start position
|
mov esi,map+16 ;start position
|
||||||
mov eax, 14 ;start-richtung
|
mov eax, 14 ;start-richtung
|
||||||
.findway:
|
.findway:
|
||||||
movzx ebx, byte [esi]
|
movzx ebx, byte [esi]
|
||||||
call get_direction
|
call get_direction
|
||||||
@ -353,7 +355,7 @@ pusha
|
|||||||
xor eax,eax
|
xor eax,eax
|
||||||
mov al,6
|
mov al,6
|
||||||
sub al,[diffic]
|
sub al,[diffic]
|
||||||
add [score],eax ;points/item = 6 - difficulty
|
add [score],eax ;points/item = 6 - difficulty
|
||||||
mov ecx,dword [speed]
|
mov ecx,dword [speed]
|
||||||
add byte [esi],10
|
add byte [esi],10
|
||||||
.down:
|
.down:
|
||||||
@ -387,7 +389,7 @@ pusha
|
|||||||
mcall
|
mcall
|
||||||
mov [stat],0
|
mov [stat],0
|
||||||
inc [level]
|
inc [level]
|
||||||
cmp [speed],6 ;waterflowdelay < 6 ?
|
cmp [speed],6 ;waterflowdelay < 6 ?
|
||||||
jle .skipsub
|
jle .skipsub
|
||||||
sub [speed],2
|
sub [speed],2
|
||||||
.skipsub:
|
.skipsub:
|
||||||
@ -404,7 +406,7 @@ ret
|
|||||||
|
|
||||||
show_score:
|
show_score:
|
||||||
pusha
|
pusha
|
||||||
mov eax,13 ;clear time and score area
|
mov eax,13 ;clear time and score area
|
||||||
mov ebx,50 shl 16 +15
|
mov ebx,50 shl 16 +15
|
||||||
mov ecx,395 shl 16 +15
|
mov ecx,395 shl 16 +15
|
||||||
mov edx,bgcolor
|
mov edx,bgcolor
|
||||||
@ -445,7 +447,7 @@ scramble_board:
|
|||||||
pusha
|
pusha
|
||||||
mov edi,map+16 ;startpunkt
|
mov edi,map+16 ;startpunkt
|
||||||
mov eax,7 ;wieder-
|
mov eax,7 ;wieder-
|
||||||
stosb ;herstellen
|
stosb ;herstellen
|
||||||
|
|
||||||
mov ebx, 0x00000007 ;modul m max-wert
|
mov ebx, 0x00000007 ;modul m max-wert
|
||||||
.loop_through:
|
.loop_through:
|
||||||
@ -455,7 +457,7 @@ cmp eax, 9
|
|||||||
je .skip
|
je .skip
|
||||||
inc eax
|
inc eax
|
||||||
xor edx, edx
|
xor edx, edx
|
||||||
div ebx ;modulo -> edx
|
div ebx ;modulo -> edx
|
||||||
mov eax, edx
|
mov eax, edx
|
||||||
cmp eax,6
|
cmp eax,6
|
||||||
jne .skip
|
jne .skip
|
||||||
@ -477,29 +479,29 @@ ret
|
|||||||
|
|
||||||
gen_image:
|
gen_image:
|
||||||
pusha
|
pusha
|
||||||
xor ebx,ebx ;default: kein wasser
|
xor ebx,ebx ;default: kein wasser
|
||||||
movzx eax,byte [map] ;erstes byte der map lesen (position)
|
movzx eax,byte [map] ;erstes byte der map lesen (position)
|
||||||
inc byte [map] ;position inkrementieren
|
inc byte [map] ;position inkrementieren
|
||||||
add eax,map ;zur position die map-adresse addieren
|
add eax,map ;zur position die map-adresse addieren
|
||||||
movzx esi,byte [eax]
|
movzx esi,byte [eax]
|
||||||
cmp esi,10
|
cmp esi,10
|
||||||
jl .nowater
|
jl .nowater
|
||||||
sub esi,10 ;map-werte+10 sind mit wasser gefuellt
|
sub esi,10 ;map-werte+10 sind mit wasser gefuellt
|
||||||
mov ebx,1
|
mov ebx,1
|
||||||
cmp esi,16
|
cmp esi,16
|
||||||
jne .nowater
|
jne .nowater
|
||||||
sub esi,10
|
sub esi,10
|
||||||
.nowater:
|
.nowater:
|
||||||
imul esi,3072 ;mapwert * 32*32*3 = image-adresse
|
imul esi,3072 ;mapwert * 32*32*3 = image-adresse
|
||||||
add esi,images
|
add esi,images
|
||||||
mov edi,0x10000
|
mov edi,0x10000
|
||||||
mov ecx,32*32*3
|
mov ecx,32*32*3
|
||||||
.gendd: ;RGB-Image im Speicher generieren
|
.gendd: ;RGB-Image im Speicher generieren
|
||||||
mov eax,dword [esi] ;byte aus imagemap lesen
|
mov eax,dword [esi] ;byte aus imagemap lesen
|
||||||
shl eax,8
|
shl eax,8
|
||||||
shr eax,8
|
shr eax,8
|
||||||
cmp ebx,0
|
cmp ebx,0
|
||||||
jz .nowcolor
|
jz .nowcolor
|
||||||
mov ebx,eax
|
mov ebx,eax
|
||||||
cmp ebx,0x00B0B5B0
|
cmp ebx,0x00B0B5B0
|
||||||
jne .nog1
|
jne .nog1
|
||||||
@ -538,7 +540,7 @@ ret
|
|||||||
draw_message:
|
draw_message:
|
||||||
pusha
|
pusha
|
||||||
cmp [stat],0
|
cmp [stat],0
|
||||||
je .nomessage
|
je .nomessage
|
||||||
mov eax,13
|
mov eax,13
|
||||||
mov ebx,146 shl 16 + 200
|
mov ebx,146 shl 16 + 200
|
||||||
mov ecx,190 shl 16 + 40
|
mov ecx,190 shl 16 + 40
|
||||||
@ -549,8 +551,8 @@ pusha
|
|||||||
mov edx,fgcolor
|
mov edx,fgcolor
|
||||||
mcall
|
mcall
|
||||||
|
|
||||||
cmp [stat],3
|
cmp [stat],3
|
||||||
jne .stat1
|
jne .stat1
|
||||||
mov eax,4
|
mov eax,4
|
||||||
mov ebx,174 shl 16 +206
|
mov ebx,174 shl 16 +206
|
||||||
mov edx,lbl_start_a_new_game+1
|
mov edx,lbl_start_a_new_game+1
|
||||||
@ -558,9 +560,9 @@ pusha
|
|||||||
mov ecx,btcolor
|
mov ecx,btcolor
|
||||||
add ecx,0x10000000
|
add ecx,0x10000000
|
||||||
mcall
|
mcall
|
||||||
jmp .nomessage
|
jmp .nomessage
|
||||||
|
|
||||||
.stat1:
|
.stat1:
|
||||||
cmp [stat],1
|
cmp [stat],1
|
||||||
je .winmessage
|
je .winmessage
|
||||||
mov eax,4
|
mov eax,4
|
||||||
@ -575,11 +577,11 @@ pusha
|
|||||||
movzx esi,byte [lbl_yscore]
|
movzx esi,byte [lbl_yscore]
|
||||||
mov ecx,btcolor
|
mov ecx,btcolor
|
||||||
mcall
|
mcall
|
||||||
mov esi,ecx ;color
|
mov esi,ecx ;color
|
||||||
mov edx,ebx ;pos
|
mov edx,ebx ;pos
|
||||||
add edx,80 shl 16
|
add edx,80 shl 16
|
||||||
mov ebx,0x50000 ;type
|
mov ebx,0x50000 ;type
|
||||||
mov ecx,[score] ;inp
|
mov ecx,[score] ;inp
|
||||||
mov eax,47
|
mov eax,47
|
||||||
mcall
|
mcall
|
||||||
jmp .nomessage
|
jmp .nomessage
|
||||||
@ -603,18 +605,18 @@ draw_board:
|
|||||||
pusha
|
pusha
|
||||||
mov ebx,15*65536+32
|
mov ebx,15*65536+32
|
||||||
mov ecx,50*65536+32
|
mov ecx,50*65536+32
|
||||||
mov edx,15*65536+50 ;Spielfeldposition
|
mov edx,15*65536+50 ;Spielfeldposition
|
||||||
mov esi,10 ;Spielfeldgroesse Y
|
mov esi,10 ;Spielfeldgroesse Y
|
||||||
.vloop:
|
.vloop:
|
||||||
mov edi,14 ;Spielfeldgroesse X
|
mov edi,14 ;Spielfeldgroesse X
|
||||||
.hloop:
|
.hloop:
|
||||||
call gen_image
|
call gen_image
|
||||||
push edx
|
push edx
|
||||||
mov eax,8
|
mov eax,8
|
||||||
movsx edx, byte [map]
|
movsx edx, byte [map]
|
||||||
add edx,9 ;button-id = map-pos + 10;gen_image inkrements
|
add edx,9 ;button-id = map-pos + 10;gen_image inkrements
|
||||||
add edx,0x80000000 ;first delete previous button
|
add edx,0x80000000 ;first delete previous button
|
||||||
mcall
|
mcall
|
||||||
sub edx,0x30000000 ;first delete previous button
|
sub edx,0x30000000 ;first delete previous button
|
||||||
mcall
|
mcall
|
||||||
pop edx
|
pop edx
|
||||||
@ -630,13 +632,13 @@ pusha
|
|||||||
add ebx,33 shl 16
|
add ebx,33 shl 16
|
||||||
dec edi
|
dec edi
|
||||||
jnz .hloop
|
jnz .hloop
|
||||||
sub edx,14*(33 shl 16) ;Spielfeldgroesse X
|
sub edx,14*(33 shl 16) ;Spielfeldgroesse X
|
||||||
sub ebx,14*(33 shl 16)
|
sub ebx,14*(33 shl 16)
|
||||||
add edx,33
|
add edx,33
|
||||||
add ecx,33 shl 16
|
add ecx,33 shl 16
|
||||||
dec esi
|
dec esi
|
||||||
jnz .vloop
|
jnz .vloop
|
||||||
mov [map], byte 1 ;Map-Position zuruecksetzen
|
mov [map], byte 1 ;Map-Position zuruecksetzen
|
||||||
popa
|
popa
|
||||||
ret
|
ret
|
||||||
|
|
||||||
@ -645,11 +647,11 @@ draw_window:
|
|||||||
pusha
|
pusha
|
||||||
|
|
||||||
mcall 12,1
|
mcall 12,1
|
||||||
|
|
||||||
mov eax,0 ; function 0 : define and draw window
|
mov eax,0 ; function 0 : define and draw window
|
||||||
mov ebx,100*65536+492 ; [x start] *65536 + [x size]
|
mov ebx,100*65536+492 ; [x start] *65536 + [x size]
|
||||||
mov ecx,100*65536+420 ; [y start] *65536 + [y size]
|
mov ecx,100*65536+420 ; [y start] *65536 + [y size]
|
||||||
mov edx,bgcolor ; color of work area RRGGBB,8->color gl
|
mov edx,bgcolor ; color of work area RRGGBB,8->color gl
|
||||||
or edx,0x14000000
|
or edx,0x14000000
|
||||||
mov edi,title
|
mov edi,title
|
||||||
mcall
|
mcall
|
||||||
@ -725,7 +727,7 @@ lbl_start_a_new_game:
|
|||||||
lbl_win:
|
lbl_win:
|
||||||
db 32
|
db 32
|
||||||
db ' G r e a t ! '
|
db ' G r e a t ! '
|
||||||
db " Let's goin'on! "
|
db " Let's keep going! "
|
||||||
lbl_yscore:
|
lbl_yscore:
|
||||||
db 11
|
db 11
|
||||||
db 'Your Score:'
|
db 'Your Score:'
|
||||||
@ -739,15 +741,15 @@ lbl_score:
|
|||||||
db 28
|
db 28
|
||||||
db 'Time: Score: Level:'
|
db 'Time: Score: Level:'
|
||||||
end if
|
end if
|
||||||
stat db 3 ;0=gameplay 1=won 2-lost 3=stopped
|
stat db 3 ;0=gameplay 1=won 2-lost 3=stopped
|
||||||
speed db 0
|
speed db 0
|
||||||
time dd 0
|
time dd 0
|
||||||
diffic db 0 ;1=hard 3=moderate 5=easy 8=dedicated to Wildwest - try it out!
|
diffic db 0 ;1=hard 3=moderate 5=easy 8=dedicated to Wildwest - try it out!
|
||||||
score dd 0
|
score dd 0
|
||||||
level dd 1
|
level dd 1
|
||||||
half db 1 ;reduces the random-crosses
|
half db 1 ;reduces the random-crosses
|
||||||
|
|
||||||
map: ;14*10 blocks + position
|
map: ;14*10 blocks + position
|
||||||
db 1 ;<- act. position
|
db 1 ;<- act. position
|
||||||
db 9,9,9,9,9,9,9,9,9,9,9,9,9,9
|
db 9,9,9,9,9,9,9,9,9,9,9,9,9,9
|
||||||
db 9,7,1,3,2,0,1,1,0,3,4,4,3,9
|
db 9,7,1,3,2,0,1,1,0,3,4,4,3,9
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user