WebSVN – Kolibri OS – Diff – /programs/other/ha/HACONFIG.ASM


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; Hot Angles Config ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; Compile with FASM
; Version 0.3: Sep 22, 2018
 
; Copyright (c) 2018, Efremenkov Sergey aka TheOnlyMirage
; All rights reserved.
; Redistribution and use in source and binary forms, with or without modification,
; are permitted provided that the following conditions are met:
;    * Redistributions of source code must retain the above copyright notice, this
;    list of conditions and the following disclaimer.
;    * Redistributions in binary form must reproduce the above copyright  notice,
;    this list of conditions and the following disclaimer in the documentation and/or
;    other materials provided with the distribution.
;    * Neither the name of the  nor the names of its contributors may
;    be used to endorse or promote products derived from this software without
;    specific prior written permission.
 
; THE SOFTWARE IS PROVIDED AS IS, WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED,
; INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A
; PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
; HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
; OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
; SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
; --------------------------------------------------------------------------------------
 
;P.S. Êîä ñûðîé, òðåáóåòñÿ îïòèìèçàöèÿ è äîðàáîòêà (ñì. òåìó ôîðóìà)
format binary as ""     ; Binary file format without extension
use32                   ; Tell compiler to use 32 bit instructions
org 0                   ; the base address of code, always 0x0
 
; Çàãîëîâîê èñïîëíÿåìîãî ôàéëà Êîëèáðè ÎÑ
db 'MENUET01'
dd 1
dd START
dd I_END
dd MEM
dd STACKTOP
dd 0, 0
 
; Íà÷àëî îáëàñòè êîäà
include 'lang.inc'       ;ïîääåðæêà ÿçûêîâ ïðè êîìïèëÿöèè
include '../../macros.inc'
include '../../proc32.inc'
include '../../dll.inc'
include '../../develop/libraries/box_lib/trunk/box_lib.mac'
;;include 'editbox.inc'
;;use_edit_box
;;include 'check.inc'      ;âêëþ÷èòü ôàéë check.inc
;;version_ch1              ;íåîáõîäèìûé ìàêðîñ äëÿ âêëþ÷åíèÿ new âåðñèè check_box1
;;use_check_box            ;èñïîëüçóÿ ìàêðîñû, âíåñòè ïðîöåäóðû äëÿ ðèñîâàíèÿ ÷åê áîêñà
 
Otstup = 30
 
START:
    call copyKill        ;ïðîñòåéøàÿ çàùèòà îò çàïóñêà âòîðîé êîïèè ïðèëîæåíèÿ
    mcall  68, 11        ;èíèöèàëèçàöèÿ êó÷è
 
    mov  eax,48          ;ïîëó÷èòü ñèñòåìíûå öâåòà
    mov  ebx,3
    mov  ecx, sc
    mov  edx, sizeof.system_colors
    mcall
 
 
    stdcall dll.Load, @IMPORT
    or      eax, eax
    jnz     exit
 
    invoke  init_checkbox, ch1
 
    mov  eax,40          ;óñòàíîâèòü ìàñêó äëÿ îæèäàåìûõ ñîáûòèé
    mov  ebx,0x27        ;ñèñòåìà áóäåò ðåàãèðîâàòü òîëüêî íà ñîîáùåíèå î ïåðåðèñîâêå, íàæàòà êíîïêà, îïðåäåë¸ííàÿ ðàíåå, ñîáûòèå îò ìûøè (÷òî-òî ñëó÷èëîñü - íàæàòèå íà êíîïêó ìûøè èëè ïåðåìåùåíèå; ñáðàñûâàåòñÿ ïðè ïðî÷òåíèè)
    mcall
 
    call  loadConfig     ;çàãðóæàåì êîíôèãóðàöèþ èç ôàéëà, åñëè íåò - òî âûñòàâëÿåì ïàðàìåòðû ïî óìîë÷àíèþ
    call  draw_window    ;îòðèñîâàòü îêíî ïðèëîæåíèÿ
 
; Îáðàáîòêà öèêëà ñîáûòèé
event_wait:
    mov     eax, 10      ; function 10 : wait until event
    mcall                ; event type is returned in eax
 
    cmp     eax, 1       ; Event redraw request ?
    je      red          ; Expl.: there has been activity on screen and
                         ; parts of the applications has to be redrawn.
 
    cmp     eax, 2       ; Event key in buffer ?
    je      key          ; Expl.: User has pressed a key while the
                         ; app is at the top of the window stack.
 
    cmp     eax, 3       ; Event button in buffer ?
    je      button       ; Expl.: User has pressed one of the
                         ; applications buttons.
 
    ;mouse_edit_boxes editboxes,editboxes_end
    ;mouse_check_boxes check_boxes,check_boxes_end  ;ïðîâåðêà ÷åê áîêñà
    invoke  edit_box_mouse, editLU
    invoke  edit_box_mouse, editLD
    invoke  edit_box_mouse, editRU
    invoke  edit_box_mouse, editRD
    invoke  check_box_mouse, ch1  ;ïðîâåðêà ÷åê áîêñà
 
    jmp     event_wait
 
 
red:                     ;îáðàáîòêà ñîáûòèÿ ïåðåðèñîâêè îêíà
   call    draw_window
   jmp     event_wait
 
key:                                    ; Keypress event handler
        mov     eax, 2                  ; The key is returned in ah. The key must be
        mcall                           ; read and cleared from the system queue.
        ;key_edit_boxes editboxes,editboxes_end
        invoke  edit_box_key, editLU
        invoke  edit_box_key, editLD
        invoke  edit_box_key, editRU
        invoke  edit_box_key, editRD
        jmp     event_wait              ; Just read the key, ignore it and jump to event_wait.
 
button:                                 ; Buttonpress event handler
    mov     eax,17                  ; The button number defined in window_draw
    mcall                           ; is returned to ah.
 
    cmp     ah,1                    ; button id=1 ?
    jne     noclose
exit:
    mov     eax,-1                  ; Function -1 : close this program
    mcall
noclose:
    cmp  ah, 2         ;êíîïêà "Ïðèìåíèòü"
    jne  butend
    call applyButton   ;âûçîâ íàøåãî îáðàáîò÷èêà íàæàòèÿ êíîïêè
butend:
    jmp  event_wait    ;this is for ignored events, useful at development
 
 
 
;èìÿ êîíôèãóðàöèîííîãî ôàéëà
fileName: db 'SETTINGS/HOTANGLES.CFG', 0
 
;ñòðóêòóðà äëÿ ñîçäàíèÿ/ïåðåçàïèñè ôàéëà
createFile:
  .func     dd 2    ;íîìåð ïîäôóíêöèè
  .re       dd 0, 0 ;çàðåçåðâèðîâàíî
  .size     dd 0    ;ñêîëüêî áàéò ïèñàòü
  .data_adr dd 0    ;óêàçàòåëü íà äàííûå
  .path     db 0
  .path_adr dd fileName    ;ïóòü
 
;ñòðîêà ïàðàìåòðîâ ïî óìîë÷àíèþ è å¸ ðàçìåð
defaultDataForConfig db 121,13,10,'/rd/1/HACONFIG',13,10,'/rd/1/HACONFIG',13,10,'/rd/1/HACONFIG',13,10,'/rd/1/HACONFIG',13,10
defaultDataSize = 48+19
 
 
copyParam:  ;êîïèðóåò ïàðàìåòð(êîìàíäó çàïóñêà) â áóôåð (ñì. äàëüøå)
   push esi ebx ecx
   mov ecx, dword[ebx] ;÷èòàåì ðàçìåð ñòðîêè
.copy:  ;êîïèðóåì ñèìâîëû
   cmp ecx, 0
   je copyParam.copyEnd
   mov bl, byte[esi]
   mov byte[eax], bl
   dec ecx
   inc eax
   inc esi
   jmp copyParam.copy
.copyEnd:
   pop ecx ebx esi
   ret
 
 
addPerenos:  ;äîáàâëÿåò ïåðåíîñ ñòðîêè â áóôåð
   mov byte[eax], 13
   inc eax
   mov byte[eax], 10
   inc eax
   ret
 
;îáðàáîò÷èê êíîïêè "Ïðèìåíèòü"
applyButton:
    push eax ebx ecx
        ;mov dword[createFile.data_adr], defaultDataForConfig
        ;mov dword[createFile.size], defaultDataSize
 
        ;âû÷èñëèì ðàçìåð ôàéëà êîíôèãóðàöèè â áàéòàõ
        mov ecx, 5*2+1 ;1 áàéò íà ñîñòîÿíèå àêòèâíîñòè è 5 ïàð ïåðåíîñîâ ñòðîê (ñèìâîëû 13, 10)
        add ecx, dword[editLU.size] ;dataBuffer.size1]      ;ïëþñ ðàçìåð êàæäîé ñòðîêè â áàéòàõ
        add ecx, dword[editLD.size] ;dataBuffer.size2]
        add ecx, dword[editRU.size] ;dataBuffer.size3]
        add ecx, dword[editRD.size] ;dataBuffer.size4]
        ;òåïåðü ðàçìåð ôàéëà êîíôèãóðàöèè â ecx
        mov dword[createFile.size], ecx ;ïîëîæèì ðàçìåð áàéò â ñòðóêòóðó ñîçäàíèÿ/ïåðåçàïèñè ôàéëà
        mcall 68, 12, ecx ;âûäåëÿåì áëîê ïàìÿòè ïîä áóôåð ñîäåðæèìîãî
        mov dword[createFile.data_adr], eax ;ñîõðàíÿåì àäðåñ áóôåðà â ñòðóêòóðó
 
        ;çàïîëíèì áóôåð ñîäåðæèìîãî:
        mov byte[eax], 110; 'n' ;ïî óìîë÷àíèþ ôëàã ñíÿò
        cmp word[ch1.flags], 110b ;ch_flag_en and ch_flag_middle ;110b ;ch_flag_en   ;âûñòàâëåí checkBox èëè íåò?
        jne applyButton.no
        mov byte[eax], 121 ;èíà÷å êëàä¸ì 'y'
.no:
        inc eax
        call addPerenos
 
        push esi ebx
        call UpdateEditsSizes ;îáíîâèòü ðàçìåðû òåêñòà â edit'àõ
 
        mov esi, dataBuffer.1 ;editLU.text
        mov ebx, dataBuffer.size1 ;editLU.size
        call copyParam
        call addPerenos     ;äîáàâëÿåì ïåðåíîñ ñòðîêè
 
        mov esi, dataBuffer.2 ;editLD.text
        mov ebx, dataBuffer.size2 ;editLD.size
        call copyParam
        call addPerenos     ;äîáàâëÿåì ïåðåíîñ ñòðîêè
 
        mov esi, dataBuffer.3
        mov ebx, dataBuffer.size3
        call copyParam
        call addPerenos     ;äîáàâëÿåì ïåðåíîñ ñòðîêè
 
        mov esi, dataBuffer.4
        mov ebx, dataBuffer.size4
        call copyParam
        call addPerenos     ;äîáàâëÿåì ïåðåíîñ ñòðîêè
 
        pop ebx esi
 
 
    mov ebx, createFile
    mcall 70
        cmp eax, 0
        je .end
        ;èíà÷å çäåñü íóæíî âûâåñòè îêíî ñ îøèáêîé !!!
.end:
        mcall 68, 13, dword[createFile.data_adr]  ;îñâîáîæäàåì ïàìÿòü ïîä áóôåð
        call restartHotAnglesApp ;ïåðåçàïóñêàåì @HOTANGLES
        pop ecx ebx eax
    ret
 
 
 
 
 
 
compareBytes2:
   push edi esi ecx ebx
   xor eax, eax
   mov ecx, 10  ;max ðàçìåð ñòðîê 11
@@:
   mov bl, byte[edi]
   cmp bl, byte[esi]
   jne compareBytes.no
   inc edi
   inc esi
   cmp ecx, 0
   je @f
   dec ecx
   jmp @b
.no:
   mov eax, 1
@@:
   pop ebx ecx esi edi
   ret
 
 
restartHotAnglesApp:   ;!!!
   ;íàõîäèì âñå êîïèè ïðèëîæåíèÿ ïî èìåíè è çàâåðøàåì èõ
   push eax ebx ecx esi edi
   ;óêàçàòåëè, êîòîðûå íèêîãäà íå ìåíÿþòñÿ:
   mov esi, startAppData.file_name       ;ïåðâàÿ ñòðîêà - èñêîìîå èìÿ ïðèëîæåíèÿ
   mov edi, buf            ;âòîðàÿ ñòðîêà - èìÿ òåêóùåãî ñëîòà
   add edi, 10
 
   mov ecx, 1
@@:
   mcall 9, buf, ecx              ;ïîëó÷àåì äàííûå î÷åðåäíîãî ñëîòà
   mov dword[slotMax], eax
 
   call compareBytes2 ;ñðàâíèâàåì èìÿ
   cmp eax, 0
   jne restartHotAnglesApp.next   ;åñëè íå ñîâïàëî, òî ïåðåõîäèì íà ñëåäóþùèé ñëîò
 
   ;push eax ebx ecx
   mcall 18, 2, ecx               ;èíà÷å çàâåðøàåì ñëîò
   ;pop ecx ebx eax
 
.next:
   inc  ecx
   cmp ecx, dword[slotMax]
   ja @f
   jmp @b
@@:
   pop edi esi ecx ebx eax
 
   ;çàïóñêàåì ïðèëîæåíèå çàíîâî
   push eax ebx
   mcall 70, startAppData
   cmp eax, 0
   ja @f       ;åñëè eax>0, òî óñïåøíî çàïóùåíî
   ;!!! èíà÷å òóò ïå÷àòàåì îøèáêó
@@:
   pop ebx eax
   ret
 
startAppData:
    .subfunction dd   7
    .flags       dd   0
    .param       dd   0
    .rezerv      dd   0, 0
    .full_name   db   '/rd/1/'
    .file_name   db   '@HOTANGLES', 0
    ;db 0
    ;.name: dd HotAnglesAppName
;HotAnglesAppName db '@HOTANGLES', 0
 
 
UpdateEditsSizes:
   push eax
   mov eax, dword[editLU.size]
   mov dword[dataBuffer.size1], eax
 
   mov eax, dword[editLD.size]
   mov dword[dataBuffer.size2], eax
 
   mov eax, dword[editRU.size]
   mov dword[dataBuffer.size3], eax
 
   mov eax, dword[editRD.size]
   mov dword[dataBuffer.size4], eax
 
   pop eax
   ret
 
fileAdr dd 0
 
loadConfig:
   push eax ebx ecx edx
   mcall 68, 27, fileName   ;çàãðóæàåì êîíôèãóðàöèîííûé ôàéë â ÎÇÓ
   mov dword[fileAdr], eax  ;ñîõðàíÿåì àäðåñ áëîêà ïàìÿòè ôàéëà
   cmp eax, 0
   je loadConfig.default       ;åñëè ôàéëà êîíôèãóðàöèè íåò, òî ñòàâèì íàñòðîéêè ïî óìîë÷àíèþ
   ;èíà÷å äàííûå çàãðóæåíû â ÎÇÓ, ðàçìåð â edx
   cmp edx, 0               ;åñëè ôàéë ïóñò, â í¸ì íåò äàííûõ, òî ñòàâèì íàñòðîéêè ïî óìîë÷àíèþ
   je loadConfig.default
.start:
   add edx, eax             ;êëàä¸ì â edx - àäðåñ êîíöà êîíôèã.äàííûõ
 
.chStart:
   cmp byte[eax], 121 ;'y'  ;âûñòàâëÿåì checkBox - ïàðàìåòð àêòèâíîñòè ïðèëîæåíèÿ
   jne loadConfig.no
.yes:
   mov word[ch1.flags], 110b ;ch_flag_en and ch_flag_middle ;110b ;ch_flag_en
   jmp loadConfig.chEnd
.no:
   mov word[ch1.flags], 100b ;0 and ch_flag_middle ;100b
.chEnd:
   ;jmp loadConfig.end   ;êîìàíäà äëÿ óäîáñòâà îòëàäêè è ïîèñêà îøèáîê
 
   ;êîïèðóåì ñîäåðæèìîå ñòðîê â áóôåð
   push edi esi ecx ebx eax
   ;èíèöèàëèçèðóåì óêàçàòåëè íà àäðåñà áóôåðà ñòðîêè è å¸ ðàçìåðà
   mov edi, dataBuffer.1     ;dword[dataBuffer.1]
   mov esi, dataBuffer.size1 ;dword[dataBuffer.size1]
   ;ecx - ñ÷¸ò÷èê áàéò â ñòðîêå
;   mov ecx, 0 ;xor ecx, ecx
.block:
   xor ecx, ecx ;îáíóëÿåì ñ÷¸ò÷èê
   inc eax
   cmp byte[eax], 10         ;åñëè î÷åðåäíîé êîä ñèìâîëà 10 èëè 13, òî ïðîïóñêàåì ñèìâîëû
   je loadConfig.block ;propusk     ;äî ïåðâîãî îòëè÷íîãî îò íèõ
   cmp byte[eax], 13
   je loadConfig.block ;propusk
 
   ; ñèìâîë îòëè÷åí îò ïåðåíîñà ñòðîêè è âîçâðàòà êàðåòêè - íà÷èíàåì êîïèðîâàòü îòñþäà â áóôåð
   mov bl, byte[eax]
   mov byte[edi], bl
   inc edi
   inc eax
   inc ecx ;óâåëè÷èâàåì ñ÷¸ò÷èê ñèìâîëîâ â ñòðîêå
 
   ;èä¸ì äî êîíöà ýòîé ñòðîêè: ïîêà íå âñòðåòèì î÷åðåäíîé 10, 13, 0 èëè file end
.while:     ;è êîïèðóåì âñ¸ â áóôåð
   cmp eax, edx           ;ïðîâåðÿåì çàêîí÷èëñÿ ëè ôàéë, à êîíöà ñòðîêè íå áûëî !!!
   ja loadConfig.ura
   cmp byte[eax], 10
   je loadConfig.ura
   cmp byte[eax], 0
   je loadConfig.ura
   cmp byte[eax], 13
   je loadConfig.ura
 
   mov bl, byte[eax]
   mov byte[edi], bl
   inc edi
   inc eax
   inc ecx
   cmp ecx, 511
   jae loadConfig.ura
   jmp loadConfig.while
.ura:
   mov byte[edi], 0      ;êëàä¸ì çàâåðøàþùèé 0 â ñòðîêó
   mov dword[esi], ecx   ;ñîõðàíÿåì ðàçìåð ñòðîêè
   add esi, 4            ;ïåðåõîäèì íà ðàçìåð ñëåäóþùåãî áóôåðà
   sub edi, ecx          ;ïåðåõîäèì íà ñëåäóþùèé áóôåð
   add edi, 512
;   mov ecx, 0 ;xor ecx, ecx ;îáíóëÿåì ðàçìåð ñòðîêè
 
   cmp edi, dataBuffer.size1 ;åñëè ýòî áûë ïîñëåäíèé áóôåð (è ìû âûøëè çà àäðåñà ðàçìåðîâ áóôåðîâ), òî âûõîäèì
   jb loadConfig.block
 
   pop eax ebx ecx esi edi
 
   jmp loadConfig.end
.default:
   mov eax, defaultDataForConfig
   mov edx, defaultDataSize
   jmp loadConfig.start
.end:
   mov ecx, dword[fileAdr]    ;åñëè ôàéë áûë çàãðóæåí, òî
   cmp ecx, 0
   je @f
   mcall 68, 13, ecx  ;âûãðóæàåì ôàéë èç ïàìÿòè
@@:
   call updateParams ;ïðèìåíÿåì íàñòðîéêè êàæäîãî áóôåðà
   pop edx ecx ebx eax
   ret
 
 
updateParams: ;max, size, pos
   push eax
   mov eax, dword[dataBuffer.size1]
   mov dword[editLU.size], eax
   mov dword[editLU.pos], eax
 
   mov eax, dword[dataBuffer.size2]
   mov dword[editLD.size], eax
   mov dword[editLD.pos], eax
 
   mov eax, dword[dataBuffer.size3]
   mov dword[editRU.size], eax
   mov dword[editRU.pos], eax
 
   mov eax, dword[dataBuffer.size4]
   mov dword[editRD.size], eax
   mov dword[editRD.pos], eax
   pop eax
   ret
 
 
 
selfName db 'HACONFIG', 0 ;'@HOTANGLES',0
selfNameSize = 8;9 ;äî 11 byte
;
compareBytes:
   push edi esi ecx ebx
   mov eax, 0 ;xor eax, eax
   mov ecx, selfNameSize ;11    ;max ðàçìåð ñòðîê 11
@@:
   mov bl, byte[edi]
   cmp bl, byte[esi]
   jne compareBytes.no
   inc edi
   inc esi
   cmp ecx, 0
   je @f
   dec ecx
   jmp @b
.no:
   mov eax, 1
@@:
   pop ebx ecx esi edi
   ret
;
slotMax dd 0
selfPID dd 0
buf db 1024 dup(0)
copyKill:
   push eax ebx ecx esi edi
 
   ;ñïåðâà ïðî÷ò¸ì ñâîþ èíôîðìàöèþ
   mcall 9, buf, -1
   mov eax, dword[buf+30]
   mov dword[selfPID], eax
 
   ;óêàçàòåëè, êîòîðûå íèêîãäà íå ìåíÿþòñÿ:
   mov esi, selfName       ;ïåðâàÿ ñòðîêà - èìÿ òåêóùåãî ïðèëîæåíèÿ
   mov edi, buf            ;âòîðàÿ ñòðîêà - èìÿ òåêóùåãî ñëîòà
   add edi, 10
 
   mov ecx, 1
@@:
   mcall 9, buf, ecx
   mov dword[slotMax], eax
 
   ;åñëè ýòî ìû ñàìè, òî ïðîïóñêàåì ïðîâåðêó
   mov eax, dword[buf+30]
   cmp eax, dword[selfPID]
   je copyKill.propusk
 
   call compareBytes   ;ñðàâíèâàåì 11 áàéò ñòðîê, ðåçóëüòàò â eax
 
   cmp eax, 0
   je copyKill.selfKill
 
.propusk:
   inc ecx
   cmp ecx, dword[slotMax]
   ja @f
   jmp @b
 
.selfKill:
   pop edi esi ecx ebx eax
   mcall -1
   ret
@@:
   pop edi esi ecx ebx eax
   ret
 
 WindowsWidth  = 450
 WindowsHeight = 195
coord:      ;êîîðäèíàòû îêíà ïðèëîæåíèÿ
 .y dw 0
 .x dw 0
 
draw_window:
        ;óäàëÿåì êíîïêó, åñëè åñòü
        mov edx, 0x80000002
        mcall 8
 
        mov     eax, 12                 ; function 12: tell os about windowdraw
        mov     ebx, 1                  ; 1, start of draw
        mcall
 
        ;îòîáðàçèì îêíî ïî öåíòðó ýêðàíà äëÿ ýòîãî:
        mcall 14 ;ïîëó÷èì ðàçìåðû ýêðàíà
        mov dword[coord], eax       ;ïîëîæèì ðàçìåðû ýêðàíà â êîîðäèíàòû
        shr word[coord.x], 1        ;âåðíåå ïîëîæèì èõ ïîëîâèíó
        shr word[coord.y], 1
 
        ;âû÷èñëÿåì êîîðäèíàòû îêíà, ÷òîáû îêíî áûëî ïî ñåðåäèíå ýêðàíà
        sub word[coord.x], WindowsWidth/2
        sub word[coord.y], WindowsHeight/2
 
        mov     eax, 0                  ; function 0 : define and draw window
        mov     ebx, 0 ;* 65536 + WindowsWidth   ; [x start] *65536 + [x size]
        mov bx, word[coord.x]
        shl  ebx, 16
        mov bx, WindowsWidth
 
        mov ecx, 0
        mov     cx, word[coord.y] ;* 65536 + WindowsHeight  ; [y start] *65536 + [y size]
        shl ecx, 16
        mov cx, WindowsHeight
 
        mov     edx, 0x14ffffff         ; color of work area RRGGBB
                                        ; 0x02000000 = window type 4 (fixed size, skinned window)
        mov     esi, 0x808899ff         ; color of grab bar  RRGGBB
                                        ; 0x80000000 = color glide
        mov     edi, title
        mcall
 
        ;draw_check_boxes check_boxes,check_boxes_end ;ðèñîâàíèå ÷åêáîêñîâ
        ;draw_edit_boxes editboxes,editboxes_end      ;ðèñîâàíèå edit box'îâ
        invoke  edit_box_draw, editLU  ;ðèñîâàíèå edit box'îâ
        invoke  edit_box_draw, editLD
        invoke  edit_box_draw, editRU
        invoke  edit_box_draw, editRD
 
        invoke  check_box_draw, ch1    ;ðèñîâàíèå ÷åêáîêñîâ
 
        ;ðèñóåì êíîïêó
        mov ebx, (WindowsWidth-80-Otstup)*65536 + 80 ;êîîðäèíàòà X, øèðèíà êíîïêè
        mov ecx, 160*65536 + 20   ;êîîðäèíàòà Y, âûñîòà êíîïêè
        mov edx, 0x00000002 ;2    ;íîìåð êíîïêè
        mov esi, 0x00AABBCC       ;öâåò êíîïêè
        mcall 8
        ;ðèñóåì òåêñò êíîïêè
        mov     ebx, (WindowsWidth-80-Otstup+25-buttonTextXoffset) * 65536 + 166    ;êîîðäèíàòû òåêñòà (x, y)
        mov     ecx, 0xFFFFFF     ;áåëûé öâåò òåêñòà
        mov     edx, buttonText
        mov     esi, buttonTextSize ;5            ;ðàçìåð òåêñòà â ñèìâîëàõ
        mcall 4
 
        call draw_super_text
 
        LineLength = 62 ;42
        mov     ebx, 40 * 65536 + 36    ; draw info text with function 4 (x, y)
        mov     ecx, 0x224466
        mov     edx, text
        mov     esi, LineLength
        mov     eax, 4
 
  .newline:                             ; text from the DATA AREA
        mcall
        add     ebx, 12
        add     edx, LineLength
        cmp     byte[edx], 0
        jne     .newline
 
        mov     eax, 12                 ; function 12:tell os about windowdraw
        mov     ebx, 2                  ; 2, end of draw
        mcall
 
        ret
 
 
 
 
align 16
@IMPORT:
 
library box_lib, 'box_lib.obj'
 
import  box_lib,\
        edit_box_draw,          'edit_box',\
        edit_box_key,           'edit_box_key',\
        edit_box_mouse,         'edit_box_mouse',\
        init_checkbox,          'init_checkbox2',\
        check_box_draw,         'check_box_draw2',\
        check_box_mouse,        'check_box_mouse2',\
        option_box_draw,        'option_box_draw',\
        option_box_mouse,       'option_box_mouse'
 
 
 
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
;DATA äàííûå  äëÿ check_box1 - èñïîëüçóåò ñèñòåìíûå öâåòà
;Ôîðìàò äàííûõ ÷åê áîêñà:
;   êîîðäèíàòà õ, êîîðäèíàòà ó, óêàçàòåëü íà íà÷àëî ñòðîêè, äëèíà ñòðîêè
;ñîñòîÿíèå ðàáîòû óòèëèòû: àêòèâíà/íåò
;check_boxes:
;   ch1 check_box1 30,160,ch_text.1,ch_text.e1-ch_text.1,ch_flag_en
;check_boxes_end:
 
;êîîðäèíàòû (x,y) = (30, 160) ðàçìåð ÷åêáîêñà 12, öâåò òåêñòà 0x224466
ch1     check_box2 30 shl 16 + 12, 160 shl 16 + 12, 6, 0xFFFFFFFF, 0xAABBCC, 0x224466, ch_text, 110b ; ch_flag_en and ch_flag_middle
 
 
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 db 'ª«îç¨âì/ ªâ¨¢¨à®¢ âì "Hot Angles"', 0
;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 db 'Activate "Hot Angles"',0       ;ñîïðîâîæäàþùèé òåêñò äëÿ ÷åê áîêñà
;.1 db 'Activate "Hot Angles"',0
;.e1:
 
superText:
  .lu db 'Left up angle command:   ', 0
  .ld db 'Left down 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)
   mov     ecx, 0x224466
   mov eax, superText.lu
   mov     edx, eax
   mov     esi, superTextSize ;22
   mcall 4
 
   mov     ebx, Otstup * 65536 + 109
   mov     edx, superText.ld
   mov     esi, superTextSize ;24
   mcall 4
 
   mov     ebx, 240 * 65536 + 74
   mov     edx, superText.ru
   mov     esi, superTextSize ;23
   mcall 4
 
   mov     ebx, 240 * 65536 + 109
   mov     edx, superText.rd
   mov     esi, superTextSize ;25
   mcall 4
 
   pop esi edi edx ecx ebx eax
   ret
 
 
edMaxSize = 510 ;òåïåðü ñ íîâûì êîìïîíåíòîì ìîæíî è 511 óêàçàòü
edMax = 0 ;max, size, pos
 
align 4
editLU   edit_box 180,Otstup,85, 0xffffff, 0x6a9480, 0, 0xAABBCC, 0, edMaxSize, dataBuffer.1, mouse_dd, 0, edMax, edMax  ;ed_focus
editLD   edit_box 180,Otstup,120, 0xffffff, 0x6a9480, 0, 0xAABBCC, 0, edMaxSize, dataBuffer.2, mouse_dd, 0, edMax, edMax
editRU   edit_box 180,240,85, 0xffffff, 0x6a9480, 0, 0xAABBCC, 0, edMaxSize, dataBuffer.3, mouse_dd, 0, edMax, edMax
editRD   edit_box 180,240,120, 0xffffff, 0x6a9480, 0, 0xAABBCC, 0, edMaxSize, dataBuffer.4, mouse_dd, 0, edMax, edMax
 
;editboxes:
;editLU edit_box 180,Otstup,85,0xffffff,0x6a9480,0,0xAABBCC,0,edMaxSize,dataBuffer.1,ed_focus,edMax,edMax
;editLD edit_box 180,Otstup,120,0xffffff,0x6a9480,0,0xAABBCC,0,edMaxSize,dataBuffer.2,0,edMax,edMax
;editRU edit_box 180,240,85,0xffffff,0x6a9480,0,0xAABBCC,0,edMaxSize,dataBuffer.3,0,edMax,edMax
;editRD edit_box 180,240,120,0xffffff,0x6a9480,0,0xAABBCC,0,edMaxSize,dataBuffer.4,0,edMax,edMax
;editboxes_end:
 
;data_of_code dd 0
;mouse_flag dd 0x0
 
dataBuffer:
.1: rb 512
.2: rb 512
.3: rb 512
.4: rb 512
.size1: rd 1
.size2: rd 1
.size3: rd 1
.size4: rd 1
;255+255+2
;äâà çàïàñíûõ áàéòà íåîáõîäèìû äëÿ òîãî ÷òî áû íå ïåïåðåïèñàòü ñëåäóþùèåé áàéòû, â êîíöå áóôåðà 0
dataBufferEnd:
 
mouse_dd  dd ?
sc  system_colors
 
I_END:
        rb 4096
align 16
STACKTOP:
 
MEM:

Rev 7397	Rev 7402
1	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;	1	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2	; Hot Angles Config ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;	2	; Hot Angles Config ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
3	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;	3	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
4	; Compile with FASM	4	; Compile with FASM
5	; Version 0.2: Sep 19, 2018	5	; Version 0.3: Sep 22, 2018
6		6
7	; Copyright (c) 2018, Efremenkov Sergey aka TheOnlyMirage	7	; Copyright (c) 2018, Efremenkov Sergey aka TheOnlyMirage
8	; All rights reserved.	8	; All rights reserved.
9	; Redistribution and use in source and binary forms, with or without modification,	9	; Redistribution and use in source and binary forms, with or without modification,
10	; are permitted provided that the following conditions are met:	10	; are permitted provided that the following conditions are met:
11	; * Redistributions of source code must retain the above copyright notice, this	11	; * Redistributions of source code must retain the above copyright notice, this
12	; list of conditions and the following disclaimer.	12	; list of conditions and the following disclaimer.
13	; * Redistributions in binary form must reproduce the above copyright notice,	13	; * Redistributions in binary form must reproduce the above copyright notice,
14	; this list of conditions and the following disclaimer in the documentation and/or	14	; this list of conditions and the following disclaimer in the documentation and/or
15	; other materials provided with the distribution.	15	; other materials provided with the distribution.
16	; * Neither the name of the nor the names of its contributors may	16	; * Neither the name of the nor the names of its contributors may
17	; be used to endorse or promote products derived from this software without	17	; be used to endorse or promote products derived from this software without
18	; specific prior written permission.	18	; specific prior written permission.
19		19
20	; THE SOFTWARE IS PROVIDED AS IS, WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED,	20	; THE SOFTWARE IS PROVIDED AS IS, WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED,
21	; INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A	21	; INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A
22	; PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT	22	; PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
23	; HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION	23	; HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
24	; OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE	24	; OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
25	; SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.	25	; SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
26	; --------------------------------------------------------------------------------------	26	; --------------------------------------------------------------------------------------
27		27
28	;P.S. Êîä ñûðîé, òðåáóåòñÿ îïòèìèçàöèÿ è äîðàáîòêà (ñì. òåìó ôîðóìà)	28	;P.S. Êîä ñûðîé, òðåáóåòñÿ îïòèìèçàöèÿ è äîðàáîòêà (ñì. òåìó ôîðóìà)
29	format binary as "" ; Binary file format without extension	29	format binary as "" ; Binary file format without extension
30	use32 ; Tell compiler to use 32 bit instructions	30	use32 ; Tell compiler to use 32 bit instructions
31	org 0 ; the base address of code, always 0x0	31	org 0 ; the base address of code, always 0x0
32		32
33	; Çàãîëîâîê èñïîëíÿåìîãî ôàéëà Êîëèáðè ÎÑ	33	; Çàãîëîâîê èñïîëíÿåìîãî ôàéëà Êîëèáðè ÎÑ
34	db 'MENUET01'	34	db 'MENUET01'
35	dd 1	35	dd 1
36	dd START	36	dd START
37	dd I_END	37	dd I_END
38	dd MEM	38	dd MEM
39	dd STACKTOP	39	dd STACKTOP
40	dd 0, 0	40	dd 0, 0
41		41
42	; Íà÷àëî îáëàñòè êîäà	42	; Íà÷àëî îáëàñòè êîäà
43	include 'lang.inc' ;ïîääåðæêà ÿçûêîâ ïðè êîìïèëÿöèè	43	include 'lang.inc' ;ïîääåðæêà ÿçûêîâ ïðè êîìïèëÿöèè
44	include '../../macros.inc'	44	include '../../macros.inc'
-		45	include '../../proc32.inc'
-		46	include '../../dll.inc'
-		47	include '../../develop/libraries/box_lib/trunk/box_lib.mac'
45	include 'editbox.inc'	48	;;include 'editbox.inc'
46	use_edit_box	49	;;use_edit_box
47	include 'check.inc' ;âêëþ÷èòü ôàéë check.inc	50	;;include 'check.inc' ;âêëþ÷èòü ôàéë check.inc
48	version_ch1 ;íåîáõîäèìûé ìàêðîñ äëÿ âêëþ÷åíèÿ new âåðñèè check_box1	51	;;version_ch1 ;íåîáõîäèìûé ìàêðîñ äëÿ âêëþ÷åíèÿ new âåðñèè check_box1
49	use_check_box ;èñïîëüçóÿ ìàêðîñû, âíåñòè ïðîöåäóðû äëÿ ðèñîâàíèÿ ÷åê áîêñà	52	;;use_check_box ;èñïîëüçóÿ ìàêðîñû, âíåñòè ïðîöåäóðû äëÿ ðèñîâàíèÿ ÷åê áîêñà
50		53
51	Otstup = 30	54	Otstup = 30
52		55
53	START:	56	START:
54	call copyKill ;ïðîñòåéøàÿ çàùèòà îò çàïóñêà âòîðîé êîïèè ïðèëîæåíèÿ	57	call copyKill ;ïðîñòåéøàÿ çàùèòà îò çàïóñêà âòîðîé êîïèè ïðèëîæåíèÿ
55	mcall 68, 11 ;èíèöèàëèçàöèÿ êó÷è	58	mcall 68, 11 ;èíèöèàëèçàöèÿ êó÷è
56		59
57	mov eax,48 ;ïîëó÷èòü ñèñòåìíûå öâåòà	60	mov eax,48 ;ïîëó÷èòü ñèñòåìíûå öâåòà
58	mov ebx,3	61	mov ebx,3
59	mov ecx, sc	62	mov ecx, sc
60	mov edx, sizeof.system_colors	63	mov edx, sizeof.system_colors
61	mcall	64	mcall
-		65
-		66
-		67	stdcall dll.Load, @IMPORT
-		68	or eax, eax
-		69	jnz exit
-		70
-		71	invoke init_checkbox, ch1
62		72
63	mov eax,40 ;óñòàíîâèòü ìàñêó äëÿ îæèäàåìûõ ñîáûòèé	73	mov eax,40 ;óñòàíîâèòü ìàñêó äëÿ îæèäàåìûõ ñîáûòèé
64	mov ebx,0x27 ;ñèñòåìà áóäåò ðåàãèðîâàòü òîëüêî íà ñîîáùåíèå î ïåðåðèñîâêå, íàæàòà êíîïêà, îïðåäåë¸ííàÿ ðàíåå, ñîáûòèå îò ìûøè (÷òî-òî ñëó÷èëîñü - íàæàòèå íà êíîïêó ìûøè èëè ïåðåìåùåíèå; ñáðàñûâàåòñÿ ïðè ïðî÷òåíèè)	74	mov ebx,0x27 ;ñèñòåìà áóäåò ðåàãèðîâàòü òîëüêî íà ñîîáùåíèå î ïåðåðèñîâêå, íàæàòà êíîïêà, îïðåäåë¸ííàÿ ðàíåå, ñîáûòèå îò ìûøè (÷òî-òî ñëó÷èëîñü - íàæàòèå íà êíîïêó ìûøè èëè ïåðåìåùåíèå; ñáðàñûâàåòñÿ ïðè ïðî÷òåíèè)
65	mcall	75	mcall
66		76
67	call loadConfig ;çàãðóæàåì êîíôèãóðàöèþ èç ôàéëà, åñëè íåò - òî âûñòàâëÿåì ïàðàìåòðû ïî óìîë÷àíèþ	77	call loadConfig ;çàãðóæàåì êîíôèãóðàöèþ èç ôàéëà, åñëè íåò - òî âûñòàâëÿåì ïàðàìåòðû ïî óìîë÷àíèþ
68	call draw_window ;îòðèñîâàòü îêíî ïðèëîæåíèÿ	78	call draw_window ;îòðèñîâàòü îêíî ïðèëîæåíèÿ
69		79
70	; Îáðàáîòêà öèêëà ñîáûòèé	80	; Îáðàáîòêà öèêëà ñîáûòèé
71	event_wait:	81	event_wait:
72	mov eax, 10 ; function 10 : wait until event	82	mov eax, 10 ; function 10 : wait until event
73	mcall ; event type is returned in eax	83	mcall ; event type is returned in eax
74		84
75	cmp eax, 1 ; Event redraw request ?	85	cmp eax, 1 ; Event redraw request ?
76	je red ; Expl.: there has been activity on screen and	86	je red ; Expl.: there has been activity on screen and
77	; parts of the applications has to be redrawn.	87	; parts of the applications has to be redrawn.
78		88
79	cmp eax, 2 ; Event key in buffer ?	89	cmp eax, 2 ; Event key in buffer ?
80	je key ; Expl.: User has pressed a key while the	90	je key ; Expl.: User has pressed a key while the
81	; app is at the top of the window stack.	91	; app is at the top of the window stack.
82		92
83	cmp eax, 3 ; Event button in buffer ?	93	cmp eax, 3 ; Event button in buffer ?
84	je button ; Expl.: User has pressed one of the	94	je button ; Expl.: User has pressed one of the
85	; applications buttons.	95	; applications buttons.
86		96
87	mouse_edit_boxes editboxes,editboxes_end	97	;mouse_edit_boxes editboxes,editboxes_end
-		98	;mouse_check_boxes check_boxes,check_boxes_end ;ïðîâåðêà ÷åê áîêñà
-		99	invoke edit_box_mouse, editLU
-		100	invoke edit_box_mouse, editLD
-		101	invoke edit_box_mouse, editRU
-		102	invoke edit_box_mouse, editRD
-		103	invoke check_box_mouse, ch1 ;ïðîâåðêà ÷åê áîêñà
88	mouse_check_boxes check_boxes,check_boxes_end ;ïðîâåðêà ÷åê áîêñà	104
89	jmp event_wait	105	jmp event_wait
90		106
91		107
92	red: ;îáðàáîòêà ñîáûòèÿ ïåðåðèñîâêè îêíà	108	red: ;îáðàáîòêà ñîáûòèÿ ïåðåðèñîâêè îêíà
93	call draw_window	109	call draw_window
94	jmp event_wait	110	jmp event_wait
95		111
96	key: ; Keypress event handler	112	key: ; Keypress event handler
97	mov eax, 2 ; The key is returned in ah. The key must be	113	mov eax, 2 ; The key is returned in ah. The key must be
98	mcall ; read and cleared from the system queue.	114	mcall ; read and cleared from the system queue.
99	key_edit_boxes editboxes,editboxes_end	115	;key_edit_boxes editboxes,editboxes_end
-		116	invoke edit_box_key, editLU
-		117	invoke edit_box_key, editLD
-		118	invoke edit_box_key, editRU
-		119	invoke edit_box_key, editRD
100	jmp event_wait ; Just read the key, ignore it and jump to event_wait.	120	jmp event_wait ; Just read the key, ignore it and jump to event_wait.
101		121
102	button: ; Buttonpress event handler	122	button: ; Buttonpress event handler
103	mov eax,17 ; The button number defined in window_draw	123	mov eax,17 ; The button number defined in window_draw
104	mcall ; is returned to ah.	124	mcall ; is returned to ah.
105		125
106	cmp ah,1 ; button id=1 ?	126	cmp ah,1 ; button id=1 ?
107	jne noclose	127	jne noclose
-		128	exit:
108	mov eax,-1 ; Function -1 : close this program	129	mov eax,-1 ; Function -1 : close this program
109	mcall	130	mcall
110	noclose:	131	noclose:
111	cmp ah, 2 ;êíîïêà "Ïðèìåíèòü"	132	cmp ah, 2 ;êíîïêà "Ïðèìåíèòü"
112	jne butend	133	jne butend
113	call applyButton ;âûçîâ íàøåãî îáðàáîò÷èêà íàæàòèÿ êíîïêè	134	call applyButton ;âûçîâ íàøåãî îáðàáîò÷èêà íàæàòèÿ êíîïêè
114	butend:	135	butend:
115	jmp event_wait ;this is for ignored events, useful at development	136	jmp event_wait ;this is for ignored events, useful at development
116		137
117		138
118		139
119	;èìÿ êîíôèãóðàöèîííîãî ôàéëà	140	;èìÿ êîíôèãóðàöèîííîãî ôàéëà
120	fileName: db 'SETTINGS/HOTANGLES.CFG', 0	141	fileName: db 'SETTINGS/HOTANGLES.CFG', 0
121		142
122	;ñòðóêòóðà äëÿ ñîçäàíèÿ/ïåðåçàïèñè ôàéëà	143	;ñòðóêòóðà äëÿ ñîçäàíèÿ/ïåðåçàïèñè ôàéëà
123	createFile:	144	createFile:
124	.func dd 2 ;íîìåð ïîäôóíêöèè	145	.func dd 2 ;íîìåð ïîäôóíêöèè
125	.re dd 0, 0 ;çàðåçåðâèðîâàíî	146	.re dd 0, 0 ;çàðåçåðâèðîâàíî
126	.size dd 0 ;ñêîëüêî áàéò ïèñàòü	147	.size dd 0 ;ñêîëüêî áàéò ïèñàòü
127	.data_adr dd 0 ;óêàçàòåëü íà äàííûå	148	.data_adr dd 0 ;óêàçàòåëü íà äàííûå
128	.path db 0	149	.path db 0
129	.path_adr dd fileName ;ïóòü	150	.path_adr dd fileName ;ïóòü
130		151
131	;ñòðîêà ïàðàìåòðîâ ïî óìîë÷àíèþ è å¸ ðàçìåð	152	;ñòðîêà ïàðàìåòðîâ ïî óìîë÷àíèþ è å¸ ðàçìåð
132	defaultDataForConfig db 121,13,10,'/rd/1/HACONFIG',13,10,'/rd/1/HACONFIG',13,10,'/rd/1/HACONFIG',13,10,'/rd/1/HACONFIG',13,10	153	defaultDataForConfig db 121,13,10,'/rd/1/HACONFIG',13,10,'/rd/1/HACONFIG',13,10,'/rd/1/HACONFIG',13,10,'/rd/1/HACONFIG',13,10
133	defaultDataSize = 48+19	154	defaultDataSize = 48+19
134		155
135		156
136	copyParam: ;êîïèðóåò ïàðàìåòð(êîìàíäó çàïóñêà) â áóôåð (ñì. äàëüøå)	157	copyParam: ;êîïèðóåò ïàðàìåòð(êîìàíäó çàïóñêà) â áóôåð (ñì. äàëüøå)
137	push esi ebx ecx	158	push esi ebx ecx
138	mov ecx, dword[ebx] ;÷èòàåì ðàçìåð ñòðîêè	159	mov ecx, dword[ebx] ;÷èòàåì ðàçìåð ñòðîêè
139	.copy: ;êîïèðóåì ñèìâîëû	160	.copy: ;êîïèðóåì ñèìâîëû
140	cmp ecx, 0	161	cmp ecx, 0
141	je copyParam.copyEnd	162	je copyParam.copyEnd
142	mov bl, byte[esi]	163	mov bl, byte[esi]
143	mov byte[eax], bl	164	mov byte[eax], bl
144	dec ecx	165	dec ecx
145	inc eax	166	inc eax
146	inc esi	167	inc esi
147	jmp copyParam.copy	168	jmp copyParam.copy
148	.copyEnd:	169	.copyEnd:
149	pop ecx ebx esi	170	pop ecx ebx esi
150	ret	171	ret
151		172
152		173
153	addPerenos: ;äîáàâëÿåò ïåðåíîñ ñòðîêè â áóôåð	174	addPerenos: ;äîáàâëÿåò ïåðåíîñ ñòðîêè â áóôåð
154	mov byte[eax], 13	175	mov byte[eax], 13
155	inc eax	176	inc eax
156	mov byte[eax], 10	177	mov byte[eax], 10
157	inc eax	178	inc eax
158	ret	179	ret
159		180
160	;îáðàáîò÷èê êíîïêè "Ïðèìåíèòü"	181	;îáðàáîò÷èê êíîïêè "Ïðèìåíèòü"
161	applyButton:	182	applyButton:
162	push eax ebx ecx	183	push eax ebx ecx
163	;mov dword[createFile.data_adr], defaultDataForConfig	184	;mov dword[createFile.data_adr], defaultDataForConfig
164	;mov dword[createFile.size], defaultDataSize	185	;mov dword[createFile.size], defaultDataSize
165		186
166	;âû÷èñëèì ðàçìåð ôàéëà êîíôèãóðàöèè â áàéòàõ	187	;âû÷èñëèì ðàçìåð ôàéëà êîíôèãóðàöèè â áàéòàõ
167	mov ecx, 5*2+1 ;1 áàéò íà ñîñòîÿíèå àêòèâíîñòè è 5 ïàð ïåðåíîñîâ ñòðîê (ñèìâîëû 13, 10)	188	mov ecx, 5*2+1 ;1 áàéò íà ñîñòîÿíèå àêòèâíîñòè è 5 ïàð ïåðåíîñîâ ñòðîê (ñèìâîëû 13, 10)
168	add ecx, dword[editLU.size] ;dataBuffer.size1] ;ïëþñ ðàçìåð êàæäîé ñòðîêè â áàéòàõ	189	add ecx, dword[editLU.size] ;dataBuffer.size1] ;ïëþñ ðàçìåð êàæäîé ñòðîêè â áàéòàõ
169	add ecx, dword[editLD.size] ;dataBuffer.size2]	190	add ecx, dword[editLD.size] ;dataBuffer.size2]
170	add ecx, dword[editRU.size] ;dataBuffer.size3]	191	add ecx, dword[editRU.size] ;dataBuffer.size3]
171	add ecx, dword[editRD.size] ;dataBuffer.size4]	192	add ecx, dword[editRD.size] ;dataBuffer.size4]
172	;òåïåðü ðàçìåð ôàéëà êîíôèãóðàöèè â ecx	193	;òåïåðü ðàçìåð ôàéëà êîíôèãóðàöèè â ecx
173	mov dword[createFile.size], ecx ;ïîëîæèì ðàçìåð áàéò â ñòðóêòóðó ñîçäàíèÿ/ïåðåçàïèñè ôàéëà	194	mov dword[createFile.size], ecx ;ïîëîæèì ðàçìåð áàéò â ñòðóêòóðó ñîçäàíèÿ/ïåðåçàïèñè ôàéëà
174	mcall 68, 12, ecx ;âûäåëÿåì áëîê ïàìÿòè ïîä áóôåð ñîäåðæèìîãî	195	mcall 68, 12, ecx ;âûäåëÿåì áëîê ïàìÿòè ïîä áóôåð ñîäåðæèìîãî
175	mov dword[createFile.data_adr], eax ;ñîõðàíÿåì àäðåñ áóôåðà â ñòðóêòóðó	196	mov dword[createFile.data_adr], eax ;ñîõðàíÿåì àäðåñ áóôåðà â ñòðóêòóðó
176		197
177	;çàïîëíèì áóôåð ñîäåðæèìîãî:	198	;çàïîëíèì áóôåð ñîäåðæèìîãî:
178	mov byte[eax], 110; 'n' ;ïî óìîë÷àíèþ ôëàã ñíÿò	199	mov byte[eax], 110; 'n' ;ïî óìîë÷àíèþ ôëàã ñíÿò
179	cmp word[ch1.flags], ch_flag_en ;âûñòàâëåí checkBox èëè íåò?	200	cmp word[ch1.flags], 110b ;ch_flag_en and ch_flag_middle ;110b ;ch_flag_en ;âûñòàâëåí checkBox èëè íåò?
180	jne applyButton.no	201	jne applyButton.no
181	mov byte[eax], 121 ;èíà÷å êëàä¸ì 'y'	202	mov byte[eax], 121 ;èíà÷å êëàä¸ì 'y'
182	.no:	203	.no:
183	inc eax	204	inc eax
184	call addPerenos	205	call addPerenos
185		206
186	push esi ebx	207	push esi ebx
187	call UpdateEditsSizes ;îáíîâèòü ðàçìåðû òåêñòà â edit'àõ	208	call UpdateEditsSizes ;îáíîâèòü ðàçìåðû òåêñòà â edit'àõ
188		209
189	mov esi, dataBuffer.1 ;editLU.text	210	mov esi, dataBuffer.1 ;editLU.text
190	mov ebx, dataBuffer.size1 ;editLU.size	211	mov ebx, dataBuffer.size1 ;editLU.size
191	call copyParam	212	call copyParam
192	call addPerenos ;äîáàâëÿåì ïåðåíîñ ñòðîêè	213	call addPerenos ;äîáàâëÿåì ïåðåíîñ ñòðîêè
193		214
194	mov esi, dataBuffer.2 ;editLD.text	215	mov esi, dataBuffer.2 ;editLD.text
195	mov ebx, dataBuffer.size2 ;editLD.size	216	mov ebx, dataBuffer.size2 ;editLD.size
196	call copyParam	217	call copyParam
197	call addPerenos ;äîáàâëÿåì ïåðåíîñ ñòðîêè	218	call addPerenos ;äîáàâëÿåì ïåðåíîñ ñòðîêè
198		219
199	mov esi, dataBuffer.3	220	mov esi, dataBuffer.3
200	mov ebx, dataBuffer.size3	221	mov ebx, dataBuffer.size3
201	call copyParam	222	call copyParam
202	call addPerenos ;äîáàâëÿåì ïåðåíîñ ñòðîêè	223	call addPerenos ;äîáàâëÿåì ïåðåíîñ ñòðîêè
203		224
204	mov esi, dataBuffer.4	225	mov esi, dataBuffer.4
205	mov ebx, dataBuffer.size4	226	mov ebx, dataBuffer.size4
206	call copyParam	227	call copyParam
207	call addPerenos ;äîáàâëÿåì ïåðåíîñ ñòðîêè	228	call addPerenos ;äîáàâëÿåì ïåðåíîñ ñòðîêè
208		229
209	pop ebx esi	230	pop ebx esi
210		231
211		232
212	mov ebx, createFile	233	mov ebx, createFile
213	mcall 70	234	mcall 70
214	cmp eax, 0	235	cmp eax, 0
215	je .end	236	je .end
216	;èíà÷å çäåñü íóæíî âûâåñòè îêíî ñ îøèáêîé !!!	237	;èíà÷å çäåñü íóæíî âûâåñòè îêíî ñ îøèáêîé !!!
217	.end:	238	.end:
218	mcall 68, 13, dword[createFile.data_adr] ;îñâîáîæäàåì ïàìÿòü ïîä áóôåð	239	mcall 68, 13, dword[createFile.data_adr] ;îñâîáîæäàåì ïàìÿòü ïîä áóôåð
219	call restartHotAnglesApp ;ïåðåçàïóñêàåì @HOTANGLES	240	call restartHotAnglesApp ;ïåðåçàïóñêàåì @HOTANGLES
220	pop ecx ebx eax	241	pop ecx ebx eax
221	ret	242	ret
222		243
223		244
224		245
225		246
226		247
227		248
228	compareBytes2:	249	compareBytes2:
229	push edi esi ecx ebx	250	push edi esi ecx ebx
230	xor eax, eax	251	xor eax, eax
231	mov ecx, 10 ;max ðàçìåð ñòðîê 11	252	mov ecx, 10 ;max ðàçìåð ñòðîê 11
232	@@:	253	@@:
233	mov bl, byte[edi]	254	mov bl, byte[edi]
234	cmp bl, byte[esi]	255	cmp bl, byte[esi]
235	jne compareBytes.no	256	jne compareBytes.no
236	inc edi	257	inc edi
237	inc esi	258	inc esi
238	cmp ecx, 0	259	cmp ecx, 0
239	je @f	260	je @f
240	dec ecx	261	dec ecx
241	jmp @b	262	jmp @b
242	.no:	263	.no:
243	mov eax, 1	264	mov eax, 1
244	@@:	265	@@:
245	pop ebx ecx esi edi	266	pop ebx ecx esi edi
246	ret	267	ret
247		268
248		269
249	restartHotAnglesApp: ;!!!	270	restartHotAnglesApp: ;!!!
250	;íàõîäèì âñå êîïèè ïðèëîæåíèÿ ïî èìåíè è çàâåðøàåì èõ	271	;íàõîäèì âñå êîïèè ïðèëîæåíèÿ ïî èìåíè è çàâåðøàåì èõ
251	push eax ebx ecx esi edi	272	push eax ebx ecx esi edi
252	;óêàçàòåëè, êîòîðûå íèêîãäà íå ìåíÿþòñÿ:	273	;óêàçàòåëè, êîòîðûå íèêîãäà íå ìåíÿþòñÿ:
253	mov esi, startAppData.file_name ;ïåðâàÿ ñòðîêà - èñêîìîå èìÿ ïðèëîæåíèÿ	274	mov esi, startAppData.file_name ;ïåðâàÿ ñòðîêà - èñêîìîå èìÿ ïðèëîæåíèÿ
254	mov edi, buf ;âòîðàÿ ñòðîêà - èìÿ òåêóùåãî ñëîòà	275	mov edi, buf ;âòîðàÿ ñòðîêà - èìÿ òåêóùåãî ñëîòà
255	add edi, 10	276	add edi, 10
256		277
257	mov ecx, 1	278	mov ecx, 1
258	@@:	279	@@:
259	mcall 9, buf, ecx ;ïîëó÷àåì äàííûå î÷åðåäíîãî ñëîòà	280	mcall 9, buf, ecx ;ïîëó÷àåì äàííûå î÷åðåäíîãî ñëîòà
260	mov dword[slotMax], eax	281	mov dword[slotMax], eax
261		282
262	call compareBytes2 ;ñðàâíèâàåì èìÿ	283	call compareBytes2 ;ñðàâíèâàåì èìÿ
263	cmp eax, 0	284	cmp eax, 0
264	jne restartHotAnglesApp.next ;åñëè íå ñîâïàëî, òî ïåðåõîäèì íà ñëåäóþùèé ñëîò	285	jne restartHotAnglesApp.next ;åñëè íå ñîâïàëî, òî ïåðåõîäèì íà ñëåäóþùèé ñëîò
265		286
266	;push eax ebx ecx	287	;push eax ebx ecx
267	mcall 18, 2, ecx ;èíà÷å çàâåðøàåì ñëîò	288	mcall 18, 2, ecx ;èíà÷å çàâåðøàåì ñëîò
268	;pop ecx ebx eax	289	;pop ecx ebx eax
269		290
270	.next:	291	.next:
271	inc ecx	292	inc ecx
272	cmp ecx, dword[slotMax]	293	cmp ecx, dword[slotMax]
273	ja @f	294	ja @f
274	jmp @b	295	jmp @b
275	@@:	296	@@:
276	pop edi esi ecx ebx eax	297	pop edi esi ecx ebx eax
277		298
278	;çàïóñêàåì ïðèëîæåíèå çàíîâî	299	;çàïóñêàåì ïðèëîæåíèå çàíîâî
279	push eax ebx	300	push eax ebx
280	mcall 70, startAppData	301	mcall 70, startAppData
281	cmp eax, 0	302	cmp eax, 0
282	ja @f ;åñëè eax>0, òî óñïåøíî çàïóùåíî	303	ja @f ;åñëè eax>0, òî óñïåøíî çàïóùåíî
283	;!!! èíà÷å òóò ïå÷àòàåì îøèáêó	304	;!!! èíà÷å òóò ïå÷àòàåì îøèáêó
284	@@:	305	@@:
285	pop ebx eax	306	pop ebx eax
286	ret	307	ret
287		308
288	startAppData:	309	startAppData:
289	.subfunction dd 7	310	.subfunction dd 7
290	.flags dd 0	311	.flags dd 0
291	.param dd 0	312	.param dd 0
292	.rezerv dd 0, 0	313	.rezerv dd 0, 0
293	.full_name db '/rd/1/'	314	.full_name db '/rd/1/'
294	.file_name db '@HOTANGLES', 0	315	.file_name db '@HOTANGLES', 0
295	;db 0	316	;db 0
296	;.name: dd HotAnglesAppName	317	;.name: dd HotAnglesAppName
297	;HotAnglesAppName db '@HOTANGLES', 0	318	;HotAnglesAppName db '@HOTANGLES', 0
298		319
299		320
300	UpdateEditsSizes:	321	UpdateEditsSizes:
301	push eax	322	push eax
302	mov eax, dword[editLU.size]	323	mov eax, dword[editLU.size]
303	mov dword[dataBuffer.size1], eax	324	mov dword[dataBuffer.size1], eax
304		325
305	mov eax, dword[editLD.size]	326	mov eax, dword[editLD.size]
306	mov dword[dataBuffer.size2], eax	327	mov dword[dataBuffer.size2], eax
307		328
308	mov eax, dword[editRU.size]	329	mov eax, dword[editRU.size]
309	mov dword[dataBuffer.size3], eax	330	mov dword[dataBuffer.size3], eax
310		331
311	mov eax, dword[editRD.size]	332	mov eax, dword[editRD.size]
312	mov dword[dataBuffer.size4], eax	333	mov dword[dataBuffer.size4], eax
313		334
314	pop eax	335	pop eax
315	ret	336	ret
316		337
317	fileAdr dd 0	338	fileAdr dd 0
318		339
319	loadConfig:	340	loadConfig:
320	push eax ebx ecx edx	341	push eax ebx ecx edx
321	mcall 68, 27, fileName ;çàãðóæàåì êîíôèãóðàöèîííûé ôàéë â ÎÇÓ	342	mcall 68, 27, fileName ;çàãðóæàåì êîíôèãóðàöèîííûé ôàéë â ÎÇÓ
322	mov dword[fileAdr], eax ;ñîõðàíÿåì àäðåñ áëîêà ïàìÿòè ôàéëà	343	mov dword[fileAdr], eax ;ñîõðàíÿåì àäðåñ áëîêà ïàìÿòè ôàéëà
323	cmp eax, 0	344	cmp eax, 0
324	je loadConfig.default ;åñëè ôàéëà êîíôèãóðàöèè íåò, òî ñòàâèì íàñòðîéêè ïî óìîë÷àíèþ	345	je loadConfig.default ;åñëè ôàéëà êîíôèãóðàöèè íåò, òî ñòàâèì íàñòðîéêè ïî óìîë÷àíèþ
325	;èíà÷å äàííûå çàãðóæåíû â ÎÇÓ, ðàçìåð â edx	346	;èíà÷å äàííûå çàãðóæåíû â ÎÇÓ, ðàçìåð â edx
326	cmp edx, 0 ;åñëè ôàéë ïóñò, â í¸ì íåò äàííûõ, òî ñòàâèì íàñòðîéêè ïî óìîë÷àíèþ	347	cmp edx, 0 ;åñëè ôàéë ïóñò, â í¸ì íåò äàííûõ, òî ñòàâèì íàñòðîéêè ïî óìîë÷àíèþ
327	je loadConfig.default	348	je loadConfig.default
328	.start:	349	.start:
329	add edx, eax ;êëàä¸ì â edx - àäðåñ êîíöà êîíôèã.äàííûõ	350	add edx, eax ;êëàä¸ì â edx - àäðåñ êîíöà êîíôèã.äàííûõ
330		351
331	.chStart:	352	.chStart:
332	cmp byte[eax], 121 ;'y' ;âûñòàâëÿåì checkBox - ïàðàìåòð àêòèâíîñòè ïðèëîæåíèÿ	353	cmp byte[eax], 121 ;'y' ;âûñòàâëÿåì checkBox - ïàðàìåòð àêòèâíîñòè ïðèëîæåíèÿ
333	jne loadConfig.no	354	jne loadConfig.no
334	.yes:	355	.yes:
335	mov word[ch1.flags], ch_flag_en	356	mov word[ch1.flags], 110b ;ch_flag_en and ch_flag_middle ;110b ;ch_flag_en
336	jmp loadConfig.chEnd	357	jmp loadConfig.chEnd
337	.no:	358	.no:
338	mov word[ch1.flags], 0	359	mov word[ch1.flags], 100b ;0 and ch_flag_middle ;100b
339	.chEnd:	360	.chEnd:
340	;jmp loadConfig.end ;êîìàíäà äëÿ óäîáñòâà îòëàäêè è ïîèñêà îøèáîê	361	;jmp loadConfig.end ;êîìàíäà äëÿ óäîáñòâà îòëàäêè è ïîèñêà îøèáîê
341		362
342	;êîïèðóåì ñîäåðæèìîå ñòðîê â áóôåð	363	;êîïèðóåì ñîäåðæèìîå ñòðîê â áóôåð
343	push edi esi ecx ebx eax	364	push edi esi ecx ebx eax
344	;èíèöèàëèçèðóåì óêàçàòåëè íà àäðåñà áóôåðà ñòðîêè è å¸ ðàçìåðà	365	;èíèöèàëèçèðóåì óêàçàòåëè íà àäðåñà áóôåðà ñòðîêè è å¸ ðàçìåðà
345	mov edi, dataBuffer.1 ;dword[dataBuffer.1]	366	mov edi, dataBuffer.1 ;dword[dataBuffer.1]
346	mov esi, dataBuffer.size1 ;dword[dataBuffer.size1]	367	mov esi, dataBuffer.size1 ;dword[dataBuffer.size1]
347	;ecx - ñ÷¸ò÷èê áàéò â ñòðîêå	368	;ecx - ñ÷¸ò÷èê áàéò â ñòðîêå
348	; mov ecx, 0 ;xor ecx, ecx	369	; mov ecx, 0 ;xor ecx, ecx
349	.block:	370	.block:
350	xor ecx, ecx ;îáíóëÿåì ñ÷¸ò÷èê	371	xor ecx, ecx ;îáíóëÿåì ñ÷¸ò÷èê
351	inc eax	372	inc eax
352	cmp byte[eax], 10 ;åñëè î÷åðåäíîé êîä ñèìâîëà 10 èëè 13, òî ïðîïóñêàåì ñèìâîëû	373	cmp byte[eax], 10 ;åñëè î÷åðåäíîé êîä ñèìâîëà 10 èëè 13, òî ïðîïóñêàåì ñèìâîëû
353	je loadConfig.block ;propusk ;äî ïåðâîãî îòëè÷íîãî îò íèõ	374	je loadConfig.block ;propusk ;äî ïåðâîãî îòëè÷íîãî îò íèõ
354	cmp byte[eax], 13	375	cmp byte[eax], 13
355	je loadConfig.block ;propusk	376	je loadConfig.block ;propusk
356		377
357	; ñèìâîë îòëè÷åí îò ïåðåíîñà ñòðîêè è âîçâðàòà êàðåòêè - íà÷èíàåì êîïèðîâàòü îòñþäà â áóôåð	378	; ñèìâîë îòëè÷åí îò ïåðåíîñà ñòðîêè è âîçâðàòà êàðåòêè - íà÷èíàåì êîïèðîâàòü îòñþäà â áóôåð
358	mov bl, byte[eax]	379	mov bl, byte[eax]
359	mov byte[edi], bl	380	mov byte[edi], bl
360	inc edi	381	inc edi
361	inc eax	382	inc eax
362	inc ecx ;óâåëè÷èâàåì ñ÷¸ò÷èê ñèìâîëîâ â ñòðîêå	383	inc ecx ;óâåëè÷èâàåì ñ÷¸ò÷èê ñèìâîëîâ â ñòðîêå
363		384
364	;èä¸ì äî êîíöà ýòîé ñòðîêè: ïîêà íå âñòðåòèì î÷åðåäíîé 10, 13, 0 èëè file end	385	;èä¸ì äî êîíöà ýòîé ñòðîêè: ïîêà íå âñòðåòèì î÷åðåäíîé 10, 13, 0 èëè file end
365	.while: ;è êîïèðóåì âñ¸ â áóôåð	386	.while: ;è êîïèðóåì âñ¸ â áóôåð
366	cmp eax, edx ;ïðîâåðÿåì çàêîí÷èëñÿ ëè ôàéë, à êîíöà ñòðîêè íå áûëî !!!	387	cmp eax, edx ;ïðîâåðÿåì çàêîí÷èëñÿ ëè ôàéë, à êîíöà ñòðîêè íå áûëî !!!
367	ja loadConfig.ura	388	ja loadConfig.ura
368	cmp byte[eax], 10	389	cmp byte[eax], 10
369	je loadConfig.ura	390	je loadConfig.ura
370	cmp byte[eax], 0	391	cmp byte[eax], 0
371	je loadConfig.ura	392	je loadConfig.ura
372	cmp byte[eax], 13	393	cmp byte[eax], 13
373	je loadConfig.ura	394	je loadConfig.ura
374		395
375	mov bl, byte[eax]	396	mov bl, byte[eax]
376	mov byte[edi], bl	397	mov byte[edi], bl
377	inc edi	398	inc edi
378	inc eax	399	inc eax
379	inc ecx	400	inc ecx
380	cmp ecx, 511	401	cmp ecx, 511
381	jae loadConfig.ura	402	jae loadConfig.ura
382	jmp loadConfig.while	403	jmp loadConfig.while
383	.ura:	404	.ura:
384	mov byte[edi], 0 ;êëàä¸ì çàâåðøàþùèé 0 â ñòðîêó	405	mov byte[edi], 0 ;êëàä¸ì çàâåðøàþùèé 0 â ñòðîêó
385	mov dword[esi], ecx ;ñîõðàíÿåì ðàçìåð ñòðîêè	406	mov dword[esi], ecx ;ñîõðàíÿåì ðàçìåð ñòðîêè
386	add esi, 4 ;ïåðåõîäèì íà ðàçìåð ñëåäóþùåãî áóôåðà	407	add esi, 4 ;ïåðåõîäèì íà ðàçìåð ñëåäóþùåãî áóôåðà
387	sub edi, ecx ;ïåðåõîäèì íà ñëåäóþùèé áóôåð	408	sub edi, ecx ;ïåðåõîäèì íà ñëåäóþùèé áóôåð
388	add edi, 512	409	add edi, 512
389	; mov ecx, 0 ;xor ecx, ecx ;îáíóëÿåì ðàçìåð ñòðîêè	410	; mov ecx, 0 ;xor ecx, ecx ;îáíóëÿåì ðàçìåð ñòðîêè
390		411
391	cmp edi, dataBuffer.size1 ;åñëè ýòî áûë ïîñëåäíèé áóôåð (è ìû âûøëè çà àäðåñà ðàçìåðîâ áóôåðîâ), òî âûõîäèì	412	cmp edi, dataBuffer.size1 ;åñëè ýòî áûë ïîñëåäíèé áóôåð (è ìû âûøëè çà àäðåñà ðàçìåðîâ áóôåðîâ), òî âûõîäèì
392	jb loadConfig.block	413	jb loadConfig.block
393		414
394	pop eax ebx ecx esi edi	415	pop eax ebx ecx esi edi
395		416
396	jmp loadConfig.end	417	jmp loadConfig.end
397	.default:	418	.default:
398	mov eax, defaultDataForConfig	419	mov eax, defaultDataForConfig
399	mov edx, defaultDataSize	420	mov edx, defaultDataSize
400	jmp loadConfig.start	421	jmp loadConfig.start
401	.end:	422	.end:
402	mov ecx, dword[fileAdr] ;åñëè ôàéë áûë çàãðóæåí, òî	423	mov ecx, dword[fileAdr] ;åñëè ôàéë áûë çàãðóæåí, òî
403	cmp ecx, 0	424	cmp ecx, 0
404	je @f	425	je @f
405	mcall 68, 13, ecx ;âûãðóæàåì ôàéë èç ïàìÿòè	426	mcall 68, 13, ecx ;âûãðóæàåì ôàéë èç ïàìÿòè
406	@@:	427	@@:
407	call updateParams ;ïðèìåíÿåì íàñòðîéêè êàæäîãî áóôåðà	428	call updateParams ;ïðèìåíÿåì íàñòðîéêè êàæäîãî áóôåðà
408	pop edx ecx ebx eax	429	pop edx ecx ebx eax
409	ret	430	ret
410		431
411		432
412	updateParams: ;max, size, pos	433	updateParams: ;max, size, pos
413	push eax	434	push eax
414	mov eax, dword[dataBuffer.size1]	435	mov eax, dword[dataBuffer.size1]
415	mov dword[editLU.size], eax	436	mov dword[editLU.size], eax
416	mov dword[editLU.pos], eax	437	mov dword[editLU.pos], eax
417		438
418	mov eax, dword[dataBuffer.size2]	439	mov eax, dword[dataBuffer.size2]
419	mov dword[editLD.size], eax	440	mov dword[editLD.size], eax
420	mov dword[editLD.pos], eax	441	mov dword[editLD.pos], eax
421		442
422	mov eax, dword[dataBuffer.size3]	443	mov eax, dword[dataBuffer.size3]
423	mov dword[editRU.size], eax	444	mov dword[editRU.size], eax
424	mov dword[editRU.pos], eax	445	mov dword[editRU.pos], eax
425		446
426	mov eax, dword[dataBuffer.size4]	447	mov eax, dword[dataBuffer.size4]
427	mov dword[editRD.size], eax	448	mov dword[editRD.size], eax
428	mov dword[editRD.pos], eax	449	mov dword[editRD.pos], eax
429	pop eax	450	pop eax
430	ret	451	ret
431		452
432		453
433		454
434	selfName db 'HACONFIG', 0 ;'@HOTANGLES',0	455	selfName db 'HACONFIG', 0 ;'@HOTANGLES',0
435	selfNameSize = 8;9 ;äî 11 byte	456	selfNameSize = 8;9 ;äî 11 byte
436	;	457	;
437	compareBytes:	458	compareBytes:
438	push edi esi ecx ebx	459	push edi esi ecx ebx
439	mov eax, 0 ;xor eax, eax	460	mov eax, 0 ;xor eax, eax
440	mov ecx, selfNameSize ;11 ;max ðàçìåð ñòðîê 11	461	mov ecx, selfNameSize ;11 ;max ðàçìåð ñòðîê 11
441	@@:	462	@@:
442	mov bl, byte[edi]	463	mov bl, byte[edi]
443	cmp bl, byte[esi]	464	cmp bl, byte[esi]
444	jne compareBytes.no	465	jne compareBytes.no
445	inc edi	466	inc edi
446	inc esi	467	inc esi
447	cmp ecx, 0	468	cmp ecx, 0
448	je @f	469	je @f
449	dec ecx	470	dec ecx
450	jmp @b	471	jmp @b
451	.no:	472	.no:
452	mov eax, 1	473	mov eax, 1
453	@@:	474	@@:
454	pop ebx ecx esi edi	475	pop ebx ecx esi edi
455	ret	476	ret
456	;	477	;
457	slotMax dd 0	478	slotMax dd 0
458	selfPID dd 0	479	selfPID dd 0
459	buf db 1024 dup(0)	480	buf db 1024 dup(0)
460	copyKill:	481	copyKill:
461	push eax ebx ecx esi edi	482	push eax ebx ecx esi edi
462		483
463	;ñïåðâà ïðî÷ò¸ì ñâîþ èíôîðìàöèþ	484	;ñïåðâà ïðî÷ò¸ì ñâîþ èíôîðìàöèþ
464	mcall 9, buf, -1	485	mcall 9, buf, -1
465	mov eax, dword[buf+30]	486	mov eax, dword[buf+30]
466	mov dword[selfPID], eax	487	mov dword[selfPID], eax
467		488
468	;óêàçàòåëè, êîòîðûå íèêîãäà íå ìåíÿþòñÿ:	489	;óêàçàòåëè, êîòîðûå íèêîãäà íå ìåíÿþòñÿ:
469	mov esi, selfName ;ïåðâàÿ ñòðîêà - èìÿ òåêóùåãî ïðèëîæåíèÿ	490	mov esi, selfName ;ïåðâàÿ ñòðîêà - èìÿ òåêóùåãî ïðèëîæåíèÿ
470	mov edi, buf ;âòîðàÿ ñòðîêà - èìÿ òåêóùåãî ñëîòà	491	mov edi, buf ;âòîðàÿ ñòðîêà - èìÿ òåêóùåãî ñëîòà
471	add edi, 10	492	add edi, 10
472		493
473	mov ecx, 1	494	mov ecx, 1
474	@@:	495	@@:
475	mcall 9, buf, ecx	496	mcall 9, buf, ecx
476	mov dword[slotMax], eax	497	mov dword[slotMax], eax
477		498
478	;åñëè ýòî ìû ñàìè, òî ïðîïóñêàåì ïðîâåðêó	499	;åñëè ýòî ìû ñàìè, òî ïðîïóñêàåì ïðîâåðêó
479	mov eax, dword[buf+30]	500	mov eax, dword[buf+30]

Subversion Repositories Kolibri OS

(root)/programs/other/ha/HACONFIG.ASM – Rev 7397 → 7402