forked from KolibriOS/kolibrios
950 lines
41 KiB
NASM
950 lines
41 KiB
NASM
;#___________________________________________________________________________________________________
|
||
;****************************************************************************************************|
|
||
; Program Palitra (c) Sergei Steshin (Akyltist) |
|
||
;----------------------------------------------------------------------------------------------------|
|
||
;; Charset:DOS-866 Font:Courier New Size:9pt |
|
||
;.....................................................................................................
|
||
;; compiler: FASM 1.69.31 |
|
||
;; version: 0.3.0 |
|
||
;; last update: 08/11/2012 |
|
||
;; e-mail: dr.steshin@gmail.com |
|
||
;.....................................................................................................
|
||
;; History: |
|
||
;; 0.1.0 - <20>¥à¢ ï ¢¥àá¨ï ¯à®£à ¬¬ë. |
|
||
;; 0.2.0 - ˆá¯à ¢«¥® ¯®¯ ¤ ¨¥ ¢ á¥âªã, ¡¥à¥âáï ¡«¨¦ ©è¨© ¯® ¤¨ £® «¨ ¯¨ªá¥«ì. |
|
||
;; - „®¡ ¢«¥ë ¯®«§ãª¨, ¤«ï ॣ㫨஢ ¨ï rgb á®áâ ¢«ïîé¨å 梥⠨ ¢ë¢®¤ íâ¨å á®áâ ¢«ïîé¨å. |
|
||
;; - “¡à ¢ë¢®¤ 梥⠢ ¡¨ ஬ ¢¨¤¥ (¯®ª § ¥ ¤®¡®áâìî ¨ ¥ ªâã «ì®áâìî). |
|
||
;; - Œ¥«ª ï ª®á¬¥â¨ª . |
|
||
;; 0.3.0 - „®¡ ¢«¥® ¯¥à¥ª«î票¥ ¢¨¤®¢ 梥⮢ëå á奬 (ª®¯ª NEXT) |
|
||
;; - “«ãçè¥ë ¯®«§ãª¨, ¯à®¨§¢®¤¨âáï ®¡à ¡®âª ¦ â¨ï à冷¬ á ¯®«§ãª®¬. |
|
||
;; - —¨á«® á¥â®ª ¢ 梥⮢®© á奬¥ 㬥ì襮 á 6 ¤® 4 (ªà â®áâì 256, ¨ ç¥ ¤ã¡«¨à®¢ ¨¥ 梥â ).|
|
||
;; - Œ¥«ª ï ª®á¬¥â¨ª . |
|
||
;; 0.4.0 - „®¡ ¢«¥® ¯¥à¥ª«î票¥ ¬¥¦¤ã ¤¢ã¬ï 梥⠬¨ |
|
||
;; - „®¡ ¢«¥ ¯®«§ã®ª ॣ㫨஢ ¨ï ¯à®§à ç®á⨠(¡¥§ ¢¨§ã «¨§ 樨). |
|
||
;; - „®¡ ¢«¥® ¢ëà ¢¨¢ ¨¥ § 票© rgba ¯® æ¥âàã, ¢ § ¢¨á¨¬®á⨠®â ¤«¨ë. |
|
||
;; - Š®á¬¥â¨ç¥áª¨¥ ¯à ¢ª¨. |
|
||
;; - <20>¥¡®«ìè ï ®¯â¨¬¨§ æ¨ï. |
|
||
;; 0.5.0 - „®¡ ¢«¥ ª®¯ª ᬥë ä® à ¡®ç¥£® á⮫ (®â Leency). |
|
||
;; - „®¡ ¢«¥® ¨§¬¥¥¨¥ ä® à ¡®ç¥£® á⮫ £à ¤¨¥â®© § «¨¢ª®©. |
|
||
;; - Š®á¬¥â¨ç¥áª¨¥ ¯à ¢ª¨. |
|
||
;; - <20>¥¡®«ìè ï ¤¥®¯â¨¬¨§ æ¨ï. |
|
||
;; 0.6.0 - „®¡ ¢«¥ ¢®§¬®¦®áâì § ¯ãáª á ¯ à ¬¥âà ¬¨ |
|
||
;; - „®¡ ¢«¥ ०¨¬ H (hidden) ¯à®¨§¢®¤¨â § ¬¥ã ä® à ¡®ç¥£® á⮫ £à ¤¨¥â®© § «¨¢ª®©. |
|
||
;; - <20>®«ìè ï ¤¥®¯â¨¬¨§ æ¨ï. |
|
||
;; 0.7.0 - „®¡ ¢«¥ ¯¨¯¥âª - ¢ë¡®à á।îî ª®¯ªã ¬ëè¨ |
|
||
;; 0.7.5 - <20> ¦ ⨥ ¯à ¢®© ª« ¢¨è¥© ¬ëè¨ ï祩ªã á 梥⮬ ãáâ ¢«¨¢ ¥â ¥ ®á®¢®©, ¤®¯®«. 梥â |
|
||
;; - “¬¥ì襮 ¬¥àæ ¨¥ ¯à¨ à ¡®â¥ ¯¨¯¥âª¨ |
|
||
;; 0.7.6 - „®¡ ¢«¥ ०¨¬ B, ª®â®àë© ¯à®¨§¢®¤¨â § ¬¥ã ä® à ¡®ç¥£® á⮫ è㬮© § «¨¢ª®© (e-andrew)|
|
||
;.....................................................................................................
|
||
;; 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 <organization> nor the names of its contributors may be used to |
|
||
;; endorse or promote products derived from this software without specific prior written |
|
||
;; permission. |
|
||
;; |
|
||
;; THIS SOFTWARE IS PROVIDED BY Sergei Steshin ''AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, |
|
||
;; INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A |
|
||
;; PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL <copyright holder> BE LIABLE FOR ANY DIRECT, |
|
||
;; INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED |
|
||
;; TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS |
|
||
;; INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT |
|
||
;; LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS |
|
||
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
|
||
;....................................................................................................|
|
||
|
||
|
||
;#___________________________________________________________________________________________________
|
||
;****************************************************************************************************|
|
||
; ‡€ƒŽ‹Ž‚ŽŠ ˆ‘<CB86>Ž‹<C5BD>Ÿ…ŒŽƒŽ ”€‰‹€ <20><>ˆ‹Ž†…<E280A0>ˆŸ „‹Ÿ ŠŽ‹ˆ<E280B9><CB86>ˆ Ž‘ |
|
||
;----------------------------------------------------------------------------------------------------/
|
||
use32
|
||
org 0
|
||
db 'MENUET01'
|
||
dd 1,START,I_END,I_MEM,stacktop,params,sys_path
|
||
|
||
include '../../../macros.inc'
|
||
include '../../../proc32.inc'
|
||
include '../../../KOSfuncs.inc'
|
||
include '../../../dll.inc'
|
||
|
||
include 'draw_sliders.inc'
|
||
include 'draw_utils.inc'
|
||
include 'draw_palitra.inc'
|
||
|
||
|
||
|
||
WIN_W = 374 ; è¨à¨ ®ª
|
||
WIN_H = 251 ; ¢ëá®â ®ª
|
||
WIN_X = 250 ; ª®®à¤¨ â å ®ª
|
||
WIN_Y = 190 ; ª®®à¤¨ â ã ®ª
|
||
|
||
Left_Border=4
|
||
SliderPanel_W = 110
|
||
DRAWY = 9
|
||
|
||
CELLW = 11; 11 ; not used yet, but has to be :)
|
||
|
||
ICONX = WIN_W - 39
|
||
ICONS = 18 ; icon size
|
||
SLIDEW = 25
|
||
|
||
palitra_x = Left_Border+SliderPanel_W+12
|
||
palitra_w = CELLW*(8)+8+1
|
||
palitra_xw = palitra_x shl 16 + palitra_w
|
||
palitra_yw = DRAWY shl 16 + palitra_w
|
||
|
||
START:
|
||
mcall SF_SYS_MISC,SSF_HEAP_INIT ; ¨¨æ¨ «¨§ æ¨ï ªãç¨
|
||
mcall SF_SYS_MISC, SSF_MEM_OPEN, i18_name
|
||
mov [icons18], eax
|
||
mcall SF_SYS_MISC, SSF_MEM_OPEN, i18bg_name
|
||
mov [icons18bg], eax
|
||
|
||
stdcall dll.Load, @IMPORT
|
||
or eax,eax
|
||
jnz bexit
|
||
mcall SF_SET_EVENTS_MASK,EVM_REDRAW+EVM_KEY+EVM_BUTTON+EVM_MOUSE ; ãáâ ¢«¨¢ ¥¬ ¬ áªã ᮡë⨩
|
||
include 'params_init.inc' ; ®¡à ¡®âª ¯ à ¬¥â஢ ª®¬ ¤®© áâப¨
|
||
|
||
;#___________________________________________________________________________________________________
|
||
;****************************************************************************************************|
|
||
; Ž‘<C5BD>Ž‚<C5BD>Ž‰ –ˆŠ‹ <20><>Žƒ<C5BD>€ŒŒ› - Ž<><C5BD>€<EFBFBD>Ž’Š€ ‘Ž<E28098>›’ˆ‰ |
|
||
;----------------------------------------------------------------------------------------------------/
|
||
red:
|
||
call draw_main ; ¢ë§ë¢ ¥¬ ¯¥à¥à¨á®¢ªã ®ª ¯à¨«®¦¥¨ï
|
||
still:
|
||
mcall SF_WAIT_EVENT ; äãªæ¨ï 10 - ¦¤ âì ᮡëâ¨ï
|
||
cmp eax,EV_REDRAW ; ¯¥à¥à¨á®¢ âì ®ª® ?
|
||
je red ; ¥á«¨ ¤ - ¬¥âªã red
|
||
cmp eax,EV_KEY ; ¦ â ª« ¢¨è ?
|
||
je key ; ¥á«¨ ¤ - key
|
||
cmp eax,EV_BUTTON ; ¦ â ª®¯ª ?
|
||
je button ; ¥á«¨ ¤ - button
|
||
cmp eax,EV_MOUSE ; ᮡë⨥ ®â ¬ëè¨ ¢¥ ®ª
|
||
je mouse ; ¥á«¨ ¤ - button
|
||
jmp still ; ¥á«¨ ¤à㣮¥ ᮡë⨥ - ¢ ç «® 横«
|
||
;end_still
|
||
|
||
key: ; ¦ â ª« ¢¨è ª« ¢¨ âãà¥
|
||
mcall SF_GET_KEY ; äãªæ¨ï 2 - áç¨â âì ª®¤ ᨬ¢®« (¢ ah) (âãâ ¢ ¯à¨æ¨¯¥ ¥ 㦠)
|
||
jmp still ; ¢¥àãâìáï ª ç «ã 横«
|
||
;end_key
|
||
|
||
mouse:
|
||
cmp [renmode],2
|
||
jne left
|
||
call cyrcle_draw
|
||
jmp center
|
||
left:
|
||
mcall SF_MOUSE_GET,SSF_BUTTON
|
||
cmp al,1b
|
||
jne right
|
||
mov [mouse_f],1
|
||
jmp still
|
||
right:
|
||
cmp al,10b
|
||
jne still
|
||
mov [mouse_f],2
|
||
jmp still
|
||
center:
|
||
mcall SF_MOUSE_GET,SSF_BUTTON
|
||
cmp al,100b
|
||
jne still
|
||
mov [mouse_f],3
|
||
mov [color],edx
|
||
call draw_result
|
||
jmp still ; ¢¥àãâìáï ª ç «ã 横«
|
||
;end_mouse
|
||
|
||
button:
|
||
mcall SF_GET_BUTTON ; 17 - ¯®«ãç¨âì ¨¤¥â¨ä¨ª â®à ¦ ⮩ ª®¯ª¨
|
||
cmp ah, 1 ; ¥á«¨ ¦ â ª®¯ª á ®¬¥à®¬ 1,
|
||
jz bexit ; ¢ë室¨¬
|
||
;®¡à ¡®âª ª®¯ª¨ Next
|
||
cmp ah, 12 ; ¥á«¨ ¦ â ª®¯ª NEXT
|
||
jne next_bg ; ¢ë室¨¬
|
||
inc [pnext] ; 㢥«¨ç¨¢ ¥¬ ¯à¨ ¦ ⨨ ®¬¥à ¯ «¨âàë
|
||
mov [renmode],0 ; ¢ª«îç ¥¬ æ¢¥â®¢ë¥ á奬ë
|
||
mov eax,[pnext] ; § ®á¨¬ § 票¥ ¢ ¥ å
|
||
cmp al,6 ; áà ¢¨¢ ¥¬ á § ¥ë¬ ª®«¨ç¥á⢮¬ ¯ «¨âà
|
||
jne next_redraw ; ¥á«¨ ¥ ¡®«ìè¥ ¬ ªá¨¬ã¬ â® ¢ë§®¢ ®âà¨á®¢ª¨
|
||
xor eax,eax ; ¨ ç¥ § ã«ï¥¬ ¯ «¨âàã default
|
||
mov [pnext],eax ; ¨ § ¯®¬¨ ¥¬ çâ® á¡à®á¨«¨ ¯ «¨âàã default
|
||
next_redraw:
|
||
call draw_palitra ; <20>ˆ‘“…Œ <20>€‹ˆ’<CB86>“
|
||
jmp still ; “室¨¬ ®¦¨¤ ¨¥ ¤à㣮£® ᮡëâ¨ï
|
||
next_bg:
|
||
cmp ah, 14 ; Š®¯ª BACKGROUND
|
||
jne next_bg2 ; ¥á«¨ ¥ ¦ â â® ¢ë室¨¬
|
||
call set_background ; ¨ ç¥ ãáâ ¢«¨¢ ¥¬ ä®
|
||
jmp still ; ¨ ®¦¨¤ ¨¥ ᮡëâ¨ï
|
||
next_bg2:
|
||
cmp ah, 16 ; Š®¯ª BACKGROUND
|
||
jne circle_bg ; ¥á«¨ ¥ ¦ â â® ¢ë室¨¬
|
||
call set_background2 ; ¨ ç¥ ãáâ ¢«¨¢ ¥¬ ä®
|
||
jmp still ; ¨ ®¦¨¤ ¨¥ ᮡëâ¨ï
|
||
circle_bg:
|
||
cmp ah, 15 ; Š®¯ª Šà㣮¢ ï ¯ «¨âà
|
||
jne next_end ; ¥á«¨ ¥ ¦ â â® ¢ë室¨¬
|
||
mov [renmode],2 ; ¢ª«îç ¥¬ ®âà¨á®¢ªã ªà㣮¢®© ¯ «¨âàë
|
||
call draw_palitra ; <20>ˆ‘“…Œ <20>€‹ˆ’<CB86>“
|
||
jmp still ; ¨ ®¦¨¤ ¨¥ ᮡëâ¨ï
|
||
next_end:
|
||
cmp ah,13 ; COLOR SWAP
|
||
jne color_swap_end
|
||
push [color2]
|
||
push [color]
|
||
pop [color2]
|
||
pop [color]
|
||
call draw_result
|
||
jmp still ; ˆ ã室¨¬ ®¦¨¤ ¨¥ ¤à㣮£® ᮡëâ¨ï
|
||
color_swap_end:
|
||
cmp ah, 7 ; <20>஢¥à塞 ¦ â ª®¯ª á ID=7
|
||
jne color_button ; …᫨ ¥ ¦ â , â® ¨¤ñ¬ ¤ «ìè¥
|
||
call mouse_get ; ˆ ç¥ ¢ª«îç ¥¬ ®¡à ¡®â稪 ¬ëè¨, ç⮡ë áç¨â âì § 票¥ 梥â á ¯ «¨âàë
|
||
jmp still ; ˆ ã室¨¬ ®¦¨¤ ¨¥ ¤à㣮£® ᮡëâ¨ï
|
||
color_button: ; <20>€‘—ð’ ª®®à¤¨ â ¤«ï ¯®«§ãª®¢ RGBA
|
||
push eax ; § ¯®¬¨ ¥¬ ¥ å
|
||
call mouse_local ; ¯®«ãç ¥¬ «®ª «ìë¥ ª®®à¤¨ âë
|
||
mov ebx, 188;137 ; ¨¦ïï £à ¨æ ¯®«§ãª ¯® “
|
||
mov ecx,[mouse_y] ; § ¨á¨¬ ¢ ¥áå § 票¥ ªãàá®à ¯® “
|
||
sub ebx,ecx ; 室¨¬ à §®áâì (â.¥. ªã¤ á¬¥é ¥âáï ¯®«§ã®ª)
|
||
mov ecx, 2;3 ; § ®á¨¬ ¢ ¥áå æ¨äàã 3 (256/3=85, £¤¥ 85-¢ëá®â ¯®«§ãª®¢)
|
||
imul ecx,ebx ; 室¨¬ ¨áâ¨ë© ¯ à ¬¥âà 梥â á ãçñ⮬ ¬ áèâ ¡ ¯®«§ãª ---+
|
||
pop eax ; ¢®ááâ ¢«¨¢ ¥¬ ¥ å :
|
||
;red_button: ; Šà áë© ’४¡ à :
|
||
cmp ah, 8 ; ID=8 :
|
||
jne green_button ; ¥á«¨ ¥â, â® ¯à®¢¥à塞 §¥«ñë© â४¡ à :
|
||
mov [cred],cl ; ¨ ç¥ ¯à¨á¢ ¨¢ ¥¬ § 票¥, ªà ᮬã 梥âã ᯥªâà <------+
|
||
call set_spectr ; ãáâ ¢«¨¢ ¥¬ ᯥªâà
|
||
jmp still ; “室¨¬ ®¦¨¤ ¨¥ ¤à㣮£® ᮡëâ¨ï
|
||
green_button:
|
||
cmp ah, 9
|
||
jne blue_button
|
||
mov [cgreen],cl
|
||
call set_spectr
|
||
jmp still ; “室¨¬ ®¦¨¤ ¨¥ ¤à㣮£® ᮡëâ¨ï
|
||
blue_button:
|
||
cmp ah, 10
|
||
jne alpha_button
|
||
mov [cblue],cl
|
||
call set_spectr
|
||
jmp still ; “室¨¬ ®¦¨¤ ¨¥ ¤à㣮£® ᮡëâ¨ï
|
||
alpha_button:
|
||
cmp ah, 11
|
||
jne still
|
||
mov [calpha],cl
|
||
call set_spectr
|
||
jmp still ; “室¨¬ ®¦¨¤ ¨¥ ¤à㣮£® ᮡëâ¨ï
|
||
bexit:
|
||
mcall SF_TERMINATE_PROCESS ; ¨ ç¥ ª®¥æ ¯à®£à ¬¬ë
|
||
;end_button
|
||
|
||
;#___________________________________________________________________________________________________
|
||
;****************************************************************************************************|
|
||
; ƒ‹€‚<E282AC>›‰ ŒŽ„“‹œ Ž’<C5BD>ˆ‘Ž‚Šˆ ŽŠ<C5BD>€ ˆ <20>‹…Œ…<C592>’Ž‚ <20><>ˆ‹Ž†…<E280A0>ˆŸ |
|
||
;----------------------------------------------------------------------------------------------------/
|
||
draw_main:
|
||
; äãªæ¨ï 12: ®§ ç ¥â, çâ® ¡ã¤¥â à¨á®¢ âìáï ®ª®
|
||
mcall SF_REDRAW,SSF_BEGIN_DRAW
|
||
|
||
; ”ãªæ¨ï 48 - á⨫¨ ®â®¡à ¦¥¨ï ®ª®
|
||
mcall SF_STYLE_SETTINGS,SSF_GET_COLORS,sc,sizeof.system_colors
|
||
|
||
; ”ãªæ¨ï 48 - á⨫¨ ®â®¡à ¦¥¨ï ®ª®
|
||
mcall SF_STYLE_SETTINGS,SSF_GET_SKIN_HEIGHT
|
||
mov ecx,eax ; ‡ ¯®¬¨ ¥¬ ¢ëá®âã ᪨
|
||
|
||
mov edi,[runmode]
|
||
cmp edi,2
|
||
jne no_hiddenmode
|
||
mov edi,hidden
|
||
jmp set_title
|
||
no_hiddenmode:
|
||
cmp edi,3
|
||
jne no_dialogmode
|
||
mov edi,hidden
|
||
jmp set_title
|
||
no_dialogmode:
|
||
mov edi,title ; ‡ £®«®¢®ª ®ª
|
||
set_title:
|
||
|
||
xor eax,eax ; Žç¨é ¥¬ eax (mov eax,0) (”ãªæ¨ï 0)
|
||
mov ebx,WIN_X shl 16+WIN_W ; [ª®®à¤¨ â ¯® ®á¨ x]*65536 + [à §¬¥à ¯® ®á¨ x]
|
||
add ecx,WIN_Y shl 16+WIN_H ; ‚ëá®â ᪨ + [ª®®à¤¨ â ¯® y]*65536 + [à §¬¥à ¯® y] (168 ¤«ï ¢¥àᨨ 0.2)
|
||
mov edx,[sc.work] ; ‚¨¤¨¬® áâ¨«ì ®ª ¯® ¤¥ä®«âã
|
||
or edx,0x34000000 ; ˆ«¨ ®ª® ᮠ᪨®¬ 䨪á¨à®¢ ëå à §¬¥à®¢
|
||
|
||
int 0x40 ; <20>à¥àë¢ ¨¥
|
||
|
||
|
||
call draw_palitra ; <20>ˆ‘“…Œ <20>€‹ˆ’<CB86>“
|
||
call draw_result ; <20>ˆ‘“…Œ <20>…‡“‹œ’€’
|
||
|
||
mcall SF_DEFINE_BUTTON, <palitra_x,palitra_w*2+1 > , <DRAWY,palitra_w*2+2>, 7+BT_HIDE ; palitra
|
||
|
||
inc edx
|
||
mcall , <10,22>, <56,128> ; <20>¨á㥬 ¥¢¨¤¨¬ãî ª®¯ªã ¯®¤ á« ©¤¥à®¬ red
|
||
add ebx,25*65536 ; „®¡ ¢«ï¥¬
|
||
inc edx ; ID = 9
|
||
int 0x40 ; <20>¨á㥬 ¥¢¨¤¨¬ãî ª®¯ªã ¯®¤ á« ©¤¥à®¬ green
|
||
add ebx,25*65536 ; „®¡ ¢«ï¥¬
|
||
inc edx ; ID = 10
|
||
int 0x40 ; <20>¨á㥬 ¥¢¨¤¨¬ãî ª®¯ªã ¯®¤ á« ©¤¥à®¬ blue
|
||
add ebx,25*65536 ; „®¡ ¢«ï¥¬
|
||
inc edx ; ID = 11
|
||
int 0x40 ; <20>¨á㥬 ¥¢¨¤¨¬ãî ª®¯ªã ¯®¤ á« ©¤¥à®¬ alpha
|
||
|
||
; ”ãªæ¨ï 8 - ®¯à¥¤¥«¨âì/㤠«¨âì ª®¯ªã (‘Œ…<C592>€ –‚…’€)
|
||
mcall , <13,19>, <20,18>, 0x0D+BT_HIDE
|
||
|
||
call draw_bottom_panel
|
||
call draw_left_panel
|
||
|
||
; äãªæ¨ï 12: ®§ ç ¥â, çâ® ¡ã¤¥â à¨á®¢ âìáï ®ª®
|
||
mcall SF_REDRAW,SSF_END_DRAW
|
||
ret
|
||
|
||
|
||
|
||
;#___________________________________________________________________________________________________
|
||
;****************************************************************************************************|
|
||
; <20>‹ŽŠ ‚‘<E2809A>ŽŒŽƒ€’…‹œ<E280B9>›• <20><>Ž–…„“<E2809E> ˆ ”“<E2809D>Š–ˆ‰ <20><>ˆ‹Ž†…<E280A0>ˆŸ |
|
||
;----------------------------------------------------------------------------------------------------/
|
||
|
||
|
||
;------------------------------------------------------------------------------------------------+
|
||
draw_left_panel: ; Žâà¨á®¢ª ¡®ª®¢®© ¯ ¥«¨ SL97: <20> á ¬®¬ ¤¥«¥ ¯à ¢®©.
|
||
;.................................................................................................
|
||
; button_next_colorsheme
|
||
mcall SF_DEFINE_BUTTON, <ICONX,ICONS+3>, <DRAWY,ICONS+3>, 12+BT_HIDE
|
||
|
||
; palitra button ; ID = 14
|
||
mcall , ,(DRAWY+150) shl 16 + ICONS+3, 14+BT_HIDE
|
||
|
||
; pipet button ; ID = 15
|
||
mcall , , (DRAWY+150) shl 16 + ICONS+3, 15+BT_HIDE
|
||
|
||
mov ebx,[icons18bg]
|
||
add ebx,ICONS*ICONS*4*53
|
||
mcall SF_PUT_IMAGE_EXT, ebx, <ICONS,ICONS>, <ICONX+2,DRAWY+2>, 32, 0, 0
|
||
|
||
add ebx,ICONS*ICONS*4*(39-53)
|
||
mov edx,(ICONX+2)*65536+WIN_H-90
|
||
mcall
|
||
|
||
mov ebx,[icons18]
|
||
add ebx,ICONS*ICONS*4*(53-1)
|
||
sub edx,40
|
||
mcall
|
||
|
||
stdcall DrawDeepRectangle, ICONX-1, DRAWY-1, ICONS+5, ICONS+5, [sc.work_graph], [sc.work_graph]
|
||
stdcall DrawDeepRectangle, ICONX, DRAWY, ICONS+3, ICONS+3, [sc.work_light], [sc.work_dark]
|
||
|
||
stdcall DrawDeepRectangle, ICONX-1, DRAWY+109, ICONS+5, ICONS+5, [sc.work_graph], [sc.work_graph]
|
||
stdcall DrawDeepRectangle, ICONX, DRAWY+110, ICONS+3, ICONS+3, [sc.work_dark], [sc.work_light]
|
||
stdcall DrawDeepRectangle, ICONX+1, DRAWY+111, ICONS+1, ICONS+1, 0xFFFfff, 0xFFFfff
|
||
|
||
stdcall DrawDeepRectangle, ICONX-1, DRAWY+149, ICONS+5, ICONS+5, [sc.work_graph], [sc.work_graph]
|
||
stdcall DrawDeepRectangle, ICONX, DRAWY+150, ICONS+3, ICONS+3, [sc.work_light], [sc.work_dark]
|
||
|
||
;stdcall DrawRectangle3D, ICONX, DRAWY, 22, 22, [sc.work_light], [sc.work_dark] ;Leency: draw rectangle around the button, buggy now
|
||
|
||
;mov eax,13 ; draw rect
|
||
;mov ebx,266 shl 16+16 ; [x] + [size]
|
||
;mov ecx,9 shl 16+16 ; [y] + [size]
|
||
;mov edx,0x666666 ; RGB
|
||
;push esi ; backup esi
|
||
;mov esi,8 ; counter=8
|
||
;draw_lpanel: ; loop label
|
||
; int 0x40 ; call draw black rect
|
||
; add ecx,19 shl 16 ; move rect
|
||
; dec esi ; decrement counter
|
||
; cmp esi,0 ; if counter!=zero
|
||
; jne draw_lpanel ; then goto label
|
||
; mov esi,8 ; else counter=8
|
||
; mov ebx,267 shl 16+14 ; [x] + [size]
|
||
; mov ecx,10 shl 16+14 ; [y] + [size]
|
||
; mov edx,0xF3F3F3 ; RGB
|
||
;draw_lpanel2: ; 2 loop label
|
||
; int 0x40 ; call draw white rect
|
||
; add ecx,19 shl 16 ; move rect
|
||
; dec esi ; decrement counter
|
||
; cmp esi,0 ; if counter!=0
|
||
; jne draw_lpanel2 ; then goto label2
|
||
;pop esi ; restore esi
|
||
; draw_left_arrow for button_next_colorsheme
|
||
;mov eax,4 ; Write string
|
||
;mov ebx,272 shl 16+13 ; [x] + [y]
|
||
;mov ecx,0x0 ; RGB
|
||
;mov edx,larrow ; string pointer
|
||
;mov esi,1 ; count symbol
|
||
;int 0x40 ; call
|
||
;mov eax,38 ; draw line
|
||
;mov ebx,270 shl 16+272 ; [start x] + [end x]
|
||
;mov ecx,16 shl 16+16 ; [start y] + [end y]
|
||
;mov edx,0x0 ; RGB
|
||
;int 0x40 ; call
|
||
ret ; return
|
||
;.................................................................................................
|
||
|
||
|
||
;------------------------------------------------------------------------------------------------+
|
||
draw_bottom_panel: ; Žâà¨á®¢ª ¨¦¥© ¯ ¥«¨
|
||
;.................................................................................................
|
||
mcall SF_DEFINE_BUTTON, <129,90>, <WIN_H-27,16>, 16, [sc.work_button]
|
||
|
||
add ebx, 100 shl 16
|
||
add edx, 2
|
||
int 0x40
|
||
|
||
; Write string
|
||
mov ecx,[sc.work_text] ; RGB
|
||
add ecx, 0x90000000
|
||
mcall SF_DRAW_TEXT, <35, WIN_H-26>, ,bground
|
||
|
||
mov ecx, [sc.work_button_text]
|
||
add ecx, 0x90000000
|
||
add ebx, 107 shl 16
|
||
mov edx, bground1
|
||
mcall
|
||
|
||
add ebx, 113 shl 16
|
||
mov edx, bground2
|
||
mcall
|
||
|
||
mcall SF_DRAW_LINE, <4, WIN_W-14>, <WIN_H-35, WIN_H-35>, [sc.work_graph]
|
||
ret
|
||
;.................................................................................................
|
||
|
||
mouse_global:
|
||
;.................................................................................................
|
||
; <20>®«ãç ¥¬ ª®®à¤¨ âë ¬ëè¨
|
||
;.................................................................................................
|
||
mcall SF_MOUSE_GET,SSF_SCREEN_POSITION
|
||
; eax = x*65536 + y, (x,y)=ª®®à¤¨ âë ªãàá®à ¬ëè¨
|
||
mov ecx,eax ;
|
||
shr ecx,16 ; ecx = x+1
|
||
movzx edx,ax ; edx = y+1
|
||
dec ecx ; ecx = x
|
||
dec edx ; edx = y
|
||
mov [mouse_x],ecx ; mouse_x = x
|
||
mov [mouse_y],edx ; mouse_y = y
|
||
ret ; ‚®§¢à é ¥¬ ã¯à ¢«¥¨¥
|
||
;end_mouse_global
|
||
|
||
mouse_local:
|
||
;.................................................................................................
|
||
; <20>®«ãç ¥¬ ª®®à¤¨ âë ¬ëè¨ ®â®á¨â¥«ì® ®ª
|
||
;.................................................................................................
|
||
mcall SF_MOUSE_GET,SSF_WINDOW_POSITION
|
||
; eax = x*65536 + y, (x,y)=ª®®à¤¨ âë ªãàá®à ¬ëè¨
|
||
mov ecx,eax ;
|
||
shr ecx,16 ; ecx = x+1
|
||
movzx edx,ax ; edx = y+1
|
||
dec ecx ; ecx = x
|
||
dec edx ; edx = y
|
||
mov [mouse_x],ecx ; mouse_x = x
|
||
mov [mouse_y],edx ; mouse_y = y
|
||
ret ; ‚®§¢à é ¥¬ ã¯à ¢«¥¨¥
|
||
;end_mouse_local
|
||
|
||
set_background:
|
||
;.................................................................................................
|
||
; “áâ ¢«¨¢ ¥â ä® à ¡®ç¥£® á⮫
|
||
;.................................................................................................
|
||
; ”ãªæ¨ï 15 - à ¡®â á ä®®¢®© £à 䨪®©
|
||
; <20>®¤äãªæ¨ï 4 - ãáâ ®¢¨âì ०¨¬ ®âà¨á®¢ª¨ ä® .
|
||
; <20>¥¦¨¬ ®âà¨á®¢ª¨ - § ¬®áâ¨âì (1), à áâïãâì (2)
|
||
mcall SF_BACKGROUND_SET,SSF_MODE_BG,2
|
||
|
||
; ”ãªæ¨ï 15 - à ¡®â á ä®®¢®© £à 䨪®©
|
||
; <20>®¤äãªæ¨ï 1 - ãáâ ®¢¨âì à §¬¥à ä®®¢®£® ¨§®¡à ¦¥¨ï.
|
||
mcall SF_BACKGROUND_SET,SSF_SIZE_BG,2,2
|
||
|
||
mov eax,[color]
|
||
mov [cm+0],al
|
||
mov [cm+9],al
|
||
shr eax,8
|
||
mov [cm+1],al
|
||
mov [cm+10],al
|
||
shr eax,8
|
||
mov [cm+2],al
|
||
mov [cm+11],al
|
||
|
||
mov eax,[color2]
|
||
mov [cm+3],al
|
||
mov [cm+6],al
|
||
shr eax,8
|
||
mov [cm+4],al
|
||
mov [cm+7],al
|
||
shr eax,8
|
||
mov [cm+5],al
|
||
mov [cm+8],al
|
||
|
||
; ”ãªæ¨ï 15 - à ¡®â á ä®®¢®© £à 䨪®©
|
||
; <20>®¤äãªæ¨ï 5 - ¯®¬¥áâ¨âì ¡«®ª ¯¨ªá¥«¥© ä®.
|
||
; - “ª § â¥«ì ¤ ë¥ ¢ ä®à¬ ⥠BBGGRRBBGGRR
|
||
; - C¬¥é¥¨¥ ¢ ¤ ëå ä®®¢®£® ¨§®¡à ¦¥¨ï
|
||
; - <20> §¬¥à ¤ ëå ¢ ¡ ©â å = 3 * ç¨á«® ¯¨ªá¥«¥©
|
||
mcall SF_BACKGROUND_SET,SSF_IMAGE_BG,cm,0,3*4
|
||
|
||
; ”ãªæ¨ï 15 - à ¡®â á ä®®¢®© £à 䨪®©
|
||
; <20>®¤äãªæ¨ï 3 - ¯¥à¥à¨á®¢ âì ä®.
|
||
mcall SF_BACKGROUND_SET,SSF_REDRAW_BG
|
||
|
||
stdcall save_eskin_ini, 'H '
|
||
|
||
ret
|
||
;end_set_background
|
||
|
||
desktop_get:
|
||
;.................................................................................................
|
||
; Ž¯à¥¤¥«ï¥¬ è¨à¨ã íªà
|
||
;.................................................................................................
|
||
; Ž¯à¥¤¥«ï¥¬ è¨à¨ã íªà (eax = [xsize]*65536 + [ysize])
|
||
mcall SF_GET_SCREEN_SIZE ; xsize = à §¬¥à ¯® £®à¨§®â «¨ - 1
|
||
mov ebx,eax ;
|
||
shr ebx,16 ; ebx = xsize-1
|
||
movzx edx,ax ; edx = ysize-1 («¨è¨© ª®¤)
|
||
inc ebx ; ebx = xsize
|
||
inc edx ; edx = ysize («¨è¨© ª®¤)
|
||
mov [desctop_w],ebx
|
||
mov [desctop_h],edx
|
||
ret
|
||
;end_desktop_get
|
||
|
||
mouse_get:
|
||
mov esi,2 ; ŠŽ‘’›‹œ: ä« £ ¤«ï ¨§¡¥¦ ¨ï § 横«¨¢ ¨ï
|
||
call mouse_global
|
||
call desktop_get
|
||
re_mouse_loop: ; ŠŽ‘’›‹œ: ¬¥âª ¤«ï ¢®§¢à ⠥᫨ ¯®¯ «¨ ¢ á¥âªã
|
||
mov ebx,[desctop_w]
|
||
imul ebx,[mouse_y] ; ebx = y*xsize
|
||
add ebx,[mouse_x] ; ebx = y*xsize+x
|
||
|
||
;.................................................................................................
|
||
; <20>¥à¥¬ 梥â á ¯ «¨âàë ¢ ¯¥à¥¬¥ãî
|
||
;.................................................................................................
|
||
;mov ebx,ecx ;; ebx = y*xsize+x («¨è¨© ª®¤)
|
||
mcall SF_GET_PIXEL ; <20>®«ãç ¥¬ 梥⠢ eax
|
||
cmp eax,[sc.work] ; ‘à ¢¨¢ ¥¬ á ä®®¬ ¯à¨«®¦¥¨ï
|
||
je mouse_err ; …᫨ íâ® ® - â® ¨ç¥£® ¥ ¤¥« ¥¬
|
||
cmp eax,0x222222 ; ‘à ¢¨¢ ¥¬ á 梥⮬ á¥âª¨
|
||
je mouse_err ; …᫨ íâ® ® - â® ¨ç¥£® ¥ ¤¥« ¥¬
|
||
jmp mouse_set ; ŠŽ‘’›‹œ: ¯àë£ ¥¬ çâ®¡ë ¥ ¡à âì 梥â á¥âª¨
|
||
mouse_err: ; ŠŽ‘’›‹œ: ¥á«¨ ¯®¯ «¨ ¢ á¥âªã ¨«¨ ä®
|
||
inc [mouse_y] ; ŠŽ‘’›‹œ: á¬¥é ¥¬ ¯® ¤¨ £® «¨ á ç « ¯® å
|
||
inc [mouse_x] ; ŠŽ‘’›‹œ: á¬¥é ¥¬ ¯® ¤¨ £® «¨ ¯®â®¬ ¯® ã
|
||
dec esi ; ŠŽ‘’›‹œ: “¬¥ìè ¥¬ ä« £
|
||
cmp esi,0 ; ŠŽ‘’›‹œ: ‘à ¢¨¢ ¥¬ á ã«¥¬
|
||
jz mouse_exit ; ŠŽ‘’›‹œ: …᫨ ®«ì ⮠ᤥ« «¨ ¢áñ çâ® ¬®£«¨
|
||
jmp re_mouse_loop ; ŠŽ‘’›‹œ: …᫨ ¥ ®«ì â® ¯®¯à®¡ã¥¬ ¢§ïâì á®á¥«¨© ¯¨ªá¥«ì
|
||
mouse_set: ; ˆ ç¥ § ¯®¬¨ ¥¬ ®¢ë© 梥â
|
||
cmp [mouse_f],1
|
||
jne was_right
|
||
mov [color],eax
|
||
call draw_result
|
||
jmp mouse_exit
|
||
was_right:
|
||
cmp [mouse_f],2
|
||
jne mouse_exit
|
||
mov [color2],eax
|
||
call draw_result ; ‚뢮¤¨¬ १ã«ìâ â
|
||
mouse_exit:
|
||
ret ; ‚®§¢à é ¥¬ ã¯à ¢«¥¨¥
|
||
;end_mouse_get----------------------------------------------------------------------------------------
|
||
|
||
|
||
|
||
|
||
|
||
|
||
draw_value:
|
||
;.................................................................................................
|
||
; ‚뢮¤ ç¨á« ¨§ áâப¨ ¢ 㪠§ ®© ®¡« áâ¨
|
||
;.................................................................................................
|
||
push ebx ; á®åà 塞 ¯à¨á« ë¥ ª®®à¤¨ âë
|
||
mov ebx,10 ; ãáâ ¢«¨¢ ¥¬ ®á®¢ ¨¥ á¨á⥬ë áç¨á«¥¨ï
|
||
mov edi,buff ; 㪠§ ⥫ì áâப㠡ãä¥à
|
||
call int2ascii ; ª®¢¥àâ¨à㥬 ç¨á«® ¨ «®¦¨¬ ª ª áâப㠢 ¡ãä¥à + esi ¤«¨
|
||
mov eax,SF_DRAW_TEXT ; äãªæ¨ï 4: ¯¨á âì ⥪áâ ¢ ®ª¥
|
||
pop ebx ; ¤®áâ ¥¬ ¨§ á⥪ ¯à¨á« ë¥ ª®®à¤¨ âë
|
||
cmp esi,2 ; –…<E28093>’<EFBFBD>ˆ<EFBFBD>Ž‚€<E2809A>ˆ… ’…Š‘’€
|
||
jne draw_value_1
|
||
add ebx,4 shl 16
|
||
jmp draw_value_e
|
||
draw_value_1:
|
||
cmp esi,1
|
||
jne draw_value_e
|
||
add ebx,7 shl 16
|
||
draw_value_e:
|
||
mov ecx,0x0;0x10000000 ; 梥â ⥪áâ RRGGBB
|
||
add ecx,[sc.work_text]
|
||
mov edx,buff ; 㪠§ ⥫ì ç «® ⥪áâ
|
||
int 0x40
|
||
ret ; ‚®§¢à é ¥¬ ã¯à ¢«¥¨¥
|
||
;end_draw_value
|
||
|
||
_read_params:
|
||
|
||
mov eax,dword[params+2]
|
||
mov dword[params_c+0],eax
|
||
|
||
mov eax,dword[params+6]
|
||
mov dword[params_c+4],eax
|
||
|
||
mov esi,params_c
|
||
mov ecx,16
|
||
call ascii2int
|
||
mov [color],eax
|
||
|
||
mov eax,dword[params+11]
|
||
mov dword[params_c+0],eax
|
||
|
||
mov eax,dword[params+15]
|
||
mov dword[params_c+4],eax
|
||
|
||
mov esi,params_c
|
||
mov ecx,16
|
||
call ascii2int
|
||
mov [color2],eax
|
||
|
||
ret
|
||
|
||
hex_digit:
|
||
;.................................................................................................
|
||
; <20>८¡à §®¢ ¨¥ ¢ ASCII (¢¥ § ¢¨á¨¬®á⨠®â á¨á⥬ë áç¨á«¥¨ï)
|
||
;.................................................................................................
|
||
cmp dl,10 ; ¢ dl ®¦¨¤ ¥âáï ç¨á«® ®â 0 ¤® 15
|
||
jb .less ; ¥á«¨ dl<10 â® ¯¥à¥å®¤¨¬
|
||
add dl,'A'-10 ; 10->A 11->B 12->C ...
|
||
ret ; ‚®§¢à é ¥¬ ã¯à ¢«¥¨¥
|
||
.less:
|
||
or dl,'0' ; …᫨ á¨á⥬ áç¨á«¥¨ï 10-ï ¨ ¬¥¥¥
|
||
ret ; ‚®§¢à é ¥¬ ã¯à ¢«¥¨¥
|
||
;end_hex_digit
|
||
|
||
int2ascii:
|
||
;.................................................................................................
|
||
; <20>८¡à §®¢ ¨¥ ç¨á« ¢ áâபã
|
||
;.................................................................................................
|
||
; eax - 32-å § 箥 ç¨á«®
|
||
; ebx - ®á®¢ ¨¥ á¨á⥬ë áç¨á«¥¨ï
|
||
; edi - 㪠§ ⥫ì áâப㠡ãä¥à
|
||
; ‚®§¢à é ¥â § ¯®«¥ë© ¡ãä¥à ¨ esi - ¤«¨ áâப¨
|
||
push edi
|
||
xor esi,esi ; § ã«ï¥¬ áç¥â稪 ᨬ¢®«®¢
|
||
convert_loop:
|
||
xor edx,edx ; § ã«ï¥¬ ॣ¨áâà ¯®¤ ®áâ ⮪
|
||
div ebx ; eax/ebx - ®áâ ⮪ ¢ edx
|
||
call hex_digit ; ¯à¥®¡à §ã¥¬ ᨬ¢®«
|
||
push edx ; «®¦¨¬ ¢ á⥪
|
||
inc esi ; 㢥«¨ç¨¢ ¥¬ áç¥â稪
|
||
test eax,eax ; ¥á«¨ ¥é¥ ¬®¦® ¤¥«¨âì
|
||
jnz convert_loop ; â® ¤¥«¨¥¬ ¥é¥
|
||
cld ; Ž<>Ÿ‡€’…‹œ<E280B9>Ž á¡à áë¢ ¥¬ ä« £ ¯à ¢«¥¨ï DF (§ ¯¨áì ¢¯¥àñ¤)
|
||
write_loop: ; ¨ ç¥
|
||
pop eax ; ¤®áâ ¥¬ ¨§ á⥪ ¢ ¥ å
|
||
stosb ; § ¯¨áë¢ ¥¬ ¢ ¡ãä¥à ¯® ¤à¥áã ES:(E)DI
|
||
dec esi ; 㬥ìè ¥¬ áç¥â稪
|
||
test esi,esi ; ¥á«¨ ¥áâì çâ® ¤®áâ ¢ âì ¨§ á⥪
|
||
jnz write_loop ; â® ¤®áâ ñ¬
|
||
mov byte [edi],0 ; ¨ ç¥ ¤®¯¨áëë¢ ¥¬ ã«¥¢®© ¡ ©â
|
||
pop edi
|
||
; ª®¤ ¨¦¥ ¥ ¨¬¥¥â ¨ç¥£® ®¡é¥£® ª äãªæ¨¨, ¯à®áâ® ¢®§¢à é ¥â ¥é¥ ¤«¨ã ¯®«ã祮© áâப¨
|
||
call str_len
|
||
mov esi,eax
|
||
ret ; ¨ ¢®§¢à é ¥¬ ã¯à ¢«¥¨¥
|
||
;end_int2ascii
|
||
|
||
char2byte:
|
||
sub al,'0'
|
||
cmp al,10
|
||
jb done
|
||
add al,'0'
|
||
and al,0x5f
|
||
sub al,'A'-10
|
||
and al,0x0f
|
||
done:
|
||
ret
|
||
;end_char2byte
|
||
|
||
ascii2int:
|
||
;.................................................................................................
|
||
; <20>८¡à §®¢ ¨¥ áâப¨ ¢ ç¨á«®
|
||
;.................................................................................................
|
||
; esi - 㪠§ ⥫ì ã«ìâ¥à¬¨¨à®¢ ãî áâபã
|
||
; ecx - ®á®¢ ¨¥ á¨á⥬ë áç¨á«¥¨ï
|
||
; ‚®§¢à é ¥â eax - ç¨á«®
|
||
push esi
|
||
xor eax,eax
|
||
xor ebx,ebx
|
||
cmp byte [esi],'-'
|
||
jnz .next
|
||
inc esi
|
||
.next:
|
||
lodsb
|
||
or al,al
|
||
jz .done
|
||
call char2byte
|
||
imul ebx,ecx
|
||
add ebx,eax
|
||
jmp .next
|
||
.done:
|
||
xchg ebx,eax
|
||
pop esi
|
||
cmp byte [esi],'-'
|
||
jz .negate
|
||
ret
|
||
.negate:
|
||
neg eax
|
||
ret
|
||
;end_ascii2int
|
||
|
||
get_spectr:
|
||
;.................................................................................................
|
||
; ¢®§¢à é ¥â r,g,b á®á⮢«ïî騥 梥â
|
||
;.................................................................................................
|
||
mov ecx,[color]
|
||
mov [cblue],cl
|
||
shr ecx,8
|
||
mov [cgreen],cl
|
||
shr ecx,8
|
||
mov [cred],cl
|
||
shr ecx,8
|
||
mov [calpha],cl
|
||
ret ; ¨ ¢®§¢à é ¥¬ ã¯à ¢«¥¨¥
|
||
;end_get_spectr
|
||
|
||
set_spectr:
|
||
;.................................................................................................
|
||
; ãáâ ¢«¨¢ ¥â ¨§ r,g,b 梥â
|
||
;.................................................................................................
|
||
movzx eax,[calpha]
|
||
shl eax,8
|
||
mov al,[cred]
|
||
shl eax,8
|
||
mov al,[cgreen]
|
||
shl eax,8
|
||
mov al,[cblue]
|
||
mov [color],eax
|
||
call draw_result ; ‚뢮¤¨¬ १ã«ìâ â
|
||
ret ; ¨ ¢®§¢à é ¥¬ ã¯à ¢«¥¨¥
|
||
;end_get_spectr
|
||
|
||
str_len:
|
||
;.................................................................................................
|
||
; ®¯à¥¤¥«ï¥â ¤«¨ã áâப¨ (¢å®¤->EDI ZS offset ; ¢ë室->EAX ZS length)
|
||
;.................................................................................................
|
||
push ecx esi edi
|
||
|
||
cld
|
||
xor al, al
|
||
mov ecx, 0FFFFFFFFh
|
||
mov esi, edi
|
||
repne scasb
|
||
sub edi, esi
|
||
mov eax, edi
|
||
dec eax
|
||
|
||
pop edi esi ecx
|
||
|
||
ret
|
||
;end_str_len
|
||
|
||
|
||
;-------------------------------
|
||
|
||
proc random uses ebx ecx edx, max_value
|
||
mov ebx, 0
|
||
mov eax, ebx
|
||
or eax, eax
|
||
jnz @f
|
||
rdtsc
|
||
xor eax, edx
|
||
mov ebx, eax
|
||
|
||
@@:
|
||
xor edx, edx
|
||
mov ecx, 127773
|
||
div ecx
|
||
mov ecx, eax
|
||
mov eax, 16807
|
||
mul edx
|
||
mov edx, ecx
|
||
mov ecx, eax
|
||
mov eax, 2836
|
||
mul edx
|
||
sub ecx, eax
|
||
xor edx, edx
|
||
mov eax, ecx
|
||
mov ebx, ecx
|
||
mov ecx, 100000
|
||
div ecx
|
||
mov eax, edx
|
||
|
||
xor edx, edx
|
||
mov ebx, [max_value]
|
||
div ebx
|
||
mov eax, edx
|
||
|
||
ret
|
||
endp
|
||
|
||
set_background2:
|
||
mcall SF_SYS_MISC, SSF_HEAP_INIT
|
||
mcall SF_SYS_MISC, SSF_MEM_ALLOC, 256 * 256 * 3
|
||
mov [bgimg_buf], eax
|
||
|
||
mov edx, eax
|
||
mov ecx, 256 * 256
|
||
@@:
|
||
stdcall random, 15 + 1
|
||
sub al, 15 / 2
|
||
|
||
mov bh, byte [color + 0]
|
||
add bh, al
|
||
mov [edx + 0], bh
|
||
mov bh, byte [color + 1]
|
||
add bh, al
|
||
mov [edx + 1], bh
|
||
mov bh, byte [color + 2]
|
||
add bh, al
|
||
mov [edx + 2], bh
|
||
add edx, 3
|
||
loop @b
|
||
|
||
mcall SF_BACKGROUND_SET, SSF_SIZE_BG, 256, 256
|
||
mcall SF_BACKGROUND_SET, SSF_MODE_BG, 1
|
||
mcall SF_BACKGROUND_SET, SSF_IMAGE_BG, [bgimg_buf], 0, 256 * 256 * 3
|
||
mcall SF_BACKGROUND_SET, SSF_REDRAW_BG
|
||
|
||
mcall SF_SYS_MISC, SSF_MEM_FREE, [bgimg_buf]
|
||
stdcall save_eskin_ini, 'B '
|
||
ret
|
||
|
||
align 4
|
||
proc save_eskin_ini, opt_HB:dword
|
||
;save to file eskin.ini
|
||
xor al,al
|
||
mov ecx,1024
|
||
mov edi,sys_path+2
|
||
repne scasb
|
||
sub edi,sys_path+3
|
||
invoke ini_set_str, inifileeskin, amain, aprogram, sys_path+2, edi
|
||
;add param 'H '
|
||
mov eax,[opt_HB]
|
||
mov word[params],ax
|
||
mov eax,[color]
|
||
or eax,0xf ;¤«ï ¨§¡¥¦ ¨ï ¢¥ç®£® 横« ¥á«¨ eax=0
|
||
mov edi,params+2
|
||
@@:
|
||
rol eax,8
|
||
or al,al
|
||
jnz @f
|
||
mov word[edi],'00' ;㫨 ¯¥à¥¤ ç¨á«®¬
|
||
add edi,2
|
||
jmp @b
|
||
@@:
|
||
and al,0xf0
|
||
jnz @f
|
||
mov byte[edi],'0'
|
||
inc edi
|
||
@@:
|
||
mov eax,[color]
|
||
mov ebx,16
|
||
call int2ascii
|
||
mov byte[params+10],' '
|
||
;add color2
|
||
mov eax,[color2]
|
||
or eax,0xf ;¤«ï ¨§¡¥¦ ¨ï ¢¥ç®£® 横« ¥á«¨ eax=0
|
||
mov edi,params+11
|
||
@@:
|
||
rol eax,8
|
||
or al,al
|
||
jnz @f
|
||
mov word[edi],'00' ;㫨 ¯¥à¥¤ ç¨á«®¬
|
||
add edi,2
|
||
jmp @b
|
||
@@:
|
||
and al,0xf0
|
||
jnz @f
|
||
mov byte[edi],'0'
|
||
inc edi
|
||
@@:
|
||
mov eax,[color2]
|
||
mov ebx,16
|
||
call int2ascii
|
||
|
||
invoke ini_set_str, inifileeskin, amain, aparam, params, 19
|
||
ret
|
||
endp
|
||
|
||
;#___________________________________________________________________________________________________
|
||
;****************************************************************************************************|
|
||
; <20>‹ŽŠ <20>…<EFBFBD>…Œ…<C592><E280A6>›• ˆ ŠŽ<C5A0>‘’€<E28099>’ |
|
||
;----------------------------------------------------------------------------------------------------/
|
||
circle:
|
||
title db 'Palitra v0.77',0 ; åà ¨â ¨¬ï ¯à®£à ¬¬ë
|
||
hidden db 'Hidden',0
|
||
; hex db '#',0 ; ¤«ï ¢ë¢®¤ à¥èñ⪨ ª ª ⥪áâ
|
||
cname db 'RGBAx' ; åà ¨â à §àï¤ë 梥⮢ (red,green,blue) x-¬¥âª ª®æ
|
||
larrow db 0x1A,0
|
||
buff db '000',0
|
||
bground db 'Background',0 ; ¨¬ï ª®¯ª¨ - 14
|
||
bground1 db 'Gradient',0 ; ¨¬ï ª®¯ª¨ - 15
|
||
bground2 db 'Noisy',0 ; ¨¬ï ª®¯ª¨ - 16
|
||
runmode dd 1 ; ०¨¬ § ¯ã᪠(1-normal, 2-hidden, 3-colordialog)
|
||
color2 dd 00FFFFFFh ; åà ¨â § 票¥ ¢â®à®£® ¢ë¡à ®£® 梥â
|
||
|
||
inifileeskin db '/sys/settings/system.ini',0
|
||
amain db 'style',0
|
||
aprogram db 'bg_program',0
|
||
aparam db 'bg_param',0
|
||
|
||
i18_name db 'ICONS18',0
|
||
i18bg_name db 'ICONS18W',0
|
||
|
||
|
||
align 16
|
||
@IMPORT:
|
||
|
||
library \
|
||
libini , 'libini.obj'
|
||
|
||
import libini, \
|
||
ini_set_str, 'ini_set_str'
|
||
|
||
I_END:
|
||
cm rb 12
|
||
color rd 1 ; åà ¨â § 票¥ ¢ë¡à ®£® 梥â
|
||
mouse_x rd 1 ; åà ¨â £«®¡ «ìãî å ª®®à¤¨ âã ¬ëè¨
|
||
mouse_y rd 1 ; åà ¨â £«®¡ «ìãî ã ª®®à¤¨ âã ¬ëè¨
|
||
mouse_f rd 1 ; åà ¨â ¤ ë¥ ® ⮬ ª ª ï ª®¯ª ¬ëè¨ ¡ë« ¦ â
|
||
desctop_w rd 1 ; åà ¨â è¨à¨ã íªà
|
||
desctop_h rd 1 ; åà ¨â ¢ëá®âã íªà
|
||
sc system_colors ; åà ¨â áâàãªâãàã á¨á⥬ëå 梥⮢ ᪨
|
||
cred rb 1 ; åà ¨¬ ªà áë© á¯¥ªâà
|
||
cgreen rb 1 ; åà ¨¬ §¥«¥ë© ᯥªâà
|
||
cblue rb 1 ; åà ¨¬ ᨨ© ᯥªâà
|
||
calpha rb 1 ; åà ¨¬ ¯à®§à ç®áâì
|
||
pnext rd 1 ; áç¥â稪 ¯¥à¥ª«îç¥¨ï ¯ «¨âàë
|
||
renmode rd 1 ; ०¨¬ ®âà¨á®¢ª¨ (1-梥⮢ ï á奬 ,2-¯¨¯¥âª ,3-ªà㣮¢ ï)
|
||
params rb 20 ; ¯à¨ñ¬ ¯ à ¬¥â஢
|
||
params_c rb 9 ; ¯à¨ñ¬¨ª ¤«ï 梥â
|
||
bgimg_buf rd 1 ; buffer for a generated image
|
||
icons18 dd ? ; pointer to a shared memory of icons18.png
|
||
icons18bg dd ? ; pointer to a shared memory of icons18.png with filled bg
|
||
|
||
rd 1024
|
||
stacktop:
|
||
sys_path rb 1024
|
||
I_MEM: |