WebSVN – Kolibri OS – Diff – /programs/games/phenix/trunk/phenix.asm



 

;******************************************************************************
 
 
include 'lang.inc'
include '..\..\..\macros.inc'

 
 
    mov eax,66
    mov ebx,1

    mov ecx,1
    mcall
 
    mov eax,26
    mov ebx,2

    mov ecx,1
    mov edx,keymap
    mcall

redm:
    call draw_logowindow
    jmp stillm
keym:
    mov  eax,2
    mcall
    jmp  stillm
buttonm:
    mov  eax,17                 ; get id
    mcall
    cmp  ah,1                   ; button id=1 ?
    je   close_app
    cmp  ah,2                   ; button id=1 ?
    je   start_game
    cmp  ah,3                   ; button id=1 ?

redh:
    call draw_helpwindow
    jmp stillh
keyh:
    mov  eax,2
    mcall
    jmp  stillh
buttonh:
    mov  eax,17                 ; get id
    mcall
    cmp  ah,1                   ; button id=1 ?
    je   close_app
    cmp  ah,2                   ; button id=1 ?
    je   start_game
    cmp  ah,3                   ; button id=1 ?

    mov esi,50
    mov ecx,cl_White
    dec ebp
looht:
    mov eax,4
    mcall
    add edx,esi
    add ebx,10
    dec ebp
    jnz looht

    call draw_window
    jmp still

 
  key:                          ; key
    mov  eax,2

    mcall                   ; read (eax=2)
 
    shr eax,8

 

    jmp  still                  ; not testing
 
  button:                       ; button
    mov  eax,17                 ; get id
    mcall
    cmp  ah,1                   ; button id=1 ?
    jne  noclose
close_app:
    mov  eax,-1                 ; close this program
    mcall

  noclose:
    jmp  still

redgo:
    call draw_gowindow
    jmp stillgo
keygo:
    mov  eax,2
    mcall
    jmp  stillgo
buttongo:
    mov  eax,17                 ; get id
    mcall
    cmp  ah,1
    je   close_app
    cmp  ah,4
    je   close_app
    cmp  ah,5

redeg:
    call draw_scorewindow
    jmp stilleg
keyeg:
    mov  eax,2
    mcall
    jmp  stilleg
buttoneg:
    mov  eax,17                 ; get id
    mcall
    cmp  ah,1
    je   close_app
    cmp  ah,2
    je   next_lev
    cmp  ah,3

 
redeg2:
    jmp end_gm ;stilleg2
keyeg2:
    mov  eax,2
    mcall
    jmp  main_menu
buttoneg2:
    mov  eax,17                 ; get id
    mcall

Rev 109	Rev 485
Line 20...	Line 20...
20		20
Line 21...	Line 21...
21	;******************************************************************************	21	;******************************************************************************
-		22
22		23
23		24	include 'lang.inc'
24	include 'lang.inc'	25	include '..\..\..\macros.inc'
Line 348...	Line 349...
348		349
349		350
350	mov eax,66	351	mov eax,66
351	mov ebx,1	352	mov ebx,1
Line 352...	Line 353...
352	mov ecx,1	353	mov ecx,1
353	int 0x40	354	mcall
354		355
355	mov eax,26	356	mov eax,26
356	mov ebx,2	357	mov ebx,2
Line 357...	Line 358...
357	mov ecx,1	358	mov ecx,1
358	mov edx,keymap	359	mov edx,keymap
359	int 0x40	360	mcall
Line 386...	Line 387...
386	redm:	387	redm:
387	call draw_logowindow	388	call draw_logowindow
388	jmp stillm	389	jmp stillm
389	keym:	390	keym:
390	mov eax,2	391	mov eax,2
391	int 0x40	392	mcall
392	jmp stillm	393	jmp stillm
393	buttonm:	394	buttonm:
394	mov eax,17 ; get id	395	mov eax,17 ; get id
395	int 0x40	396	mcall
396	cmp ah,1 ; button id=1 ?	397	cmp ah,1 ; button id=1 ?
397	je close_app	398	je close_app
398	cmp ah,2 ; button id=1 ?	399	cmp ah,2 ; button id=1 ?
399	je start_game	400	je start_game
400	cmp ah,3 ; button id=1 ?	401	cmp ah,3 ; button id=1 ?
Line 424...	Line 425...
424	redh:	425	redh:
425	call draw_helpwindow	426	call draw_helpwindow
426	jmp stillh	427	jmp stillh
427	keyh:	428	keyh:
428	mov eax,2	429	mov eax,2
429	int 0x40	430	mcall
430	jmp stillh	431	jmp stillh
431	buttonh:	432	buttonh:
432	mov eax,17 ; get id	433	mov eax,17 ; get id
433	int 0x40	434	mcall
434	cmp ah,1 ; button id=1 ?	435	cmp ah,1 ; button id=1 ?
435	je close_app	436	je close_app
436	cmp ah,2 ; button id=1 ?	437	cmp ah,2 ; button id=1 ?
437	je start_game	438	je start_game
438	cmp ah,3 ; button id=1 ?	439	cmp ah,3 ; button id=1 ?
Line 455...	Line 456...
455	mov esi,50	456	mov esi,50
456	mov ecx,cl_White	457	mov ecx,cl_White
457	dec ebp	458	dec ebp
458	looht:	459	looht:
459	mov eax,4	460	mov eax,4
460	int 0x40	461	mcall
461	add edx,esi	462	add edx,esi
462	add ebx,10	463	add ebx,10
463	dec ebp	464	dec ebp
464	jnz looht	465	jnz looht
Line 880...	Line 881...
880	call draw_window	881	call draw_window
881	jmp still	882	jmp still
Line 882...	Line 883...
882		883
883	key: ; key	884	key: ; key
884	mov eax,2	885	mov eax,2
Line 885...	Line 886...
885	int 0x40 ; read (eax=2)	886	mcall ; read (eax=2)
886		887
887	shr eax,8	888	shr eax,8
Line 952...	Line 953...
952		953
Line 953...	Line 954...
953	jmp still ; not testing	954	jmp still ; not testing
954		955
955	button: ; button	956	button: ; button
956	mov eax,17 ; get id	957	mov eax,17 ; get id
957	int 0x40	958	mcall
958	cmp ah,1 ; button id=1 ?	959	cmp ah,1 ; button id=1 ?
959	jne noclose	960	jne noclose
960	close_app:	961	close_app:
961	mov eax,-1 ; close this program	962	mov eax,-1 ; close this program
962	int 0x40	963	mcall
Line 963...	Line 964...
963	noclose:	964	noclose:
964	jmp still	965	jmp still
Line 984...	Line 985...
984	redgo:	985	redgo:
985	call draw_gowindow	986	call draw_gowindow
986	jmp stillgo	987	jmp stillgo
987	keygo:	988	keygo:
988	mov eax,2	989	mov eax,2
989	int 0x40	990	mcall
990	jmp stillgo	991	jmp stillgo
991	buttongo:	992	buttongo:
992	mov eax,17 ; get id	993	mov eax,17 ; get id
993	int 0x40	994	mcall
994	cmp ah,1	995	cmp ah,1
995	je close_app	996	je close_app
996	cmp ah,4	997	cmp ah,4
997	je close_app	998	je close_app
998	cmp ah,5	999	cmp ah,5
Line 1075...	Line 1076...
1075	redeg:	1076	redeg:
1076	call draw_scorewindow	1077	call draw_scorewindow
1077	jmp stilleg	1078	jmp stilleg
1078	keyeg:	1079	keyeg:
1079	mov eax,2	1080	mov eax,2
1080	int 0x40	1081	mcall
1081	jmp stilleg	1082	jmp stilleg
1082	buttoneg:	1083	buttoneg:
1083	mov eax,17 ; get id	1084	mov eax,17 ; get id
1084	int 0x40	1085	mcall
1085	cmp ah,1	1086	cmp ah,1
1086	je close_app	1087	je close_app
1087	cmp ah,2	1088	cmp ah,2
1088	je next_lev	1089	je next_lev
1089	cmp ah,3	1090	cmp ah,3
Line 1209...	Line 1210...
1209		1210
1210	redeg2:	1211	redeg2:
1211	jmp end_gm ;stilleg2	1212	jmp end_gm ;stilleg2
1212	keyeg2:	1213	keyeg2:
1213	mov eax,2	1214	mov eax,2
1214	int 0x40	1215	mcall
1215	jmp main_menu	1216	jmp main_menu
1216	buttoneg2:	1217	buttoneg2:
1217	mov eax,17 ; get id	1218	mov eax,17 ; get id
1218	int 0x40	1219	mcall

Subversion Repositories Kolibri OS

(root)/programs/games/phenix/trunk/phenix.asm – Rev 109 → 485