Subversion Repositories Kolibri OS

;                      int num_buttons, const char* buttons[]);

	pushad

	cmp	[num_strings],1

	je	@f

	m2m	[errmess0], strErrorExc

	jmp	.l1

       @@:

	mov	ebx,[strings]

	m2m	[errmess0], dword [ebx]

       .l1:

	mcall	51,1,threadSayErr,stackDlg

	popad

	mov	eax,1

	ret

endp

	pushad

	m2m	[errmess0],[str]

	mcall	51,1,threadSayErr,stackDlg

	popad

	ret

endp

	mcall	40, 000111b+0C000000h

	mcall	12, 1

	mcall	48, 3, sc, sizeof.system_colors

	mov	edx, [sc.work]

	mcall 0, <220,420>, <220,110>, , , title

	or	ecx,90000000h

	mov	edx,[errmess0]

	mcall 4, <15,11>

	mov	ecx,[sc.work_button_text]

	or	ecx,90000000h

	mcall 4, <147,51>, , strOk

	mcall	10

	cmp	eax, 1

	je	.wm_redraw

	cmp	eax, 2

	je	.wm_key

	cmp	eax, 3

	je	.wm_button

	jmp	.still

	mcall	17

	je	.exit

	jmp	.still

	mcall	2

	jmp	.still

.exit:

	mcall	-1

endp

;-------------------------------------------------------------------------------

;-------------------------------------------------------------------------------

    ; "enter password" dialog for KFar

;password_dlg:

;        dd      1       ; use standard dialog colors

;        dd      -1      ; center window by x

;        dd      -1      ; center window by y

;.width  dd      ?       ; width (will be filled according to current console width)

;        dd      2       ; height

;        dd      4, 2    ; border size

;        dd      aEnterPasswordTitle     ; title

;        dd      ?       ; colors (will be set by KFar)

;        dd      0       ; used internally by dialog manager, ignored

;        dd      0, 0    ; reserved for DlgProc

;        dd      2       ; 2 controls

;; the string "enter password"

;        dd      1       ; type: static

;        dd      1,0     ; upper-left position

;.width1 dd      ?,0     ; bottom-right position

;        dd      aEnterPassword  ; data

;        dd      0       ; flags

;; editbox for password

;        dd      3       ; type: edit

;        dd      1,1     ; upper-left position

;.width2 dd      ?,0     ; bottom-right position

;        dd      password_data   ; data

;        dd      2Ch     ; flags

	pushad

	mov	ebx,[dlgInfo]

	mov	eax,[ebx+19*4]

	mov	[forpassword],eax

	mov	byte[eax], 0

	mov	[stateDlg], 0

	mcall	51,1,threadDialogBox,stackDlg

    @@: cmp	[stateDlg],0

	jne	@f

	mcall	5,1

	jmp	@b

     @@:

	popad

	cmp	[stateDlg], 1

	jne	@f

	xor	eax, eax

	ret

    @@:

	or	eax, -1

	ret

endp

	mov	eax,[forpassword]

	mov	[edtPassword+4*9],eax

	xor	eax,eax

	mov	dword[edtPassword.size], eax

	mov	dword[edtPassword.pos], eax

	mcall	12, 1

	mcall	48, 3, sc, sizeof.system_colors

	mov	edx, [sc.work]

	or	edx, 0x33000000

	mcall	0, <200,320>, <200,140>, , , title

	stdcall [edit_box_draw],edtPassword

	or	ecx,90000000h

	mcall 4, <56,12>, , strGetPass

	mov	ecx,[sc.work_button_text]

	or	ecx,90000000h

	mcall 4, <103,79>, , strOk

	mov	ecx,[sc.work_button_text]

	or	ecx,90000000h

	mcall 4, <182,79>, , strCancel

	mcall	10

	cmp	eax, 1

	je	.wm_redraw

	cmp	eax, 2

	je	.wm_key

	cmp	eax, 3

	je	.wm_button

	cmp	eax, 6

	je	.wm_mouse

	mcall	2

	stdcall [edit_box_key],edtPassword

	jmp	.still

	mcall	17

	jne	@f

	mov	[stateDlg],1

	jmp	.exit

    @@:

	jne	 .still

	mov	[stateDlg],2

	jmp	.exit

	stdcall [edit_box_mouse],edtPassword

	mcall	-1

endp