Update locale codes
- Fixes for new locale codes. - Correct en_US translations. - Some whitespace clean-up.
This commit is contained in:
parent
d1ecd626b0
commit
ed2e074b9f
@ -8,5 +8,5 @@
|
||||
|
||||
; Éste archivo debe ser editado con codificación CP866
|
||||
|
||||
version cp850 'KolibriOS versión 0.7.7.0+ ',13,10,13,10,0
|
||||
version cp850 'KolibriOS versión 0.7.7.0 ',13,10,13,10,0 ; FIXME: Get distribution version from git tag
|
||||
diff16 "fin del código del kernel",0,$
|
||||
|
||||
@ -1,459 +1,460 @@
|
||||
;
|
||||
; ”ãªæ¨¨ ¤«ï ¯à¥®¡à §®¢ ¨ï ä ©« *.stl ¢ *.3ds
|
||||
;
|
||||
; ‘âàãªâãà ᮧ¤ ¢ ¥¬®£® ä ©« *.3ds:
|
||||
; CHUNK_MAIN (40+n+v+f)
|
||||
; + CHUNK_OBJMESH (34+n+v+f)
|
||||
; + CHUNK_OBJBLOCK (28+n+v+f)
|
||||
; + CHUNK_TRIMESH (22+v+f)
|
||||
; + CHUNK_VERTLIST (8+v)
|
||||
; + CHUNK_FACELIST (8+f)
|
||||
;
|
||||
; ¢ ᪮¡ª å 㪠§ ë à §¬¥àë ¡«®ª®¢:
|
||||
; n - ¯ ¬ïâì ¤«ï ¨¬¥¨ ®¡ê¥ªâ
|
||||
; v - ¯ ¬ïâì ¤«ï ¢¥àè¨
|
||||
; f - ¯ ¬ïâì ¤«ï £à ¥©
|
||||
|
||||
; ”®à¬ â ¡¨ ண® *.stl:
|
||||
; char[80] - § £®«®¢®ª
|
||||
; uint32 - ç¨á«® £à ¥©
|
||||
; ¤«ï ª ¦¤®© £à ¨:
|
||||
; float[3] - ¢¥ªâ®à ®à¬ «¨
|
||||
; float[9] - ¢¥àè¨ë 1,2,3
|
||||
; uint16 - âਡãâë
|
||||
|
||||
|
||||
if lang eq ru_RU
|
||||
txt_err_stl_open:
|
||||
db '"STL',13,10
|
||||
db '” ©« *.stl ®ç¥ì ¡®«ì让." -tW',0
|
||||
txt_err_stl_null_v:
|
||||
db '"STL',13,10
|
||||
db '‚¥àè¨ë ¥ ©¤¥ë." -tE',0
|
||||
else
|
||||
txt_err_stl_open:
|
||||
db '"STL',13,10
|
||||
db 'File *.stl is very large." -tW',0
|
||||
txt_err_stl_null_v:
|
||||
db '"STL',13,10
|
||||
db 'Vertexes not found." -tE',0
|
||||
end if
|
||||
|
||||
;output:
|
||||
; eax - 㪠§ ⥫ì áä®à¬¨à®¢ ë© ä ©« 3ds (¢ á«ãç ¥ ¥ã¤ ç¨ 0)
|
||||
; ecx - à §¬¥à áä®à¬¨à®¢ ®£® ä ©« 3ds
|
||||
align 4
|
||||
proc convert_stl_3ds uses ebx edx edi esi, f_data:dword, f_size:dword
|
||||
locals
|
||||
c_mem dd ? ;¯ ¬ïâì ¤«ï ¯à¥®¡à §®¢ ¨ï (convert memory)
|
||||
c_size dd ? ;à §¬¥à ¯ ¬ï⨠¤«ï ¯à¥®¡à §®¢ ¨© (convert memory size)
|
||||
vert_c dd ? ;ç¨á«® ¢¥àè¨ (vertex count)
|
||||
face_c dd ? ;ç¨á«® £à ¥© (faces count)
|
||||
endl
|
||||
xor eax,eax
|
||||
mov esi,[f_data]
|
||||
cmp dword[esi],'soli'
|
||||
jne .bin_stl
|
||||
cmp word[esi+4],'d '
|
||||
jne .bin_stl
|
||||
|
||||
jmp @f
|
||||
.bin_stl:
|
||||
;¯à®¢¥à塞 ä ©« ¡¨ àë© ä®à¬ â
|
||||
mov ecx,[esi+80]
|
||||
imul ecx,50
|
||||
add ecx,84 ;§ £®«®¢®ª
|
||||
cmp ecx,[f_size]
|
||||
jne .no_stl
|
||||
call convert_binary_stl
|
||||
jmp .no_stl
|
||||
@@:
|
||||
|
||||
;¢ ç «¥ ©¤¥® 'solid '
|
||||
stdcall txt_next_line, 80
|
||||
|
||||
mov eax,[f_data]
|
||||
sub eax,esi
|
||||
add eax,[f_size]
|
||||
stdcall get_stl_vertex_count, esi,eax
|
||||
or eax,eax
|
||||
jnz @f
|
||||
notify_window_run txt_err_stl_null_v
|
||||
jmp .no_stl
|
||||
@@:
|
||||
cmp eax,0xffff
|
||||
jle @f
|
||||
notify_window_run txt_err_stl_open
|
||||
mov eax,0xffff
|
||||
@@:
|
||||
|
||||
mov [vert_c],eax
|
||||
mov ecx,3
|
||||
xor edx,edx
|
||||
div ecx
|
||||
mov [face_c],eax
|
||||
shl eax,3
|
||||
mov ecx,[vert_c]
|
||||
imul ecx,12
|
||||
lea ecx,[ecx+eax+40]
|
||||
lea edx,[esi-6]
|
||||
sub edx,[f_data]
|
||||
cmp edx,2
|
||||
jge @f
|
||||
mov edx,2 ;¬¨¨¬ «ìë© à §¬¥à ¤«ï ¨¬¥¨ ®¡ê¥ªâ
|
||||
@@:
|
||||
add ecx,edx ;for object name
|
||||
mov [c_size],ecx
|
||||
stdcall mem.Alloc,ecx
|
||||
mov [c_mem],eax
|
||||
mov ebx,eax
|
||||
|
||||
mov word[ebx],CHUNK_MAIN
|
||||
mov dword[ebx+2],ecx
|
||||
add ebx,6
|
||||
|
||||
;3d3d
|
||||
mov word[ebx],CHUNK_OBJMESH
|
||||
sub ecx,6
|
||||
mov dword[ebx+2],ecx
|
||||
add ebx,6
|
||||
|
||||
;4000
|
||||
mov word[ebx],CHUNK_OBJBLOCK
|
||||
sub ecx,6
|
||||
mov dword[ebx+2],ecx
|
||||
add ebx,6
|
||||
|
||||
push ecx esi
|
||||
mov ecx,edx
|
||||
mov edi,ebx
|
||||
mov esi,[f_data]
|
||||
add esi,6 ;¯à®¯ã᪠¥¬ 'solid '
|
||||
rep movsb ;ª®¯¨à㥬 ¨¬ï ®¡ê¥ªâ
|
||||
mov byte[edi-1],0
|
||||
add ebx,edx
|
||||
pop esi ecx
|
||||
|
||||
;4100
|
||||
mov word[ebx],CHUNK_TRIMESH
|
||||
sub ecx,6
|
||||
mov dword[ebx+2],ecx
|
||||
add ebx,6
|
||||
|
||||
;4110
|
||||
mov word[ebx],CHUNK_VERTLIST
|
||||
mov dword[ebx+2],8 ;+ ç¨á«® ¢¥àè¨ * 12
|
||||
add ebx,6
|
||||
|
||||
mov edx,ebx
|
||||
mov word[edx],0 ;ª®«. ¢¥àè¨
|
||||
add ebx,2
|
||||
finit
|
||||
.cycle0:
|
||||
call txt_ignore_space
|
||||
cmp dword[esi],'face'
|
||||
jne .end_v
|
||||
stdcall txt_next_line, 80
|
||||
|
||||
call txt_ignore_space
|
||||
cmp dword[esi],'oute'
|
||||
jne .end_v
|
||||
stdcall txt_next_line, 80
|
||||
|
||||
mov ecx,3 ;3 â®çª¨ 1 £à ì
|
||||
@@:
|
||||
stdcall stl_vertex_init, ebx
|
||||
or eax,eax
|
||||
jz .end_v
|
||||
add ebx,12
|
||||
inc word[edx]
|
||||
loop @b
|
||||
|
||||
mov eax,[vert_c]
|
||||
cmp word[edx],ax
|
||||
jge .end_v
|
||||
call txt_ignore_space
|
||||
cmp dword[esi],'endl'
|
||||
jne .end_v
|
||||
stdcall txt_next_line, 80
|
||||
|
||||
call txt_ignore_space
|
||||
cmp dword[esi],'endf'
|
||||
jne .end_v
|
||||
stdcall txt_next_line, 80
|
||||
jmp .cycle0
|
||||
.end_v:
|
||||
|
||||
movzx eax,word[edx]
|
||||
imul eax,12
|
||||
add [edx-4],eax ;¨á¯à ¢«ï¥¬ à §¬¥à ¡«®ª 4110
|
||||
|
||||
;4120
|
||||
mov word[ebx],CHUNK_FACELIST
|
||||
mov ecx,[face_c]
|
||||
mov edx,ecx
|
||||
shl edx,3 ;ª®«. £à ¥© * 8
|
||||
add edx,8
|
||||
mov [ebx+2],edx
|
||||
add ebx,6
|
||||
mov [ebx],cx ;ª®«. £à ¥©
|
||||
add ebx,2
|
||||
xor eax,eax
|
||||
@@:
|
||||
mov [ebx],ax
|
||||
inc eax
|
||||
mov [ebx+2],ax
|
||||
inc eax
|
||||
mov [ebx+4],ax
|
||||
inc eax
|
||||
mov word[ebx+6],0 ; âਡãâë
|
||||
add ebx,8
|
||||
loop @b
|
||||
|
||||
mov eax,[c_mem]
|
||||
mov ecx,[c_size]
|
||||
.no_stl:
|
||||
ret
|
||||
endp
|
||||
|
||||
;input:
|
||||
; esi - 㪠§ ⥫ì ç «® ä ©«
|
||||
; ecx - à §¬¥à ä ©«
|
||||
align 4
|
||||
proc convert_binary_stl
|
||||
locals
|
||||
c_mem dd ? ;¯ ¬ïâì ¤«ï ¯à¥®¡à §®¢ ¨ï (convert memory)
|
||||
c_size dd ? ;à §¬¥à ¯ ¬ï⨠¤«ï ¯à¥®¡à §®¢ ¨© (convert memory size)
|
||||
vert_c dd ? ;ç¨á«® ¢¥àè¨ (vertex count)
|
||||
face_c dd ? ;ç¨á«® £à ¥© (faces count)
|
||||
endl
|
||||
mov eax,[esi+80]
|
||||
or eax,eax
|
||||
jnz @f
|
||||
notify_window_run txt_err_stl_null_v
|
||||
jmp .no_stl
|
||||
@@:
|
||||
cmp eax,0xffff/3
|
||||
jle @f
|
||||
notify_window_run txt_err_stl_open
|
||||
mov eax,0xffff/3
|
||||
@@:
|
||||
|
||||
mov [face_c],eax
|
||||
mov ecx,eax
|
||||
imul eax,3
|
||||
mov [vert_c],eax
|
||||
shl ecx,3
|
||||
imul eax,12
|
||||
lea ecx,[ecx+eax+40+4] ;+4 à §¬¥à ¤«ï ¨¬¥¨ ®¡ê¥ªâ
|
||||
mov [c_size],ecx
|
||||
stdcall mem.Alloc,ecx
|
||||
mov [c_mem],eax
|
||||
mov ebx,eax
|
||||
|
||||
mov word[ebx],CHUNK_MAIN
|
||||
mov dword[ebx+2],ecx
|
||||
add ebx,6
|
||||
|
||||
;3d3d
|
||||
mov word[ebx],CHUNK_OBJMESH
|
||||
sub ecx,6
|
||||
mov dword[ebx+2],ecx
|
||||
add ebx,6
|
||||
|
||||
;4000
|
||||
mov word[ebx],CHUNK_OBJBLOCK
|
||||
sub ecx,6
|
||||
mov dword[ebx+2],ecx
|
||||
add ebx,6
|
||||
mov dword[ebx],'Stl' ;¨¬ï ®¡ê¥ªâ
|
||||
add ebx,4
|
||||
|
||||
;4100
|
||||
mov word[ebx],CHUNK_TRIMESH
|
||||
sub ecx,6
|
||||
mov dword[ebx+2],ecx
|
||||
add ebx,6
|
||||
|
||||
;4110
|
||||
mov word[ebx],CHUNK_VERTLIST
|
||||
mov dword[ebx+2],8 ;+ ç¨á«® ¢¥àè¨ * 12
|
||||
add ebx,6
|
||||
|
||||
mov edx,ebx
|
||||
mov ecx,[vert_c]
|
||||
mov word[edx],cx ;ª®«. ¢¥àè¨
|
||||
add ebx,2
|
||||
|
||||
add esi,80+4+12 ;¯à®¯ã᪠§ £®«®¢ª , ç¨á« £à ¥©, 1-£® ¢¥ªâ®à ®à¬ «¥©
|
||||
mov edi,ebx
|
||||
mov eax,[face_c]
|
||||
@@: ;横« ¯® £à ï¬
|
||||
mov ecx,9
|
||||
rep movsd ;ª®¯¨à㥬 ª®®à¤¨ âë 3-å ¢¥àè¨
|
||||
add esi,14 ;¯à®¯ã᪠¢¥ªâ®à ®à¬ «¥© ¨ âਡã⮢
|
||||
dec eax
|
||||
jnz @b
|
||||
mov ebx,edi
|
||||
|
||||
movzx eax,word[edx]
|
||||
imul eax,12
|
||||
add [edx-4],eax ;¨á¯à ¢«ï¥¬ à §¬¥à ¡«®ª 4110
|
||||
|
||||
;4120
|
||||
mov word[ebx],CHUNK_FACELIST
|
||||
mov ecx,[face_c]
|
||||
mov edx,ecx
|
||||
shl edx,3 ;ª®«. £à ¥© * 8
|
||||
add edx,8
|
||||
mov [ebx+2],edx
|
||||
add ebx,6
|
||||
mov [ebx],cx ;ª®«. £à ¥©
|
||||
add ebx,2
|
||||
xor eax,eax
|
||||
@@:
|
||||
mov [ebx],ax
|
||||
inc eax
|
||||
mov [ebx+2],ax
|
||||
inc eax
|
||||
mov [ebx+4],ax
|
||||
inc eax
|
||||
mov word[ebx+6],0 ; âਡãâë
|
||||
add ebx,8
|
||||
loop @b
|
||||
|
||||
mov eax,[c_mem]
|
||||
mov ecx,[c_size]
|
||||
.no_stl:
|
||||
ret
|
||||
endp
|
||||
|
||||
;output:
|
||||
; eax - vertex count
|
||||
align 4
|
||||
proc get_stl_vertex_count uses ebx ecx edi, f_data:dword, f_size:dword
|
||||
mov al,'v'
|
||||
xor ebx,ebx
|
||||
mov ecx,[f_size]
|
||||
mov edi,[f_data]
|
||||
.cycle0:
|
||||
repne scasb
|
||||
cmp dword[edi],'erte'
|
||||
jne @f
|
||||
inc ebx
|
||||
add edi,4
|
||||
sub ecx,4
|
||||
cmp ecx,4
|
||||
jg .cycle0
|
||||
@@:
|
||||
mov eax,ebx
|
||||
ret
|
||||
endp
|
||||
|
||||
;input:
|
||||
; esi - input description text
|
||||
; ppoi - pointer to vertex struct
|
||||
;output:
|
||||
; eax - 0 (if error init) or 1
|
||||
; esi - output description text
|
||||
align 4
|
||||
proc stl_vertex_init uses ebx ecx edi, ppoi:dword
|
||||
call txt_ignore_space
|
||||
cmp dword[esi],'vert'
|
||||
jne .err_init
|
||||
cmp word[esi+4],'ex'
|
||||
jne .err_init
|
||||
add esi,6
|
||||
mov ebx,[ppoi]
|
||||
|
||||
call txt_copy_data
|
||||
call String_to_DoubleFloat
|
||||
fld qword[Data_Double]
|
||||
fstp dword[ebx] ;coord X
|
||||
|
||||
call txt_copy_data
|
||||
call String_to_DoubleFloat
|
||||
fld qword[Data_Double]
|
||||
fstp dword[ebx+4] ;coord X
|
||||
|
||||
call txt_copy_data
|
||||
call String_to_DoubleFloat
|
||||
fld qword[Data_Double]
|
||||
fstp dword[ebx+8] ;coord Z
|
||||
|
||||
stdcall txt_next_line, 80
|
||||
jmp @f
|
||||
.err_init:
|
||||
xor eax,eax
|
||||
jmp .end_f
|
||||
@@:
|
||||
xor eax,eax
|
||||
inc eax
|
||||
.end_f:
|
||||
ret
|
||||
endp
|
||||
|
||||
;input:
|
||||
; esi - 㪠§ ⥫ì ç «® áâப¨ á ¯à®¡¥« ¬¨
|
||||
;output:
|
||||
; al - destroy
|
||||
; ecx - destroy
|
||||
; esi - 㪠§ â¥«ì ¯¥à¢ë© ¥¯à®¡¥«ìë© á¨¬¢®«
|
||||
align 4
|
||||
txt_ignore_space:
|
||||
mov ecx,64 ;§ é¨â ®â § 横«¨¢ ¨ï
|
||||
@@:
|
||||
lodsb
|
||||
cmp al,' '
|
||||
jne @f
|
||||
loop @b
|
||||
@@:
|
||||
dec esi
|
||||
ret
|
||||
|
||||
;input:
|
||||
; esi - 㪠§ ⥫ì áâபã á ç¨á«®¬ (¯à®¡¥«ë ¢ ç «¥ áâப¨ ¨£®à¨àãîâìáï)
|
||||
;output:
|
||||
; al - destroy
|
||||
; ecx - destroy
|
||||
; edi - destroy
|
||||
; esi - 㪠§ â¥«ì ª®¥æ ª®¯¨à®¢ ®£® ç¨á«
|
||||
; Data_String - áâப á ç¨á«®¬ ¨§ esi
|
||||
align 4
|
||||
txt_copy_data:
|
||||
call txt_ignore_space
|
||||
mov ecx,32
|
||||
mov edi,esi
|
||||
@@:
|
||||
lodsb
|
||||
or al,al
|
||||
jz @f
|
||||
cmp al,' '
|
||||
je @f
|
||||
cmp al,13
|
||||
je @f
|
||||
loop @b
|
||||
@@:
|
||||
mov esi,edi
|
||||
sub ecx,32
|
||||
neg ecx
|
||||
mov edi,Data_String
|
||||
rep movsb
|
||||
mov byte[edi],0
|
||||
ret
|
||||
|
||||
;input:
|
||||
; esi - text pointer
|
||||
align 4
|
||||
proc txt_next_line uses eax ecx edi, mlen:dword
|
||||
mov al,13
|
||||
mov ecx,[mlen]
|
||||
mov edi,esi
|
||||
repne scasb
|
||||
cmp byte[edi],10
|
||||
jne @f
|
||||
inc edi
|
||||
@@:
|
||||
mov esi,edi
|
||||
ret
|
||||
endp
|
||||
;
|
||||
; ”ãªæ¨¨ ¤«ï ¯à¥®¡à §®¢ ¨ï ä ©« *.stl ¢ *.3ds
|
||||
;
|
||||
; ‘âàãªâãà ᮧ¤ ¢ ¥¬®£® ä ©« *.3ds:
|
||||
; CHUNK_MAIN (40+n+v+f)
|
||||
; + CHUNK_OBJMESH (34+n+v+f)
|
||||
; + CHUNK_OBJBLOCK (28+n+v+f)
|
||||
; + CHUNK_TRIMESH (22+v+f)
|
||||
; + CHUNK_VERTLIST (8+v)
|
||||
; + CHUNK_FACELIST (8+f)
|
||||
;
|
||||
; ¢ ᪮¡ª å 㪠§ ë à §¬¥àë ¡«®ª®¢:
|
||||
; n - ¯ ¬ïâì ¤«ï ¨¬¥¨ ®¡ê¥ªâ
|
||||
; v - ¯ ¬ïâì ¤«ï ¢¥àè¨
|
||||
; f - ¯ ¬ïâì ¤«ï £à ¥©
|
||||
|
||||
; ”®à¬ â ¡¨ ண® *.stl:
|
||||
; char[80] - § £®«®¢®ª
|
||||
; uint32 - ç¨á«® £à ¥©
|
||||
; ¤«ï ª ¦¤®© £à ¨:
|
||||
; float[3] - ¢¥ªâ®à ®à¬ «¨
|
||||
; float[9] - ¢¥àè¨ë 1,2,3
|
||||
; uint16 - âਡãâë
|
||||
|
||||
; Language support for locales: ru_RU (CP866), en_US.
|
||||
|
||||
if lang eq ru_RU
|
||||
txt_err_stl_open:
|
||||
db '"STL',13,10
|
||||
db '” ©« *.stl ®ç¥ì ¡®«ì让." -tW',0
|
||||
txt_err_stl_null_v:
|
||||
db '"STL',13,10
|
||||
db '‚¥àè¨ë ¥ ©¤¥ë." -tE',0
|
||||
else ; Default to en_US
|
||||
txt_err_stl_open:
|
||||
db '"STL',13,10
|
||||
db 'File *.stl is very large." -tW',0
|
||||
txt_err_stl_null_v:
|
||||
db '"STL',13,10
|
||||
db 'Vertexes not found." -tE',0
|
||||
end if
|
||||
|
||||
;output:
|
||||
; eax - 㪠§ ⥫ì áä®à¬¨à®¢ ë© ä ©« 3ds (¢ á«ãç ¥ ¥ã¤ ç¨ 0)
|
||||
; ecx - à §¬¥à áä®à¬¨à®¢ ®£® ä ©« 3ds
|
||||
align 4
|
||||
proc convert_stl_3ds uses ebx edx edi esi, f_data:dword, f_size:dword
|
||||
locals
|
||||
c_mem dd ? ;¯ ¬ïâì ¤«ï ¯à¥®¡à §®¢ ¨ï (convert memory)
|
||||
c_size dd ? ;à §¬¥à ¯ ¬ï⨠¤«ï ¯à¥®¡à §®¢ ¨© (convert memory size)
|
||||
vert_c dd ? ;ç¨á«® ¢¥àè¨ (vertex count)
|
||||
face_c dd ? ;ç¨á«® £à ¥© (faces count)
|
||||
endl
|
||||
xor eax,eax
|
||||
mov esi,[f_data]
|
||||
cmp dword[esi],'soli'
|
||||
jne .bin_stl
|
||||
cmp word[esi+4],'d '
|
||||
jne .bin_stl
|
||||
|
||||
jmp @f
|
||||
.bin_stl:
|
||||
;¯à®¢¥à塞 ä ©« ¡¨ àë© ä®à¬ â
|
||||
mov ecx,[esi+80]
|
||||
imul ecx,50
|
||||
add ecx,84 ;§ £®«®¢®ª
|
||||
cmp ecx,[f_size]
|
||||
jne .no_stl
|
||||
call convert_binary_stl
|
||||
jmp .no_stl
|
||||
@@:
|
||||
|
||||
;¢ ç «¥ ©¤¥® 'solid '
|
||||
stdcall txt_next_line, 80
|
||||
|
||||
mov eax,[f_data]
|
||||
sub eax,esi
|
||||
add eax,[f_size]
|
||||
stdcall get_stl_vertex_count, esi,eax
|
||||
or eax,eax
|
||||
jnz @f
|
||||
notify_window_run txt_err_stl_null_v
|
||||
jmp .no_stl
|
||||
@@:
|
||||
cmp eax,0xffff
|
||||
jle @f
|
||||
notify_window_run txt_err_stl_open
|
||||
mov eax,0xffff
|
||||
@@:
|
||||
|
||||
mov [vert_c],eax
|
||||
mov ecx,3
|
||||
xor edx,edx
|
||||
div ecx
|
||||
mov [face_c],eax
|
||||
shl eax,3
|
||||
mov ecx,[vert_c]
|
||||
imul ecx,12
|
||||
lea ecx,[ecx+eax+40]
|
||||
lea edx,[esi-6]
|
||||
sub edx,[f_data]
|
||||
cmp edx,2
|
||||
jge @f
|
||||
mov edx,2 ;¬¨¨¬ «ìë© à §¬¥à ¤«ï ¨¬¥¨ ®¡ê¥ªâ
|
||||
@@:
|
||||
add ecx,edx ;for object name
|
||||
mov [c_size],ecx
|
||||
stdcall mem.Alloc,ecx
|
||||
mov [c_mem],eax
|
||||
mov ebx,eax
|
||||
|
||||
mov word[ebx],CHUNK_MAIN
|
||||
mov dword[ebx+2],ecx
|
||||
add ebx,6
|
||||
|
||||
;3d3d
|
||||
mov word[ebx],CHUNK_OBJMESH
|
||||
sub ecx,6
|
||||
mov dword[ebx+2],ecx
|
||||
add ebx,6
|
||||
|
||||
;4000
|
||||
mov word[ebx],CHUNK_OBJBLOCK
|
||||
sub ecx,6
|
||||
mov dword[ebx+2],ecx
|
||||
add ebx,6
|
||||
|
||||
push ecx esi
|
||||
mov ecx,edx
|
||||
mov edi,ebx
|
||||
mov esi,[f_data]
|
||||
add esi,6 ;¯à®¯ã᪠¥¬ 'solid '
|
||||
rep movsb ;ª®¯¨à㥬 ¨¬ï ®¡ê¥ªâ
|
||||
mov byte[edi-1],0
|
||||
add ebx,edx
|
||||
pop esi ecx
|
||||
|
||||
;4100
|
||||
mov word[ebx],CHUNK_TRIMESH
|
||||
sub ecx,6
|
||||
mov dword[ebx+2],ecx
|
||||
add ebx,6
|
||||
|
||||
;4110
|
||||
mov word[ebx],CHUNK_VERTLIST
|
||||
mov dword[ebx+2],8 ;+ ç¨á«® ¢¥àè¨ * 12
|
||||
add ebx,6
|
||||
|
||||
mov edx,ebx
|
||||
mov word[edx],0 ;ª®«. ¢¥àè¨
|
||||
add ebx,2
|
||||
finit
|
||||
.cycle0:
|
||||
call txt_ignore_space
|
||||
cmp dword[esi],'face'
|
||||
jne .end_v
|
||||
stdcall txt_next_line, 80
|
||||
|
||||
call txt_ignore_space
|
||||
cmp dword[esi],'oute'
|
||||
jne .end_v
|
||||
stdcall txt_next_line, 80
|
||||
|
||||
mov ecx,3 ;3 â®çª¨ 1 £à ì
|
||||
@@:
|
||||
stdcall stl_vertex_init, ebx
|
||||
or eax,eax
|
||||
jz .end_v
|
||||
add ebx,12
|
||||
inc word[edx]
|
||||
loop @b
|
||||
|
||||
mov eax,[vert_c]
|
||||
cmp word[edx],ax
|
||||
jge .end_v
|
||||
call txt_ignore_space
|
||||
cmp dword[esi],'endl'
|
||||
jne .end_v
|
||||
stdcall txt_next_line, 80
|
||||
|
||||
call txt_ignore_space
|
||||
cmp dword[esi],'endf'
|
||||
jne .end_v
|
||||
stdcall txt_next_line, 80
|
||||
jmp .cycle0
|
||||
.end_v:
|
||||
|
||||
movzx eax,word[edx]
|
||||
imul eax,12
|
||||
add [edx-4],eax ;¨á¯à ¢«ï¥¬ à §¬¥à ¡«®ª 4110
|
||||
|
||||
;4120
|
||||
mov word[ebx],CHUNK_FACELIST
|
||||
mov ecx,[face_c]
|
||||
mov edx,ecx
|
||||
shl edx,3 ;ª®«. £à ¥© * 8
|
||||
add edx,8
|
||||
mov [ebx+2],edx
|
||||
add ebx,6
|
||||
mov [ebx],cx ;ª®«. £à ¥©
|
||||
add ebx,2
|
||||
xor eax,eax
|
||||
@@:
|
||||
mov [ebx],ax
|
||||
inc eax
|
||||
mov [ebx+2],ax
|
||||
inc eax
|
||||
mov [ebx+4],ax
|
||||
inc eax
|
||||
mov word[ebx+6],0 ; âਡãâë
|
||||
add ebx,8
|
||||
loop @b
|
||||
|
||||
mov eax,[c_mem]
|
||||
mov ecx,[c_size]
|
||||
.no_stl:
|
||||
ret
|
||||
endp
|
||||
|
||||
;input:
|
||||
; esi - 㪠§ ⥫ì ç «® ä ©«
|
||||
; ecx - à §¬¥à ä ©«
|
||||
align 4
|
||||
proc convert_binary_stl
|
||||
locals
|
||||
c_mem dd ? ;¯ ¬ïâì ¤«ï ¯à¥®¡à §®¢ ¨ï (convert memory)
|
||||
c_size dd ? ;à §¬¥à ¯ ¬ï⨠¤«ï ¯à¥®¡à §®¢ ¨© (convert memory size)
|
||||
vert_c dd ? ;ç¨á«® ¢¥àè¨ (vertex count)
|
||||
face_c dd ? ;ç¨á«® £à ¥© (faces count)
|
||||
endl
|
||||
mov eax,[esi+80]
|
||||
or eax,eax
|
||||
jnz @f
|
||||
notify_window_run txt_err_stl_null_v
|
||||
jmp .no_stl
|
||||
@@:
|
||||
cmp eax,0xffff/3
|
||||
jle @f
|
||||
notify_window_run txt_err_stl_open
|
||||
mov eax,0xffff/3
|
||||
@@:
|
||||
|
||||
mov [face_c],eax
|
||||
mov ecx,eax
|
||||
imul eax,3
|
||||
mov [vert_c],eax
|
||||
shl ecx,3
|
||||
imul eax,12
|
||||
lea ecx,[ecx+eax+40+4] ;+4 à §¬¥à ¤«ï ¨¬¥¨ ®¡ê¥ªâ
|
||||
mov [c_size],ecx
|
||||
stdcall mem.Alloc,ecx
|
||||
mov [c_mem],eax
|
||||
mov ebx,eax
|
||||
|
||||
mov word[ebx],CHUNK_MAIN
|
||||
mov dword[ebx+2],ecx
|
||||
add ebx,6
|
||||
|
||||
;3d3d
|
||||
mov word[ebx],CHUNK_OBJMESH
|
||||
sub ecx,6
|
||||
mov dword[ebx+2],ecx
|
||||
add ebx,6
|
||||
|
||||
;4000
|
||||
mov word[ebx],CHUNK_OBJBLOCK
|
||||
sub ecx,6
|
||||
mov dword[ebx+2],ecx
|
||||
add ebx,6
|
||||
mov dword[ebx],'Stl' ;¨¬ï ®¡ê¥ªâ
|
||||
add ebx,4
|
||||
|
||||
;4100
|
||||
mov word[ebx],CHUNK_TRIMESH
|
||||
sub ecx,6
|
||||
mov dword[ebx+2],ecx
|
||||
add ebx,6
|
||||
|
||||
;4110
|
||||
mov word[ebx],CHUNK_VERTLIST
|
||||
mov dword[ebx+2],8 ;+ ç¨á«® ¢¥àè¨ * 12
|
||||
add ebx,6
|
||||
|
||||
mov edx,ebx
|
||||
mov ecx,[vert_c]
|
||||
mov word[edx],cx ;ª®«. ¢¥àè¨
|
||||
add ebx,2
|
||||
|
||||
add esi,80+4+12 ;¯à®¯ã᪠§ £®«®¢ª , ç¨á« £à ¥©, 1-£® ¢¥ªâ®à ®à¬ «¥©
|
||||
mov edi,ebx
|
||||
mov eax,[face_c]
|
||||
@@: ;横« ¯® £à ï¬
|
||||
mov ecx,9
|
||||
rep movsd ;ª®¯¨à㥬 ª®®à¤¨ âë 3-å ¢¥àè¨
|
||||
add esi,14 ;¯à®¯ã᪠¢¥ªâ®à ®à¬ «¥© ¨ âਡã⮢
|
||||
dec eax
|
||||
jnz @b
|
||||
mov ebx,edi
|
||||
|
||||
movzx eax,word[edx]
|
||||
imul eax,12
|
||||
add [edx-4],eax ;¨á¯à ¢«ï¥¬ à §¬¥à ¡«®ª 4110
|
||||
|
||||
;4120
|
||||
mov word[ebx],CHUNK_FACELIST
|
||||
mov ecx,[face_c]
|
||||
mov edx,ecx
|
||||
shl edx,3 ;ª®«. £à ¥© * 8
|
||||
add edx,8
|
||||
mov [ebx+2],edx
|
||||
add ebx,6
|
||||
mov [ebx],cx ;ª®«. £à ¥©
|
||||
add ebx,2
|
||||
xor eax,eax
|
||||
@@:
|
||||
mov [ebx],ax
|
||||
inc eax
|
||||
mov [ebx+2],ax
|
||||
inc eax
|
||||
mov [ebx+4],ax
|
||||
inc eax
|
||||
mov word[ebx+6],0 ; âਡãâë
|
||||
add ebx,8
|
||||
loop @b
|
||||
|
||||
mov eax,[c_mem]
|
||||
mov ecx,[c_size]
|
||||
.no_stl:
|
||||
ret
|
||||
endp
|
||||
|
||||
;output:
|
||||
; eax - vertex count
|
||||
align 4
|
||||
proc get_stl_vertex_count uses ebx ecx edi, f_data:dword, f_size:dword
|
||||
mov al,'v'
|
||||
xor ebx,ebx
|
||||
mov ecx,[f_size]
|
||||
mov edi,[f_data]
|
||||
.cycle0:
|
||||
repne scasb
|
||||
cmp dword[edi],'erte'
|
||||
jne @f
|
||||
inc ebx
|
||||
add edi,4
|
||||
sub ecx,4
|
||||
cmp ecx,4
|
||||
jg .cycle0
|
||||
@@:
|
||||
mov eax,ebx
|
||||
ret
|
||||
endp
|
||||
|
||||
;input:
|
||||
; esi - input description text
|
||||
; ppoi - pointer to vertex struct
|
||||
;output:
|
||||
; eax - 0 (if error init) or 1
|
||||
; esi - output description text
|
||||
align 4
|
||||
proc stl_vertex_init uses ebx ecx edi, ppoi:dword
|
||||
call txt_ignore_space
|
||||
cmp dword[esi],'vert'
|
||||
jne .err_init
|
||||
cmp word[esi+4],'ex'
|
||||
jne .err_init
|
||||
add esi,6
|
||||
mov ebx,[ppoi]
|
||||
|
||||
call txt_copy_data
|
||||
call String_to_DoubleFloat
|
||||
fld qword[Data_Double]
|
||||
fstp dword[ebx] ;coord X
|
||||
|
||||
call txt_copy_data
|
||||
call String_to_DoubleFloat
|
||||
fld qword[Data_Double]
|
||||
fstp dword[ebx+4] ;coord X
|
||||
|
||||
call txt_copy_data
|
||||
call String_to_DoubleFloat
|
||||
fld qword[Data_Double]
|
||||
fstp dword[ebx+8] ;coord Z
|
||||
|
||||
stdcall txt_next_line, 80
|
||||
jmp @f
|
||||
.err_init:
|
||||
xor eax,eax
|
||||
jmp .end_f
|
||||
@@:
|
||||
xor eax,eax
|
||||
inc eax
|
||||
.end_f:
|
||||
ret
|
||||
endp
|
||||
|
||||
;input:
|
||||
; esi - 㪠§ ⥫ì ç «® áâப¨ á ¯à®¡¥« ¬¨
|
||||
;output:
|
||||
; al - destroy
|
||||
; ecx - destroy
|
||||
; esi - 㪠§ â¥«ì ¯¥à¢ë© ¥¯à®¡¥«ìë© á¨¬¢®«
|
||||
align 4
|
||||
txt_ignore_space:
|
||||
mov ecx,64 ;§ é¨â ®â § 横«¨¢ ¨ï
|
||||
@@:
|
||||
lodsb
|
||||
cmp al,' '
|
||||
jne @f
|
||||
loop @b
|
||||
@@:
|
||||
dec esi
|
||||
ret
|
||||
|
||||
;input:
|
||||
; esi - 㪠§ ⥫ì áâபã á ç¨á«®¬ (¯à®¡¥«ë ¢ ç «¥ áâப¨ ¨£®à¨àãîâìáï)
|
||||
;output:
|
||||
; al - destroy
|
||||
; ecx - destroy
|
||||
; edi - destroy
|
||||
; esi - 㪠§ â¥«ì ª®¥æ ª®¯¨à®¢ ®£® ç¨á«
|
||||
; Data_String - áâப á ç¨á«®¬ ¨§ esi
|
||||
align 4
|
||||
txt_copy_data:
|
||||
call txt_ignore_space
|
||||
mov ecx,32
|
||||
mov edi,esi
|
||||
@@:
|
||||
lodsb
|
||||
or al,al
|
||||
jz @f
|
||||
cmp al,' '
|
||||
je @f
|
||||
cmp al,13
|
||||
je @f
|
||||
loop @b
|
||||
@@:
|
||||
mov esi,edi
|
||||
sub ecx,32
|
||||
neg ecx
|
||||
mov edi,Data_String
|
||||
rep movsb
|
||||
mov byte[edi],0
|
||||
ret
|
||||
|
||||
;input:
|
||||
; esi - text pointer
|
||||
align 4
|
||||
proc txt_next_line uses eax ecx edi, mlen:dword
|
||||
mov al,13
|
||||
mov ecx,[mlen]
|
||||
mov edi,esi
|
||||
repne scasb
|
||||
cmp byte[edi],10
|
||||
jne @f
|
||||
inc edi
|
||||
@@:
|
||||
mov esi,edi
|
||||
ret
|
||||
endp
|
||||
|
||||
@ -1,320 +1,324 @@
|
||||
;
|
||||
; §¤¥áì ᮡà ë ¤ ë¥ ¯® ¡«®ª ¬ *.3ds
|
||||
;
|
||||
|
||||
MAX_FILE_LEVEL equ 20 ;¬ ªá¨¬ «ìë© ã஢¥ì ¢«®¦¥®á⨠¡«®ª®¢ ¤«ï «¨§
|
||||
|
||||
sizeof.block_3ds equ 9
|
||||
can_save db 0 ;¨§¬¥ï«áï «¨ ä ©«
|
||||
|
||||
macro block_3ds id,icon,par,caption
|
||||
{
|
||||
dw id ;+0 ¨¤¥â¨ä¨ª â®à ¡«®ª ¢ ä ©«¥ 3ds
|
||||
dw icon ;+2 ®¬¥à ¨ª®ª¨ ¤«ï ¡«®ª
|
||||
db par ;+4 ᮤ¥à¦¨â «¨ ¡«®ª ¯®¤¡«®ª¨ (0-¤ 1-¥â)
|
||||
dd caption+0 ;+5 ®¯¨á ¨¥ ¡«®ª
|
||||
}
|
||||
|
||||
CHUNK_MAIN equ 0x4D4D ; [-] áæ¥
|
||||
CHUNK_ambient_color equ 0x2100 ; [-] ambient color
|
||||
CHUNK_OBJMESH equ 0x3D3D ; [-] ¡®à ®¡ê¥ªâ®¢
|
||||
CHUNK_OBJBLOCK equ 0x4000 ; [+] ®¡ê¥ªâ
|
||||
CHUNK_TRIMESH equ 0x4100 ; [-] trimesh-®¡ê¥ªâ
|
||||
CHUNK_VERTLIST equ 0x4110 ; [+] ᯨ᮪ ¢¥àè¨
|
||||
CHUNK_FACELIST equ 0x4120 ; [+] ᯨ᮪ £à ¥©
|
||||
CHUNK_FACEMAT equ 0x4130 ; [+] ¬ â¥à¨ «ë £à ¥©
|
||||
CHUNK_MAPLIST equ 0x4140 ; [+] ⥪áâãàë¥ ª®®à¤¨ âë
|
||||
CHUNK_TRMATRIX equ 0x4160 ; [+] ¬ âà¨æ ¯¥à¥¢®¤
|
||||
CHUNK_CAMERA equ 0x4700 ; [+] ®¡ê¥ªâ-ª ¬¥à
|
||||
CHUNK_MATERIAL equ 0xAFFF ; [-] ¬ â¥à¨ «
|
||||
CHUNK_MATNAME equ 0xA000 ; [+] §¢ ¨¥ ¬ â¥à¨ «
|
||||
CHUNK_TEXTURE equ 0xA200 ; [-] ⥪áâãà ¬ â¥à¨ «
|
||||
CHUNK_MAPFILE equ 0xA300 ; [+] ¨¬ï ä ©« ⥪áâãàë
|
||||
CHUNK_KEYFRAMER equ 0xB000 ; [-] ¨ä®à¬ æ¨ï ®¡ ¨¬ 樨
|
||||
CHUNK_TRACKINFO equ 0xB002 ; [-] ¯®¢¥¤¥¨¥ ®¡ê¥ªâ
|
||||
CHUNK_TRACKOBJNAME equ 0xB010 ; [+] §¢ ¨¥ í⮣® ®¡ê¥ªâ
|
||||
CHUNK_TRACKPIVOT equ 0xB013 ; [+] æ¥âà ¢à é¥¨ï ®¡ê¥ªâ
|
||||
CHUNK_TRACKPOS equ 0xB020 ; [+] âà ¥ªâ®à¨ï ®¡ê¥ªâ
|
||||
CHUNK_TRACKROTATE equ 0xB021 ; [+] âà ¥ªâ®à¨ï ¢à é¥¨ï ®¡ê¥ªâ
|
||||
CHUNK_TRACKCAMERA equ 0xB003 ; [-] ¯®¢¥¤¥¨¥ ª ¬¥àë
|
||||
CHUNK_TRACKFOV equ 0xB023 ; [+] ¯®¢¥¤¥¨¥ fov ª ¬¥àë
|
||||
CHUNK_TRACKROLL equ 0xB024 ; [+] ¯®¢¥¤¥¨¥ roll ª ¬¥àë
|
||||
CHUNK_TRACKCAMTGT equ 0xB004 ; [-] ¯®¢¥¤¥¨¥ "楫¨" ª ¬¥àë
|
||||
|
||||
;¤ ë¥ á®¤¥à¦ â «¨èì ¡«®ª¨, ®â¬¥ç¥ë¥ ¯«îᮬ, ®áâ «ìë¥ ¡«®ª¨
|
||||
; á®áâ®ïâ «¨èì ¨§ ¯®¤¡«®ª®¢
|
||||
|
||||
align 4
|
||||
type_bloks:
|
||||
block_3ds 0x0002,5,1,txt_0002
|
||||
block_3ds 0x3d3e,5,1 ; [+] mesh version
|
||||
block_3ds 0x0011,4,1,txt_0011
|
||||
block_3ds 0x0100,3,1,txt_0100
|
||||
block_3ds CHUNK_ambient_color,3,0,txt_2100 ; [-] ambient color
|
||||
block_3ds CHUNK_OBJMESH, 3,0,txt_3d3d
|
||||
block_3ds CHUNK_OBJBLOCK,11,1,txt_4000
|
||||
block_3ds CHUNK_TRIMESH, 3,0,txt_4100
|
||||
block_3ds CHUNK_VERTLIST,8,1,txt_4110
|
||||
block_3ds CHUNK_FACELIST,3,1,txt_4120
|
||||
block_3ds CHUNK_FACEMAT,10,1,txt_4130
|
||||
block_3ds CHUNK_MAPLIST, 3,1,txt_4140
|
||||
block_3ds CHUNK_TRMATRIX,3,1,txt_4160
|
||||
block_3ds 0x4600,3,1,txt_4600
|
||||
block_3ds CHUNK_CAMERA, 3,1,txt_4700
|
||||
block_3ds CHUNK_MATERIAL,10,0,txt_afff
|
||||
block_3ds CHUNK_MATNAME, 3,1,txt_a000
|
||||
block_3ds 0xa010,4,0,txt_a010
|
||||
block_3ds 0xa020,4,0,txt_a020
|
||||
block_3ds 0xa030,4,0,txt_a030
|
||||
block_3ds 0xa100,5,1,txt_a100
|
||||
block_3ds CHUNK_TEXTURE, 3,0,txt_a200
|
||||
block_3ds CHUNK_MAPFILE, 6,1,txt_a300
|
||||
block_3ds CHUNK_KEYFRAMER, 7,0,txt_b000
|
||||
block_3ds CHUNK_TRACKINFO, 3,0,txt_b002
|
||||
block_3ds CHUNK_TRACKOBJNAME,3,1,txt_b010
|
||||
block_3ds 0xb011,3,1,txt_b011
|
||||
block_3ds CHUNK_TRACKPIVOT, 3,1,txt_b013
|
||||
block_3ds 0xb014,3,1,txt_b014
|
||||
block_3ds CHUNK_TRACKPOS, 3,1,txt_b020
|
||||
block_3ds CHUNK_TRACKROTATE, 3,1,txt_b021
|
||||
block_3ds CHUNK_TRACKCAMERA, 7,0,txt_b003
|
||||
block_3ds CHUNK_TRACKFOV, 7,1,txt_b023
|
||||
block_3ds CHUNK_TRACKROLL, 7,1,txt_b024
|
||||
block_3ds CHUNK_TRACKCAMTGT, 7,0,txt_b004
|
||||
|
||||
;--- ¤ «¥¥ ¥ ¢® ¢á¥å ¡«®ª å ᬮ£ ©â¨ ®¯¨á ¨¥ àãá᪮¬ ï§ëª¥
|
||||
block_3ds 0x4111, 3,1,txt_4111
|
||||
block_3ds 0x4150, 3,1,txt_4150
|
||||
block_3ds 0x4165, 3,1,txt_4165
|
||||
block_3ds 0x4610, 3,1,txt_4610
|
||||
block_3ds 0x4627, 3,1,txt_4627
|
||||
block_3ds 0x4630, 3,1,txt_4630
|
||||
block_3ds 0x4641, 3,1,txt_4641
|
||||
block_3ds 0x4650, 3,1,txt_4650
|
||||
block_3ds 0x4651, 3,1,txt_4651
|
||||
block_3ds 0x4652, 3,1,txt_4652
|
||||
block_3ds 0x4653, 3,1,txt_4653
|
||||
block_3ds 0x4656, 3,1,txt_4656
|
||||
block_3ds 0x4658, 3,1,txt_4658
|
||||
block_3ds 0x4620, 3,1,txt_4620
|
||||
block_3ds 0x4625, 3,1,txt_4625
|
||||
block_3ds 0x4659, 3,1,txt_4659
|
||||
block_3ds 0x465a, 3,1,txt_465a
|
||||
block_3ds 0x465b, 3,1,txt_465b
|
||||
block_3ds 0xa230, 3,1,txt_a230
|
||||
block_3ds 0xa220, 3,1,txt_a220
|
||||
block_3ds 0xa351, 3,1,txt_a351
|
||||
block_3ds 0xb007, 3,1,txt_b007
|
||||
block_3ds 0xb008, 3,1,txt_b008
|
||||
block_3ds 0xb022, 3,1,txt_b022
|
||||
block_3ds 0xb030, 3,1,txt_b030
|
||||
block_3ds 0xa040, 3,1,txt_a040
|
||||
block_3ds 0xa041, 3,1,txt_a041
|
||||
block_3ds 0xa050, 3,1,txt_a050
|
||||
block_3ds 0xa052, 3,1,txt_a052
|
||||
block_3ds 0xa053, 3,1,txt_a053
|
||||
block_3ds 0xa081, 3,1,txt_a081
|
||||
block_3ds 0xa083, 3,1,txt_a083
|
||||
block_3ds 0xa084, 3,1,txt_a084
|
||||
block_3ds 0xa085, 3,1,txt_a085
|
||||
block_3ds 0xa087, 3,1,txt_a087
|
||||
block_3ds 0xa088, 3,1,txt_a088
|
||||
block_3ds 0xa08a, 3,1,txt_a08a
|
||||
block_3ds 0xa08c, 3,1,txt_a08c
|
||||
block_3ds 0xa08e, 3,1,txt_a08e
|
||||
.end:
|
||||
|
||||
if lang eq ru_RU
|
||||
txt_0002 db '3ds ¢¥àá¨ï',0
|
||||
txt_0011 db '–¢¥â rgb (¡ ©â®¢ë© ä®à¬ â)',0
|
||||
;txt_0012 db 'LIN_COLOR_24',0
|
||||
;txt_0030 db 'Percentage value (int)',0
|
||||
;txt_0031 db 'Percentage value (float)',0
|
||||
txt_0100 db 'Master scale',0
|
||||
txt_2100 db '–¢¥â ®ªà㦠î饩 á।ë',0
|
||||
txt_3d3d db '<27> ¡®à ®¡ê¥ªâ®¢',0
|
||||
txt_4000 db 'Ž¡ê¥ªâ (á ¨¬¥¥¬)',0
|
||||
txt_4100 db '’à¥ã£®«ìë¥ á¥âª¨',0
|
||||
txt_4110 db '‘¯¨á®ª ¢¥àè¨',0
|
||||
txt_4120 db '‘¯¨á®ª £à ¥©',0
|
||||
txt_4130 db 'Œ â¥à¨ «ë £à ¥©',0
|
||||
txt_4140 db '’¥ªáâãàë¥ ª®®à¤¨ âë',0
|
||||
txt_4160 db 'Œ âà¨æ ¯¥à¥¢®¤ ',0
|
||||
txt_4600 db '‘¢¥â',0
|
||||
txt_4700 db 'Š ¬¥à ',0
|
||||
txt_a000 db '<27> §¢ ¨¥ ¬ â¥à¨ « ',0
|
||||
txt_a010 db 'Žªà㦠î騩 梥â',0
|
||||
txt_a020 db '„¨ääã§ë© 梥â',0
|
||||
txt_a030 db '‡¥àª «ìë© æ¢¥â',0
|
||||
txt_a100 db '’¨¯ ¬ â¥à¨ « [1=flat 2=gouraud 3=phong 4=metal]',0
|
||||
txt_a200 db '’¥ªáâãà ¬ â¥à¨ « 1',0
|
||||
txt_a300 db 'ˆ¬ï ä ©« ⥪áâãàë',0
|
||||
;txt_a353 db 'MAT_MAP_TEXBLUR',0
|
||||
txt_afff db 'Œ â¥à¨ «',0
|
||||
txt_b000 db 'ˆä®à¬ æ¨ï ®¡ ¨¬ 樨',0
|
||||
txt_b002 db '<27>®¢¥¤¥¨¥ ®¡ê¥ªâ ',0
|
||||
;txt_b009 db 'KFCURTIME',0
|
||||
;txt_b00a db 'KFHDR',0
|
||||
txt_b010 db '<27> §¢ ¨¥ ®¡ê¥ªâ ',0
|
||||
txt_b011 db 'ˆ¬ï íª§¥¬¯«ïà ',0
|
||||
txt_b013 db '–¥âà ¢à é¥¨ï ®¡ê¥ªâ ',0
|
||||
txt_b014 db 'Bound box',0
|
||||
txt_b020 db '’à ¥ªâ®à¨ï ¤¢¨¦¥¨ï',0
|
||||
txt_b021 db '’à ¥ªâ®à¨ï ¢à 饨ï',0
|
||||
txt_b003 db '<27>®¢¥¤¥¨¥ ª ¬¥àë',0
|
||||
txt_b023 db '<27>®¢¥¤¥¨¥ fov ª ¬¥àë',0
|
||||
txt_b024 db '<27>®¢¥¤¥¨¥ roll ª ¬¥àë',0
|
||||
txt_b004 db '<27>®¢¥¤¥¨¥ "楫¨" ª ¬¥àë',0
|
||||
|
||||
;--- ¤ «¥¥ ¥ ¢® ¢á¥å ¡«®ª å ᬮ£ ©â¨ ®¯¨á ¨¥ àãá᪮¬ ï§ëª¥
|
||||
txt_4111 db '”« £¨ ¢¥àè¨',0
|
||||
txt_4150 db 'Smoothing group list',0
|
||||
txt_4165 db 'Object color in editor',0
|
||||
txt_4610 db '<27> ¯à ¢«¥ë© ᢥâ',0
|
||||
txt_4627 db 'Spot raytrace',0
|
||||
txt_4630 db 'Light shadowed',0
|
||||
txt_4641 db 'Spot shadow map',0
|
||||
txt_4650 db 'Spot show cone',0
|
||||
txt_4651 db 'Spot is rectangular',0
|
||||
txt_4652 db 'Spot overshoot',0
|
||||
txt_4653 db 'Spot map',0
|
||||
txt_4656 db 'Spot roll',0
|
||||
txt_4658 db 'Spot ray trace bias',0
|
||||
txt_4620 db 'Light off',0
|
||||
txt_4625 db 'Attenuation on',0
|
||||
txt_4659 db 'Range start',0
|
||||
txt_465a db 'Range end',0
|
||||
txt_465b db 'Multiplier',0
|
||||
txt_a230 db '<27> §¬¥âª ५ì¥ä ',0
|
||||
txt_a220 db '<27> §¬¥âª ®âà ¦¥¨ï',0
|
||||
txt_a351 db '<27> à ¬¥âàë à §¬¥âª¨',0
|
||||
txt_b007 db 'ˆä®à¬ æ¨ï ® ¯à ¢«¥®¬ ®á¢¥é¥¨¨',0
|
||||
txt_b008 db 'Š ¤àë ( ç «ìë© ¨ ª®¥çë©)',0
|
||||
txt_b022 db 'Œ áèâ ¡¨à®¢ ¨¥',0
|
||||
txt_b030 db '<27>®§¨æ¨ï ¢ ¨¥à à娨',0
|
||||
txt_a040 db 'Shininess percent',0
|
||||
txt_a041 db 'Shininess strength percent',0
|
||||
txt_a050 db 'Transparency percent',0
|
||||
txt_a052 db 'Transparency falloff percent',0
|
||||
txt_a053 db 'Reflection blur percent',0
|
||||
txt_a081 db '2 sided',0
|
||||
txt_a083 db 'Add trans',0
|
||||
txt_a084 db 'Self illum',0
|
||||
txt_a085 db 'Wire frame on',0
|
||||
txt_a087 db 'Wire thickness',0
|
||||
txt_a088 db 'Face map',0
|
||||
txt_a08a db 'In tranc',0
|
||||
txt_a08c db 'Soften',0
|
||||
txt_a08e db 'Wire in units',0
|
||||
|
||||
txt_not_delete db '<27>¥ ¬®£ã 㤠«¨âì ¢ë¡à ë© ¡«®ª. Ž § é¨é¥.',0
|
||||
else
|
||||
|
||||
txt_0002 db '3ds version',0
|
||||
txt_0011 db 'Color rgb (byte format)',0
|
||||
txt_0100 db 'Master scale',0
|
||||
txt_2100 db 'Ambient color',0
|
||||
txt_3d3d db 'Editor chunk',0
|
||||
txt_4000 db 'Object (with name)',0
|
||||
txt_4100 db 'Triangular mesh',0
|
||||
txt_4110 db 'Vertices list',0
|
||||
txt_4120 db 'Faces description',0
|
||||
txt_4130 db 'Faces material',0
|
||||
txt_4140 db 'Mapping coordinates list',0
|
||||
txt_4160 db 'Local coordinate system',0
|
||||
txt_4600 db 'Light',0
|
||||
txt_4700 db 'Camera',0
|
||||
txt_a000 db 'Material name',0
|
||||
txt_a010 db 'Ambient color',0
|
||||
txt_a020 db 'Diffuse color',0
|
||||
txt_a030 db 'Specular color',0
|
||||
txt_a100 db 'Material type [1=flat 2=gouraud 3=phong 4=metal]',0
|
||||
txt_a200 db 'Texture map 1',0
|
||||
txt_a300 db 'Mapping filename',0
|
||||
txt_afff db 'Meterial',0
|
||||
txt_b000 db 'Keyframer',0
|
||||
txt_b002 db 'Mesh information',0
|
||||
txt_b010 db 'Object name',0
|
||||
txt_b011 db 'Instance name',0
|
||||
txt_b013 db 'Object pivot point',0
|
||||
txt_b014 db 'Bound box',0
|
||||
txt_b020 db 'Position track',0
|
||||
txt_b021 db 'Rotation track',0
|
||||
txt_b003 db 'Camera information',0
|
||||
txt_b023 db 'Fov track',0
|
||||
txt_b024 db 'Roll track',0
|
||||
txt_b004 db 'Camera target information',0
|
||||
|
||||
;---
|
||||
txt_4111 db 'Vertex flags',0
|
||||
txt_4150 db 'Smoothing group list',0
|
||||
txt_4165 db 'Object color in editor',0
|
||||
txt_4610 db 'Spotlight',0
|
||||
txt_4627 db 'Spot raytrace',0
|
||||
txt_4630 db 'Light shadowed',0
|
||||
txt_4641 db 'Spot shadow map',0
|
||||
txt_4650 db 'Spot show cone',0
|
||||
txt_4651 db 'Spot is rectangular',0
|
||||
txt_4652 db 'Spot overshoot',0
|
||||
txt_4653 db 'Spot map',0
|
||||
txt_4656 db 'Spot roll',0
|
||||
txt_4658 db 'Spot ray trace bias',0
|
||||
txt_4620 db 'Light off',0
|
||||
txt_4625 db 'Attenuation on',0
|
||||
txt_4659 db 'Range start',0
|
||||
txt_465a db 'Range end',0
|
||||
txt_465b db 'Multiplier',0
|
||||
txt_a230 db 'Bump map',0
|
||||
txt_a220 db 'Reflection map',0
|
||||
txt_a351 db 'Mapping parameters',0
|
||||
txt_b007 db 'Spot light information',0
|
||||
txt_b008 db 'Frames (Start and End)',0
|
||||
txt_b022 db 'Scale track',0
|
||||
txt_b030 db 'Hierarchy position',0
|
||||
txt_a040 db 'Shininess percent',0
|
||||
txt_a041 db 'Shininess strength percent',0
|
||||
txt_a050 db 'Transparency percent',0
|
||||
txt_a052 db 'Transparency falloff percent',0
|
||||
txt_a053 db 'Reflection blur percent',0
|
||||
txt_a081 db '2 sided',0
|
||||
txt_a083 db 'Add trans',0
|
||||
txt_a084 db 'Self illum',0
|
||||
txt_a085 db 'Wire frame on',0
|
||||
txt_a087 db 'Wire thickness',0
|
||||
txt_a088 db 'Face map',0
|
||||
txt_a08a db 'In tranc',0
|
||||
txt_a08c db 'Soften',0
|
||||
txt_a08e db 'Wire in units',0
|
||||
|
||||
txt_not_delete db 'I can not delete the selected chunk. It is protected.',0
|
||||
end if
|
||||
|
||||
if lang eq ru_RU
|
||||
txt_open_3ds db 'Žâªàëâ ä ©«:',0
|
||||
txt_no_3ds: db 'Žâªàëâë© ä ©« ¥ ¢ ä®à¬ ⥠*.3ds ',39
|
||||
.zag: rb 8
|
||||
db 39,0
|
||||
txt_3ds_err_sizes db '‚®§¬®¦® ä ©« ¯®¢à¥¦¤¥',0
|
||||
txt_count db 'Š®«¨ç¥á⢮',0
|
||||
txt_3ds_offs:
|
||||
db '‘¬¥é¥¨¥: '
|
||||
.dig: rb 8
|
||||
db ' <20> §¬¥à: '
|
||||
.siz: rb 8
|
||||
db 0
|
||||
txt_mat_null db 'Œ â¥à¨ «ë ¥ ©¤¥ë',0
|
||||
else
|
||||
txt_open_3ds db 'Open file:',0
|
||||
txt_no_3ds: db 'Open file not in format *.3ds ',39
|
||||
.zag: rb 8
|
||||
db 39,0
|
||||
txt_3ds_err_sizes db 'File may be corrupted',0
|
||||
txt_count db 'Count',0
|
||||
txt_3ds_offs:
|
||||
db 'Offset: '
|
||||
.dig: rb 8
|
||||
db ' Size: '
|
||||
.siz: rb 8
|
||||
db 0
|
||||
txt_mat_null db 'No materials found',0
|
||||
end if
|
||||
;
|
||||
; §¤¥áì ᮡà ë ¤ ë¥ ¯® ¡«®ª ¬ *.3ds
|
||||
;
|
||||
|
||||
; Language support for locales: ru_RU (CP866), en_US.
|
||||
|
||||
MAX_FILE_LEVEL equ 20 ;¬ ªá¨¬ «ìë© ã஢¥ì ¢«®¦¥®á⨠¡«®ª®¢ ¤«ï «¨§
|
||||
|
||||
sizeof.block_3ds equ 9
|
||||
can_save db 0 ;¨§¬¥ï«áï «¨ ä ©«
|
||||
|
||||
macro block_3ds id,icon,par,caption
|
||||
{
|
||||
dw id ;+0 ¨¤¥â¨ä¨ª â®à ¡«®ª ¢ ä ©«¥ 3ds
|
||||
dw icon ;+2 ®¬¥à ¨ª®ª¨ ¤«ï ¡«®ª
|
||||
db par ;+4 ᮤ¥à¦¨â «¨ ¡«®ª ¯®¤¡«®ª¨ (0-¤ 1-¥â)
|
||||
dd caption+0 ;+5 ®¯¨á ¨¥ ¡«®ª
|
||||
}
|
||||
|
||||
CHUNK_MAIN equ 0x4D4D ; [-] áæ¥
|
||||
CHUNK_ambient_color equ 0x2100 ; [-] ambient color
|
||||
CHUNK_OBJMESH equ 0x3D3D ; [-] ¡®à ®¡ê¥ªâ®¢
|
||||
CHUNK_OBJBLOCK equ 0x4000 ; [+] ®¡ê¥ªâ
|
||||
CHUNK_TRIMESH equ 0x4100 ; [-] trimesh-®¡ê¥ªâ
|
||||
CHUNK_VERTLIST equ 0x4110 ; [+] ᯨ᮪ ¢¥àè¨
|
||||
CHUNK_FACELIST equ 0x4120 ; [+] ᯨ᮪ £à ¥©
|
||||
CHUNK_FACEMAT equ 0x4130 ; [+] ¬ â¥à¨ «ë £à ¥©
|
||||
CHUNK_MAPLIST equ 0x4140 ; [+] ⥪áâãàë¥ ª®®à¤¨ âë
|
||||
CHUNK_TRMATRIX equ 0x4160 ; [+] ¬ âà¨æ ¯¥à¥¢®¤
|
||||
CHUNK_CAMERA equ 0x4700 ; [+] ®¡ê¥ªâ-ª ¬¥à
|
||||
CHUNK_MATERIAL equ 0xAFFF ; [-] ¬ â¥à¨ «
|
||||
CHUNK_MATNAME equ 0xA000 ; [+] §¢ ¨¥ ¬ â¥à¨ «
|
||||
CHUNK_TEXTURE equ 0xA200 ; [-] ⥪áâãà ¬ â¥à¨ «
|
||||
CHUNK_MAPFILE equ 0xA300 ; [+] ¨¬ï ä ©« ⥪áâãàë
|
||||
CHUNK_KEYFRAMER equ 0xB000 ; [-] ¨ä®à¬ æ¨ï ®¡ ¨¬ 樨
|
||||
CHUNK_TRACKINFO equ 0xB002 ; [-] ¯®¢¥¤¥¨¥ ®¡ê¥ªâ
|
||||
CHUNK_TRACKOBJNAME equ 0xB010 ; [+] §¢ ¨¥ í⮣® ®¡ê¥ªâ
|
||||
CHUNK_TRACKPIVOT equ 0xB013 ; [+] æ¥âà ¢à é¥¨ï ®¡ê¥ªâ
|
||||
CHUNK_TRACKPOS equ 0xB020 ; [+] âà ¥ªâ®à¨ï ®¡ê¥ªâ
|
||||
CHUNK_TRACKROTATE equ 0xB021 ; [+] âà ¥ªâ®à¨ï ¢à é¥¨ï ®¡ê¥ªâ
|
||||
CHUNK_TRACKCAMERA equ 0xB003 ; [-] ¯®¢¥¤¥¨¥ ª ¬¥àë
|
||||
CHUNK_TRACKFOV equ 0xB023 ; [+] ¯®¢¥¤¥¨¥ fov ª ¬¥àë
|
||||
CHUNK_TRACKROLL equ 0xB024 ; [+] ¯®¢¥¤¥¨¥ roll ª ¬¥àë
|
||||
CHUNK_TRACKCAMTGT equ 0xB004 ; [-] ¯®¢¥¤¥¨¥ "楫¨" ª ¬¥àë
|
||||
|
||||
;¤ ë¥ á®¤¥à¦ â «¨èì ¡«®ª¨, ®â¬¥ç¥ë¥ ¯«îᮬ, ®áâ «ìë¥ ¡«®ª¨
|
||||
; á®áâ®ïâ «¨èì ¨§ ¯®¤¡«®ª®¢
|
||||
|
||||
align 4
|
||||
type_bloks:
|
||||
block_3ds 0x0002,5,1,txt_0002
|
||||
block_3ds 0x3d3e,5,1 ; [+] mesh version
|
||||
block_3ds 0x0011,4,1,txt_0011
|
||||
block_3ds 0x0100,3,1,txt_0100
|
||||
block_3ds CHUNK_ambient_color,3,0,txt_2100 ; [-] ambient color
|
||||
block_3ds CHUNK_OBJMESH, 3,0,txt_3d3d
|
||||
block_3ds CHUNK_OBJBLOCK,11,1,txt_4000
|
||||
block_3ds CHUNK_TRIMESH, 3,0,txt_4100
|
||||
block_3ds CHUNK_VERTLIST,8,1,txt_4110
|
||||
block_3ds CHUNK_FACELIST,3,1,txt_4120
|
||||
block_3ds CHUNK_FACEMAT,10,1,txt_4130
|
||||
block_3ds CHUNK_MAPLIST, 3,1,txt_4140
|
||||
block_3ds CHUNK_TRMATRIX,3,1,txt_4160
|
||||
block_3ds 0x4600,3,1,txt_4600
|
||||
block_3ds CHUNK_CAMERA, 3,1,txt_4700
|
||||
block_3ds CHUNK_MATERIAL,10,0,txt_afff
|
||||
block_3ds CHUNK_MATNAME, 3,1,txt_a000
|
||||
block_3ds 0xa010,4,0,txt_a010
|
||||
block_3ds 0xa020,4,0,txt_a020
|
||||
block_3ds 0xa030,4,0,txt_a030
|
||||
block_3ds 0xa100,5,1,txt_a100
|
||||
block_3ds CHUNK_TEXTURE, 3,0,txt_a200
|
||||
block_3ds CHUNK_MAPFILE, 6,1,txt_a300
|
||||
block_3ds CHUNK_KEYFRAMER, 7,0,txt_b000
|
||||
block_3ds CHUNK_TRACKINFO, 3,0,txt_b002
|
||||
block_3ds CHUNK_TRACKOBJNAME,3,1,txt_b010
|
||||
block_3ds 0xb011,3,1,txt_b011
|
||||
block_3ds CHUNK_TRACKPIVOT, 3,1,txt_b013
|
||||
block_3ds 0xb014,3,1,txt_b014
|
||||
block_3ds CHUNK_TRACKPOS, 3,1,txt_b020
|
||||
block_3ds CHUNK_TRACKROTATE, 3,1,txt_b021
|
||||
block_3ds CHUNK_TRACKCAMERA, 7,0,txt_b003
|
||||
block_3ds CHUNK_TRACKFOV, 7,1,txt_b023
|
||||
block_3ds CHUNK_TRACKROLL, 7,1,txt_b024
|
||||
block_3ds CHUNK_TRACKCAMTGT, 7,0,txt_b004
|
||||
|
||||
;--- ¤ «¥¥ ¥ ¢® ¢á¥å ¡«®ª å ᬮ£ ©â¨ ®¯¨á ¨¥ àãá᪮¬ ï§ëª¥
|
||||
block_3ds 0x4111, 3,1,txt_4111
|
||||
block_3ds 0x4150, 3,1,txt_4150
|
||||
block_3ds 0x4165, 3,1,txt_4165
|
||||
block_3ds 0x4610, 3,1,txt_4610
|
||||
block_3ds 0x4627, 3,1,txt_4627
|
||||
block_3ds 0x4630, 3,1,txt_4630
|
||||
block_3ds 0x4641, 3,1,txt_4641
|
||||
block_3ds 0x4650, 3,1,txt_4650
|
||||
block_3ds 0x4651, 3,1,txt_4651
|
||||
block_3ds 0x4652, 3,1,txt_4652
|
||||
block_3ds 0x4653, 3,1,txt_4653
|
||||
block_3ds 0x4656, 3,1,txt_4656
|
||||
block_3ds 0x4658, 3,1,txt_4658
|
||||
block_3ds 0x4620, 3,1,txt_4620
|
||||
block_3ds 0x4625, 3,1,txt_4625
|
||||
block_3ds 0x4659, 3,1,txt_4659
|
||||
block_3ds 0x465a, 3,1,txt_465a
|
||||
block_3ds 0x465b, 3,1,txt_465b
|
||||
block_3ds 0xa230, 3,1,txt_a230
|
||||
block_3ds 0xa220, 3,1,txt_a220
|
||||
block_3ds 0xa351, 3,1,txt_a351
|
||||
block_3ds 0xb007, 3,1,txt_b007
|
||||
block_3ds 0xb008, 3,1,txt_b008
|
||||
block_3ds 0xb022, 3,1,txt_b022
|
||||
block_3ds 0xb030, 3,1,txt_b030
|
||||
block_3ds 0xa040, 3,1,txt_a040
|
||||
block_3ds 0xa041, 3,1,txt_a041
|
||||
block_3ds 0xa050, 3,1,txt_a050
|
||||
block_3ds 0xa052, 3,1,txt_a052
|
||||
block_3ds 0xa053, 3,1,txt_a053
|
||||
block_3ds 0xa081, 3,1,txt_a081
|
||||
block_3ds 0xa083, 3,1,txt_a083
|
||||
block_3ds 0xa084, 3,1,txt_a084
|
||||
block_3ds 0xa085, 3,1,txt_a085
|
||||
block_3ds 0xa087, 3,1,txt_a087
|
||||
block_3ds 0xa088, 3,1,txt_a088
|
||||
block_3ds 0xa08a, 3,1,txt_a08a
|
||||
block_3ds 0xa08c, 3,1,txt_a08c
|
||||
block_3ds 0xa08e, 3,1,txt_a08e
|
||||
.end:
|
||||
|
||||
if lang eq ru_RU
|
||||
txt_0002 db '3ds ¢¥àá¨ï',0
|
||||
txt_0011 db '–¢¥â rgb (¡ ©â®¢ë© ä®à¬ â)',0
|
||||
;txt_0012 db 'LIN_COLOR_24',0
|
||||
;txt_0030 db 'Percentage value (int)',0
|
||||
;txt_0031 db 'Percentage value (float)',0
|
||||
txt_0100 db 'Master scale',0
|
||||
txt_2100 db '–¢¥â ®ªà㦠î饩 á।ë',0
|
||||
txt_3d3d db '<27> ¡®à ®¡ê¥ªâ®¢',0
|
||||
txt_4000 db 'Ž¡ê¥ªâ (á ¨¬¥¥¬)',0
|
||||
txt_4100 db '’à¥ã£®«ìë¥ á¥âª¨',0
|
||||
txt_4110 db '‘¯¨á®ª ¢¥àè¨',0
|
||||
txt_4120 db '‘¯¨á®ª £à ¥©',0
|
||||
txt_4130 db 'Œ â¥à¨ «ë £à ¥©',0
|
||||
txt_4140 db '’¥ªáâãàë¥ ª®®à¤¨ âë',0
|
||||
txt_4160 db 'Œ âà¨æ ¯¥à¥¢®¤ ',0
|
||||
txt_4600 db '‘¢¥â',0
|
||||
txt_4700 db 'Š ¬¥à ',0
|
||||
txt_a000 db '<27> §¢ ¨¥ ¬ â¥à¨ « ',0
|
||||
txt_a010 db 'Žªà㦠î騩 梥â',0
|
||||
txt_a020 db '„¨ääã§ë© 梥â',0
|
||||
txt_a030 db '‡¥àª «ìë© æ¢¥â',0
|
||||
txt_a100 db '’¨¯ ¬ â¥à¨ « [1=flat 2=gouraud 3=phong 4=metal]',0
|
||||
txt_a200 db '’¥ªáâãà ¬ â¥à¨ « 1',0
|
||||
txt_a300 db 'ˆ¬ï ä ©« ⥪áâãàë',0
|
||||
;txt_a353 db 'MAT_MAP_TEXBLUR',0
|
||||
txt_afff db 'Œ â¥à¨ «',0
|
||||
txt_b000 db 'ˆä®à¬ æ¨ï ®¡ ¨¬ 樨',0
|
||||
txt_b002 db '<27>®¢¥¤¥¨¥ ®¡ê¥ªâ ',0
|
||||
;txt_b009 db 'KFCURTIME',0
|
||||
;txt_b00a db 'KFHDR',0
|
||||
txt_b010 db '<27> §¢ ¨¥ ®¡ê¥ªâ ',0
|
||||
txt_b011 db 'ˆ¬ï íª§¥¬¯«ïà ',0
|
||||
txt_b013 db '–¥âà ¢à é¥¨ï ®¡ê¥ªâ ',0
|
||||
txt_b014 db 'Bound box',0
|
||||
txt_b020 db '’à ¥ªâ®à¨ï ¤¢¨¦¥¨ï',0
|
||||
txt_b021 db '’à ¥ªâ®à¨ï ¢à 饨ï',0
|
||||
txt_b003 db '<27>®¢¥¤¥¨¥ ª ¬¥àë',0
|
||||
txt_b023 db '<27>®¢¥¤¥¨¥ fov ª ¬¥àë',0
|
||||
txt_b024 db '<27>®¢¥¤¥¨¥ roll ª ¬¥àë',0
|
||||
txt_b004 db '<27>®¢¥¤¥¨¥ "楫¨" ª ¬¥àë',0
|
||||
|
||||
;--- ¤ «¥¥ ¥ ¢® ¢á¥å ¡«®ª å ᬮ£ ©â¨ ®¯¨á ¨¥ àãá᪮¬ ï§ëª¥
|
||||
txt_4111 db '”« £¨ ¢¥àè¨',0
|
||||
txt_4150 db 'Smoothing group list',0
|
||||
txt_4165 db 'Object color in editor',0
|
||||
txt_4610 db '<27> ¯à ¢«¥ë© ᢥâ',0
|
||||
txt_4627 db 'Spot raytrace',0
|
||||
txt_4630 db 'Light shadowed',0
|
||||
txt_4641 db 'Spot shadow map',0
|
||||
txt_4650 db 'Spot show cone',0
|
||||
txt_4651 db 'Spot is rectangular',0
|
||||
txt_4652 db 'Spot overshoot',0
|
||||
txt_4653 db 'Spot map',0
|
||||
txt_4656 db 'Spot roll',0
|
||||
txt_4658 db 'Spot ray trace bias',0
|
||||
txt_4620 db 'Light off',0
|
||||
txt_4625 db 'Attenuation on',0
|
||||
txt_4659 db 'Range start',0
|
||||
txt_465a db 'Range end',0
|
||||
txt_465b db 'Multiplier',0
|
||||
txt_a230 db '<27> §¬¥âª ५ì¥ä ',0
|
||||
txt_a220 db '<27> §¬¥âª ®âà ¦¥¨ï',0
|
||||
txt_a351 db '<27> à ¬¥âàë à §¬¥âª¨',0
|
||||
txt_b007 db 'ˆä®à¬ æ¨ï ® ¯à ¢«¥®¬ ®á¢¥é¥¨¨',0
|
||||
txt_b008 db 'Š ¤àë ( ç «ìë© ¨ ª®¥çë©)',0
|
||||
txt_b022 db 'Œ áèâ ¡¨à®¢ ¨¥',0
|
||||
txt_b030 db '<27>®§¨æ¨ï ¢ ¨¥à à娨',0
|
||||
txt_a040 db 'Shininess percent',0
|
||||
txt_a041 db 'Shininess strength percent',0
|
||||
txt_a050 db 'Transparency percent',0
|
||||
txt_a052 db 'Transparency falloff percent',0
|
||||
txt_a053 db 'Reflection blur percent',0
|
||||
txt_a081 db '2 sided',0
|
||||
txt_a083 db 'Add trans',0
|
||||
txt_a084 db 'Self illum',0
|
||||
txt_a085 db 'Wire frame on',0
|
||||
txt_a087 db 'Wire thickness',0
|
||||
txt_a088 db 'Face map',0
|
||||
txt_a08a db 'In tranc',0
|
||||
txt_a08c db 'Soften',0
|
||||
txt_a08e db 'Wire in units',0
|
||||
|
||||
txt_not_delete db '<27>¥ ¬®£ã 㤠«¨âì ¢ë¡à ë© ¡«®ª. Ž § é¨é¥.',0
|
||||
|
||||
else ; Default to en_US
|
||||
|
||||
txt_0002 db '3ds version',0
|
||||
txt_0011 db 'Color rgb (byte format)',0
|
||||
txt_0100 db 'Master scale',0
|
||||
txt_2100 db 'Ambient color',0
|
||||
txt_3d3d db 'Editor chunk',0
|
||||
txt_4000 db 'Object (with name)',0
|
||||
txt_4100 db 'Triangular mesh',0
|
||||
txt_4110 db 'Vertices list',0
|
||||
txt_4120 db 'Faces description',0
|
||||
txt_4130 db 'Faces material',0
|
||||
txt_4140 db 'Mapping coordinates list',0
|
||||
txt_4160 db 'Local coordinate system',0
|
||||
txt_4600 db 'Light',0
|
||||
txt_4700 db 'Camera',0
|
||||
txt_a000 db 'Material name',0
|
||||
txt_a010 db 'Ambient color',0
|
||||
txt_a020 db 'Diffuse color',0
|
||||
txt_a030 db 'Specular color',0
|
||||
txt_a100 db 'Material type [1=flat 2=gouraud 3=phong 4=metal]',0
|
||||
txt_a200 db 'Texture map 1',0
|
||||
txt_a300 db 'Mapping filename',0
|
||||
txt_afff db 'Meterial',0
|
||||
txt_b000 db 'Keyframer',0
|
||||
txt_b002 db 'Mesh information',0
|
||||
txt_b010 db 'Object name',0
|
||||
txt_b011 db 'Instance name',0
|
||||
txt_b013 db 'Object pivot point',0
|
||||
txt_b014 db 'Bound box',0
|
||||
txt_b020 db 'Position track',0
|
||||
txt_b021 db 'Rotation track',0
|
||||
txt_b003 db 'Camera information',0
|
||||
txt_b023 db 'Fov track',0
|
||||
txt_b024 db 'Roll track',0
|
||||
txt_b004 db 'Camera target information',0
|
||||
|
||||
;---
|
||||
txt_4111 db 'Vertex flags',0
|
||||
txt_4150 db 'Smoothing group list',0
|
||||
txt_4165 db 'Object color in editor',0
|
||||
txt_4610 db 'Spotlight',0
|
||||
txt_4627 db 'Spot raytrace',0
|
||||
txt_4630 db 'Light shadowed',0
|
||||
txt_4641 db 'Spot shadow map',0
|
||||
txt_4650 db 'Spot show cone',0
|
||||
txt_4651 db 'Spot is rectangular',0
|
||||
txt_4652 db 'Spot overshoot',0
|
||||
txt_4653 db 'Spot map',0
|
||||
txt_4656 db 'Spot roll',0
|
||||
txt_4658 db 'Spot ray trace bias',0
|
||||
txt_4620 db 'Light off',0
|
||||
txt_4625 db 'Attenuation on',0
|
||||
txt_4659 db 'Range start',0
|
||||
txt_465a db 'Range end',0
|
||||
txt_465b db 'Multiplier',0
|
||||
txt_a230 db 'Bump map',0
|
||||
txt_a220 db 'Reflection map',0
|
||||
txt_a351 db 'Mapping parameters',0
|
||||
txt_b007 db 'Spot light information',0
|
||||
txt_b008 db 'Frames (Start and End)',0
|
||||
txt_b022 db 'Scale track',0
|
||||
txt_b030 db 'Hierarchy position',0
|
||||
txt_a040 db 'Shininess percent',0
|
||||
txt_a041 db 'Shininess strength percent',0
|
||||
txt_a050 db 'Transparency percent',0
|
||||
txt_a052 db 'Transparency falloff percent',0
|
||||
txt_a053 db 'Reflection blur percent',0
|
||||
txt_a081 db '2 sided',0
|
||||
txt_a083 db 'Add trans',0
|
||||
txt_a084 db 'Self illum',0
|
||||
txt_a085 db 'Wire frame on',0
|
||||
txt_a087 db 'Wire thickness',0
|
||||
txt_a088 db 'Face map',0
|
||||
txt_a08a db 'In tranc',0
|
||||
txt_a08c db 'Soften',0
|
||||
txt_a08e db 'Wire in units',0
|
||||
|
||||
txt_not_delete db 'Cannot delete the selected chunk: it is protected.',0
|
||||
end if
|
||||
|
||||
if lang eq ru_RU
|
||||
txt_open_3ds db 'Žâªàëâ ä ©«:',0
|
||||
txt_no_3ds: db 'Žâªàëâë© ä ©« ¥ ¢ ä®à¬ ⥠*.3ds ',39
|
||||
.zag: rb 8
|
||||
db 39,0
|
||||
txt_3ds_err_sizes db '‚®§¬®¦® ä ©« ¯®¢à¥¦¤¥',0
|
||||
txt_count db 'Š®«¨ç¥á⢮',0
|
||||
txt_3ds_offs:
|
||||
db '‘¬¥é¥¨¥: '
|
||||
.dig: rb 8
|
||||
db ' <20> §¬¥à: '
|
||||
.siz: rb 8
|
||||
db 0
|
||||
txt_mat_null db 'Œ â¥à¨ «ë ¥ ©¤¥ë',0
|
||||
|
||||
else ; Default to en_US
|
||||
txt_open_3ds db 'Open file:',0
|
||||
txt_no_3ds: db 'Open file not in format *.3ds ',39
|
||||
.zag: rb 8
|
||||
db 39,0
|
||||
txt_3ds_err_sizes db 'File may be corrupted',0
|
||||
txt_count db 'Count',0
|
||||
txt_3ds_offs:
|
||||
db 'Offset: '
|
||||
.dig: rb 8
|
||||
db ' Size: '
|
||||
.siz: rb 8
|
||||
db 0
|
||||
txt_mat_null db 'No materials found',0
|
||||
end if
|
||||
|
||||
File diff suppressed because it is too large
Load Diff
File diff suppressed because it is too large
Load Diff
@ -1 +1,55 @@
|
||||
if lang eq ru_RU
sz_main_menu_View db '‚¨¤', 0
sz_main_menu_Veiw_Vertexes db '‚¥àè¨ë ¢ª«.', 0
sz_main_menu_Veiw_Faces db 'Š ઠáë¥ £à ¨ ¢ª«.', 0
sz_main_menu_Veiw_Faces_Fill db '‘¯«®èë¥ £à ¨ ¢ª«.', 0
sz_main_menu_Veiw_Light db '‘¢¥â ¢ª«./¢ëª«.', 0
sz_main_menu_Veiw_Smooth db '‘£« ¦¨¢ ¨¥ ¢ª«./¢ëª«.', 0
sz_main_menu_Veiw_Reset db '‘¡à®á áâ஥ª', 0
if version_edit eq 0
sz_main_menu_Veiw_Faces_Mat db '<27> §®æ¢¥âë¥ £à ¨ ¢ª«.', 0
else
sz_main_menu_Vertexes db '‚¥àè¨ë', 0
sz_main_menu_Vertexes_Select db '‚뤥«¨âì ¢¥àè¨ã', 0
sz_main_menu_Vertexes_Deselect db 'Žâ¬¥¨âì ¢áñ ¢ë¤¥«¥¨¥', 0
sz_main_menu_Average_x db '‘।¥¥ x',0
sz_main_menu_Average_y db '‘।¥¥ y',0
sz_main_menu_Average_z db '‘।¥¥ z',0
end if
else
sz_main_menu_View db 'View', 0
sz_main_menu_Veiw_Vertexes db 'Vertexes on', 0
sz_main_menu_Veiw_Faces db 'Edges on', 0
sz_main_menu_Veiw_Faces_Fill db 'Faces on', 0
sz_main_menu_Veiw_Light db 'Light on/off', 0
sz_main_menu_Veiw_Smooth db 'Smooth on/off', 0
sz_main_menu_Veiw_Reset db 'Reset settings', 0
if version_edit eq 0
sz_main_menu_Veiw_Faces_Mat db 'Diferent color faces on', 0
else
sz_main_menu_Vertexes db 'Vertexes', 0
sz_main_menu_Vertexes_Select db 'Select vertex', 0
sz_main_menu_Vertexes_Deselect db 'Deselect all', 0
sz_main_menu_Average_x db 'Average x',0
sz_main_menu_Average_y db 'Average y',0
sz_main_menu_Average_z db 'Average z',0
end if
end if
main_menu dd 0
main_menu_file dd 0
main_menu_view dd 0
main_menu_vertexes dd 0
KMENUITEM_NORMAL equ 0
KMENUITEM_SUBMENU equ 1
KMENUITEM_SEPARATOR equ 2
|
||||
|
||||
; Language support for locales: ru_RU (CP866), en_US.
|
||||
|
||||
if lang eq ru_RU
|
||||
|
||||
sz_main_menu_View db '‚¨¤', 0
|
||||
sz_main_menu_Veiw_Vertexes db '‚¥àè¨ë ¢ª«.', 0
|
||||
sz_main_menu_Veiw_Faces db 'Š ઠáë¥ £à ¨ ¢ª«.', 0
|
||||
sz_main_menu_Veiw_Faces_Fill db '‘¯«®èë¥ £à ¨ ¢ª«.', 0
|
||||
sz_main_menu_Veiw_Light db '‘¢¥â ¢ª«./¢ëª«.', 0
|
||||
sz_main_menu_Veiw_Smooth db '‘£« ¦¨¢ ¨¥ ¢ª«./¢ëª«.', 0
|
||||
sz_main_menu_Veiw_Reset db '‘¡à®á áâ஥ª', 0
|
||||
|
||||
if version_edit eq 0
|
||||
sz_main_menu_Veiw_Faces_Mat db '<27> §®æ¢¥âë¥ £à ¨ ¢ª«.', 0
|
||||
else
|
||||
sz_main_menu_Vertexes db '‚¥àè¨ë', 0
|
||||
sz_main_menu_Vertexes_Select db '‚뤥«¨âì ¢¥àè¨ã', 0
|
||||
sz_main_menu_Vertexes_Deselect db 'Žâ¬¥¨âì ¢áñ ¢ë¤¥«¥¨¥', 0
|
||||
sz_main_menu_Average_x db '‘।¥¥ x',0
|
||||
sz_main_menu_Average_y db '‘।¥¥ y',0
|
||||
sz_main_menu_Average_z db '‘।¥¥ z',0
|
||||
end if
|
||||
|
||||
else ; Default to en_US
|
||||
|
||||
sz_main_menu_View db 'View', 0
|
||||
sz_main_menu_Veiw_Vertexes db 'Vertexes on', 0
|
||||
sz_main_menu_Veiw_Faces db 'Edges on', 0
|
||||
sz_main_menu_Veiw_Faces_Fill db 'Faces on', 0
|
||||
sz_main_menu_Veiw_Light db 'Light on/off', 0
|
||||
sz_main_menu_Veiw_Smooth db 'Smooth on/off', 0
|
||||
sz_main_menu_Veiw_Reset db 'Reset settings', 0
|
||||
|
||||
if version_edit eq 0
|
||||
sz_main_menu_Veiw_Faces_Mat db 'Diferent color faces on', 0
|
||||
else
|
||||
sz_main_menu_Vertexes db 'Vertexes', 0
|
||||
sz_main_menu_Vertexes_Select db 'Select vertex', 0
|
||||
sz_main_menu_Vertexes_Deselect db 'Deselect all', 0
|
||||
sz_main_menu_Average_x db 'Average x',0
|
||||
sz_main_menu_Average_y db 'Average y',0
|
||||
sz_main_menu_Average_z db 'Average z',0
|
||||
end if
|
||||
|
||||
end if
|
||||
|
||||
main_menu dd 0
|
||||
main_menu_file dd 0
|
||||
main_menu_view dd 0
|
||||
main_menu_vertexes dd 0
|
||||
|
||||
KMENUITEM_NORMAL equ 0
|
||||
KMENUITEM_SUBMENU equ 1
|
||||
KMENUITEM_SEPARATOR equ 2
|
||||
|
||||
File diff suppressed because it is too large
Load Diff
File diff suppressed because it is too large
Load Diff
@ -1,318 +1,318 @@
|
||||
; <20>à®£à ¬¬ ¤«ï ¯à¥®¡à §®¢ ¨ï ç¨á¥« ¨§ áâப¨
|
||||
; ¢ ä®à¬ â float, double, â ª¦¥ ¨§ 10 ¨«¨ 16 à¨ç®£®
|
||||
; ¢® float.
|
||||
; ‘¤¥« ®á®¢¥ hex2dec2bin ¨ ¯à¨¬¥à®¢ ¨§ ä ©« list2_05.inc
|
||||
; ( ¢â®à Šã« ª®¢ ‚« ¤¨¬¨à ƒ¥ ¤ì¥¢¨ç 24.05.2002),
|
||||
; ª®â®àë¥ ChE ¯¥à¥¤¥« « á 16 32 ¡¨â áᥬ¡«¥à fasm.
|
||||
; <20>à®£à ¬¬ ¯®§¢®«ï¥â à¥è âì â ª¨¥ § ¤ ç¨:
|
||||
; 1) ç¨á«® ¢ áâப®¢®¬ ¢¨¤¥ ¯¥à¥¢¥á⨠¢ 4 ¡ ©â (float) ¢ ¬ è¨ë© ¢¨¤
|
||||
; 2) ç¨á«® ¢ áâப®¢®¬ ¢¨¤¥ ¯¥à¥¢¥á⨠¢ 8 ¡ ©â (double) ¢ ¬ è¨ë© ¢¨¤
|
||||
; 3) ç¨á«® ¢ ¬ 訮¬ ¢¨¤¥ (float) ¯¥à¥¢¥á⨠¢ áâப®¢ë© ¢¨¤ (5 § ª®¢ ¯®á«¥ § ¯ï⮩)
|
||||
|
||||
use32
|
||||
org 0
|
||||
db 'MENUET01'
|
||||
dd 1,start,i_end,e_end,e_end,0,sys_path
|
||||
|
||||
include '../../../proc32.inc'
|
||||
include '../../../macros.inc'
|
||||
include '../../../KOSfuncs.inc'
|
||||
include '../../../load_lib.mac'
|
||||
include '../../../develop/libraries/box_lib/trunk/box_lib.mac'
|
||||
include '../../../develop/info3ds/info_fun_float.inc'
|
||||
include 'lang.inc'
|
||||
|
||||
@use_library
|
||||
|
||||
align 4
|
||||
start:
|
||||
load_libraries l_libs_start,l_libs_end
|
||||
;¯à®¢¥àª ᪮«ìª® ã¤ ç® § £ã§¨« áì è ¡¨¡«¨®â¥ª
|
||||
mov ebp,lib_0
|
||||
cmp dword[ebp+ll_struc_size-4],0
|
||||
jz @f
|
||||
mcall SF_TERMINATE_PROCESS
|
||||
@@:
|
||||
mcall SF_SET_EVENTS_MASK,0xC0000027
|
||||
mcall SF_STYLE_SETTINGS,SSF_GET_COLORS, sys_colors, sizeof.system_colors
|
||||
edit_boxes_set_sys_color edit1,editboxes_end,sys_colors
|
||||
option_boxes_set_sys_color sys_colors,Option_boxes1
|
||||
|
||||
align 4
|
||||
red:
|
||||
call draw_window
|
||||
|
||||
align 4
|
||||
still:
|
||||
mcall SF_WAIT_EVENT
|
||||
|
||||
cmp eax,1 ; ¯¥à¥à¨á®¢ âì ®ª® ?
|
||||
je red ; ¥á«¨ ¤ - ¬¥âªã red
|
||||
cmp eax,2 ; ¦ â ª« ¢¨è ?
|
||||
je key ; ¥á«¨ ¤ - key
|
||||
cmp eax,3 ; ¦ â ª®¯ª ?
|
||||
je button ; ¥á«¨ ¤ - button
|
||||
cmp eax,6
|
||||
je mouse
|
||||
|
||||
jmp still ; ¥á«¨ ¤à㣮¥ ᮡë⨥ - ¢ ç «® 横«
|
||||
|
||||
align 4
|
||||
key: ; ¦ â ª« ¢¨è ª« ¢¨ âãà¥
|
||||
mcall SF_GET_KEY
|
||||
;cmp ah,13
|
||||
stdcall [edit_box_key], edit1
|
||||
jmp still ; ¢¥àãâìáï ª ç «ã 横«
|
||||
|
||||
align 4
|
||||
button:
|
||||
mcall SF_GET_BUTTON
|
||||
cmp ah, 1 ; ¥á«¨ <20>… ¦ â ª®¯ª á ®¬¥à®¬ 1,
|
||||
jne @f
|
||||
mcall SF_TERMINATE_PROCESS
|
||||
@@:
|
||||
cmp ah, 5
|
||||
jne @f
|
||||
cmp dword[option_group1],opt3
|
||||
jne .opt_3_end
|
||||
stdcall conv_str_to_int,[edit1.text]
|
||||
mov dword[Data_Double],eax
|
||||
finit
|
||||
fld dword[Data_Double]
|
||||
fstp qword[Data_Double]
|
||||
|
||||
; Data_Double - ¯à¥®¡à §ã¥¬®¥ ç¨á«®
|
||||
mov word[NumberSymbolsAD],8 ; ª®«¨ç¥á⢮ § ª®¢ ç¨á« ¯®á«¥ § ¯ï⮩ (1-17)
|
||||
call DoubleFloat_to_String
|
||||
call String_crop_0
|
||||
mov dword[Data_Double],eax ;¢®ááâ ¢«¨¢ ¥¬ § 票¥ ¢ ä®à¬ ⥠float
|
||||
jmp .opt_all_end
|
||||
.opt_3_end:
|
||||
|
||||
mov esi,string1
|
||||
mov edi,Data_String
|
||||
cld
|
||||
mov ecx,32
|
||||
rep movsb
|
||||
|
||||
call String_to_DoubleFloat
|
||||
cmp dword[option_group1],opt1
|
||||
jne .opt_all_end ;¥á«¨ ¢ë¡à float, â® ¯à¥®¡à §ã¥¬ ¨§ à ¥¥ ¯®«ã祮£® double
|
||||
finit
|
||||
fld qword[Data_Double] ;ç¨â ¥¬ ¨§ double
|
||||
fstp dword[Data_Double] ; ¢®§¢à é ¥¬ ¢® float
|
||||
.opt_all_end:
|
||||
jmp red
|
||||
@@:
|
||||
jmp still
|
||||
|
||||
align 4
|
||||
mouse:
|
||||
stdcall [edit_box_mouse], edit1
|
||||
stdcall [option_box_mouse], Option_boxes1
|
||||
jmp still
|
||||
|
||||
;------------------------------------------------
|
||||
align 4
|
||||
draw_window:
|
||||
mcall SF_STYLE_SETTINGS,SSF_GET_COLORS, sys_colors, sizeof.system_colors
|
||||
|
||||
mcall SF_REDRAW,SSF_BEGIN_DRAW
|
||||
mov edx, 0x14000000
|
||||
or edx, [sys_colors.work]
|
||||
mcall SF_CREATE_WINDOW, (200 shl 16)+300, (200 shl 16)+175, ,,title
|
||||
|
||||
mcall SF_DEFINE_BUTTON, ((300-53) shl 16)+38, (145 shl 16)+15, 5, [sys_colors.work_button] ; ª®¯ª Ok
|
||||
|
||||
mov ecx, 0x80000000
|
||||
or ecx, [sys_colors.work_text]
|
||||
mcall SF_DRAW_TEXT, (15 shl 16) +30,, binstr,
|
||||
mcall , (15 shl 16) +58,, decstr,
|
||||
mcall , ((240-56*3) shl 16) +58,, Data_String,
|
||||
mcall , (15 shl 16) +72,, hexstr,
|
||||
mcall , (15 shl 16)+150,, numstr,
|
||||
|
||||
mov ecx, 0x80000000
|
||||
or ecx, [sys_colors.work_button_text]
|
||||
mcall , ((300-42) shl 16)+149, , Okstr,3
|
||||
|
||||
cmp dword[option_group1],opt1
|
||||
je @f ;¥á«¨ ¢ë¡à float, â® áâ à訥 4 ¡ ©â (¨§ double) ¥ ¯¥ç â ¥¬
|
||||
cmp dword[option_group1],opt3
|
||||
je @f ;¥á«¨ ¢ë¡à float, â® áâ à訥 4 ¡ ©â (¨§ double) ¥ ¯¥ç â ¥¬
|
||||
mov ecx, dword[Data_Double+4]
|
||||
mcall SF_DRAW_NUMBER, (8 shl 16)+256,,(185 shl 16)+72,[sys_colors.work_text] ; 16- ï
|
||||
|
||||
mov ecx, dword[Data_Double+4]
|
||||
mcall ,(8 shl 16)+512,,(240 shl 16)+30, ; 2- ï
|
||||
ror ecx, 8
|
||||
mcall ,,,((240-56) shl 16)+30,
|
||||
ror ecx, 8
|
||||
mcall ,,,((240-56*2) shl 16)+30,
|
||||
ror ecx, 8
|
||||
mcall ,,,((240-56*3) shl 16)+30,
|
||||
ror ecx, 8
|
||||
@@:
|
||||
|
||||
mov ecx,dword[Data_Double]
|
||||
mcall SF_DRAW_NUMBER, (8 shl 16)+256,,(240 shl 16)+72,[sys_colors.work_text] ; 16- ï
|
||||
|
||||
mov ecx,dword[Data_Double]
|
||||
mcall , (8 shl 16)+512,,(240 shl 16)+44, ; 2- ï
|
||||
ror ecx, 8
|
||||
mcall ,,,((240-56) shl 16)+44,
|
||||
ror ecx, 8
|
||||
mcall ,,,((240-56*2) shl 16)+44,
|
||||
ror ecx, 8
|
||||
mcall ,,,((240-56*3) shl 16)+44,
|
||||
ror ecx, 8
|
||||
|
||||
mcall SF_DRAW_LINE, (15 shl 16)+300-15, (137 shl 16)+137, [sys_colors.work_graph]
|
||||
stdcall [edit_box_draw], edit1
|
||||
stdcall [option_box_draw], Option_boxes1
|
||||
mcall SF_REDRAW,SSF_END_DRAW
|
||||
|
||||
ret
|
||||
|
||||
|
||||
string1 db 32 dup (0)
|
||||
string1_end:
|
||||
|
||||
|
||||
;input:
|
||||
; buf - 㪠§ ⥫ì áâபã, ç¨á«® ¤®«¦® ¡ëâì ¢ 10 ¨«¨ 16 à¨ç®¬ ¢¨¤¥
|
||||
;output:
|
||||
; eax - ç¨á«®
|
||||
align 4
|
||||
proc conv_str_to_int uses ebx ecx esi, buf:dword
|
||||
xor eax,eax
|
||||
xor ebx,ebx
|
||||
mov esi,[buf]
|
||||
;®¯à¥¤¥«¥¨¥ ®âà¨æ ⥫ìëå ç¨á¥«
|
||||
xor ecx,ecx
|
||||
inc ecx
|
||||
cmp byte[esi],'-'
|
||||
jne @f
|
||||
dec ecx
|
||||
inc esi
|
||||
@@:
|
||||
|
||||
cmp word[esi],'0x'
|
||||
je .load_digit_16
|
||||
|
||||
.load_digit_10: ;áç¨âë¢ ¨¥ 10-â¨çëå æ¨äà
|
||||
mov bl,byte[esi]
|
||||
cmp bl,'0'
|
||||
jl @f
|
||||
cmp bl,'9'
|
||||
jg @f
|
||||
sub bl,'0'
|
||||
imul eax,10
|
||||
add eax,ebx
|
||||
inc esi
|
||||
jmp .load_digit_10
|
||||
jmp @f
|
||||
|
||||
.load_digit_16: ;áç¨âë¢ ¨¥ 16-à¨çëå æ¨äà
|
||||
add esi,2
|
||||
.cycle_16:
|
||||
mov bl,byte[esi]
|
||||
cmp bl,'0'
|
||||
jl @f
|
||||
cmp bl,'f'
|
||||
jg @f
|
||||
cmp bl,'9'
|
||||
jle .us1
|
||||
cmp bl,'A'
|
||||
jl @f ;®âᥨ¢ ¥¬ ᨬ¢®«ë >'9' ¨ <'A'
|
||||
.us1: ;á®áâ ¢®¥ ãá«®¢¨¥
|
||||
cmp bl,'F'
|
||||
jle .us2
|
||||
cmp bl,'a'
|
||||
jl @f ;®âᥨ¢ ¥¬ ᨬ¢®«ë >'F' ¨ <'a'
|
||||
sub bl,32 ;¯¥à¥¢®¤¨¬ ᨬ¢®«ë ¢ ¢¥à娩 ॣ¨áâà, ¤«ï ã¯à®é¥¨ï ¨å ¯®á«¥¤ã饩 ®¡à ¡®âª¨
|
||||
.us2: ;á®áâ ¢®¥ ãá«®¢¨¥
|
||||
sub bl,'0'
|
||||
cmp bl,9
|
||||
jle .cor1
|
||||
sub bl,7 ;convert 'A' to '10'
|
||||
.cor1:
|
||||
shl eax,4
|
||||
add eax,ebx
|
||||
inc esi
|
||||
jmp .cycle_16
|
||||
@@:
|
||||
cmp ecx,0 ;¥á«¨ ç¨á«® ®âà¨æ ⥫쮥
|
||||
jne @f
|
||||
sub ecx,eax
|
||||
mov eax,ecx
|
||||
@@:
|
||||
ret
|
||||
endp
|
||||
|
||||
;-------------------------------------------------
|
||||
title db 'string to double 03.01.21',0
|
||||
hexstr db 'hex:',0
|
||||
decstr db 'dec:',0
|
||||
binstr db 'bin:',0
|
||||
|
||||
if lang eq ru_RU
|
||||
numstr db '—¨á«®:',0
|
||||
Okstr db '‚¢®¤',0
|
||||
else
|
||||
numstr db 'Number:',0
|
||||
Okstr db 'Ok',0
|
||||
end if
|
||||
|
||||
mouse_dd dd 0
|
||||
edit1 edit_box 182, 59, 146, 0xffffff, 0xff, 0x80ff, 0, 0x8000, (string1_end-string1), string1, mouse_dd, 0
|
||||
editboxes_end:
|
||||
|
||||
;option_boxes
|
||||
opt1 option_box option_group1, 15, 90, 8, 12, 0xffffff, 0x80ff, 0, op_text.1, 17
|
||||
opt2 option_box option_group1, 15, 106, 8, 12, 0xffffff, 0x80ff, 0, op_text.2, 18
|
||||
opt3 option_box option_group1, 15, 122, 8, 12, 0xffffff, 0x80ff, 0, op_text.3, 21
|
||||
|
||||
op_text: ;⥪áâ ¤«ï à ¤¨® ª®¯®ª
|
||||
.1 db 'str(dec) -> float'
|
||||
.2 db 'str(dec) -> double'
|
||||
.3 db 'float(dec,hex) -> str'
|
||||
;㪠§ ⥫¨ ¤«ï option_box
|
||||
option_group1 dd opt1
|
||||
Option_boxes1 dd opt1, opt2, opt3, 0
|
||||
|
||||
system_dir_0 db '/sys/lib/'
|
||||
lib_name_0 db 'box_lib.obj',0
|
||||
|
||||
|
||||
l_libs_start:
|
||||
lib_0 l_libs lib_name_0, library_path, system_dir_0,import_box_lib
|
||||
l_libs_end:
|
||||
|
||||
align 4
|
||||
import_box_lib:
|
||||
;dd sz_init1
|
||||
edit_box_draw dd sz_edit_box_draw
|
||||
edit_box_key dd sz_edit_box_key
|
||||
edit_box_mouse dd sz_edit_box_mouse
|
||||
;edit_box_set_text dd sz_edit_box_set_text
|
||||
option_box_draw dd aOption_box_draw
|
||||
option_box_mouse dd aOption_box_mouse
|
||||
;version_op dd aVersion_op
|
||||
dd 0,0
|
||||
;sz_init1 db 'lib_init',0
|
||||
sz_edit_box_draw db 'edit_box_draw',0
|
||||
sz_edit_box_key db 'edit_box_key',0
|
||||
sz_edit_box_mouse db 'edit_box_mouse',0
|
||||
;sz_edit_box_set_text db 'edit_box_set_text',0
|
||||
aOption_box_draw db 'option_box_draw',0
|
||||
aOption_box_mouse db 'option_box_mouse',0
|
||||
;aVersion_op db 'version_op',0
|
||||
|
||||
i_end:
|
||||
sys_colors system_colors
|
||||
align 16
|
||||
sys_path rb 4096
|
||||
library_path rb 4096
|
||||
rb 0x400 ;stack
|
||||
e_end: ; ¬¥âª ª®æ ¯à®£à ¬¬ë
|
||||
; <20>à®£à ¬¬ ¤«ï ¯à¥®¡à §®¢ ¨ï ç¨á¥« ¨§ áâப¨
|
||||
; ¢ ä®à¬ â float, double, â ª¦¥ ¨§ 10 ¨«¨ 16 à¨ç®£®
|
||||
; ¢® float.
|
||||
; ‘¤¥« ®á®¢¥ hex2dec2bin ¨ ¯à¨¬¥à®¢ ¨§ ä ©« list2_05.inc
|
||||
; ( ¢â®à Šã« ª®¢ ‚« ¤¨¬¨à ƒ¥ ¤ì¥¢¨ç 24.05.2002),
|
||||
; ª®â®àë¥ ChE ¯¥à¥¤¥« « á 16 32 ¡¨â áᥬ¡«¥à fasm.
|
||||
; <20>à®£à ¬¬ ¯®§¢®«ï¥â à¥è âì â ª¨¥ § ¤ ç¨:
|
||||
; 1) ç¨á«® ¢ áâப®¢®¬ ¢¨¤¥ ¯¥à¥¢¥á⨠¢ 4 ¡ ©â (float) ¢ ¬ è¨ë© ¢¨¤
|
||||
; 2) ç¨á«® ¢ áâப®¢®¬ ¢¨¤¥ ¯¥à¥¢¥á⨠¢ 8 ¡ ©â (double) ¢ ¬ è¨ë© ¢¨¤
|
||||
; 3) ç¨á«® ¢ ¬ 訮¬ ¢¨¤¥ (float) ¯¥à¥¢¥á⨠¢ áâப®¢ë© ¢¨¤ (5 § ª®¢ ¯®á«¥ § ¯ï⮩)
|
||||
|
||||
use32
|
||||
org 0
|
||||
db 'MENUET01'
|
||||
dd 1,start,i_end,e_end,e_end,0,sys_path
|
||||
|
||||
include '../../../proc32.inc'
|
||||
include '../../../macros.inc'
|
||||
include '../../../KOSfuncs.inc'
|
||||
include '../../../load_lib.mac'
|
||||
include '../../../develop/libraries/box_lib/trunk/box_lib.mac'
|
||||
include '../../../develop/info3ds/info_fun_float.inc'
|
||||
include 'lang.inc' ; Language support for locales: ru_RU (CP866), en_US.
|
||||
|
||||
@use_library
|
||||
|
||||
align 4
|
||||
start:
|
||||
load_libraries l_libs_start,l_libs_end
|
||||
;¯à®¢¥àª ᪮«ìª® ã¤ ç® § £ã§¨« áì è ¡¨¡«¨®â¥ª
|
||||
mov ebp,lib_0
|
||||
cmp dword[ebp+ll_struc_size-4],0
|
||||
jz @f
|
||||
mcall SF_TERMINATE_PROCESS
|
||||
@@:
|
||||
mcall SF_SET_EVENTS_MASK,0xC0000027
|
||||
mcall SF_STYLE_SETTINGS,SSF_GET_COLORS, sys_colors, sizeof.system_colors
|
||||
edit_boxes_set_sys_color edit1,editboxes_end,sys_colors
|
||||
option_boxes_set_sys_color sys_colors,Option_boxes1
|
||||
|
||||
align 4
|
||||
red:
|
||||
call draw_window
|
||||
|
||||
align 4
|
||||
still:
|
||||
mcall SF_WAIT_EVENT
|
||||
|
||||
cmp eax,1 ; ¯¥à¥à¨á®¢ âì ®ª® ?
|
||||
je red ; ¥á«¨ ¤ - ¬¥âªã red
|
||||
cmp eax,2 ; ¦ â ª« ¢¨è ?
|
||||
je key ; ¥á«¨ ¤ - key
|
||||
cmp eax,3 ; ¦ â ª®¯ª ?
|
||||
je button ; ¥á«¨ ¤ - button
|
||||
cmp eax,6
|
||||
je mouse
|
||||
|
||||
jmp still ; ¥á«¨ ¤à㣮¥ ᮡë⨥ - ¢ ç «® 横«
|
||||
|
||||
align 4
|
||||
key: ; ¦ â ª« ¢¨è ª« ¢¨ âãà¥
|
||||
mcall SF_GET_KEY
|
||||
;cmp ah,13
|
||||
stdcall [edit_box_key], edit1
|
||||
jmp still ; ¢¥àãâìáï ª ç «ã 横«
|
||||
|
||||
align 4
|
||||
button:
|
||||
mcall SF_GET_BUTTON
|
||||
cmp ah, 1 ; ¥á«¨ <20>… ¦ â ª®¯ª á ®¬¥à®¬ 1,
|
||||
jne @f
|
||||
mcall SF_TERMINATE_PROCESS
|
||||
@@:
|
||||
cmp ah, 5
|
||||
jne @f
|
||||
cmp dword[option_group1],opt3
|
||||
jne .opt_3_end
|
||||
stdcall conv_str_to_int,[edit1.text]
|
||||
mov dword[Data_Double],eax
|
||||
finit
|
||||
fld dword[Data_Double]
|
||||
fstp qword[Data_Double]
|
||||
|
||||
; Data_Double - ¯à¥®¡à §ã¥¬®¥ ç¨á«®
|
||||
mov word[NumberSymbolsAD],8 ; ª®«¨ç¥á⢮ § ª®¢ ç¨á« ¯®á«¥ § ¯ï⮩ (1-17)
|
||||
call DoubleFloat_to_String
|
||||
call String_crop_0
|
||||
mov dword[Data_Double],eax ;¢®ááâ ¢«¨¢ ¥¬ § 票¥ ¢ ä®à¬ ⥠float
|
||||
jmp .opt_all_end
|
||||
.opt_3_end:
|
||||
|
||||
mov esi,string1
|
||||
mov edi,Data_String
|
||||
cld
|
||||
mov ecx,32
|
||||
rep movsb
|
||||
|
||||
call String_to_DoubleFloat
|
||||
cmp dword[option_group1],opt1
|
||||
jne .opt_all_end ;¥á«¨ ¢ë¡à float, â® ¯à¥®¡à §ã¥¬ ¨§ à ¥¥ ¯®«ã祮£® double
|
||||
finit
|
||||
fld qword[Data_Double] ;ç¨â ¥¬ ¨§ double
|
||||
fstp dword[Data_Double] ; ¢®§¢à é ¥¬ ¢® float
|
||||
.opt_all_end:
|
||||
jmp red
|
||||
@@:
|
||||
jmp still
|
||||
|
||||
align 4
|
||||
mouse:
|
||||
stdcall [edit_box_mouse], edit1
|
||||
stdcall [option_box_mouse], Option_boxes1
|
||||
jmp still
|
||||
|
||||
;------------------------------------------------
|
||||
align 4
|
||||
draw_window:
|
||||
mcall SF_STYLE_SETTINGS,SSF_GET_COLORS, sys_colors, sizeof.system_colors
|
||||
|
||||
mcall SF_REDRAW,SSF_BEGIN_DRAW
|
||||
mov edx, 0x14000000
|
||||
or edx, [sys_colors.work]
|
||||
mcall SF_CREATE_WINDOW, (200 shl 16)+300, (200 shl 16)+175, ,,title
|
||||
|
||||
mcall SF_DEFINE_BUTTON, ((300-53) shl 16)+38, (145 shl 16)+15, 5, [sys_colors.work_button] ; ª®¯ª Ok
|
||||
|
||||
mov ecx, 0x80000000
|
||||
or ecx, [sys_colors.work_text]
|
||||
mcall SF_DRAW_TEXT, (15 shl 16) +30,, binstr,
|
||||
mcall , (15 shl 16) +58,, decstr,
|
||||
mcall , ((240-56*3) shl 16) +58,, Data_String,
|
||||
mcall , (15 shl 16) +72,, hexstr,
|
||||
mcall , (15 shl 16)+150,, numstr,
|
||||
|
||||
mov ecx, 0x80000000
|
||||
or ecx, [sys_colors.work_button_text]
|
||||
mcall , ((300-42) shl 16)+149, , Okstr,3
|
||||
|
||||
cmp dword[option_group1],opt1
|
||||
je @f ;¥á«¨ ¢ë¡à float, â® áâ à訥 4 ¡ ©â (¨§ double) ¥ ¯¥ç â ¥¬
|
||||
cmp dword[option_group1],opt3
|
||||
je @f ;¥á«¨ ¢ë¡à float, â® áâ à訥 4 ¡ ©â (¨§ double) ¥ ¯¥ç â ¥¬
|
||||
mov ecx, dword[Data_Double+4]
|
||||
mcall SF_DRAW_NUMBER, (8 shl 16)+256,,(185 shl 16)+72,[sys_colors.work_text] ; 16- ï
|
||||
|
||||
mov ecx, dword[Data_Double+4]
|
||||
mcall ,(8 shl 16)+512,,(240 shl 16)+30, ; 2- ï
|
||||
ror ecx, 8
|
||||
mcall ,,,((240-56) shl 16)+30,
|
||||
ror ecx, 8
|
||||
mcall ,,,((240-56*2) shl 16)+30,
|
||||
ror ecx, 8
|
||||
mcall ,,,((240-56*3) shl 16)+30,
|
||||
ror ecx, 8
|
||||
@@:
|
||||
|
||||
mov ecx,dword[Data_Double]
|
||||
mcall SF_DRAW_NUMBER, (8 shl 16)+256,,(240 shl 16)+72,[sys_colors.work_text] ; 16- ï
|
||||
|
||||
mov ecx,dword[Data_Double]
|
||||
mcall , (8 shl 16)+512,,(240 shl 16)+44, ; 2- ï
|
||||
ror ecx, 8
|
||||
mcall ,,,((240-56) shl 16)+44,
|
||||
ror ecx, 8
|
||||
mcall ,,,((240-56*2) shl 16)+44,
|
||||
ror ecx, 8
|
||||
mcall ,,,((240-56*3) shl 16)+44,
|
||||
ror ecx, 8
|
||||
|
||||
mcall SF_DRAW_LINE, (15 shl 16)+300-15, (137 shl 16)+137, [sys_colors.work_graph]
|
||||
stdcall [edit_box_draw], edit1
|
||||
stdcall [option_box_draw], Option_boxes1
|
||||
mcall SF_REDRAW,SSF_END_DRAW
|
||||
|
||||
ret
|
||||
|
||||
|
||||
string1 db 32 dup (0)
|
||||
string1_end:
|
||||
|
||||
|
||||
;input:
|
||||
; buf - 㪠§ ⥫ì áâபã, ç¨á«® ¤®«¦® ¡ëâì ¢ 10 ¨«¨ 16 à¨ç®¬ ¢¨¤¥
|
||||
;output:
|
||||
; eax - ç¨á«®
|
||||
align 4
|
||||
proc conv_str_to_int uses ebx ecx esi, buf:dword
|
||||
xor eax,eax
|
||||
xor ebx,ebx
|
||||
mov esi,[buf]
|
||||
;®¯à¥¤¥«¥¨¥ ®âà¨æ ⥫ìëå ç¨á¥«
|
||||
xor ecx,ecx
|
||||
inc ecx
|
||||
cmp byte[esi],'-'
|
||||
jne @f
|
||||
dec ecx
|
||||
inc esi
|
||||
@@:
|
||||
|
||||
cmp word[esi],'0x'
|
||||
je .load_digit_16
|
||||
|
||||
.load_digit_10: ;áç¨âë¢ ¨¥ 10-â¨çëå æ¨äà
|
||||
mov bl,byte[esi]
|
||||
cmp bl,'0'
|
||||
jl @f
|
||||
cmp bl,'9'
|
||||
jg @f
|
||||
sub bl,'0'
|
||||
imul eax,10
|
||||
add eax,ebx
|
||||
inc esi
|
||||
jmp .load_digit_10
|
||||
jmp @f
|
||||
|
||||
.load_digit_16: ;áç¨âë¢ ¨¥ 16-à¨çëå æ¨äà
|
||||
add esi,2
|
||||
.cycle_16:
|
||||
mov bl,byte[esi]
|
||||
cmp bl,'0'
|
||||
jl @f
|
||||
cmp bl,'f'
|
||||
jg @f
|
||||
cmp bl,'9'
|
||||
jle .us1
|
||||
cmp bl,'A'
|
||||
jl @f ;®âᥨ¢ ¥¬ ᨬ¢®«ë >'9' ¨ <'A'
|
||||
.us1: ;á®áâ ¢®¥ ãá«®¢¨¥
|
||||
cmp bl,'F'
|
||||
jle .us2
|
||||
cmp bl,'a'
|
||||
jl @f ;®âᥨ¢ ¥¬ ᨬ¢®«ë >'F' ¨ <'a'
|
||||
sub bl,32 ;¯¥à¥¢®¤¨¬ ᨬ¢®«ë ¢ ¢¥à娩 ॣ¨áâà, ¤«ï ã¯à®é¥¨ï ¨å ¯®á«¥¤ã饩 ®¡à ¡®âª¨
|
||||
.us2: ;á®áâ ¢®¥ ãá«®¢¨¥
|
||||
sub bl,'0'
|
||||
cmp bl,9
|
||||
jle .cor1
|
||||
sub bl,7 ;convert 'A' to '10'
|
||||
.cor1:
|
||||
shl eax,4
|
||||
add eax,ebx
|
||||
inc esi
|
||||
jmp .cycle_16
|
||||
@@:
|
||||
cmp ecx,0 ;¥á«¨ ç¨á«® ®âà¨æ ⥫쮥
|
||||
jne @f
|
||||
sub ecx,eax
|
||||
mov eax,ecx
|
||||
@@:
|
||||
ret
|
||||
endp
|
||||
|
||||
;-------------------------------------------------
|
||||
title db 'string to double 03.01.21',0
|
||||
hexstr db 'hex:',0
|
||||
decstr db 'dec:',0
|
||||
binstr db 'bin:',0
|
||||
|
||||
if lang eq ru_RU
|
||||
numstr db '—¨á«®:',0
|
||||
Okstr db '‚¢®¤',0
|
||||
else ; Default to en_US
|
||||
numstr db 'Number:',0
|
||||
Okstr db 'Ok',0
|
||||
end if
|
||||
|
||||
mouse_dd dd 0
|
||||
edit1 edit_box 182, 59, 146, 0xffffff, 0xff, 0x80ff, 0, 0x8000, (string1_end-string1), string1, mouse_dd, 0
|
||||
editboxes_end:
|
||||
|
||||
;option_boxes
|
||||
opt1 option_box option_group1, 15, 90, 8, 12, 0xffffff, 0x80ff, 0, op_text.1, 17
|
||||
opt2 option_box option_group1, 15, 106, 8, 12, 0xffffff, 0x80ff, 0, op_text.2, 18
|
||||
opt3 option_box option_group1, 15, 122, 8, 12, 0xffffff, 0x80ff, 0, op_text.3, 21
|
||||
|
||||
op_text: ;⥪áâ ¤«ï à ¤¨® ª®¯®ª
|
||||
.1 db 'str(dec) -> float'
|
||||
.2 db 'str(dec) -> double'
|
||||
.3 db 'float(dec,hex) -> str'
|
||||
;㪠§ ⥫¨ ¤«ï option_box
|
||||
option_group1 dd opt1
|
||||
Option_boxes1 dd opt1, opt2, opt3, 0
|
||||
|
||||
system_dir_0 db '/sys/lib/'
|
||||
lib_name_0 db 'box_lib.obj',0
|
||||
|
||||
|
||||
l_libs_start:
|
||||
lib_0 l_libs lib_name_0, library_path, system_dir_0,import_box_lib
|
||||
l_libs_end:
|
||||
|
||||
align 4
|
||||
import_box_lib:
|
||||
;dd sz_init1
|
||||
edit_box_draw dd sz_edit_box_draw
|
||||
edit_box_key dd sz_edit_box_key
|
||||
edit_box_mouse dd sz_edit_box_mouse
|
||||
;edit_box_set_text dd sz_edit_box_set_text
|
||||
option_box_draw dd aOption_box_draw
|
||||
option_box_mouse dd aOption_box_mouse
|
||||
;version_op dd aVersion_op
|
||||
dd 0,0
|
||||
;sz_init1 db 'lib_init',0
|
||||
sz_edit_box_draw db 'edit_box_draw',0
|
||||
sz_edit_box_key db 'edit_box_key',0
|
||||
sz_edit_box_mouse db 'edit_box_mouse',0
|
||||
;sz_edit_box_set_text db 'edit_box_set_text',0
|
||||
aOption_box_draw db 'option_box_draw',0
|
||||
aOption_box_mouse db 'option_box_mouse',0
|
||||
;aVersion_op db 'version_op',0
|
||||
|
||||
i_end:
|
||||
sys_colors system_colors
|
||||
align 16
|
||||
sys_path rb 4096
|
||||
library_path rb 4096
|
||||
rb 0x400 ;stack
|
||||
e_end: ; ¬¥âª ª®æ ¯à®£à ¬¬ë
|
||||
|
||||
@ -1,491 +1,501 @@
|
||||
|
||||
sz htext,'TINYPAD ',APP_VERSION
|
||||
|
||||
menubar_res main_menu,\
|
||||
ru,'” ©«' ,mm.File ,onshow.file ,\
|
||||
ru,'<27>à ¢ª ' ,mm.Edit ,onshow.edit ,\
|
||||
ru,'<27>®¨áª' ,mm.Search ,onshow.search ,\
|
||||
ru,'‡ ¯ãáª' ,mm.Run ,onshow.run ,\
|
||||
ru,'Š®¤¨à®¢ª ',mm.Encoding,onshow.recode ,\
|
||||
ru,'Ž¯æ¨¨' ,mm.Options ,onshow.options,\
|
||||
\
|
||||
en,'File' ,mm.File ,onshow.file ,\
|
||||
en,'Edit' ,mm.Edit ,onshow.edit ,\
|
||||
en,'Search' ,mm.Search ,onshow.search ,\
|
||||
en,'Run' ,mm.Run ,onshow.run ,\
|
||||
en,'Encoding' ,mm.Encoding,onshow.recode ,\
|
||||
en,'Options' ,mm.Options ,onshow.options,\
|
||||
\
|
||||
it,'File' ,mm.File ,onshow.file ,\
|
||||
it,'Modificare' ,mm.Edit ,onshow.edit ,\
|
||||
it,'Ricerca' ,mm.Search ,onshow.search ,\
|
||||
it,'Correre' ,mm.Run ,onshow.run ,\
|
||||
it,'Codifica' ,mm.Encoding,onshow.recode ,\
|
||||
it,'Opzioni' ,mm.Options ,onshow.options,\
|
||||
\
|
||||
et,'Fail' ,mm.File ,onshow.file ,\
|
||||
et,'Muuda' ,mm.Edit ,onshow.edit ,\
|
||||
et,'Otsi' ,mm.Search ,onshow.search ,\
|
||||
et,'Käivita' ,mm.Run ,onshow.run ,\
|
||||
et,'Kodeering',mm.Encoding,onshow.recode ,\
|
||||
et,'Seaded' ,mm.Options ,onshow.options,\
|
||||
\
|
||||
sp,'Archivo' ,mm.File ,onshow.file ,\
|
||||
sp,'Editar' ,mm.Edit ,onshow.edit ,\
|
||||
sp,'Buscar' ,mm.Search ,onshow.search ,\
|
||||
sp,'Ejecutar' ,mm.Run ,onshow.run ,\
|
||||
sp,'Codificación',mm.Encoding,onshow.recode,\
|
||||
sp,'Opciones' ,mm.Options ,onshow.options
|
||||
|
||||
popup_res mm.File,\
|
||||
ru,'<27>®¢ë©' ,'Ctrl+N' ,New ,\
|
||||
ru,'Žâªàëâì...','Ctrl+O' ,Open ,\
|
||||
ru,'‘®åà ¨âì' ,'Ctrl+S' ,Save ,\
|
||||
ru,'‘®åà ¨âì ª ª...','Ctrl+Shift+S',SaveAs,\
|
||||
ru,'-','',,\
|
||||
ru,'‡ ªàëâì' ,'Ctrl+F4' ,Close ,\
|
||||
ru,'-','',,\
|
||||
ru,'‚ë室' ,'Alt+X' ,Exit ,\
|
||||
\
|
||||
en,'New' ,'Ctrl+N' ,New ,\
|
||||
en,'Open...' ,'Ctrl+O' ,Open ,\
|
||||
en,'Save' ,'Ctrl+S' ,Save ,\
|
||||
en,'Save as...','Ctrl+Shift+S',SaveAs ,\
|
||||
en,'-','',,\
|
||||
en,'Close' ,'Ctrl+F4' ,Close ,\
|
||||
en,'-','',,\
|
||||
en,'Exit' ,'Alt+X' ,Exit ,\
|
||||
\
|
||||
it,'Nuovo' ,'Ctrl+N' ,New ,\
|
||||
it,'Aperto...' ,'Ctrl+O' ,Open ,\
|
||||
it,'Salva' ,'Ctrl+S' ,Save ,\
|
||||
it,'Salva come...','Ctrl+Shift+S',SaveAs ,\
|
||||
it,'-','',,\
|
||||
it,'Chiudi' ,'Ctrl+F4' ,Close ,\
|
||||
it,'-','',,\
|
||||
it,'Uscita' ,'Alt+X' ,Exit ,\
|
||||
\
|
||||
et,'Uus' ,'Ctrl+N' ,New ,\
|
||||
et,'Ava...' ,'Ctrl+O' ,Open ,\
|
||||
et,'Salvesta' ,'Ctrl+S' ,Save ,\
|
||||
et,'Salvesta nimega...','Ctrl+Shift+S',SaveAs,\
|
||||
et,'-','',,\
|
||||
et,'Sulge' ,'Ctrl+F4' ,Close ,\
|
||||
et,'-','',,\
|
||||
et,'Välju' ,'Alt+X' ,Exit ,\
|
||||
\
|
||||
sp,'Nuevo' ,'Ctrl+N' ,New ,\
|
||||
sp,'Abrir...' ,'Ctrl+O' ,Open ,\
|
||||
sp,'Guardar' ,'Ctrl+S' ,Save ,\
|
||||
sp,'Guardar como...','Ctrl+Shift+S',SaveAs,\
|
||||
sp,'-','',,\
|
||||
sp,'Cerrar' ,'Ctrl+F4',Close,\
|
||||
sp,'-','',,\
|
||||
sp,'Salir' ,'Alt+X' ,Exit
|
||||
|
||||
popup_res mm.Edit,\
|
||||
ru,'‚ë१ âì' ,'Ctrl+X',Cut ,\
|
||||
ru,'Š®¯¨à®¢ âì' ,'Ctrl+C',Copy ,\
|
||||
ru,'‚áâ ¢¨âì' ,'Ctrl+V',Insert,\
|
||||
ru,'“¤ «¨âì' ,'' ,Delete,\
|
||||
ru,'-','',,\
|
||||
ru,'‚뤥«¨âì ¢áñ' ,'Ctrl+A',SelAll,\
|
||||
\
|
||||
en,'Cut' ,'Ctrl+X',Cut ,\
|
||||
en,'Copy' ,'Ctrl+C',Copy ,\
|
||||
en,'Paste' ,'Ctrl+V',Insert,\
|
||||
en,'Delete' ,'' ,Delete,\
|
||||
en,'-','',,\
|
||||
en,'Select all','Ctrl+A',SelAll,\
|
||||
\
|
||||
it,'Taglio' ,'Ctrl+X',Cut ,\
|
||||
it,'Copia' ,'Ctrl+C',Copy ,\
|
||||
it,'Incolla' ,'Ctrl+V',Insert,\
|
||||
it,'Elimina' ,'' ,Delete,\
|
||||
it,'-','',,\
|
||||
it,'Seleziona tutto','Ctrl+A',SelAll,\
|
||||
\
|
||||
et,'Lõika' ,'Ctrl+X',Cut ,\
|
||||
et,'Kopeeri' ,'Ctrl+C',Copy ,\
|
||||
et,'Kleebi' ,'Ctrl+V',Insert,\
|
||||
et,'Kustuta' ,'' ,Delete,\
|
||||
et,'-','',,\
|
||||
et,'Vali kõik','Ctrl+A',SelAll,\
|
||||
\
|
||||
sp,'Cortar' ,'Ctrl+X',Cut ,\
|
||||
sp,'Copiar' ,'Ctrl+C',Copy ,\
|
||||
sp,'Pegar' ,'Ctrl+V',Insert,\
|
||||
sp,'Eliminar' ,'' ,Delete,\
|
||||
sp,'-','',,\
|
||||
sp,'Seleccionar todo','Ctrl+A',SelAll
|
||||
|
||||
popup_res mm.Search,\
|
||||
ru,'<27>¥à¥©â¨...' ,'Ctrl+G',Position,\
|
||||
ru,'-','',,\
|
||||
ru,'<27> ©â¨...' ,'Ctrl+F',Find ,\
|
||||
ru,'<27> ©â¨ ¤ «¥¥','F3' ,FindNext,\
|
||||
ru,'‡ ¬¥¨âì...','Ctrl+H',Replace ,\
|
||||
\
|
||||
en,'Position...','Ctrl+G',Position,\
|
||||
en,'-','',,\
|
||||
en,'Find...' ,'Ctrl+F',Find ,\
|
||||
en,'Find next' ,'F3' ,FindNext,\
|
||||
en,'Replace...' ,'Ctrl+H',Replace ,\
|
||||
\
|
||||
it,'Posizione...','Ctrl+G',Position,\
|
||||
it,'-','',,\
|
||||
it,'Trova...' ,'Ctrl+F',Find ,\
|
||||
it,'Trova il prossimo' ,'F3' ,FindNext,\
|
||||
it,'Sostituire...' ,'Ctrl+H',Replace ,\
|
||||
\
|
||||
et,'Positsioon...','Ctrl+G',Position,\
|
||||
et,'-','',,\
|
||||
et,'Leia...' ,'Ctrl+F',Find ,\
|
||||
et,'Leia järgmine','F3' ,FindNext,\
|
||||
et,'Asenda...' ,'Ctrl+H',Replace ,\
|
||||
\
|
||||
sp,'Posición...' ,'Ctrl+G',Position,\
|
||||
sp,'-','',,\
|
||||
sp,'Buscar...' ,'Ctrl+F',Find ,\
|
||||
sp,'Buscar siguiente','F3' ,FindNext,\
|
||||
sp,'Reemplazar...','Ctrl+H',Replace
|
||||
|
||||
popup_res mm.Run,\
|
||||
ru,'‡ ¯ãáâ¨âì' ,'F9' ,Run ,\
|
||||
ru,'‡ ¯ãáâ¨âì ¢ ¤¥¡ ££¥à¥','F10',Debug ,\
|
||||
ru,'Š®¬¯¨«¨à®¢ âì' ,'Ctrl+F9',Compile ,\
|
||||
ru,'-','',,\
|
||||
ru,'„®áª ®â« ¤ª¨' ,'' ,DbgBoard,\
|
||||
ru,'‘¨áâ¥¬ë¥ äãªæ¨¨','' ,SysFuncs,\
|
||||
\
|
||||
en,'Run' ,'F9' ,Run ,\
|
||||
en,'Run in debugger' ,'F10' ,Debug ,\
|
||||
en,'Compile' ,'Ctrl+F9',Compile ,\
|
||||
en,'-','',,\
|
||||
en,'Debug board' ,'' ,DbgBoard,\
|
||||
en,'System functions' ,'' ,SysFuncs,\
|
||||
\
|
||||
it,'Correre' ,'F9' ,Run ,\
|
||||
it,'Esegui nel debugger','F10',Debug ,\
|
||||
it,'Compilare','Ctrl+F9',Compile ,\
|
||||
it,'-','',,\
|
||||
it,'Scheda di debug' ,'' ,DbgBoard,\
|
||||
it,'Funzioni di sistema','' ,SysFuncs,\
|
||||
\
|
||||
et,'Käivita' ,'F9' ,Run ,\
|
||||
et,'Käivita aastal siluri','F10',Debug ,\
|
||||
et,'Kompileeri' ,'Ctrl+F9',Compile ,\
|
||||
et,'-','',,\
|
||||
et,'Silumis paneel' ,'' ,DbgBoard,\
|
||||
et,'Süsteemi funktsioonid','' ,SysFuncs,\
|
||||
\
|
||||
sp,'Ejecutar' ,'F9' ,Run ,\
|
||||
sp,'Ejecutar en el depurador','F10',Debug,\
|
||||
sp,'Compilar' ,'Ctrl+F9',Compile ,\
|
||||
sp,'-','',,\
|
||||
sp,'Depuración' ,'' ,DbgBoard,\
|
||||
sp,'Funciones del sistema' ,'',SysFuncs
|
||||
|
||||
popup_res mm.Encoding,\
|
||||
@!,<'CP866 ',0x1A,' CP1251'>,'',CP866.CP1251,\
|
||||
@!,<'CP1251 ',0x1A,' CP866' >,'',CP1251.CP866,\
|
||||
@!,<'-'>,'',,\
|
||||
@!,<'CP866 ',0x1A,' KOI8-R'>,'',CP866.KOI8R ,\
|
||||
@!,<'KOI8-R ',0x1A,' CP866' >,'',KOI8R.CP866 ,\
|
||||
@!,<'-'>,'',,\
|
||||
@!,<'CP1251 ',0x1A,' KOI8-R'>,'',CP1251.KOI8R,\
|
||||
@!,<'KOI8-R ',0x1A,' CP1251'>,'',KOI8R.CP1251
|
||||
|
||||
popup_res mm.Options,\
|
||||
ru,'“¢¥«¨ç¨âì' ,'Ctrl +',ZoomIn ,\
|
||||
ru,'“¬¥ìè¨âì' ,'Ctrl -',ZoomOut ,\
|
||||
ru,'-','',,\
|
||||
ru,'<27>®¬¥à áâப' ,'',LineNumbers ,\
|
||||
ru,'<27>¥§®¯ ᮥ ¢ë¤¥«¥¨¥' ,'',SecureSel ,\
|
||||
ru,'€¢â®¬ â¨ç¥áª¨¥ ᪮¡ª¨' ,'',AutoBrackets,\
|
||||
ru,'€¢â®¬ â¨ç¥áª¨© ®âáâã¯' ,'',AutoIndents ,\
|
||||
ru,'Ž¯â¨¬ «ì®¥ á®åà ¥¨¥' ,'',OptimalFill ,\
|
||||
ru,'-','',,\
|
||||
ru,'‚¥è¨© ¢¨¤...' ,'',Appearance ,\
|
||||
\
|
||||
en,'Zoom in' ,'Ctrl +',ZoomIn ,\
|
||||
en,'Zoom out' ,'Ctrl -',ZoomOut ,\
|
||||
en,'-','',,\
|
||||
en,'Line numbers' ,'',LineNumbers ,\
|
||||
en,'Secure selection' ,'',SecureSel ,\
|
||||
en,'Automatic brackets' ,'',AutoBrackets,\
|
||||
en,'Automatic indents' ,'',AutoIndents ,\
|
||||
en,'Optimal fill on saving' ,'',OptimalFill ,\
|
||||
en,'-','',,\
|
||||
en,'Appearance...' ,'',Appearance ,\
|
||||
\
|
||||
it,'Ingrandire' ,'Ctrl +',ZoomIn ,\
|
||||
it,'Rimpicciolisci' ,'Ctrl -',ZoomOut ,\
|
||||
it,'-','',,\
|
||||
it,'Numeri di riga' ,'',LineNumbers ,\
|
||||
it,'Selezione sicura' ,'',SecureSel ,\
|
||||
it,'Staffe automatiche' ,'',AutoBrackets,\
|
||||
it,'Rientri automatici' ,'',AutoIndents ,\
|
||||
it,'Combina spazi' ,'',OptimalFill ,\
|
||||
it,'-','',,\
|
||||
it,'Aspetto...' ,'',Appearance ,\
|
||||
\
|
||||
et,'Zoom in' ,'Ctrl +',ZoomIn ,\
|
||||
et,'Zoom out' ,'Ctrl -',ZoomOut ,\
|
||||
et,'-','',,\
|
||||
et,'Rea numbrid' ,'',LineNumbers ,\
|
||||
et,'Turvaline valimine' ,'',SecureSel ,\
|
||||
et,'Automaatsed sulud' ,'',AutoBrackets,\
|
||||
et,'Automaatsed taandread' ,'',AutoIndents ,\
|
||||
et,'Optimaalne täitmine salvestamisel','',OptimalFill,\
|
||||
et,'-','',,\
|
||||
et,'Välimus...' ,'',Appearance ,\
|
||||
\
|
||||
sp,'Zoom in' ,'Ctrl +',ZoomIn ,\
|
||||
sp,'Zoom out' ,'Ctrl -',ZoomOut ,\
|
||||
sp,'-','',,\
|
||||
sp,'Números en líneas' ,'',LineNumbers ,\
|
||||
sp,'Selección segura' ,'',SecureSel ,\
|
||||
sp,'Paréntesis automáticos' ,'',AutoBrackets,\
|
||||
sp,'Identación automática' ,'',AutoIndents ,\
|
||||
sp,'Llenado óptimo al guardar','',OptimalFill ,\
|
||||
sp,'-','',,\
|
||||
sp,'Apariencia...' ,'',Appearance
|
||||
|
||||
lsz s_defname,\
|
||||
ru,<'<27>¥§ë¬ïë©',0>,\
|
||||
en,<'Untitled',0>,\
|
||||
it,<'Senza titolo',0>,\
|
||||
et,<'Nimetu',0>,\
|
||||
sp,<'Sin título',0>
|
||||
|
||||
lsz s_modified,\
|
||||
ru,'ˆ§¬¥¥®',\
|
||||
en,'Modified',\
|
||||
it,'Modificato',\
|
||||
et,'Muudetud',\
|
||||
sp,'Modificado'
|
||||
|
||||
lsz s_2filename,\
|
||||
ru,'ˆ¬ï ä ©« :',\
|
||||
en,'Filename:',\
|
||||
en,'Nome del file:',\
|
||||
et,'Faili nimi:',\
|
||||
sp,'Nombre de archivo:'
|
||||
lsz s_2open,\
|
||||
ru,'Žâªàëâì',\
|
||||
en,'Open',\
|
||||
it,'Aperto',\
|
||||
et,'Ava',\
|
||||
sp,'Abrir'
|
||||
lsz s_2save,\
|
||||
ru,'‘®åà ¨âì',\
|
||||
en,'Save',\
|
||||
it,'Salva',\
|
||||
et,'Salvesta',\
|
||||
sp,'Guardar'
|
||||
lsz s_2save_no,\
|
||||
ru,'<27>¥â',\
|
||||
en,'No',\
|
||||
it,'No',\
|
||||
et,'Ei',\
|
||||
sp,'No'
|
||||
lsz s_2find,\
|
||||
ru,'<27> ©â¨',\
|
||||
en,'Find',\
|
||||
it,'Trova',\
|
||||
et,'Leia',\
|
||||
sp,'Buscar'
|
||||
db ':'
|
||||
lsz s_2replace,\
|
||||
ru,'‡ ¬¥¨âì',\
|
||||
en,'Replace',\
|
||||
it,'Sostituire',\
|
||||
et,'Asenda',\
|
||||
sp,'Reemplazar'
|
||||
db ':'
|
||||
lsz s_2cancel,\
|
||||
ru,'Žâ¬¥ ',\
|
||||
en,'Cancel',\
|
||||
it,'Annulla',\
|
||||
et,'Tühista',\
|
||||
sp,'Cancelar'
|
||||
lsz s_color,\
|
||||
ru,'–¢¥â: 0x',\
|
||||
en,'Color: 0x',\
|
||||
it,'Colore: 0x',\
|
||||
et,'Värv: 0x',\
|
||||
sp,'Color: 0x'
|
||||
lsz s_tabpos,\
|
||||
ru,'<27> ᯮ«®¦¥¨¥ § ª« ¤®ª',\
|
||||
en,'Tabs placement',\
|
||||
it,'Posizionamento delle schede',\
|
||||
et,'Saki asetus',\
|
||||
sp,'Lugar de tabulador'
|
||||
|
||||
lsz s_enter_filename,\
|
||||
ru,<'‚¢¥¤¨â¥ ¨¬ï ä ©« ',0>,\
|
||||
en,<'Enter filename',0>,\
|
||||
it,<'Inserisci il nome del file',0>,\
|
||||
et,<'Sisesta faili nimi',0>,\
|
||||
sp,<'Ingresa el nombre del archivo',0>
|
||||
|
||||
lsz s_ask_save,\
|
||||
ru,<'†¥« ¥â¥ á®åà ¨âì?',0>,\
|
||||
en,<'Would you like to save?',0>,\
|
||||
it,<'Vorresti salvare?',0>,\
|
||||
et,<'Kas soovite salvestada?',0>,\ ; Now correct
|
||||
sp,<'¿Quieres guardar?',0>
|
||||
|
||||
lsz s_enter_text_to_find,\
|
||||
ru,<'‚¢¥¤¨â¥ ⥪áâ ¤«ï ¯®¨áª ',0>,\
|
||||
en,<'Enter text to find',0>,\
|
||||
it,<'Inserisci il testo per trovare',0>,\
|
||||
et,<'Sisesta otsitav tekst',0>,\
|
||||
sp,<'Ingresa el texto a buscar',0>
|
||||
|
||||
lsz s_enter_text_to_replace,\
|
||||
ru,<'‚¢¥¤¨â¥ ⥪áâ ¤«ï § ¬¥ë',0>,\
|
||||
en,<'Enter text to replace',0>,\
|
||||
it,<'Inserisci il testo da sostituire',0>,\
|
||||
et,<'Sisesta asendatav tekst',0>,\
|
||||
sp,<'Ingresa el texto a reemplazar',0>
|
||||
|
||||
lsz s_text_not_found,\
|
||||
ru,<'„®á⨣ãâ ª®¥æ ä ©« , ⥪áâ ¥ ©¤¥',0>,\
|
||||
en,<'Reached end of file, text not found',0>,\
|
||||
it,<'Raggiunta la fine del file, testo non trovato',0>,\
|
||||
et,<'Faili lõpp, teksti ei leitud',0>,\
|
||||
sp,<'Se llegó al final del archivo, texto no encontrado',0>
|
||||
|
||||
lszc s_fs_error,b,\
|
||||
ru,<'Ž¯¥à æ¨ï § ¢¥àè¥ ãá¯¥è® (0)',0>,\
|
||||
ru,<'',0>,\
|
||||
ru,<'”ãªæ¨ï ¥ ¯®¤¤¥à¦¨¢ ¥âáï ¤«ï ¤ ®© ä ©«®¢®© á¨á⥬ë (2)',0>,\
|
||||
ru,<'<27>¥¨§¢¥áâ ï ä ©«®¢ ï á¨á⥬ (3)',0>,\
|
||||
ru,<'',0>,\
|
||||
ru,<'<27>¥¢®§¬®¦® ®âªàëâì ä ©« (5)',0>,\
|
||||
ru,<'Ž¯¥à æ¨ï § ¢¥àè¥ ãá¯¥è® (6)',0>,\
|
||||
ru,<'€¤à¥á 室¨âáï § £à ¨æ ¬¨ ¯ ¬ï⨠¯à®£à ¬¬ë (7)',0>,\
|
||||
ru,<'<27> ¤¨áª¥ ¥â ᢮¡®¤®£® ¬¥áâ (8)',0>,\
|
||||
ru,<'’ ¡«¨æ FAT ã¨ç⮦¥ (9)',0>,\
|
||||
ru,<'„®áâ㯠§ ¯à¥éñ (10)',0>,\
|
||||
ru,<'Žè¨¡ª ãáâனá⢠(11)',0>,\
|
||||
\
|
||||
en,<'Operation executed successfully (0)',0>,\
|
||||
en,<'',0>,\
|
||||
en,<'Function is not supported for the given filesystem (2)',0>,\
|
||||
en,<'Unknown filesystem (3)',0>,\
|
||||
en,<'',0>,\
|
||||
en,<'Unable to open file (5)',0>,\
|
||||
en,<'Operation executed successfully (6)',0>,\
|
||||
en,<'Pointer lies outside of application memory (7)',0>,\
|
||||
en,<'Disk is full (8)',0>,\
|
||||
en,<'FAT table is destroyed (9)',0>,\
|
||||
en,<'Access denied (10)',0>,\
|
||||
en,<'Device error (11)',0>,\
|
||||
\
|
||||
it,<'Operazione eseguita correttamente (0)',0>,\
|
||||
it,<'',0>,\
|
||||
it,<'La funzione non e supportata per il file system specificato (2)', 0>, \
|
||||
it,<'Unknown filesystem (3)',0>,\
|
||||
it,<'',0>,\
|
||||
it,<'Impossibile aprire il file (5)',0>,\
|
||||
it,<'Operazione eseguita correttamente (6)',0>,\
|
||||
it,<'Il puntatore si trova al di fuori della memoria dell',96,'applicazione (7)', 0>, \
|
||||
it,<'Il disco e pieno (8)',0>,\
|
||||
it,<'La tabella FAT e distrutta (9)',0>,\
|
||||
it,<'Accesso negato (10)',0>,\
|
||||
it,<'Errore dispositivo (11)',0>,\
|
||||
\
|
||||
et,<'Operatsioon käivitati edukalt (0)',0>,\
|
||||
et,<'',0>,\
|
||||
et,<'Failisüsteem ei toeta funktsiooni (2)',0>,\
|
||||
et,<'Tundmatu failisüsteem (3)',0>,\
|
||||
et,<'',0>,\
|
||||
et,<'Faili ei suudetud avada (5)',0>,\
|
||||
et,<'Operatsioon käivitatud edukalt (6)',0>,\
|
||||
et,<'Viit on väljaspool programmi mälu (7)',0>,\
|
||||
et,<'Ketas täis (8)',0>,\
|
||||
et,<'FAT tabel hävitatud (9)',0>,\
|
||||
et,<'Juurdepääs keelatud (10)',0>,\
|
||||
et,<'Seadme viga (11)',0>,\
|
||||
\
|
||||
sp,<'Operación ejecutada correctamente (0)',0>,\
|
||||
sp,<'',0>,\
|
||||
sp,<'La función no está soportada por el sistema de archivos dado (2)',0>,\
|
||||
sp,<'Sistema de archivos desconocido (3)',0>,\
|
||||
sp,<'',0>,\
|
||||
sp,<'No es posible abrir el archivo (5)',0>,\
|
||||
sp,<'Operación ejecutada correctamente (6)',0>,\
|
||||
sp,<'El puntero está fuera de la memoria de la aplicación (7)',0>,\
|
||||
sp,<'El disco está lleno (8)',0>,\
|
||||
sp,<'La tabla FAT está destruida (9)',0>,\
|
||||
sp,<'Acceso denegado (10)',0>,\
|
||||
sp,<'Error de dispositivo (11)',0>
|
||||
|
||||
lszc s_appearance,b,\
|
||||
ru,'’¥ªáâ',\
|
||||
ru,'”®',\
|
||||
ru,'’¥ªá⠢뤥«¥¨ï',\
|
||||
ru,'”® ¢ë¤¥«¥¨ï',\
|
||||
ru,'‘¨¬¢®«ë',\
|
||||
ru,'—¨á« ',\
|
||||
ru,'‘âப¨',\
|
||||
ru,'Š®¬¬¥â ਨ',\
|
||||
ru,'ˆ§¬¥ñë¥ áâப¨',\
|
||||
ru,'‘®åà ñë¥ áâப¨',\
|
||||
\
|
||||
en,'Text',\
|
||||
en,'Background',\
|
||||
en,'Selection text',\
|
||||
en,'Selection background',\
|
||||
en,'Symbols',\
|
||||
en,'Numbers',\
|
||||
en,'Strings',\
|
||||
en,'Comments',\
|
||||
en,'Modified lines',\
|
||||
en,'Saved lines',\
|
||||
\
|
||||
it,'Testo',\
|
||||
it,'Sfondo',\
|
||||
it,'Testo di selezione',\
|
||||
it,'Sfondo di selezione',\
|
||||
it,'Simboli',\
|
||||
it,'Numeri',\
|
||||
it,'Stringhe',\
|
||||
it,'Commenti',\
|
||||
it,'Linee modificate',\
|
||||
it,'Linee salvate',\
|
||||
\
|
||||
et,'Tekst',\
|
||||
et,'Taust',\
|
||||
et,'Valitud tekst',\
|
||||
et,'Valitud taust',\
|
||||
et,'Sümbolid',\
|
||||
et,'Numbrid',\
|
||||
et,'Stringid',\
|
||||
et,'Kommentaarid',\
|
||||
et,'Muudetud read',\
|
||||
et,'Salvestatud read',\
|
||||
\
|
||||
sp,'Texto',\
|
||||
sp,'Fondo',\
|
||||
sp,'Texto de selección',\
|
||||
sp,'Fondo de selección',\
|
||||
sp,'Símbolos',\
|
||||
sp,'Números',\
|
||||
sp,'Cadenas',\
|
||||
sp,'Comentarios',\
|
||||
sp,'Líneas modificadas',\
|
||||
sp,'Líneas guardadas'
|
||||
|
||||
lsz sysfuncs_filename,\
|
||||
ru,<'SYSFUNCR.TXT',0>,\
|
||||
en,<'SYSFUNCS.TXT',0>,\
|
||||
it,<'SYSFUNCS.TXT',0>,\
|
||||
et,<'SYSFUNCET.TXT',0>,\
|
||||
sp,<'SYSFUNCS.TXT',0>
|
||||
|
||||
sz s_example,'/sys/example.asm'
|
||||
sz s_still ,'still'
|
||||
|
||||
sz htext,'TINYPAD ',APP_VERSION
|
||||
|
||||
; Language support for locales: ru_RU (CP866), en_US, it_IT, et_EE, es_ES.
|
||||
|
||||
menubar_res main_menu,\
|
||||
ru_RU,'” ©«' ,mm.File ,onshow.file ,\
|
||||
ru_RU,'<27>à ¢ª ' ,mm.Edit ,onshow.edit ,\
|
||||
ru_RU,'<27>®¨áª' ,mm.Search ,onshow.search ,\
|
||||
ru_RU,'‡ ¯ãáª' ,mm.Run ,onshow.run ,\
|
||||
ru_RU,'Š®¤¨à®¢ª ',mm.Encoding,onshow.recode ,\
|
||||
ru_RU,'Ž¯æ¨¨' ,mm.Options ,onshow.options,\
|
||||
\
|
||||
en_US,'File' ,mm.File ,onshow.file ,\
|
||||
en_US,'Edit' ,mm.Edit ,onshow.edit ,\
|
||||
en_US,'Search' ,mm.Search ,onshow.search ,\
|
||||
en_US,'Run' ,mm.Run ,onshow.run ,\
|
||||
en_US,'Encoding' ,mm.Encoding,onshow.recode ,\
|
||||
en_US,'Options' ,mm.Options ,onshow.options,\
|
||||
\
|
||||
it_IT,'File' ,mm.File ,onshow.file ,\
|
||||
it_IT,'Modificare' ,mm.Edit ,onshow.edit ,\
|
||||
it_IT,'Ricerca' ,mm.Search ,onshow.search ,\
|
||||
it_IT,'Correre' ,mm.Run ,onshow.run ,\
|
||||
it_IT,'Codifica' ,mm.Encoding,onshow.recode ,\
|
||||
it_IT,'Opzioni' ,mm.Options ,onshow.options,\
|
||||
\
|
||||
et_EE,'Fail' ,mm.File ,onshow.file ,\
|
||||
et_EE,'Muuda' ,mm.Edit ,onshow.edit ,\
|
||||
et_EE,'Otsi' ,mm.Search ,onshow.search ,\
|
||||
et_EE,'Käivita' ,mm.Run ,onshow.run ,\
|
||||
et_EE,'Kodeering',mm.Encoding,onshow.recode ,\
|
||||
et_EE,'Seaded' ,mm.Options ,onshow.options,\
|
||||
\
|
||||
es_ES,'Archivo' ,mm.File ,onshow.file ,\
|
||||
es_ES,'Editar' ,mm.Edit ,onshow.edit ,\
|
||||
es_ES,'Buscar' ,mm.Search ,onshow.search ,\
|
||||
es_ES,'Ejecutar' ,mm.Run ,onshow.run ,\
|
||||
es_ES,'Codificación',mm.Encoding,onshow.recode,\
|
||||
es_ES,'Opciones' ,mm.Options ,onshow.options
|
||||
|
||||
popup_res mm.File,\
|
||||
ru_RU,'<27>®¢ë©' ,'Ctrl+N' ,New ,\
|
||||
ru_RU,'Žâªàëâì...','Ctrl+O' ,Open ,\
|
||||
ru_RU,'‘®åà ¨âì' ,'Ctrl+S' ,Save ,\
|
||||
ru_RU,'‘®åà ¨âì ª ª...','Ctrl+Shift+S',SaveAs,\
|
||||
ru_RU,'-','',,\
|
||||
ru_RU,'‡ ªàëâì' ,'Ctrl+F4' ,Close ,\
|
||||
ru_RU,'-','',,\
|
||||
ru_RU,'‚ë室' ,'Alt+X' ,Exit ,\
|
||||
\
|
||||
en_US,'New' ,'Ctrl+N' ,New ,\
|
||||
en_US,'Open...' ,'Ctrl+O' ,Open ,\
|
||||
en_US,'Save' ,'Ctrl+S' ,Save ,\
|
||||
en_US,'Save as...','Ctrl+Shift+S',SaveAs ,\
|
||||
en_US,'-','',,\
|
||||
en_US,'Close' ,'Ctrl+F4' ,Close ,\
|
||||
en_US,'-','',,\
|
||||
en_US,'Exit' ,'Alt+X' ,Exit ,\
|
||||
\
|
||||
it_IT,'Nuovo' ,'Ctrl+N' ,New ,\
|
||||
it_IT,'Aperto...' ,'Ctrl+O' ,Open ,\
|
||||
it_IT,'Salva' ,'Ctrl+S' ,Save ,\
|
||||
it_IT,'Salva come...','Ctrl+Shift+S',SaveAs ,\
|
||||
it_IT,'-','',,\
|
||||
it_IT,'Chiudi' ,'Ctrl+F4' ,Close ,\
|
||||
it_IT,'-','',,\
|
||||
it_IT,'Uscita' ,'Alt+X' ,Exit ,\
|
||||
\
|
||||
et_EE,'Uus' ,'Ctrl+N' ,New ,\
|
||||
et_EE,'Ava...' ,'Ctrl+O' ,Open ,\
|
||||
et_EE,'Salvesta' ,'Ctrl+S' ,Save ,\
|
||||
et_EE,'Salvesta nimega...','Ctrl+Shift+S',SaveAs,\
|
||||
et_EE,'-','',,\
|
||||
et_EE,'Sulge' ,'Ctrl+F4' ,Close ,\
|
||||
et_EE,'-','',,\
|
||||
et_EE,'Välju' ,'Alt+X' ,Exit ,\
|
||||
\
|
||||
es_ES,'Nuevo' ,'Ctrl+N' ,New ,\
|
||||
es_ES,'Abrir...' ,'Ctrl+O' ,Open ,\
|
||||
es_ES,'Guardar' ,'Ctrl+S' ,Save ,\
|
||||
es_ES,'Guardar como...','Ctrl+Shift+S',SaveAs,\
|
||||
es_ES,'-','',,\
|
||||
es_ES,'Cerrar' ,'Ctrl+F4',Close,\
|
||||
es_ES,'-','',,\
|
||||
es_ES,'Salir' ,'Alt+X' ,Exit
|
||||
|
||||
popup_res mm.Edit,\
|
||||
ru_RU,'‚ë१ âì' ,'Ctrl+X',Cut ,\
|
||||
ru_RU,'Š®¯¨à®¢ âì' ,'Ctrl+C',Copy ,\
|
||||
ru_RU,'‚áâ ¢¨âì' ,'Ctrl+V',Insert,\
|
||||
ru_RU,'“¤ «¨âì' ,'' ,Delete,\
|
||||
ru_RU,'-','',,\
|
||||
ru_RU,'‚뤥«¨âì ¢áñ' ,'Ctrl+A',SelAll,\
|
||||
\
|
||||
en_US,'Cut' ,'Ctrl+X',Cut ,\
|
||||
en_US,'Copy' ,'Ctrl+C',Copy ,\
|
||||
en_US,'Paste' ,'Ctrl+V',Insert,\
|
||||
en_US,'Delete' ,'' ,Delete,\
|
||||
en_US,'-','',,\
|
||||
en_US,'Select all','Ctrl+A',SelAll,\
|
||||
\
|
||||
it_IT,'Taglio' ,'Ctrl+X',Cut ,\
|
||||
it_IT,'Copia' ,'Ctrl+C',Copy ,\
|
||||
it_IT,'Incolla' ,'Ctrl+V',Insert,\
|
||||
it_IT,'Elimina' ,'' ,Delete,\
|
||||
it_IT,'-','',,\
|
||||
it_IT,'Seleziona tutto','Ctrl+A',SelAll,\
|
||||
\
|
||||
et_EE,'Lõika' ,'Ctrl+X',Cut ,\
|
||||
et_EE,'Kopeeri' ,'Ctrl+C',Copy ,\
|
||||
et_EE,'Kleebi' ,'Ctrl+V',Insert,\
|
||||
et_EE,'Kustuta' ,'' ,Delete,\
|
||||
et_EE,'-','',,\
|
||||
et_EE,'Vali kõik','Ctrl+A',SelAll,\
|
||||
\
|
||||
es_ES,'Cortar' ,'Ctrl+X',Cut ,\
|
||||
es_ES,'Copiar' ,'Ctrl+C',Copy ,\
|
||||
es_ES,'Pegar' ,'Ctrl+V',Insert,\
|
||||
es_ES,'Eliminar' ,'' ,Delete,\
|
||||
es_ES,'-','',,\
|
||||
es_ES,'Seleccionar todo','Ctrl+A',SelAll
|
||||
|
||||
popup_res mm.Search,\
|
||||
ru_RU,'<27>¥à¥©â¨...' ,'Ctrl+G',Position,\
|
||||
ru_RU,'-','',,\
|
||||
ru_RU,'<27> ©â¨...' ,'Ctrl+F',Find ,\
|
||||
ru_RU,'<27> ©â¨ ¤ «¥¥','F3' ,FindNext,\
|
||||
ru_RU,'‡ ¬¥¨âì...','Ctrl+H',Replace ,\
|
||||
\
|
||||
en_US,'Position...','Ctrl+G',Position,\
|
||||
en_US,'-','',,\
|
||||
en_US,'Find...' ,'Ctrl+F',Find ,\
|
||||
en_US,'Find next' ,'F3' ,FindNext,\
|
||||
en_US,'Replace...' ,'Ctrl+H',Replace ,\
|
||||
\
|
||||
it_IT,'Posizione...','Ctrl+G',Position,\
|
||||
it_IT,'-','',,\
|
||||
it_IT,'Trova...' ,'Ctrl+F',Find ,\
|
||||
it_IT,'Trova il prossimo' ,'F3' ,FindNext,\
|
||||
it_IT,'Sostituire...' ,'Ctrl+H',Replace ,\
|
||||
\
|
||||
et_EE,'Positsioon...','Ctrl+G',Position,\
|
||||
et_EE,'-','',,\
|
||||
et_EE,'Leia...' ,'Ctrl+F',Find ,\
|
||||
et_EE,'Leia järgmine','F3' ,FindNext,\
|
||||
et_EE,'Asenda...' ,'Ctrl+H',Replace ,\
|
||||
\
|
||||
es_ES,'Posición...' ,'Ctrl+G',Position,\
|
||||
es_ES,'-','',,\
|
||||
es_ES,'Buscar...' ,'Ctrl+F',Find ,\
|
||||
es_ES,'Buscar siguiente','F3' ,FindNext,\
|
||||
es_ES,'Reemplazar...','Ctrl+H',Replace
|
||||
|
||||
popup_res mm.Run,\
|
||||
ru_RU,'‡ ¯ãáâ¨âì' ,'F9' ,Run ,\
|
||||
ru_RU,'‡ ¯ãáâ¨âì ¢ ¤¥¡ ££¥à¥','F10',Debug ,\
|
||||
ru_RU,'Š®¬¯¨«¨à®¢ âì' ,'Ctrl+F9',Compile ,\
|
||||
ru_RU,'-','',,\
|
||||
ru_RU,'„®áª ®â« ¤ª¨' ,'' ,DbgBoard,\
|
||||
ru_RU,'‘¨áâ¥¬ë¥ äãªæ¨¨','' ,SysFuncs,\
|
||||
\
|
||||
en_US,'Run' ,'F9' ,Run ,\
|
||||
en_US,'Run in debugger' ,'F10' ,Debug ,\
|
||||
en_US,'Compile' ,'Ctrl+F9',Compile ,\
|
||||
en_US,'-','',,\
|
||||
en_US,'Debug board' ,'' ,DbgBoard,\
|
||||
en_US,'System functions' ,'' ,SysFuncs,\
|
||||
\
|
||||
it_IT,'Correre' ,'F9' ,Run ,\
|
||||
it_IT,'Esegui nel debugger','F10',Debug ,\
|
||||
it_IT,'Compilare','Ctrl+F9',Compile ,\
|
||||
it_IT,'-','',,\
|
||||
it_IT,'Scheda di debug' ,'' ,DbgBoard,\
|
||||
it_IT,'Funzioni di sistema','' ,SysFuncs,\
|
||||
\
|
||||
et_EE,'Käivita' ,'F9' ,Run ,\
|
||||
et_EE,'Käivita aastal siluri','F10',Debug ,\
|
||||
et_EE,'Kompileeri' ,'Ctrl+F9',Compile ,\
|
||||
et_EE,'-','',,\
|
||||
et_EE,'Silumis paneel' ,'' ,DbgBoard,\
|
||||
et_EE,'Süsteemi funktsioonid','' ,SysFuncs,\
|
||||
\
|
||||
es_ES,'Ejecutar' ,'F9' ,Run ,\
|
||||
es_ES,'Ejecutar en el depurador','F10',Debug,\
|
||||
es_ES,'Compilar' ,'Ctrl+F9',Compile ,\
|
||||
es_ES,'-','',,\
|
||||
es_ES,'Depuración' ,'' ,DbgBoard,\
|
||||
es_ES,'Funciones del sistema' ,'',SysFuncs
|
||||
|
||||
popup_res mm.Encoding,\
|
||||
@!,<'CP866 ',0x1A,' CP1251'>,'',CP866.CP1251,\
|
||||
@!,<'CP1251 ',0x1A,' CP866' >,'',CP1251.CP866,\
|
||||
@!,<'-'>,'',,\
|
||||
@!,<'CP866 ',0x1A,' KOI8-R'>,'',CP866.KOI8R ,\
|
||||
@!,<'KOI8-R ',0x1A,' CP866' >,'',KOI8R.CP866 ,\
|
||||
@!,<'-'>,'',,\
|
||||
@!,<'CP1251 ',0x1A,' KOI8-R'>,'',CP1251.KOI8R,\
|
||||
@!,<'KOI8-R ',0x1A,' CP1251'>,'',KOI8R.CP1251
|
||||
|
||||
popup_res mm.Options,\
|
||||
ru_RU,'“¢¥«¨ç¨âì' ,'Ctrl +',ZoomIn ,\
|
||||
ru_RU,'“¬¥ìè¨âì' ,'Ctrl -',ZoomOut ,\
|
||||
ru_RU,'-','',,\
|
||||
ru_RU,'<27>®¬¥à áâப' ,'',LineNumbers ,\
|
||||
ru_RU,'<27>¥§®¯ ᮥ ¢ë¤¥«¥¨¥' ,'',SecureSel ,\
|
||||
ru_RU,'€¢â®¬ â¨ç¥áª¨¥ ᪮¡ª¨' ,'',AutoBrackets,\
|
||||
ru_RU,'€¢â®¬ â¨ç¥áª¨© ®âáâã¯' ,'',AutoIndents ,\
|
||||
ru_RU,'Ž¯â¨¬ «ì®¥ á®åà ¥¨¥' ,'',OptimalFill ,\
|
||||
ru_RU,'-','',,\
|
||||
ru_RU,'‚¥è¨© ¢¨¤...' ,'',Appearance ,\
|
||||
\
|
||||
en_US,'Zoom in' ,'Ctrl +',ZoomIn ,\
|
||||
en_US,'Zoom out' ,'Ctrl -',ZoomOut ,\
|
||||
en_US,'-','',,\
|
||||
en_US,'Line numbers' ,'',LineNumbers ,\
|
||||
en_US,'Secure selection' ,'',SecureSel ,\
|
||||
en_US,'Automatic brackets' ,'',AutoBrackets,\
|
||||
en_US,'Automatic indents' ,'',AutoIndents ,\
|
||||
en_US,'Optimal fill on saving' ,'',OptimalFill ,\
|
||||
en_US,'-','',,\
|
||||
en_US,'Appearance...' ,'',Appearance ,\
|
||||
\
|
||||
it_IT,'Ingrandire' ,'Ctrl +',ZoomIn ,\
|
||||
it_IT,'Rimpicciolisci' ,'Ctrl -',ZoomOut ,\
|
||||
it_IT,'-','',,\
|
||||
it_IT,'Numeri di riga' ,'',LineNumbers ,\
|
||||
it_IT,'Selezione sicura' ,'',SecureSel ,\
|
||||
it_IT,'Staffe automatiche' ,'',AutoBrackets,\
|
||||
it_IT,'Rientri automatici' ,'',AutoIndents ,\
|
||||
it_IT,'Combina spazi' ,'',OptimalFill ,\
|
||||
it_IT,'-','',,\
|
||||
it_IT,'Aspetto...' ,'',Appearance ,\
|
||||
\
|
||||
et_EE,'Zoom in' ,'Ctrl +',ZoomIn ,\
|
||||
et_EE,'Zoom out' ,'Ctrl -',ZoomOut ,\
|
||||
et_EE,'-','',,\
|
||||
et_EE,'Rea numbrid' ,'',LineNumbers ,\
|
||||
et_EE,'Turvaline valimine' ,'',SecureSel ,\
|
||||
et_EE,'Automaatsed sulud' ,'',AutoBrackets,\
|
||||
et_EE,'Automaatsed taandread' ,'',AutoIndents ,\
|
||||
et_EE,'Optimaalne täitmine salvestamisel','',OptimalFill,\
|
||||
et_EE,'-','',,\
|
||||
et_EE,'Välimus...' ,'',Appearance ,\
|
||||
\
|
||||
es_ES,'Zoom in' ,'Ctrl +',ZoomIn ,\
|
||||
es_ES,'Zoom out' ,'Ctrl -',ZoomOut ,\
|
||||
es_ES,'-','',,\
|
||||
es_ES,'Números en líneas' ,'',LineNumbers ,\
|
||||
es_ES,'Selección segura' ,'',SecureSel ,\
|
||||
es_ES,'Paréntesis automáticos' ,'',AutoBrackets,\
|
||||
es_ES,'Identación automática' ,'',AutoIndents ,\
|
||||
es_ES,'Llenado óptimo al guardar','',OptimalFill ,\
|
||||
es_ES,'-','',,\
|
||||
es_ES,'Apariencia...' ,'',Appearance
|
||||
|
||||
lsz s_defname,\
|
||||
ru_RU,<'<27>¥§ë¬ïë©',0>,\
|
||||
en_US,<'Untitled',0>,\
|
||||
it_IT,<'Senza titolo',0>,\
|
||||
et_EE,<'Nimetu',0>,\
|
||||
es_ES,<'Sin título',0>
|
||||
|
||||
lsz s_modified,\
|
||||
ru_RU,'ˆ§¬¥¥®',\
|
||||
en_US,'Modified',\
|
||||
it_IT,'Modificato',\
|
||||
et_EE,'Muudetud',\
|
||||
es_ES,'Modificado'
|
||||
|
||||
lsz s_2filename,\
|
||||
ru_RU,'ˆ¬ï ä ©« :',\
|
||||
en_US,'Filename:',\
|
||||
en_US,'Nome del file:',\
|
||||
et_EE,'Faili nimi:',\
|
||||
es_ES,'Nombre de archivo:'
|
||||
|
||||
lsz s_2open,\
|
||||
ru_RU,'Žâªàëâì',\
|
||||
en_US,'Open',\
|
||||
it_IT,'Aperto',\
|
||||
et_EE,'Ava',\
|
||||
es_ES,'Abrir'
|
||||
|
||||
lsz s_2save,\
|
||||
ru_RU,'‘®åà ¨âì',\
|
||||
en_US,'Save',\
|
||||
it_IT,'Salva',\
|
||||
et_EE,'Salvesta',\
|
||||
es_ES,'Guardar'
|
||||
|
||||
lsz s_2save_no,\
|
||||
ru_RU,'<27>¥â',\
|
||||
en_US,'No',\
|
||||
it_IT,'No',\
|
||||
et_EE,'Ei',\
|
||||
es_ES,'No'
|
||||
|
||||
lsz s_2find,\
|
||||
ru_RU,'<27> ©â¨',\
|
||||
en_US,'Find',\
|
||||
it_IT,'Trova',\
|
||||
et_EE,'Leia',\
|
||||
es_ES,'Buscar'
|
||||
db ':'
|
||||
|
||||
lsz s_2replace,\
|
||||
ru_RU,'‡ ¬¥¨âì',\
|
||||
en_US,'Replace',\
|
||||
it_IT,'Sostituire',\
|
||||
et_EE,'Asenda',\
|
||||
es_ES,'Reemplazar'
|
||||
db ':'
|
||||
|
||||
lsz s_2cancel,\
|
||||
ru_RU,'Žâ¬¥ ',\
|
||||
en_US,'Cancel',\
|
||||
it_IT,'Annulla',\
|
||||
et_EE,'Tühista',\
|
||||
es_ES,'Cancelar'
|
||||
|
||||
lsz s_color,\
|
||||
ru_RU,'–¢¥â: 0x',\
|
||||
en_US,'Color: 0x',\
|
||||
it_IT,'Colore: 0x',\
|
||||
et_EE,'Värv: 0x',\
|
||||
es_ES,'Color: 0x'
|
||||
|
||||
lsz s_tabpos,\
|
||||
ru_RU,'<27> ᯮ«®¦¥¨¥ § ª« ¤®ª',\
|
||||
en_US,'Tabs placement',\
|
||||
it_IT,'Posizionamento delle schede',\
|
||||
et_EE,'Saki asetus',\
|
||||
es_ES,'Lugar de tabulador'
|
||||
|
||||
lsz s_enter_filename,\
|
||||
ru_RU,<'‚¢¥¤¨â¥ ¨¬ï ä ©« ',0>,\
|
||||
en_US,<'Enter filename',0>,\
|
||||
it_IT,<'Inserisci il nome del file',0>,\
|
||||
et_EE,<'Sisesta faili nimi',0>,\
|
||||
es_ES,<'Ingresa el nombre del archivo',0>
|
||||
|
||||
lsz s_ask_save,\
|
||||
ru_RU,<'†¥« ¥â¥ á®åà ¨âì?',0>,\
|
||||
en_US,<'Would you like to save?',0>,\
|
||||
it_IT,<'Vorresti salvare?',0>,\
|
||||
et_EE,<'Kas soovite salvestada?',0>,\
|
||||
es_ES,<'¿Quieres guardar?',0>
|
||||
|
||||
lsz s_enter_text_to_find,\
|
||||
ru_RU,<'‚¢¥¤¨â¥ ⥪áâ ¤«ï ¯®¨áª ',0>,\
|
||||
en_US,<'Enter text to find',0>,\
|
||||
it_IT,<'Inserisci il testo per trovare',0>,\
|
||||
et_EE,<'Sisesta otsitav tekst',0>,\
|
||||
es_ES,<'Ingresa el texto a buscar',0>
|
||||
|
||||
lsz s_enter_text_to_replace,\
|
||||
ru_RU,<'‚¢¥¤¨â¥ ⥪áâ ¤«ï § ¬¥ë',0>,\
|
||||
en_US,<'Enter text to replace',0>,\
|
||||
it_IT,<'Inserisci il testo da sostituire',0>,\
|
||||
et_EE,<'Sisesta asendatav tekst',0>,\
|
||||
es_ES,<'Ingresa el texto a reemplazar',0>
|
||||
|
||||
lsz s_text_not_found,\
|
||||
ru_RU,<'„®á⨣ãâ ª®¥æ ä ©« , ⥪áâ ¥ ©¤¥',0>,\
|
||||
en_US,<'Reached end of file, text not found',0>,\
|
||||
it_IT,<'Raggiunta la fine del file, testo non trovato',0>,\
|
||||
et_EE,<'Faili lõpp, teksti ei leitud',0>,\
|
||||
es_ES,<'Se llegó al final del archivo, texto no encontrado',0>
|
||||
|
||||
lszc s_fs_error,b,\
|
||||
ru_RU,<'Ž¯¥à æ¨ï § ¢¥àè¥ ãá¯¥è® (0)',0>,\
|
||||
ru_RU,<'',0>,\
|
||||
ru_RU,<'”ãªæ¨ï ¥ ¯®¤¤¥à¦¨¢ ¥âáï ¤«ï ¤ ®© ä ©«®¢®© á¨á⥬ë (2)',0>,\
|
||||
ru_RU,<'<27>¥¨§¢¥áâ ï ä ©«®¢ ï á¨á⥬ (3)',0>,\
|
||||
ru_RU,<'',0>,\
|
||||
ru_RU,<'<27>¥¢®§¬®¦® ®âªàëâì ä ©« (5)',0>,\
|
||||
ru_RU,<'Ž¯¥à æ¨ï § ¢¥àè¥ ãá¯¥è® (6)',0>,\
|
||||
ru_RU,<'€¤à¥á 室¨âáï § £à ¨æ ¬¨ ¯ ¬ï⨠¯à®£à ¬¬ë (7)',0>,\
|
||||
ru_RU,<'<27> ¤¨áª¥ ¥â ᢮¡®¤®£® ¬¥áâ (8)',0>,\
|
||||
ru_RU,<'’ ¡«¨æ FAT ã¨ç⮦¥ (9)',0>,\
|
||||
ru_RU,<'„®áâ㯠§ ¯à¥éñ (10)',0>,\
|
||||
ru_RU,<'Žè¨¡ª ãáâனá⢠(11)',0>,\
|
||||
\
|
||||
en_US,<'Operation executed successfully (0)',0>,\
|
||||
en_US,<'',0>,\
|
||||
en_US,<'Function is not supported for the given filesystem (2)',0>,\
|
||||
en_US,<'Unknown filesystem (3)',0>,\
|
||||
en_US,<'',0>,\
|
||||
en_US,<'Unable to open file (5)',0>,\
|
||||
en_US,<'Operation executed successfully (6)',0>,\
|
||||
en_US,<'Pointer lies outside of application memory (7)',0>,\
|
||||
en_US,<'Disk is full (8)',0>,\
|
||||
en_US,<'FAT table is destroyed (9)',0>,\
|
||||
en_US,<'Access denied (10)',0>,\
|
||||
en_US,<'Device error (11)',0>,\
|
||||
\
|
||||
it_IT,<'Operazione eseguita correttamente (0)',0>,\
|
||||
it_IT,<'',0>,\
|
||||
it_IT,<'La funzione non e supportata per il file system specificato (2)', 0>, \
|
||||
it_IT,<'Unknown filesystem (3)',0>,\
|
||||
it_IT,<'',0>,\
|
||||
it_IT,<'Impossibile aprire il file (5)',0>,\
|
||||
it_IT,<'Operazione eseguita correttamente (6)',0>,\
|
||||
it_IT,<'Il puntatore si trova al di fuori della memoria dell',96,'applicazione (7)', 0>, \
|
||||
it_IT,<'Il disco e pieno (8)',0>,\
|
||||
it_IT,<'La tabella FAT e distrutta (9)',0>,\
|
||||
it_IT,<'Accesso negato (10)',0>,\
|
||||
it_IT,<'Errore dispositivo (11)',0>,\
|
||||
\
|
||||
et_EE,<'Operatsioon käivitati edukalt (0)',0>,\
|
||||
et_EE,<'',0>,\
|
||||
et_EE,<'Failisüsteem ei toeta funktsiooni (2)',0>,\
|
||||
et_EE,<'Tundmatu failisüsteem (3)',0>,\
|
||||
et_EE,<'',0>,\
|
||||
et_EE,<'Faili ei suudetud avada (5)',0>,\
|
||||
et_EE,<'Operatsioon käivitatud edukalt (6)',0>,\
|
||||
et_EE,<'Viit on väljaspool programmi mälu (7)',0>,\
|
||||
et_EE,<'Ketas täis (8)',0>,\
|
||||
et_EE,<'FAT tabel hävitatud (9)',0>,\
|
||||
et_EE,<'Juurdepääs keelatud (10)',0>,\
|
||||
et_EE,<'Seadme viga (11)',0>,\
|
||||
\
|
||||
es_ES,<'Operación ejecutada correctamente (0)',0>,\
|
||||
es_ES,<'',0>,\
|
||||
es_ES,<'La función no está soportada por el sistema de archivos dado (2)',0>,\
|
||||
es_ES,<'Sistema de archivos desconocido (3)',0>,\
|
||||
es_ES,<'',0>,\
|
||||
es_ES,<'No es posible abrir el archivo (5)',0>,\
|
||||
es_ES,<'Operación ejecutada correctamente (6)',0>,\
|
||||
es_ES,<'El puntero está fuera de la memoria de la aplicación (7)',0>,\
|
||||
es_ES,<'El disco está lleno (8)',0>,\
|
||||
es_ES,<'La tabla FAT está destruida (9)',0>,\
|
||||
es_ES,<'Acceso denegado (10)',0>,\
|
||||
es_ES,<'Error de dispositivo (11)',0>
|
||||
|
||||
lszc s_appearance,b,\
|
||||
ru_RU,'’¥ªáâ',\
|
||||
ru_RU,'”®',\
|
||||
ru_RU,'’¥ªá⠢뤥«¥¨ï',\
|
||||
ru_RU,'”® ¢ë¤¥«¥¨ï',\
|
||||
ru_RU,'‘¨¬¢®«ë',\
|
||||
ru_RU,'—¨á« ',\
|
||||
ru_RU,'‘âப¨',\
|
||||
ru_RU,'Š®¬¬¥â ਨ',\
|
||||
ru_RU,'ˆ§¬¥ñë¥ áâப¨',\
|
||||
ru_RU,'‘®åà ñë¥ áâப¨',\
|
||||
\
|
||||
en_US,'Text',\
|
||||
en_US,'Background',\
|
||||
en_US,'Selection text',\
|
||||
en_US,'Selection background',\
|
||||
en_US,'Symbols',\
|
||||
en_US,'Numbers',\
|
||||
en_US,'Strings',\
|
||||
en_US,'Comments',\
|
||||
en_US,'Modified lines',\
|
||||
en_US,'Saved lines',\
|
||||
\
|
||||
it_IT,'Testo',\
|
||||
it_IT,'Sfondo',\
|
||||
it_IT,'Testo di selezione',\
|
||||
it_IT,'Sfondo di selezione',\
|
||||
it_IT,'Simboli',\
|
||||
it_IT,'Numeri',\
|
||||
it_IT,'Stringhe',\
|
||||
it_IT,'Commenti',\
|
||||
it_IT,'Linee modificate',\
|
||||
it_IT,'Linee salvate',\
|
||||
\
|
||||
et_EE,'Tekst',\
|
||||
et_EE,'Taust',\
|
||||
et_EE,'Valitud tekst',\
|
||||
et_EE,'Valitud taust',\
|
||||
et_EE,'Sümbolid',\
|
||||
et_EE,'Numbrid',\
|
||||
et_EE,'Stringid',\
|
||||
et_EE,'Kommentaarid',\
|
||||
et_EE,'Muudetud read',\
|
||||
et_EE,'Salvestatud read',\
|
||||
\
|
||||
es_ES,'Texto',\
|
||||
es_ES,'Fondo',\
|
||||
es_ES,'Texto de selección',\
|
||||
es_ES,'Fondo de selección',\
|
||||
es_ES,'Símbolos',\
|
||||
es_ES,'Números',\
|
||||
es_ES,'Cadenas',\
|
||||
es_ES,'Comentarios',\
|
||||
es_ES,'Líneas modificadas',\
|
||||
es_ES,'Líneas guardadas'
|
||||
|
||||
lsz sysfuncs_filename,\
|
||||
ru_RU,<'SYSFUNCR.TXT',0>,\
|
||||
en_US,<'SYSFUNCS.TXT',0>,\
|
||||
it_IT,<'SYSFUNCS.TXT',0>,\
|
||||
et_EE,<'SYSFUNCET.TXT',0>,\
|
||||
es_ES,<'SYSFUNCS.TXT',0>
|
||||
|
||||
sz s_example,'/sys/example.asm'
|
||||
sz s_still ,'still'
|
||||
|
||||
@ -8,7 +8,7 @@
|
||||
; ;
|
||||
; On base SYSTREE FILE COPIER 1.02 ;
|
||||
; Ivan Poddubny ivan-yar@bk.ru ;
|
||||
; ;
|
||||
; ;
|
||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||
|
||||
;„ ï ¯à®£ ¥é¥ áëà ï ¨ £«îç ï ® 㦥 ª®¥ ª ª à ¡®â ¥â
|
||||
@ -23,11 +23,11 @@
|
||||
dd 0x10000 ; esp
|
||||
dd param_area , 0x0 ; I_Param , I_Icon
|
||||
|
||||
include 'lang.inc'
|
||||
include '..\..\..\macros.inc' ; very useful stuff for MeOS
|
||||
include 'lang.inc' ; Language support for locales: ru_RU (CP866), en_US.
|
||||
include '..\..\..\macros.inc' ; very useful stuff for MeOS
|
||||
include 'ascl.inc'
|
||||
|
||||
START: ; start of execution
|
||||
START: ; start of execution
|
||||
|
||||
; <20> à ¬¥âàë:
|
||||
; db n1 = ¤«¨ ¯ã⨠ª ¨áâ®ç¨ªã
|
||||
@ -187,7 +187,7 @@ draw_window:
|
||||
mov edi,labelt ; WINDOW LABEL
|
||||
mcall
|
||||
|
||||
|
||||
|
||||
mov eax,8
|
||||
mov ebx,105*65536+290
|
||||
mov ecx,33*65536+12
|
||||
@ -264,12 +264,13 @@ errors:
|
||||
db "(§ ¯¨áì) ¥¨§¢¥áâ ï ®è¨¡ª "
|
||||
db "<22>ãâì ª ¨áâ®ç¨ªã ¨ ¯à¨¥¬¨ªã ¥ 㪠§ ë!!! "
|
||||
db "<22>ãâì ª ¯à¨¥¬¨ªã ¥ 㪠§ !!! "
|
||||
else
|
||||
|
||||
else ; Default to en_US
|
||||
text:
|
||||
db 'SOURCE: | '
|
||||
db 'DESTINATION: | '
|
||||
db ' '
|
||||
db 'x' ; <- END MARKER, DONT DELETE
|
||||
db 'x' ; <- END MARKER, DO NOT DELETE
|
||||
labelt:
|
||||
db 'SYSTREE FILE COPIER'
|
||||
labellen:
|
||||
@ -292,6 +293,7 @@ errors:
|
||||
db "(write) unknown error "
|
||||
db "Path to source is not given!!! "
|
||||
db "Path to destination is not given!!! "
|
||||
|
||||
end if
|
||||
|
||||
;0123456789012345678901234567890123456789012
|
||||
|
||||
File diff suppressed because it is too large
Load Diff
File diff suppressed because it is too large
Load Diff
@ -1,490 +1,490 @@
|
||||
;
|
||||
; The famous game 15
|
||||
; Author: Lloyd, coded by Ivushkin Andrey
|
||||
; Compile with FASM
|
||||
;
|
||||
|
||||
include 'lang.inc'
|
||||
include '..\..\..\macros.inc' ; decreases program size (not required)
|
||||
|
||||
StatusColor equ 0x00ffffff
|
||||
StatusColor2 equ 0x00dc1e14
|
||||
BgdColor equ 0x14aabbcc
|
||||
|
||||
; Main window dimensions
|
||||
XXwindow equ 200 shl 16+276
|
||||
YYwindow equ 200 shl 16+300
|
||||
; Status bar
|
||||
XYstatus equ 35 shl 16+283
|
||||
XXbar equ 35 shl 16+136
|
||||
YYbar equ 280 shl 16+15
|
||||
; Buttons
|
||||
BtnTop equ 28
|
||||
BtnLeft equ 13
|
||||
BtnSize equ 60
|
||||
BtnColor equ 0xafbb55
|
||||
BtnColor2 equ 0x0228c314
|
||||
|
||||
NumColor equ 0x10000000
|
||||
; Number shifting for nice look
|
||||
NumShift equ 23 shl 16+23
|
||||
NumShift2 equ 4 shl 16
|
||||
; Shuffle button
|
||||
XXSh equ 202 shl 16+60
|
||||
YYSh equ 280 shl 16+12
|
||||
XYShText equ 212 shl 16+283
|
||||
|
||||
; Conf button
|
||||
XXCnf equ 13 shl 16+13
|
||||
YYCnf equ 280 shl 16+12
|
||||
XYCnfText equ 18 shl 16+283
|
||||
|
||||
; Position of the 'hole'
|
||||
null equ (curconf+16)
|
||||
; Amount of moves to perform shuffle
|
||||
SH_CYCLES equ 400
|
||||
; (Amount of tasks)-1
|
||||
CONF_COUNT equ 2
|
||||
|
||||
use32
|
||||
|
||||
org 0x0
|
||||
|
||||
db 'MENUET01'
|
||||
dd 0x01
|
||||
dd START
|
||||
dd I_END
|
||||
dd 0x2000 ; 8 Kb
|
||||
dd 0x2000
|
||||
dd 0x0
|
||||
dd 0x0
|
||||
|
||||
|
||||
START:
|
||||
mov [cptr],CONF_COUNT ; number of task
|
||||
mov eax,3
|
||||
mcall
|
||||
mov cl,16
|
||||
ror eax,cl
|
||||
mov [generator],eax ; random generator from Tetris
|
||||
init:
|
||||
mov ecx,17
|
||||
movzx eax,[cptr]
|
||||
inc eax
|
||||
cmp eax,CONF_COUNT
|
||||
jna init_ok
|
||||
xor eax,eax ; cycling 0..CONF_COUNT
|
||||
init_ok:
|
||||
mov [cptr],al
|
||||
mov esi,eax
|
||||
shl esi,4
|
||||
add esi,conf
|
||||
add esi,eax
|
||||
add al,0x31
|
||||
mov [txtTitle+17],al ;task number to program title
|
||||
mov [task],esi
|
||||
mov edi,curconf
|
||||
rep movsb ; initial configuration
|
||||
|
||||
mov [sts],4
|
||||
jmp red
|
||||
SHUF:
|
||||
call shuffle ; immediate shuffle
|
||||
red: ; window redraw
|
||||
|
||||
call draw_window
|
||||
|
||||
still: ; MAIN PROGRAM CYCLE
|
||||
|
||||
mov eax,10 ; wait for event
|
||||
mcall
|
||||
|
||||
cmp eax,1 ; redraw? -
|
||||
je red ; goto red
|
||||
cmp eax,2 ; key pressed? -
|
||||
je key ; goto key
|
||||
cmp eax,3 ; button pressed? -
|
||||
je button ; goto button
|
||||
|
||||
jmp still ; no more events to process
|
||||
|
||||
key: ; Key pressed
|
||||
mov eax,2
|
||||
mcall
|
||||
shr eax,8
|
||||
cmp eax,32 ; <Space> = Shuffle
|
||||
je SHUF
|
||||
cmp eax,13 ; <Enter> = Choose task
|
||||
je init
|
||||
cmp eax,176
|
||||
jl still
|
||||
sub eax,176
|
||||
cmp eax,3
|
||||
ja still
|
||||
movzx eax,byte [eax+correct] ; 'delta' value from correct[]
|
||||
jmp m_check
|
||||
|
||||
button: ; Button pressed
|
||||
mov eax,17
|
||||
mcall
|
||||
shr eax,8
|
||||
sub eax,2
|
||||
|
||||
cmp eax,-1 ; id == 1 (closeme)?
|
||||
jne noclose
|
||||
mcall
|
||||
|
||||
noclose:
|
||||
jl SHUF ; Shuffle (id=0) pressed
|
||||
cmp eax,18
|
||||
je init ; Conf button pressed
|
||||
sub al,byte [null]
|
||||
mov edi,correct
|
||||
mov ecx,4
|
||||
repne scasb ; checking for valid move-part 1
|
||||
jne fail
|
||||
m_check:
|
||||
cmp byte[sts],4 ; puzzle completed, blocking buttons
|
||||
ja still
|
||||
call move_check ; checking for valid move-part 2
|
||||
jnc fail
|
||||
inc [move_count]
|
||||
call draw_moves
|
||||
fail:
|
||||
jmp still ; ¢®§¢à é ¥¬áï
|
||||
|
||||
; *******************************
|
||||
; ******* WINDOW DRAWING *******
|
||||
; *******************************
|
||||
|
||||
draw_window:
|
||||
|
||||
mcall 12, 1 ; begin draw
|
||||
mcall 0, XXwindow, YYwindow, BgdColor,, txtTitle ; CREATING WINDOW
|
||||
|
||||
|
||||
mov eax,8 ; SHUFFLE BUTTON
|
||||
mov ebx,XXSh
|
||||
mov ecx,YYSh
|
||||
xor edx,edx
|
||||
mov esi,BtnColor
|
||||
mcall
|
||||
|
||||
mov ebx,XXCnf ; CONF BUTTON
|
||||
mov ecx,YYCnf
|
||||
mov edx,20
|
||||
;mov esi,BtnColor
|
||||
mcall
|
||||
|
||||
mov ebx, XYShText ; SHUFFLE TEXT
|
||||
mov ecx, StatusColor
|
||||
mov edx,txtSh
|
||||
mov esi,lenSh-txtSh
|
||||
mov eax,4
|
||||
mcall
|
||||
|
||||
mov ebx, XYCnfText ; CONF TEXT
|
||||
mov edx,lenVictory-1
|
||||
mov esi,1
|
||||
mcall
|
||||
|
||||
mov ecx, 16 ; FIELD BUTTONS
|
||||
dbut:
|
||||
call draw_button
|
||||
loop dbut
|
||||
|
||||
call draw_moves
|
||||
|
||||
mcall 12, 2 ; end of drawing
|
||||
ret
|
||||
|
||||
|
||||
; *********************************************
|
||||
; ******* DRAWING A FIELD BUTTON **************
|
||||
; *********************************************
|
||||
; ECX - button number
|
||||
|
||||
draw_button:
|
||||
pusha
|
||||
dec ecx
|
||||
; calculating button dimensions
|
||||
mov edi, ecx
|
||||
lea edx,[ecx+2]
|
||||
mov ebx,ecx
|
||||
and ebx,11b
|
||||
shr ecx,2
|
||||
|
||||
imul ebx,BtnSize+3
|
||||
add ebx,BtnLeft
|
||||
shl ebx,16
|
||||
add ebx,BtnSize
|
||||
|
||||
imul ecx,BtnSize+3
|
||||
add ecx,BtnTop
|
||||
shl ecx,16
|
||||
add ecx,BtnSize
|
||||
movzx eax,byte [null]
|
||||
cmp eax,edi
|
||||
jne no_hole
|
||||
|
||||
pusha
|
||||
inc ebx
|
||||
inc ecx
|
||||
mov edx,BgdColor
|
||||
mov eax,13 ; clearing - 'hole'
|
||||
mcall
|
||||
popa
|
||||
|
||||
or edx,0x80000000 ; and removing button under it
|
||||
no_hole:
|
||||
mov al,byte[edi+curconf]
|
||||
mov esi,[task]
|
||||
cmp al,byte[edi+esi]
|
||||
je highlight
|
||||
mov esi,BtnColor
|
||||
jmp s_rbutton
|
||||
highlight:
|
||||
mov esi,BtnColor2
|
||||
s_rbutton:
|
||||
mov eax,8 ; set/remove button
|
||||
mcall
|
||||
movzx eax,byte [null]
|
||||
cmp eax,edi
|
||||
je no_text ; no digits - that's hole
|
||||
mov edx,ebx
|
||||
shr ecx,16
|
||||
mov dx,cx
|
||||
add edx,NumShift
|
||||
mov ebx,0x20000
|
||||
movzx ecx,byte [edi+curconf]
|
||||
cmp ecx,9
|
||||
ja two_num
|
||||
add edx,NumShift2 ; shift to center digits
|
||||
sub ebx,0x10000
|
||||
two_num:
|
||||
mov esi,NumColor
|
||||
mov eax,47
|
||||
mcall
|
||||
no_text:
|
||||
popa
|
||||
ret
|
||||
|
||||
|
||||
; *********************************************
|
||||
; ******* DRAWING STATUS LINE *****************
|
||||
; *********************************************
|
||||
|
||||
draw_moves:
|
||||
mov eax, 13 ; clear area
|
||||
mov ebx, XXbar
|
||||
mov ecx, YYbar
|
||||
mov edx, BgdColor
|
||||
mcall
|
||||
|
||||
mov eax, 4
|
||||
mov ebx, XYstatus
|
||||
mov ecx, StatusColor
|
||||
cmp ax, [sts]
|
||||
jl report_victory
|
||||
jne report_moves
|
||||
mov edx,txtCnf ; prompt to choose configuration
|
||||
mov esi,lenCnf-txtCnf
|
||||
jmp e_dm
|
||||
report_moves:
|
||||
mov edx,txtMoves ; how many moves done
|
||||
mov esi,lenMoves-txtMoves
|
||||
mov eax,4
|
||||
mcall
|
||||
mov esi,ecx
|
||||
mov edx,ebx
|
||||
add edx, 40 shl 16
|
||||
mov ebx,0x030000
|
||||
movzx ecx, byte[move_count]
|
||||
mov eax,47
|
||||
jmp e_dm
|
||||
report_victory: ; puzzle completed
|
||||
mov ecx,StatusColor2
|
||||
mov edx,txtVictory
|
||||
mov esi,lenVictory-txtVictory
|
||||
e_dm:
|
||||
mcall
|
||||
ret
|
||||
|
||||
|
||||
; *********************************************
|
||||
; ********* SHUFFLE ***************************
|
||||
; *********************************************
|
||||
|
||||
shuffle:
|
||||
xor eax,eax
|
||||
mov [sts],ax
|
||||
mov [move_count],ax ; reset moves to 0
|
||||
mov [sh_off],al
|
||||
mov eax, [generator]
|
||||
|
||||
mov ecx,SH_CYCLES
|
||||
sh_cycle:
|
||||
sub eax,0x43ab45b5 ; next random number
|
||||
ror eax,1
|
||||
xor eax,0x32c4324f
|
||||
ror eax,1
|
||||
mov [generator],eax
|
||||
|
||||
push eax
|
||||
and eax,11b ; direction 0..3
|
||||
movzx eax,byte [eax+correct]
|
||||
call move_check
|
||||
pop eax
|
||||
jnc sh_cycle ; if fails then retry
|
||||
loop sh_cycle
|
||||
inc byte[sh_off] ; shuffling complete
|
||||
ret
|
||||
|
||||
|
||||
; *********************************************
|
||||
; ********* MOVE VALIDITY CHECK ***************
|
||||
; *********************************************
|
||||
; AL - 'DELTA' DIRECTION
|
||||
|
||||
move_check:
|
||||
pusha
|
||||
mov ah,byte [null]
|
||||
mov bx,ax
|
||||
cmp bh,3
|
||||
ja no_top
|
||||
cmp al,-4 ; top of field
|
||||
je no_move
|
||||
no_top:
|
||||
cmp bh,12
|
||||
jb no_bottom
|
||||
cmp al,4 ; bottom of field
|
||||
je no_move
|
||||
no_bottom:
|
||||
and bh,11b
|
||||
cmp bh,0
|
||||
jnz no_left
|
||||
cmp al,-1 ; left of field
|
||||
je no_move
|
||||
no_left:
|
||||
cmp bh,11b
|
||||
jnz ok
|
||||
cmp al,1 ; right of field
|
||||
je no_move
|
||||
ok:
|
||||
mov bx,ax
|
||||
add bh,bl ; bh-new hole
|
||||
mov byte [null],bh
|
||||
movzx ecx,ah
|
||||
mov al,byte[ecx+curconf]
|
||||
movzx edx,bh
|
||||
mov bl,byte[edx+curconf] ; swapping button & hole
|
||||
mov byte[ecx+curconf],bl
|
||||
mov byte[edx+curconf],al
|
||||
|
||||
cmp byte[sh_off],0 ; if shuffle in progress,
|
||||
jz no_win ; then no redraw
|
||||
|
||||
; drawing button & hole
|
||||
inc ecx
|
||||
call draw_button
|
||||
movzx ecx,bh
|
||||
inc ecx
|
||||
call draw_button
|
||||
; testing if task completed
|
||||
mov esi,[task]
|
||||
mov edi,curconf
|
||||
mov ecx,16
|
||||
repe cmpsb
|
||||
cmp ecx,0
|
||||
jne no_win
|
||||
mov word[sts],6 ; puzzle done. Victory!
|
||||
no_win:
|
||||
popa
|
||||
stc
|
||||
ret
|
||||
no_move:
|
||||
popa
|
||||
clc
|
||||
ret
|
||||
; this is deprecated debug routine
|
||||
;ud:
|
||||
; ud2
|
||||
|
||||
; These are data used by program
|
||||
|
||||
correct db 1,-4,4,-1
|
||||
|
||||
conf db 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,0,15
|
||||
db 0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,0
|
||||
db 1,2,3,4,12,13,14,5,11,0,15,6,10,9,8,7,9
|
||||
|
||||
txtMoves:
|
||||
if lang eq ru_RU
|
||||
db '•®¤®¢:'
|
||||
else if lang eq it_IT
|
||||
db 'Movimenti:'
|
||||
else if lang eq de_DE
|
||||
db 'Bewegungen:'
|
||||
else
|
||||
db 'Moves:'
|
||||
end if
|
||||
lenMoves:
|
||||
|
||||
txtSh:
|
||||
if lang eq ru_RU
|
||||
db '’ ᮢª '
|
||||
else if lang eq it_IT
|
||||
db 'Mischia'
|
||||
else if lang eq de_DE
|
||||
db 'Mischen'
|
||||
else
|
||||
db 'Shuffle'
|
||||
end if
|
||||
lenSh:
|
||||
|
||||
txtCnf:
|
||||
if lang eq ru_RU
|
||||
db '‚ë¡¥à¨â¥ § ¤ çã ¨ ¦¬¨â¥->'
|
||||
else if lang eq it_IT
|
||||
db 'Seleziona un compito, poi premi->'
|
||||
else if lang eq de_DE
|
||||
db 'Waehle eine Aufgabe, dann clicke au->'
|
||||
else
|
||||
db 'Select task, then press ->'
|
||||
end if
|
||||
lenCnf:
|
||||
|
||||
txtTitle: ; áâப § £®«®¢ª
|
||||
if lang eq ru_RU
|
||||
db 'ˆ£à 15 - § ¤ ç X', 0
|
||||
else if lang eq it_IT
|
||||
db 'Gioco del quindici - partita X', 0
|
||||
else if lang eq de_DE
|
||||
db '15-Puzzle - Spiel X', 0
|
||||
else
|
||||
db 'Game 15 - puzzle X', 0
|
||||
end if
|
||||
|
||||
txtVictory:
|
||||
if lang eq ru_RU
|
||||
db '‚ë à¥è¨«¨ § ¤ çã! <20> ¦¬¨â¥->'
|
||||
else if lang eq it_IT
|
||||
db 'Gioco completato! Premi ->'
|
||||
else if lang eq de_DE
|
||||
db 'Spiel beendet! Druecken sie auf ->'
|
||||
else
|
||||
db 'Puzzle completed! Press->'
|
||||
end if
|
||||
lenVictory:
|
||||
|
||||
arrow equ lenVictory-2
|
||||
|
||||
I_END: ; ª®¥æ ¯à®£à ¬¬ë
|
||||
;null db ?
|
||||
move_count dw ?
|
||||
cptr db ?
|
||||
sts dw ?
|
||||
sh_off db ?
|
||||
task dd ?
|
||||
generator dd ?
|
||||
curconf:
|
||||
;
|
||||
; The famous game 15
|
||||
; Author: Lloyd, coded by Ivushkin Andrey
|
||||
; Compile with FASM
|
||||
;
|
||||
|
||||
include 'lang.inc' ; Language support for locales: ru_RU (CP866), it_IT, de_DE, en_US.
|
||||
include '..\..\..\macros.inc' ; decreases program size (not required)
|
||||
|
||||
StatusColor equ 0x00ffffff
|
||||
StatusColor2 equ 0x00dc1e14
|
||||
BgdColor equ 0x14aabbcc
|
||||
|
||||
; Main window dimensions
|
||||
XXwindow equ 200 shl 16+276
|
||||
YYwindow equ 200 shl 16+300
|
||||
; Status bar
|
||||
XYstatus equ 35 shl 16+283
|
||||
XXbar equ 35 shl 16+136
|
||||
YYbar equ 280 shl 16+15
|
||||
; Buttons
|
||||
BtnTop equ 28
|
||||
BtnLeft equ 13
|
||||
BtnSize equ 60
|
||||
BtnColor equ 0xafbb55
|
||||
BtnColor2 equ 0x0228c314
|
||||
|
||||
NumColor equ 0x10000000
|
||||
; Number shifting for nice look
|
||||
NumShift equ 23 shl 16+23
|
||||
NumShift2 equ 4 shl 16
|
||||
; Shuffle button
|
||||
XXSh equ 202 shl 16+60
|
||||
YYSh equ 280 shl 16+12
|
||||
XYShText equ 212 shl 16+283
|
||||
|
||||
; Conf button
|
||||
XXCnf equ 13 shl 16+13
|
||||
YYCnf equ 280 shl 16+12
|
||||
XYCnfText equ 18 shl 16+283
|
||||
|
||||
; Position of the 'hole'
|
||||
null equ (curconf+16)
|
||||
; Amount of moves to perform shuffle
|
||||
SH_CYCLES equ 400
|
||||
; (Amount of tasks)-1
|
||||
CONF_COUNT equ 2
|
||||
|
||||
use32
|
||||
|
||||
org 0x0
|
||||
|
||||
db 'MENUET01'
|
||||
dd 0x01
|
||||
dd START
|
||||
dd I_END
|
||||
dd 0x2000 ; 8 Kb
|
||||
dd 0x2000
|
||||
dd 0x0
|
||||
dd 0x0
|
||||
|
||||
|
||||
START:
|
||||
mov [cptr],CONF_COUNT ; number of task
|
||||
mov eax,3
|
||||
mcall
|
||||
mov cl,16
|
||||
ror eax,cl
|
||||
mov [generator],eax ; random generator from Tetris
|
||||
init:
|
||||
mov ecx,17
|
||||
movzx eax,[cptr]
|
||||
inc eax
|
||||
cmp eax,CONF_COUNT
|
||||
jna init_ok
|
||||
xor eax,eax ; cycling 0..CONF_COUNT
|
||||
init_ok:
|
||||
mov [cptr],al
|
||||
mov esi,eax
|
||||
shl esi,4
|
||||
add esi,conf
|
||||
add esi,eax
|
||||
add al,0x31
|
||||
mov [txtTitle+17],al ;task number to program title
|
||||
mov [task],esi
|
||||
mov edi,curconf
|
||||
rep movsb ; initial configuration
|
||||
|
||||
mov [sts],4
|
||||
jmp red
|
||||
SHUF:
|
||||
call shuffle ; immediate shuffle
|
||||
red: ; window redraw
|
||||
|
||||
call draw_window
|
||||
|
||||
still: ; MAIN PROGRAM CYCLE
|
||||
|
||||
mov eax,10 ; wait for event
|
||||
mcall
|
||||
|
||||
cmp eax,1 ; redraw? -
|
||||
je red ; goto red
|
||||
cmp eax,2 ; key pressed? -
|
||||
je key ; goto key
|
||||
cmp eax,3 ; button pressed? -
|
||||
je button ; goto button
|
||||
|
||||
jmp still ; no more events to process
|
||||
|
||||
key: ; Key pressed
|
||||
mov eax,2
|
||||
mcall
|
||||
shr eax,8
|
||||
cmp eax,32 ; <Space> = Shuffle
|
||||
je SHUF
|
||||
cmp eax,13 ; <Enter> = Choose task
|
||||
je init
|
||||
cmp eax,176
|
||||
jl still
|
||||
sub eax,176
|
||||
cmp eax,3
|
||||
ja still
|
||||
movzx eax,byte [eax+correct] ; 'delta' value from correct[]
|
||||
jmp m_check
|
||||
|
||||
button: ; Button pressed
|
||||
mov eax,17
|
||||
mcall
|
||||
shr eax,8
|
||||
sub eax,2
|
||||
|
||||
cmp eax,-1 ; id == 1 (closeme)?
|
||||
jne noclose
|
||||
mcall
|
||||
|
||||
noclose:
|
||||
jl SHUF ; Shuffle (id=0) pressed
|
||||
cmp eax,18
|
||||
je init ; Conf button pressed
|
||||
sub al,byte [null]
|
||||
mov edi,correct
|
||||
mov ecx,4
|
||||
repne scasb ; checking for valid move-part 1
|
||||
jne fail
|
||||
m_check:
|
||||
cmp byte[sts],4 ; puzzle completed, blocking buttons
|
||||
ja still
|
||||
call move_check ; checking for valid move-part 2
|
||||
jnc fail
|
||||
inc [move_count]
|
||||
call draw_moves
|
||||
fail:
|
||||
jmp still ; ¢®§¢à é ¥¬áï
|
||||
|
||||
; *******************************
|
||||
; ******* WINDOW DRAWING *******
|
||||
; *******************************
|
||||
|
||||
draw_window:
|
||||
|
||||
mcall 12, 1 ; begin draw
|
||||
mcall 0, XXwindow, YYwindow, BgdColor,, txtTitle ; CREATING WINDOW
|
||||
|
||||
|
||||
mov eax,8 ; SHUFFLE BUTTON
|
||||
mov ebx,XXSh
|
||||
mov ecx,YYSh
|
||||
xor edx,edx
|
||||
mov esi,BtnColor
|
||||
mcall
|
||||
|
||||
mov ebx,XXCnf ; CONF BUTTON
|
||||
mov ecx,YYCnf
|
||||
mov edx,20
|
||||
;mov esi,BtnColor
|
||||
mcall
|
||||
|
||||
mov ebx, XYShText ; SHUFFLE TEXT
|
||||
mov ecx, StatusColor
|
||||
mov edx,txtSh
|
||||
mov esi,lenSh-txtSh
|
||||
mov eax,4
|
||||
mcall
|
||||
|
||||
mov ebx, XYCnfText ; CONF TEXT
|
||||
mov edx,lenVictory-1
|
||||
mov esi,1
|
||||
mcall
|
||||
|
||||
mov ecx, 16 ; FIELD BUTTONS
|
||||
dbut:
|
||||
call draw_button
|
||||
loop dbut
|
||||
|
||||
call draw_moves
|
||||
|
||||
mcall 12, 2 ; end of drawing
|
||||
ret
|
||||
|
||||
|
||||
; *********************************************
|
||||
; ******* DRAWING A FIELD BUTTON **************
|
||||
; *********************************************
|
||||
; ECX - button number
|
||||
|
||||
draw_button:
|
||||
pusha
|
||||
dec ecx
|
||||
; calculating button dimensions
|
||||
mov edi, ecx
|
||||
lea edx,[ecx+2]
|
||||
mov ebx,ecx
|
||||
and ebx,11b
|
||||
shr ecx,2
|
||||
|
||||
imul ebx,BtnSize+3
|
||||
add ebx,BtnLeft
|
||||
shl ebx,16
|
||||
add ebx,BtnSize
|
||||
|
||||
imul ecx,BtnSize+3
|
||||
add ecx,BtnTop
|
||||
shl ecx,16
|
||||
add ecx,BtnSize
|
||||
movzx eax,byte [null]
|
||||
cmp eax,edi
|
||||
jne no_hole
|
||||
|
||||
pusha
|
||||
inc ebx
|
||||
inc ecx
|
||||
mov edx,BgdColor
|
||||
mov eax,13 ; clearing - 'hole'
|
||||
mcall
|
||||
popa
|
||||
|
||||
or edx,0x80000000 ; and removing button under it
|
||||
no_hole:
|
||||
mov al,byte[edi+curconf]
|
||||
mov esi,[task]
|
||||
cmp al,byte[edi+esi]
|
||||
je highlight
|
||||
mov esi,BtnColor
|
||||
jmp s_rbutton
|
||||
highlight:
|
||||
mov esi,BtnColor2
|
||||
s_rbutton:
|
||||
mov eax,8 ; set/remove button
|
||||
mcall
|
||||
movzx eax,byte [null]
|
||||
cmp eax,edi
|
||||
je no_text ; no digits - that's hole
|
||||
mov edx,ebx
|
||||
shr ecx,16
|
||||
mov dx,cx
|
||||
add edx,NumShift
|
||||
mov ebx,0x20000
|
||||
movzx ecx,byte [edi+curconf]
|
||||
cmp ecx,9
|
||||
ja two_num
|
||||
add edx,NumShift2 ; shift to center digits
|
||||
sub ebx,0x10000
|
||||
two_num:
|
||||
mov esi,NumColor
|
||||
mov eax,47
|
||||
mcall
|
||||
no_text:
|
||||
popa
|
||||
ret
|
||||
|
||||
|
||||
; *********************************************
|
||||
; ******* DRAWING STATUS LINE *****************
|
||||
; *********************************************
|
||||
|
||||
draw_moves:
|
||||
mov eax, 13 ; clear area
|
||||
mov ebx, XXbar
|
||||
mov ecx, YYbar
|
||||
mov edx, BgdColor
|
||||
mcall
|
||||
|
||||
mov eax, 4
|
||||
mov ebx, XYstatus
|
||||
mov ecx, StatusColor
|
||||
cmp ax, [sts]
|
||||
jl report_victory
|
||||
jne report_moves
|
||||
mov edx,txtCnf ; prompt to choose configuration
|
||||
mov esi,lenCnf-txtCnf
|
||||
jmp e_dm
|
||||
report_moves:
|
||||
mov edx,txtMoves ; how many moves done
|
||||
mov esi,lenMoves-txtMoves
|
||||
mov eax,4
|
||||
mcall
|
||||
mov esi,ecx
|
||||
mov edx,ebx
|
||||
add edx, 40 shl 16
|
||||
mov ebx,0x030000
|
||||
movzx ecx, byte[move_count]
|
||||
mov eax,47
|
||||
jmp e_dm
|
||||
report_victory: ; puzzle completed
|
||||
mov ecx,StatusColor2
|
||||
mov edx,txtVictory
|
||||
mov esi,lenVictory-txtVictory
|
||||
e_dm:
|
||||
mcall
|
||||
ret
|
||||
|
||||
|
||||
; *********************************************
|
||||
; ********* SHUFFLE ***************************
|
||||
; *********************************************
|
||||
|
||||
shuffle:
|
||||
xor eax,eax
|
||||
mov [sts],ax
|
||||
mov [move_count],ax ; reset moves to 0
|
||||
mov [sh_off],al
|
||||
mov eax, [generator]
|
||||
|
||||
mov ecx,SH_CYCLES
|
||||
sh_cycle:
|
||||
sub eax,0x43ab45b5 ; next random number
|
||||
ror eax,1
|
||||
xor eax,0x32c4324f
|
||||
ror eax,1
|
||||
mov [generator],eax
|
||||
|
||||
push eax
|
||||
and eax,11b ; direction 0..3
|
||||
movzx eax,byte [eax+correct]
|
||||
call move_check
|
||||
pop eax
|
||||
jnc sh_cycle ; if fails then retry
|
||||
loop sh_cycle
|
||||
inc byte[sh_off] ; shuffling complete
|
||||
ret
|
||||
|
||||
|
||||
; *********************************************
|
||||
; ********* MOVE VALIDITY CHECK ***************
|
||||
; *********************************************
|
||||
; AL - 'DELTA' DIRECTION
|
||||
|
||||
move_check:
|
||||
pusha
|
||||
mov ah,byte [null]
|
||||
mov bx,ax
|
||||
cmp bh,3
|
||||
ja no_top
|
||||
cmp al,-4 ; top of field
|
||||
je no_move
|
||||
no_top:
|
||||
cmp bh,12
|
||||
jb no_bottom
|
||||
cmp al,4 ; bottom of field
|
||||
je no_move
|
||||
no_bottom:
|
||||
and bh,11b
|
||||
cmp bh,0
|
||||
jnz no_left
|
||||
cmp al,-1 ; left of field
|
||||
je no_move
|
||||
no_left:
|
||||
cmp bh,11b
|
||||
jnz ok
|
||||
cmp al,1 ; right of field
|
||||
je no_move
|
||||
ok:
|
||||
mov bx,ax
|
||||
add bh,bl ; bh-new hole
|
||||
mov byte [null],bh
|
||||
movzx ecx,ah
|
||||
mov al,byte[ecx+curconf]
|
||||
movzx edx,bh
|
||||
mov bl,byte[edx+curconf] ; swapping button & hole
|
||||
mov byte[ecx+curconf],bl
|
||||
mov byte[edx+curconf],al
|
||||
|
||||
cmp byte[sh_off],0 ; if shuffle in progress,
|
||||
jz no_win ; then no redraw
|
||||
|
||||
; drawing button & hole
|
||||
inc ecx
|
||||
call draw_button
|
||||
movzx ecx,bh
|
||||
inc ecx
|
||||
call draw_button
|
||||
; testing if task completed
|
||||
mov esi,[task]
|
||||
mov edi,curconf
|
||||
mov ecx,16
|
||||
repe cmpsb
|
||||
cmp ecx,0
|
||||
jne no_win
|
||||
mov word[sts],6 ; puzzle done. Victory!
|
||||
no_win:
|
||||
popa
|
||||
stc
|
||||
ret
|
||||
no_move:
|
||||
popa
|
||||
clc
|
||||
ret
|
||||
; this is deprecated debug routine
|
||||
;ud:
|
||||
; ud2
|
||||
|
||||
; These are data used by program
|
||||
|
||||
correct db 1,-4,4,-1
|
||||
|
||||
conf db 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,0,15
|
||||
db 0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,0
|
||||
db 1,2,3,4,12,13,14,5,11,0,15,6,10,9,8,7,9
|
||||
|
||||
txtMoves:
|
||||
if lang eq ru_RU
|
||||
db '•®¤®¢:'
|
||||
else if lang eq it_IT
|
||||
db 'Movimenti:'
|
||||
else if lang eq de_DE
|
||||
db 'Bewegungen:'
|
||||
else ; Default to en_US
|
||||
db 'Moves:'
|
||||
end if
|
||||
lenMoves:
|
||||
|
||||
txtSh:
|
||||
if lang eq ru_RU
|
||||
db '’ ᮢª '
|
||||
else if lang eq it_IT
|
||||
db 'Mischia'
|
||||
else if lang eq de_DE
|
||||
db 'Mischen'
|
||||
else ; Default to en_US
|
||||
db 'Shuffle'
|
||||
end if
|
||||
lenSh:
|
||||
|
||||
txtCnf:
|
||||
if lang eq ru_RU
|
||||
db '‚ë¡¥à¨â¥ § ¤ çã ¨ ¦¬¨â¥->'
|
||||
else if lang eq it_IT
|
||||
db 'Seleziona un compito, poi premi->'
|
||||
else if lang eq de_DE
|
||||
db 'Waehle eine Aufgabe, dann clicke au->'
|
||||
else ; Default to en_US
|
||||
db 'Select task, then press ->'
|
||||
end if
|
||||
lenCnf:
|
||||
|
||||
txtTitle: ; áâப § £®«®¢ª
|
||||
if lang eq ru_RU
|
||||
db 'ˆ£à 15 - § ¤ ç X', 0
|
||||
else if lang eq it_IT
|
||||
db 'Gioco del quindici - partita X', 0
|
||||
else if lang eq de_DE
|
||||
db '15-Puzzle - Spiel X', 0
|
||||
else ; Default to en_US
|
||||
db 'Game 15 - puzzle X', 0
|
||||
end if
|
||||
|
||||
txtVictory:
|
||||
if lang eq ru_RU
|
||||
db '‚ë à¥è¨«¨ § ¤ çã! <20> ¦¬¨â¥->'
|
||||
else if lang eq it_IT
|
||||
db 'Gioco completato! Premi ->'
|
||||
else if lang eq de_DE
|
||||
db 'Spiel beendet! Druecken sie auf ->'
|
||||
else ; Default to en_US
|
||||
db 'Puzzle completed! Press->'
|
||||
end if
|
||||
lenVictory:
|
||||
|
||||
arrow equ lenVictory-2
|
||||
|
||||
I_END: ; ª®¥æ ¯à®£à ¬¬ë
|
||||
;null db ?
|
||||
move_count dw ?
|
||||
cptr db ?
|
||||
sts dw ?
|
||||
sh_off db ?
|
||||
task dd ?
|
||||
generator dd ?
|
||||
curconf:
|
||||
|
||||
@ -1,93 +1,97 @@
|
||||
include 'lang.inc'
|
||||
|
||||
struc langstr [lng, data]
|
||||
{
|
||||
if lang eq lng
|
||||
sz ., data
|
||||
end if
|
||||
}
|
||||
|
||||
struc langstr0 [lng, data]
|
||||
{
|
||||
if lang eq lng
|
||||
sz0 ., data
|
||||
end if
|
||||
}
|
||||
|
||||
include 'AKODE/data.inc'
|
||||
include 'Resources/Textures/textures.inc'
|
||||
include 'Resources/Levels/levels.inc'
|
||||
|
||||
FULLSCREEN = 0
|
||||
FSAA = 0
|
||||
DISABLE_SHADING = 0
|
||||
|
||||
MOVEMENT_SPEED = BLOCK_BASE_SIZE + BLOCK_BASE_SIZE / 4
|
||||
|
||||
FIELD_OF_VIEW = 60
|
||||
BLOCK_BASE_SIZE = 512
|
||||
BLOCK_HEIGHT = 512
|
||||
|
||||
INVENTORY_SIZE = 10
|
||||
|
||||
HUD_PANEL_HEIGHT = 120
|
||||
|
||||
INVENTORY_X = 570
|
||||
INVENTORY_Y = 15
|
||||
INVENTORY_PADDING_X = 10
|
||||
INVENTORY_PADDING_Y = 10
|
||||
OBJECT_IMAGE_WIDTH = 40
|
||||
OBJECT_IMAGE_HEIGHT = 40
|
||||
|
||||
GAME_MESSAGE_X = 150 + 15
|
||||
GAME_MESSAGE_Y = 15 + 15
|
||||
GAME_MESSAGE_COLOR = 0E4E2ADh
|
||||
|
||||
if FULLSCREEN
|
||||
;MAIN_WINDOW_X = 0
|
||||
;MAIN_WINDOW_Y = 0
|
||||
;MAIN_WINDOW_WIDTH = 0FFFFh
|
||||
;MAIN_WINDOW_HEIGHT = 0FFFFh
|
||||
MAIN_WINDOW_STYLE = (01000001b) shl 24
|
||||
MAIN_WINDOW_STYLE2 = 1 shl 24
|
||||
else
|
||||
MAIN_WINDOW_X = 20
|
||||
MAIN_WINDOW_Y = 20
|
||||
MAIN_WINDOW_WIDTH = 960 ; client area width
|
||||
MAIN_WINDOW_HEIGHT = 712 ; client area height
|
||||
MAIN_WINDOW_STYLE = (01110100b) shl 24
|
||||
MAIN_WINDOW_STYLE2 = 0
|
||||
end if
|
||||
|
||||
MAIN_EVENT_MASK = EVM_REDRAW or EVM_KEY or EVM_BUTTON or EVM_MOUSE or EVM_MOUSE_FILTER
|
||||
|
||||
MAIN_WINDOW_TITLE langstr0 \
|
||||
en_US, 'Dungeons of Augastes 0.1', \
|
||||
ru_RU, '<27>®¤§¥¬¥«ìï €ã£ áâ¥á 0.1'
|
||||
|
||||
LevelLoadingImageFile db 'Resources/Textures/HUD/LevelLoading.png', 0
|
||||
HudPanelImageFile db 'Resources/Textures/HUD/Panel.png', 0
|
||||
DeathImageFile db 'Resources/Textures/HUD/Death.png', 0
|
||||
EndImageFile db 'Resources/Textures/HUD/End.png', 0
|
||||
|
||||
align 4
|
||||
LevelLoadingImagePtr dd 0
|
||||
HudPanelImagePtr dd 0
|
||||
DeathImagePtr dd 0
|
||||
EndImagePtr dd 0
|
||||
|
||||
ImageBufferPtr dd 0
|
||||
|
||||
HudPanelNeedsRedraw dd 0
|
||||
|
||||
GameMessage dd 0
|
||||
GameStatus dd 0
|
||||
|
||||
GAME_STATUS.LEVEL_LOAD_FAILED = 1
|
||||
GAME_STATUS.DEAD = 2
|
||||
GAME_STATUS.END = 3
|
||||
|
||||
ACTION.DO_SOMETHING = AKODE_ACTION.CUSTOM + 1
|
||||
ACTION.LOOK_AROUND = AKODE_ACTION.CUSTOM + 2
|
||||
ACTION.USE_OBJECT = AKODE_ACTION.CUSTOM + 3
|
||||
ACTION.LOOK_AT_OBJECT = AKODE_ACTION.CUSTOM + 4
|
||||
include 'lang.inc' ; Language support for locales: ru_RU (CP866), en_US.
|
||||
|
||||
; FIXME:
|
||||
; This translation mechanism should fallback to en_US if the language
|
||||
; is unlisted (e.g. es_ES). Either fix the macros or use a different method.
|
||||
; The problem doesn't manifest, as we only bundle Dungeons in the RU distro.
|
||||
struc langstr [lng, data]
|
||||
{
|
||||
if lang eq lng
|
||||
sz ., data
|
||||
end if
|
||||
}
|
||||
|
||||
struc langstr0 [lng, data]
|
||||
{
|
||||
if lang eq lng
|
||||
sz0 ., data
|
||||
end if
|
||||
}
|
||||
|
||||
include 'AKODE/data.inc'
|
||||
include 'Resources/Textures/textures.inc'
|
||||
include 'Resources/Levels/levels.inc'
|
||||
|
||||
FULLSCREEN = 0
|
||||
FSAA = 0
|
||||
DISABLE_SHADING = 0
|
||||
|
||||
MOVEMENT_SPEED = BLOCK_BASE_SIZE + BLOCK_BASE_SIZE / 4
|
||||
|
||||
FIELD_OF_VIEW = 60
|
||||
BLOCK_BASE_SIZE = 512
|
||||
BLOCK_HEIGHT = 512
|
||||
|
||||
INVENTORY_SIZE = 10
|
||||
|
||||
HUD_PANEL_HEIGHT = 120
|
||||
|
||||
INVENTORY_X = 570
|
||||
INVENTORY_Y = 15
|
||||
INVENTORY_PADDING_X = 10
|
||||
INVENTORY_PADDING_Y = 10
|
||||
OBJECT_IMAGE_WIDTH = 40
|
||||
OBJECT_IMAGE_HEIGHT = 40
|
||||
|
||||
GAME_MESSAGE_X = 150 + 15
|
||||
GAME_MESSAGE_Y = 15 + 15
|
||||
GAME_MESSAGE_COLOR = 0E4E2ADh
|
||||
|
||||
if FULLSCREEN
|
||||
;MAIN_WINDOW_X = 0
|
||||
;MAIN_WINDOW_Y = 0
|
||||
;MAIN_WINDOW_WIDTH = 0FFFFh
|
||||
;MAIN_WINDOW_HEIGHT = 0FFFFh
|
||||
MAIN_WINDOW_STYLE = (01000001b) shl 24
|
||||
MAIN_WINDOW_STYLE2 = 1 shl 24
|
||||
else
|
||||
MAIN_WINDOW_X = 20
|
||||
MAIN_WINDOW_Y = 20
|
||||
MAIN_WINDOW_WIDTH = 960 ; client area width
|
||||
MAIN_WINDOW_HEIGHT = 712 ; client area height
|
||||
MAIN_WINDOW_STYLE = (01110100b) shl 24
|
||||
MAIN_WINDOW_STYLE2 = 0
|
||||
end if
|
||||
|
||||
MAIN_EVENT_MASK = EVM_REDRAW or EVM_KEY or EVM_BUTTON or EVM_MOUSE or EVM_MOUSE_FILTER
|
||||
|
||||
MAIN_WINDOW_TITLE langstr0 \
|
||||
en_US, 'Dungeons of Augastes 0.1', \
|
||||
ru_RU, '<27>®¤§¥¬¥«ìï €ã£ áâ¥á 0.1'
|
||||
|
||||
LevelLoadingImageFile db 'Resources/Textures/HUD/LevelLoading.png', 0
|
||||
HudPanelImageFile db 'Resources/Textures/HUD/Panel.png', 0
|
||||
DeathImageFile db 'Resources/Textures/HUD/Death.png', 0
|
||||
EndImageFile db 'Resources/Textures/HUD/End.png', 0
|
||||
|
||||
align 4
|
||||
LevelLoadingImagePtr dd 0
|
||||
HudPanelImagePtr dd 0
|
||||
DeathImagePtr dd 0
|
||||
EndImagePtr dd 0
|
||||
|
||||
ImageBufferPtr dd 0
|
||||
|
||||
HudPanelNeedsRedraw dd 0
|
||||
|
||||
GameMessage dd 0
|
||||
GameStatus dd 0
|
||||
|
||||
GAME_STATUS.LEVEL_LOAD_FAILED = 1
|
||||
GAME_STATUS.DEAD = 2
|
||||
GAME_STATUS.END = 3
|
||||
|
||||
ACTION.DO_SOMETHING = AKODE_ACTION.CUSTOM + 1
|
||||
ACTION.LOOK_AROUND = AKODE_ACTION.CUSTOM + 2
|
||||
ACTION.USE_OBJECT = AKODE_ACTION.CUSTOM + 3
|
||||
ACTION.LOOK_AT_OBJECT = AKODE_ACTION.CUSTOM + 4
|
||||
|
||||
@ -4,7 +4,7 @@
|
||||
; contact: 4nic8@casiocalc.org
|
||||
;----------------------------------------
|
||||
|
||||
include 'lang.inc'
|
||||
include 'lang.inc' ; Language support for locales: it_IT, en_US.
|
||||
include '../../../macros.inc'
|
||||
include 'ascl.inc'
|
||||
include 'ascgl.inc'
|
||||
@ -142,7 +142,7 @@ still:
|
||||
; *********************************************
|
||||
|
||||
show_screen: ; flips the virtual screen to the window
|
||||
push_abc
|
||||
push_abc
|
||||
mcall 7, screen, <X_SIZE, Y_SIZE>, 0
|
||||
pop_abc
|
||||
ret
|
||||
@ -389,7 +389,7 @@ grad_fill_screen: ; eax - screen color ( 0x00RRGGBB ), ebx - mack
|
||||
.no_ch:
|
||||
pop ecx
|
||||
loop .lab1
|
||||
|
||||
|
||||
pop_abc
|
||||
ret
|
||||
|
||||
@ -409,7 +409,7 @@ intro: ; INTRO ;
|
||||
jne @f
|
||||
ret
|
||||
@@:
|
||||
|
||||
|
||||
mcall 4,<115,150>,0x82050505,VERSION
|
||||
mcall ,<125,180>,0x80050505,AUTHOR
|
||||
mcall ,<90,210>,0x81EE0800,PRESS_SPACE
|
||||
@ -468,13 +468,13 @@ fast_gfx:
|
||||
mov ebx,0xFFFF
|
||||
.g_ok:
|
||||
call grad_fill_screen
|
||||
|
||||
|
||||
;black_bg
|
||||
;mov eax,0
|
||||
;mov ebx,0
|
||||
;call fill_screen
|
||||
|
||||
|
||||
|
||||
mov eax,37 ; get mouse position
|
||||
mov ebx,1
|
||||
mcall
|
||||
@ -805,7 +805,7 @@ draw_window:
|
||||
mcall 48,4
|
||||
lea ecx, [100*65536+Y_SIZE+4+eax]; [y start] *65536 + [y size] + [skin_height]
|
||||
mcall 0,<100,X_SIZE+9>,,0x74ffffff,,0
|
||||
|
||||
|
||||
mov eax, [lives]
|
||||
add eax, '0'
|
||||
mov esi, HEADER
|
||||
@ -836,7 +836,7 @@ if lang eq it_IT
|
||||
THANKS_FOR_PLAYING db 'Grazie per aver giocato', 0
|
||||
PRESS_SPACE db 'Premi spazio per iniziare',0
|
||||
LEVEL db 'LIVELLO',0
|
||||
else
|
||||
else ; Default to en_US
|
||||
THANKS_FOR_PLAYING db 'Thanks for playing', 0
|
||||
PRESS_SPACE db 'press SPACE to start',0
|
||||
LEVEL db 'LEVEL',0
|
||||
|
||||
@ -19,7 +19,7 @@
|
||||
|
||||
;******************************************************************************
|
||||
|
||||
include 'lang.inc'
|
||||
include 'lang.inc' ; Language support for locales: it_IT, en_US.
|
||||
include '..\..\..\macros.inc'
|
||||
include 'ascl.inc'
|
||||
include 'ascgl.inc'
|
||||
@ -285,7 +285,7 @@ end_col:
|
||||
cmp [delay_cnt],0
|
||||
jne no_delay
|
||||
mov [delay_cnt],1
|
||||
delay 1 ;don't generate delay for fast speed programm
|
||||
delay 1 ; don't generate delay for fast speed program
|
||||
no_delay:
|
||||
dec [delay_cnt]
|
||||
|
||||
@ -297,9 +297,9 @@ win_test:
|
||||
mov [againbut],1
|
||||
call draw_window
|
||||
; label 160,200,'You Win!',cl_Green+font_Big
|
||||
; label 130,220,'Youre Score:',cl_Green+font_Big
|
||||
; label 130,220,'Your Score:',cl_Green+font_Big
|
||||
; outcount dword [scorea],230,220,cl_Green,5*65536
|
||||
; label 130,234,'Youre Lives:',cl_Green+font_Big
|
||||
; label 130,234,'Your Lives:',cl_Green+font_Big
|
||||
; outcount dword [scoreb],230,234,cl_Green,5*65536
|
||||
; delay 600 ;wait 2sec
|
||||
; close ;exit from program
|
||||
@ -310,7 +310,7 @@ lose_test:
|
||||
jne stl2
|
||||
; call draw_window
|
||||
; label 160,200,'You Lose!',cl_Red+font_Big
|
||||
; label 130,220,'Youre Score:',cl_Red+font_Big
|
||||
; label 130,220,'Your Score:',cl_Red+font_Big
|
||||
; outcount dword [scorea],230,220,cl_Red,5*65536
|
||||
; delay 300 ;wait 2sec
|
||||
; close ;exit from program
|
||||
@ -420,7 +420,7 @@ draw_window:
|
||||
window 0,0,400+8,480+24,window_Skinned
|
||||
if lang eq it_IT
|
||||
label 12,8,'ARCANOID: Usa le freccie Vite Punti',cl_White+font_Big
|
||||
else
|
||||
else ; Default to en_US
|
||||
label 12,8,'ARCANOID: USE ARROW KEYS LIVES SCORE',cl_White+font_Big
|
||||
end if
|
||||
|
||||
@ -433,9 +433,9 @@ draw_window:
|
||||
if lang eq it_IT
|
||||
label 160,200,'Hai perso!',cl_Red+font_Big
|
||||
label 130,220,'Punteggio:',cl_Red+font_Big
|
||||
else
|
||||
else ; Default to en_US
|
||||
label 160,200,'You Lose!',cl_Red+font_Big
|
||||
label 130,220,'Youre Score:',cl_Red+font_Big
|
||||
label 130,220,'Your Score:',cl_Red+font_Big
|
||||
end if
|
||||
outcount dword [scorea],230,220,cl_Red,5*65536
|
||||
mov ebx,150*65536+80
|
||||
@ -449,7 +449,7 @@ draw_window:
|
||||
mcall
|
||||
if lang eq it_IT
|
||||
label 152,244,'Rigioca',cl_Red+font_Big
|
||||
else
|
||||
else ; Default to en_US
|
||||
label 152,244,'Play again?',cl_Red+font_Big
|
||||
end if
|
||||
jmp elev
|
||||
@ -457,9 +457,9 @@ nlev:
|
||||
if lang eq it_IT
|
||||
label 160,200,'Hai vinto!',cl_Green+font_Big
|
||||
label 130,220,'Punteggio:',cl_Green+font_Big
|
||||
else
|
||||
else ; Default to en_US
|
||||
label 160,200,'You Win!',cl_Green+font_Big
|
||||
label 130,220,'Youre Score:',cl_Green+font_Big
|
||||
label 130,220,'Your Score:',cl_Green+font_Big
|
||||
end if
|
||||
outcount dword [scorea],230,220,cl_Green,5*65536
|
||||
mov ebx,150*65536+120 ;mov ebx,150*65536+80
|
||||
@ -473,13 +473,13 @@ nlev:
|
||||
mcall
|
||||
if lang eq it_IT
|
||||
label 152,244,'Prossimo Livello',cl_Red+font_Big
|
||||
else
|
||||
else ; Default to en_US
|
||||
label 152,244,'Next level?',cl_Red+font_Big
|
||||
end if
|
||||
elev:
|
||||
if lang eq it_IT
|
||||
label 178,264,'Esci',cl_Red+font_Big
|
||||
else
|
||||
else ; Default to en_US
|
||||
label 178,264,'Exit?',cl_Red+font_Big
|
||||
end if
|
||||
|
||||
|
||||
File diff suppressed because it is too large
Load Diff
@ -1,17 +1,17 @@
|
||||
_window_caption db 'Soft landing',0 ;çàãîëîâîê ïðèëîæåíèÿ
|
||||
|
||||
_text_game_over db 'G A M E O V E R', 0
|
||||
_text_level_complete db 'L E V E L C O M P L E T E', 0
|
||||
_text_intro_title db ' S O F T L A N D I N G', 0
|
||||
_text_intro_description1 db 'Provide a soft landing, clearing the runway from the city buildings', 0
|
||||
|
||||
_text_intro_key_controls db ' Control keys:', 0
|
||||
_text_intro_key_ctrl db ' CTRL - drop a bomb', 0
|
||||
_text_intro_key_space db 'SPACE - do a barrel roll', 0
|
||||
_text_intro_select_level db ' Use UP and DOWN arrow keys for select game level:', 0
|
||||
_text_intro_level_num db ' LEVEL', 0
|
||||
_text_intro_set_volume db ' Use LEFT and RIGHT arrow keys for setting volume:', 0
|
||||
_text_intro_volume_num db 'VOLUME', 0
|
||||
|
||||
_text_intro_start_space db 'Press SPACE for start game', 0
|
||||
_text_intro_exit_key db 'Esc - exit', 0
|
||||
_window_caption db 'Soft landing',0 ; Application title
|
||||
|
||||
_text_game_over db 'G A M E O V E R', 0
|
||||
_text_level_complete db 'L E V E L C O M P L E T E', 0
|
||||
_text_intro_title db ' S O F T L A N D I N G', 0
|
||||
_text_intro_description1 db 'Provide a soft landing, clearing the runway from the city buildings', 0
|
||||
|
||||
_text_intro_key_controls db ' Control keys:', 0
|
||||
_text_intro_key_ctrl db ' CTRL - drop a bomb', 0
|
||||
_text_intro_key_space db 'SPACE - do a barrel roll', 0
|
||||
_text_intro_select_level db ' Use UP and DOWN arrow keys to select the game level:', 0
|
||||
_text_intro_level_num db ' LEVEL', 0
|
||||
_text_intro_set_volume db ' Use LEFT and RIGHT arrow keys for setting volume:', 0
|
||||
_text_intro_volume_num db 'VOLUME', 0
|
||||
|
||||
_text_intro_start_space db 'Press SPACE for start game', 0
|
||||
_text_intro_exit_key db 'Esc - exit', 0
|
||||
Loading…
Reference in New Issue
Block a user