Subversion Repositories Kolibri OS

Rev

Rev 318 | Rev 485 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 318 Rev 341
Line 27... Line 27...
27
    int  0x40
27
    int  0x40
Line 28... Line 28...
28
 
28
 
Line 29... Line 29...
29
    movzx ecx,ax
29
    movzx ecx,ax
30
 
-
 
31
    shr  eax,17
30
 
32
;    sub  eax,110
-
 
33
    shl  eax,16
-
 
34
;    mov  ebx,eax
31
    shr  eax,17
Line 35... Line 32...
35
;    add  ebx,220
32
    shl  eax,16
36
    lea  ebx,[eax-110*10000h+220]
-
 
37
 
33
    lea  ebx,[eax-110*10000h+220]
38
    shr  ecx,1
-
 
39
;    sub  ecx,50
34
 
Line 40... Line 35...
40
    shl  ecx,16
35
    shr  ecx,1
41
;    add  ecx,100
36
    shl  ecx,16
42
    sub  ecx,50*10000h - 100
37
    sub  ecx,50*10000h - 120
43
 
38
 
44
    mov  eax,0			   ; define and draw window
39
    xor  eax,eax			   ; define and draw window
Line 45... Line 40...
45
    mov  edx,[sc.work]
40
    mov  edx,[sc.work]
46
    mov  esi,edx
41
    mov  esi,edx
47
    mov  edi,edx
42
    mov  edi,edx
48
    int  0x40
43
    int  0x40
49
 
44
 
50
   mov edx,0x444444
45
   mov edx,0x444444
51
   mov al,13
46
   mov al,13
52
   mcall ,18 shl 16+90,29 shl 16+27
47
   mcall ,18 shl 16+90,29 shl 16+27
53
   push ebx
48
   push ebx
-
 
49
   mcall ,121 shl 16+90
Line 54... Line 50...
54
   mcall ,121 shl 16+90,
50
   xchg ebx,[esp]
55
   xchg ebx,[esp]
51
   mcall ,,63 shl 16+27
56
   mcall ,,63 shl 16+27
52
   pop  ebx
57
   pop  ebx
53
   mcall
Line 65... Line 61...
65
   mcall ,118 shl 16+87,,,0xaaaa   ;cccc
61
   mcall ,118 shl 16+87,,,0xaaaa   ;cccc
66
   inc edx
62
   inc edx
67
   mcall ,15 shl 16+87,60 shl 16+24,,0x9900
63
   mcall ,15 shl 16+87,60 shl 16+24,,0x9900
68
   inc edx
64
   inc edx
69
   mcall ,118 shl 16+87,,,0xaaaaaa ;cccccc
65
   mcall ,118 shl 16+87,,,0xaaaaaa ;cccccc
-
 
66
   inc edx
-
 
67
   mcall ,175 shl 16+30,95 shl 16+15,,[sc.work_button]
Line 70... Line 68...
70
 
68
 
71
    mov  al,4			   ; 0x00000004 = write text
69
    mov  al,4			   ; 0x00000004 = write text
72
    mov  ebx,75*65536+10
70
    mov  ebx,75*65536+10
73
    mov  ecx,[sc.work_text] ; 8b window nro - RR GG BB color
71
    mov  ecx,[sc.work_text] ; 8b window nro - RR GG BB color
74
    or   ecx,0x10000000
72
    or   ecx,0x90000000
75
    mov  edx,label1		   ; pointer to text beginning
-
 
76
    mov  esi,label1_len 	   ; text length
73
    mov  edx,label1		   ; pointer to text beginning
Line -... Line 74...
-
 
74
    int  0x40
-
 
75
 
-
 
76
    mov  ebx,15*65536+101
-
 
77
    mov  edx,label4
77
    int  0x40
78
    int  0x40
78
 
-
 
79
    mov  ecx,0xeeeeee            ; 8b window nro - RR GG BB color
79
 
80
    or   ecx,0x10000000
80
    mov  ecx,0x90eeeeee            ; 8b window nro - RR GG BB color
81
    mov  ebx,25*65536+30
-
 
82
    mov  edx,label2		   ; pointer to text beginning
81
    mov  ebx,25*65536+30
Line 83... Line 82...
83
    mov  esi,label2_len 	   ; text length
82
    mov  edx,label2		     ; pointer to text beginning
84
    int  0x40
-
 
85
 
83
    int  0x40
86
    mov  ebx,20*65536+64
84
 
Line 87... Line 85...
87
    mov  edx,label3		   ; pointer to text beginning
85
    mov  ebx,20*65536+64
88
    mov  esi,label3_len 	   ; text length
-
 
89
    int  0x40
86
    mov  edx,label3
90
 
87
    int  0x40
Line 91... Line 88...
91
    mov  ebx,45*65536+41
88
 
92
    mov  edx,label4		   ; pointer to text beginning
-
 
93
    mov  esi,label4_len 	   ; text length
89
    mov  ebx,45*65536+41
94
    int  0x40
90
    mov  edx,label5
Line 95... Line 91...
95
 
91
    int  0x40
96
    mov  ebx,40*65536+75
92
 
97
    mov  edx,label5		   ; pointer to text beginning
93
    mov  ebx,40*65536+75
Line 98... Line 94...
98
    mov  esi,label5_len 	   ; text length
94
    mov  edx,label6
Line 133... Line 129...
133
    jz   power_off
129
    jz   power_off
134
    dec  eax
130
    dec  eax
135
    jz   restart_kernel
131
    jz   restart_kernel
136
    dec  eax
132
    dec  eax
137
    jz   restart
133
    jz   restart
-
 
134
    dec  eax
-
 
135
    jnz   run_rdsave
138
; we have only one button left, this is close button
136
; we have only one button left, this is close button
139
;    dec  eax
137
;    dec  eax
140
;    jnz  still
138
;    jnz  still
141
close_1:
139
close_1:
142
    or   eax,-1
140
    or   eax,-1
Line 155... Line 153...
155
mcall_and_close:
153
mcall_and_close:
156
    pop  ecx
154
    pop  ecx
157
    mcall 18,9
155
    mcall 18,9
158
    jmp  close_1
156
    jmp  close_1
Line -... Line 157...
-
 
157
 
-
 
158
run_rdsave:
-
 
159
    mov eax,70
-
 
160
    mov ebx,rdsave
-
 
161
    int 0x40
-
 
162
    jmp still
159
 
163
 
Line 160... Line 164...
160
data
164
data
161
 
-
 
162
if lang eq ru
165
 
163
 
166
if lang eq ru
164
  label1:
-
 
165
      db   '‚€˜ ‚›Ž:'
-
 
166
  label1_len = $ - label1
167
  label1:
167
 
168
      db   '‚ è ¢ë¡®à:',0
168
  label2:
-
 
169
      db   '‚›Š‹ž—ˆ’œ         Ÿ„Ž'
-
 
170
  label2_len = $ - label2
169
  label2:
171
 
170
      db   '‚몫îç¨âì         Ÿ¤à®',0
172
  label3:
171
  label3:
-
 
172
      db   '¥à¥§ ¯ã᪠      Žâ¬¥­ ',0
Line 173... Line 173...
173
      db   '……‡€“‘Š       Ž’Œ…€'
173
  label4:
174
  label3_len = $ - label3
-
 
175
 
174
      db   '‘®åà ­¨âì ­ áâனª¨',0
176
else if lang eq en
175
 
177
 
-
 
178
  label1:
-
 
179
      db   ' SELECT:'
176
else if lang eq en
180
  label1_len = $ - label1
177
  label1:
181
 
-
 
182
  label2:
-
 
183
      db   'POWER OFF        KERNEL'
178
      db   ' SELECT:',0
184
  label2_len = $ - label2
179
  label2:
-
 
180
      db   'POWER OFF        KERNEL',0
185
 
181
  label3:
Line 186... Line 182...
186
  label3:
182
      db   '  RESTART         CANCEL',0
187
      db   '  RESTART         CANCEL'
-
 
188
  label3_len = $ - label3
183
  label4:
189
 
184
      db   'Save settings',0
190
else if lang eq et
-
 
191
 
-
 
192
  label1:
185
 
193
      db   '  VALI:'
186
else if lang eq et
194
  label1_len = $ - label1
-
 
195
 
-
 
196
  label2:
187
  label1:
197
      db   'LÜLITA VÄLJA     KERNEL'
188
      db   '  VALI:',0
-
 
189
  label2:
198
  label2_len = $ - label2
190
      db   'LÜLITA VÄLJA     KERNEL',0
Line 199... Line 191...
199
 
191
  label3:
200
  label3:
-
 
201
      db   '  RESTART         TÜHISTA'
192
      db   '  RESTART         TÜHISTA',0
202
  label3_len = $ - label3
193
  label4:
203
 
-
 
204
else 
-
 
205
 
194
      db   'Save settings',0
206
  label1:
195
 
207
      db   'WAEHLEN:'
-
 
208
  label1_len = $ - label1
-
 
209
 
196
else 
210
  label2:
197
  label1:
211
      db   ' BEENDEN         KERNEL'
-
 
212
  label2_len = $ - label2
-
 
213
 
-
 
214
  label3:
-
 
215
      db   '  NEUSTART     ABBRECHEN'
198
      db   'WAEHLEN:',0
216
  label3_len = $ - label3
199
  label2:
217
 
-
 
Line -... Line 200...
-
 
200
      db   ' BEENDEN         KERNEL',0
218
end if
201
  label3:
219
 
202
      db   '  NEUSTART     ABBRECHEN',0
-
 
203
  label4:
220
  label4:
204
      db   'Save settings',0
221
      db   '(End)           (Home)'
205
 
222
  label4_len = $ - label4
206
end if
-
 
207
  label5:
-
 
208
      db   '(End)           (Home)',0
-
 
209
  label6:
-
 
210
      db   '(Enter)          (Esc)',0
-
 
211
 
-
 
212
rdsave:
223
 
213
        dd      7
224
  label5:
214
        dd      0
Line 225... Line 215...
225
      db   '(Enter)          (Esc)'
215
        dd      0