Subversion Repositories Kolibri OS

Compare Revisions

Regard whitespace Rev 7394 → Rev 7395

/programs/other/ha/HACONFIG.ASM
2,7 → 2,7
; Hot Angles Config ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; Compile with FASM
; Version 0.1: Sep 18, 2018
; Version 0.2: Sep 19, 2018
 
; Copyright (c) 2018, Efremenkov Sergey aka TheOnlyMirage
; All rights reserved.
40,6 → 40,7
dd 0, 0
 
; Íà÷àëî îáëàñòè êîäà
include 'lang.inc' ;ïîääåðæêà ÿçûêîâ ïðè êîìïèëÿöèè
include '../../macros.inc'
include 'editbox.inc'
use_edit_box
551,10 → 552,10
mov esi, 0x00AABBCC ;öâåò êíîïêè
mcall 8
;ðèñóåì òåêñò êíîïêè
mov ebx, (WindowsWidth-80-Otstup+25) * 65536 + 166 ;êîîðäèíàòû òåêñòà (x, y)
mov ebx, (WindowsWidth-80-Otstup+25-buttonTextXoffset) * 65536 + 166 ;êîîðäèíàòû òåêñòà (x, y)
mov ecx, 0xFFFFFF ;áåëûé öâåò òåêñòà
mov edx, buttonText
mov esi, 5 ;ðàçìåð òåêñòà â ñèìâîëàõ
mov esi, buttonTextSize ;5 ;ðàçìåð òåêñòà â ñèìâîëàõ
mcall 4
 
call draw_super_text
580,13 → 581,8
ret
 
 
text db "This is a Hot Angles Configurator. "
db "Set the parameters bellow for yourself or disable this option."
db " ", 0
hed:
title db "Hot Angles Configurator", 0
buttonText db "Apply", 0
 
 
align 4
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
;DATA äàííûå äëÿ check_box1 - èñïîëüçóåò ñèñòåìíûå öâåòà
597,7 → 593,41
ch1 check_box1 30,160,ch_text.1,ch_text.e1-ch_text.1,ch_flag_en
check_boxes_end:
 
 
if lang eq ru ;åñëè ÿçûê ñáîðêè ðóññêèé
 
text db "Š®­ä¨£ãà â®à Hot Angles ®â¢¥ç ¥â §  ­ áâனªã  ªâ¨¢­ëå 㣫®¢. "
db " áâன⥠¯ à ¬¥âàë ¯®¤ á¥¡ï ¨«¨ ®âª«îç¨â¥ íâã ®¯æ¨î. "
db " ", 0
hed:
title db "Š®­ä¨£ãà â®à ã⨫¨âë Hot Angles", 0
buttonText db "à¨¬¥­¨âì", 0
buttonTextSize = 9
buttonTextXoffset = 12
 
ch_text: ;ñîïðîâîæäàþùèé òåêñò äëÿ ÷åê áîêñîâ
.1 db '‚ª«îç¨âì/ ªâ¨¢¨à®¢ âì "Hot Angles"'
.e1:
 
superText:
.lu db 'Š®¬ ­¤  «¥¢®£® ¢¥àå­¥£® 㣫 : ', 0
.ld db 'Š®¬ ­¤  «¥¢®£® ­¨¦­¥£® 㣫 : ', 0
.ru db 'Š®¬ ­¤  ¯à ¢®£® ¢¥àå­¥£® 㣫 :', 0
.rd db 'Š®¬ ­¤  ¯à ¢®£® ­¨¦­¥£® 㣫 : ', 0
superTextSize = 30
 
else ;èíà÷å àíãëèéñêèé òåêñò
 
text db "This is a Hot Angles Configurator. "
db "Set the parameters bellow for yourself or disable this option."
db " ", 0
hed:
title db "Hot Angles Configurator", 0
buttonText db "Apply", 0
buttonTextSize = 5
buttonTextXoffset = 0
 
ch_text: ;ñîïðîâîæäàþùèé òåêñò äëÿ ÷åê áîêñîâ
.1 db 'Activate "Hot Angles"'
.e1:
 
604,9 → 634,13
superText:
.lu db 'Left up angle command:', 0
.ld db 'Left down angle command:', 0
.ru db "Right up angle command:", 0
.ru db 'Right up angle command: ', 0
.rd db 'Right down angle command:', 0
superTextSize = 25
 
end if
 
 
draw_super_text:
push eax ebx ecx edx edi esi
mov ebx, Otstup * 65536 + 74 ; draw info text with function 4 (x, y)
613,22 → 647,22
mov ecx, 0x224466
mov eax, superText.lu
mov edx, eax
mov esi, 22
mov esi, superTextSize ;22
mcall 4
 
mov ebx, Otstup * 65536 + 109
mov edx, superText.ld
mov esi, 24
mov esi, superTextSize ;24
mcall 4
 
mov ebx, 240 * 65536 + 74
mov edx, superText.ru
mov esi, 23
mov esi, superTextSize ;23
mcall 4
 
mov ebx, 240 * 65536 + 109
mov edx, superText.rd
mov esi, 25
mov esi, superTextSize ;25
mcall 4
 
pop esi edi edx ecx ebx eax