BlueGreycalmElegant

Català-Valencià – Catalan中文 – Chinese (Simplified)中文 – Chinese (Traditional)Česky – CzechDansk – DanishNederlands – DutchEnglish – EnglishSuomi – FinnishFrançais – FrenchDeutsch – Germanעברית – Hebrewहिंदी – HindiMagyar – HungarianBahasa Indonesia – IndonesianItaliano – Italian日本語 – Japanese한국어 – KoreanМакедонски – Macedonianमराठी – MarathiNorsk – NorwegianPolski – PolishPortuguês – PortuguesePortuguês – Portuguese (Brazil)Русский – RussianSlovenčina – SlovakSlovenščina – SlovenianEspañol – SpanishSvenska – SwedishTürkçe – TurkishУкраїнська – UkrainianOëzbekcha – Uzbek

Compare Revisions

• This comparison shows the changes necessary to convert path

  → /programs/games/phenix/ @ 484

  → /programs/games/phenix/ @ 485

  ↔ Reverse comparison

• Compare Path:	Rev

  With Path:	Rev

Regard whitespace Rev 484 → Rev 485

/programs/games/phenix/trunk/ascgl.inc
373,7 → 373,7
wordstoreg ecx,y,ys ;y*65536+ys
mov edx,color
mov eax,13
int 0x40
mcall
}
; FPS - Set Frame Per Second Display
390,7 → 390,7
spdat:
get_time:
mov eax,3
int 0x40
mcall
cmp eax,[savetime]
jne new_time
inc [fps_cntr]
409,7 → 409,7
mov ecx,y*65536+7
mov edx,delcolor
mov eax,13
int 0x40
mcall
end if
mov dword [ttt],fps_show_frequency
mov eax,47
418,7 → 418,7
mov edx,x*65536+y
mov esi,color
mov ecx,[fps]
int 0x40
mcall
no_out_fps:
}
496,7 → 496,7
add cx,[arg3+4]
; wordstoreg ecx,[arg3],[arg3+4]
wordstoreg edx, x , y ;arg1*65536+arg2
int 0x40
mcall
}
macro setframe x , y ,arg3
507,7 → 507,7
wordstoreg edx, x , y ;arg1*65536+arg2
add edx,dword [arg3]
mov ecx,dword [arg3+4]
int 0x40
mcall
}

/programs/games/phenix/trunk/ascl.inc
50,7 → 50,7
mov dword [fileinfo+8],1 ; how many blocks to read (1)
mov eax,58
mov ebx,fileinfo
int 0x40
mcall
mov eax,[file_load_area+2]
shr eax,9 ; ¯®¤¥«¨¬ ­  512 ¨ ¯à¨¡ ¢¨¬ 1 - ¯®«ã稬 ç¨á«® ¡«®ª®¢
inc eax
57,7 → 57,7
mov dword [fileinfo+8],eax
mov eax,58
mov ebx,fileinfo
int 0x40
mcall
}
145,7 → 145,7
mov edx,id
mov esi,bcolor
mov eax,8
int 0x40
mcall
mov eax,asd-lab ;calc size
mov ebx,6
170,7 → 170,7
mov edx,lab
mov esi,asd-lab ;calc size
mov eax,4
int 0x40
mcall
}
199,7 → 199,7
mov eax,9
mov ebx,procinfo
mov ecx,-1
int 0x40
mcall
; convert eax bin to param dec
mov eax,dword [procinfo+30] ;offset of myPID
233,12 → 233,12
mov ebx,1 ; define IPC
mov ecx,path ; offset of area
mov edx,150 ; size 150 bytes
int 0x40
mcall
; change wanted events list 7-bit IPC event
mov eax,40
mov ebx,01000111b
int 0x40
mcall
;
; STEP 3 run SYSTEM XTREE with parameters
246,7 → 246,7
mov eax,58
mov ebx,run_fileinfo
int 0x40
mcall
call redproc
254,7 → 254,7
getmesloop:
mov eax,23
mov ebx,50 ;0.5 sec
int 0x40
mcall
cmp eax,1
je mred
269,7 → 269,7
mov ebx,procinfo
mov ecx,-1
mov eax,9
int 0x40
mcall
mov ebp,eax
loox:
276,7 → 276,7
mov eax,9
mov ebx,procinfo
mov ecx,ebp
int 0x40
mcall
mov eax,[DLGPID]
cmp [procinfo+30],eax ;IF Dialog find
je dlg_is_work ;jmp to dlg_is_work
301,15 → 301,15
jmp getmesloop
mkey:
mov eax,2
int 0x40 ; read (eax=2)
mcall ; read (eax=2)
jmp getmesloop
mbutton:
mov eax,17 ; get id
int 0x40
mcall
cmp ah,1 ; button id=1 ?
jne getmesloop
mov eax,-1 ; close this program
int 0x40
mcall
mgetmes:
; If dlg_pid_get then second message get jmp to still
411,7 → 411,7
mov eax,9
mov ebx,procinfo
mov ecx,-1
int 0x40
mcall
; convert eax bin to param dec
mov eax,dword [procinfo+30] ;offset of myPID
445,12 → 445,12
mov ebx,1 ; define IPC
mov ecx,path ; offset of area
mov edx,120 ; size 150 bytes
int 0x40
mcall
; change wanted events list 7-bit IPC event
mov eax,40
mov ebx,01000111b
int 0x40
mcall
;
; STEP 3 run SYSTEM XTREE with parameters
458,7 → 458,7
mov eax,58
mov ebx,run_fileinfo
int 0x40
mcall
call redproc
466,7 → 466,7
getmesloop:
mov eax,23
mov ebx,50 ;0.5 sec
int 0x40
mcall
cmp eax,1
je mred
481,7 → 481,7
mov ebx,procinfo
mov ecx,-1
mov eax,9
int 0x40
mcall
mov ebp,eax
loox:
488,7 → 488,7
mov eax,9
mov ebx,procinfo
mov ecx,ebp
int 0x40
mcall
mov eax,[DLGPID]
cmp [procinfo+30],eax ;IF Dialog find
je dlg_is_work ;jmp to dlg_is_work
512,15 → 512,15
call redproc
jmp getmesloop
mkey:
int 0x40 ; read (eax=2)
mcall ; read (eax=2)
jmp getmesloop
mbutton:
mov eax,17 ; get id
int 0x40
mcall
cmp ah,1 ; button id=1 ?
jne getmesloop
mov eax,-1 ; close this program
int 0x40
mcall
mgetmes:
; If dlg_pid_get then second message get jmp to still
672,7 → 672,7
macro scank
{
mov eax,10
int 0x40
mcall
}
macro putpix x,y,color
681,7 → 681,7
mov ecx,y
mov edx,color
mov eax,1
int 0x40
mcall
}
macro puttxt x,y,offs,size,color
694,7 → 694,7
mov edx,offs
mov esi,size
mov eax,4
int 0x40
mcall
}
macro outcount data, x, y, color, numtype
706,7 → 706,7
words2reg edx,x,y
mov esi,color
mov eax,47
int 0x40
mcall
}
; SCEVENT - Scan event
714,7 → 714,7
macro scevent red,key,but
{
mov eax,11
int 0x40
mcall
dec eax
jz red
dec eax
728,7 → 728,7
macro wtevent red,key,but
{
mov eax,10
int 0x40
mcall
dec eax
jz red
dec eax
743,7 → 743,7
{
mov eax,23
mov ebx,xfps
int 0x40
mcall
cmp eax,0
je noevent
dec eax
760,7 → 760,7
macro close
{
mov eax,-1
int 0x40
mcall
}
; DELAY - Create delay 1/100 sec
771,7 → 771,7
{
mov eax,5
mov ebx,arg1
int 0x40
mcall
}
; WINDOW - Draw window
786,7 → 786,7
words2reg ecx,arg2,arg4
mov edx,arg5
mov eax,0
int 0x40
mcall
}
macro colorwindow arg1,arg2,arg3,arg4,arg5,arg6,arg7
797,7 → 797,7
mov esi,arg6
mov edi,arg7
mov eax,0
int 0x40
mcall
}
807,7 → 807,7
{
mov eax,12
mov ebx,1
int 0x40
mcall
}
; ENDWD - End window draw
816,7 → 816,7
{
mov eax,12
mov ebx,2
int 0x40
mcall
}
; LABEL - Put text to frame
842,7 → 842,7
mov edx,lab
mov esi,asd-lab ;calc size
mov eax,4
int 0x40
mcall
}
;Key's

/programs/games/phenix/trunk/build_en.bat
1,4 → 1,5
@erase lang.inc
@echo lang fix en >lang.inc
@fasm phenix.asm phenix
@erase lang.inc
@pause

/programs/games/phenix/trunk/build_ru.bat
1,4 → 1,5
@erase lang.inc
@echo lang fix ru >lang.inc
@fasm phenix.asm phenix
@erase lang.inc
@pause

/programs/games/phenix/trunk/phenix.asm
22,6 → 22,7
include 'lang.inc'
include '..\..\..\macros.inc'
include 'ascl.inc'
include 'ascgl.inc'
include 'ascml.inc'
350,13 → 351,13
mov eax,66
mov ebx,1
mov ecx,1
int 0x40
mcall
mov eax,26
mov ebx,2
mov ecx,1
mov edx,keymap
int 0x40
mcall
startgame:
gif_hash_offset = gif_hash_area
388,11 → 389,11
jmp stillm
keym:
mov eax,2
int 0x40
mcall
jmp stillm
buttonm:
mov eax,17 ; get id
int 0x40
mcall
cmp ah,1 ; button id=1 ?
je close_app
cmp ah,2 ; button id=1 ?
426,11 → 427,11
jmp stillh
keyh:
mov eax,2
int 0x40
mcall
jmp stillh
buttonh:
mov eax,17 ; get id
int 0x40
mcall
cmp ah,1 ; button id=1 ?
je close_app
cmp ah,2 ; button id=1 ?
457,7 → 458,7
dec ebp
looht:
mov eax,4
int 0x40
mcall
add edx,esi
add ebx,10
dec ebp
882,7 → 883,7
key: ; key
mov eax,2
int 0x40 ; read (eax=2)
mcall ; read (eax=2)
shr eax,8
and eax,0xff
954,12 → 955,12
button: ; button
mov eax,17 ; get id
int 0x40
mcall
cmp ah,1 ; button id=1 ?
jne noclose
close_app:
mov eax,-1 ; close this program
int 0x40
mcall
noclose:
jmp still
986,11 → 987,11
jmp stillgo
keygo:
mov eax,2
int 0x40
mcall
jmp stillgo
buttongo:
mov eax,17 ; get id
int 0x40
mcall
cmp ah,1
je close_app
cmp ah,4
1077,11 → 1078,11
jmp stilleg
keyeg:
mov eax,2
int 0x40
mcall
jmp stilleg
buttoneg:
mov eax,17 ; get id
int 0x40
mcall
cmp ah,1
je close_app
cmp ah,2
1211,11 → 1212,11
jmp end_gm ;stilleg2
keyeg2:
mov eax,2
int 0x40
mcall
jmp main_menu
buttoneg2:
mov eax,17 ; get id
int 0x40
mcall
jmp stilleg2