Rev 229 | Rev 502 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 229 | Rev 485 | ||
---|---|---|---|
Line 7... | Line 7... | ||
7 | ;; navanax [violetlab+rambler.ru] |
7 | ;; navanax [violetlab+rambler.ru] |
8 | ;; Johnny_B [john+kolibrios.org] |
8 | ;; Johnny_B [john+kolibrios.org] |
9 | ;; |
9 | ;; |
10 | ;; ¬ ªà®á ¤«ï ᮧ¤ ¨ï ¬ áᨢ 㪠§ ⥫¥© ASCIIZ-áâப¨ |
10 | ;; ¬ ªà®á ¤«ï ᮧ¤ ¨ï ¬ áᨢ 㪠§ ⥫¥© ASCIIZ-áâப¨ |
Line 11... | Line 11... | ||
11 | 11 | ||
12 | include 'macros.inc' |
12 | include '..\..\..\macros.inc' |
13 | macro strtbl name,[string] |
13 | macro strtbl name,[string] |
14 | { |
14 | { |
15 | common |
15 | common |
16 | label name dword |
16 | label name dword |
Line 34... | Line 34... | ||
34 | 34 | ||
35 | ; |
35 | ; |
Line 36... | Line 36... | ||
36 | re_ID dd 0x00000001 ;¤«ï åà ¥¨ï ®¬¥à ⥪ã饣® ¢ë¢®¤¨¬®£® í«¥¬¥â |
36 | re_ID dd 0x00000001 ;¤«ï åà ¥¨ï ®¬¥à ⥪ã饣® ¢ë¢®¤¨¬®£® í«¥¬¥â |
- | 37 | ||
- | 38 | START: |
|
- | 39 | ||
- | 40 | mov eax,48 |
|
- | 41 | mov ebx,3 |
|
- | 42 | mov ecx,sc |
|
- | 43 | mov edx,sizeof.system_colors |
|
37 | 44 | mcall |
|
38 | START: |
45 | |
Line 39... | Line 46... | ||
39 | red: |
46 | red: |
40 | call draw_window |
47 | call draw_window |
41 | 48 | ||
42 | still: ;®á®¢®© 横« ¯à®£à ¬¬ë |
49 | still: ;®á®¢®© 横« ¯à®£à ¬¬ë |
- | 50 | push 10 ;®¦¨¤ ¨¥ ᮡëâ¨ï |
|
43 | push 10 ;®¦¨¤ ¨¥ ᮡëâ¨ï |
51 | pop eax |
44 | pop eax |
52 | mcall |
45 | int 0x40 |
53 | |
46 | dec eax |
54 | dec eax |
Line 47... | Line 55... | ||
47 | je red |
55 | je red |
48 | dec eax |
56 | dec eax |
49 | jne button |
57 | jne button |
50 | 58 | ||
Line 51... | Line 59... | ||
51 | key: |
59 | key: |
52 | mov al,2 |
60 | mov al,2 |
53 | int 0x40 |
61 | mcall |
54 | jmp still |
62 | jmp still |
Line 55... | Line 63... | ||
55 | 63 | ||
56 | button: |
64 | button: |
57 | mov al,17 ;¯®«ãç ¥¬ ID ¦ ⮩ ª®¯ª¨ |
65 | mov al,17 ;¯®«ãç ¥¬ ID ¦ ⮩ ª®¯ª¨ |
58 | int 0x40 |
66 | mcall |
Line 59... | Line 67... | ||
59 | shr eax,8 ; eax=24-¡¨âë© ButtonID |
67 | shr eax,8 ; eax=24-¡¨âë© ButtonID |
60 | 68 | ||
61 | cmp eax,1 ; ¦ â «¨ " ªàëâì" [x] |
69 | cmp eax,1 ; ¦ â «¨ " ªàëâì" [x] |
62 | jne noclose |
70 | jne noclose |
63 | or eax,-1 |
71 | or eax,-1 |
64 | int 0x40 |
72 | mcall |
65 | 73 | ||
66 | noclose: |
74 | noclose: |
67 | cmp eax,200 |
75 | cmp eax,200 |
68 | jne no_H |
76 | jne no_H |
Line 69... | Line 77... | ||
69 | mov eax,1 |
77 | mov eax,1 |
Line 70... | Line -... | ||
70 | no_H: |
- | |
71 | mov [re_ID],eax |
- | |
72 | ;; |
- | |
73 | call VYVOD |
- | |
74 | ;; |
- | |
75 | jmp still |
- | |
76 | 78 | no_H: |
|
77 | draw_window: |
79 | mov [re_ID],eax |
78 | 80 | ;; |
|
79 | mov eax,48 |
81 | call draw_text |
80 | mov ebx,3 |
82 | ;; |
81 | mov ecx,sc |
83 | jmp still |
82 | mov edx,sizeof.system_colors |
84 | |
83 | int 0x40 |
85 | draw_window: |
84 | 86 | ||
85 | mov eax,12 ;begin drawing |
87 | mov eax,12 ;begin drawing |
86 | xor ebx,ebx |
88 | xor ebx,ebx |
87 | inc ebx |
89 | inc ebx |
Line 88... | Line 90... | ||
88 | int 0x40 |
90 | mcall |
89 | ; DRAW WINDOW |
91 | ; DRAW WINDOW |
90 | xor eax,eax |
92 | xor eax,eax |
Line 91... | Line 93... | ||
91 | mov ebx,50*65536+550 ;x |
93 | mov ebx,50*65536+555 ;x |
92 | mov ecx,30*65536+450 ;y |
94 | mov ecx,30*65536+455 ;y |
93 | mov edx,[sc.work] |
95 | mov edx,[sc.work] |
Line 94... | Line 96... | ||
94 | or edx,0x13000000 ;style |
96 | or edx,0x33000000 ;style |
95 | mov edi,Caption |
97 | mov edi,caption |
96 | int 0x40 |
98 | mcall |
Line 97... | Line 99... | ||
97 | 99 | ||
98 | Nadpisi_v_okne: |
100 | text_in_window: |
99 | mov eax,4 ;¢ë¢®¤ ⥪áâ |
101 | mov eax,4 ;¢ë¢®¤ ⥪áâ |
Line 100... | Line 102... | ||
100 | mov ecx,0x80000000 ;asciiz, !!! |
102 | mov ecx,0x80000000 ;asciiz, !!! |
101 | 103 | ||
102 | mov ebx,40*65536+225 ;« â ®¨¤ë |
104 | mov ebx,40*65536+200 ;« â ®¨¤ë |
Line 103... | Line 105... | ||
103 | mov edx,Lantanoid_text |
105 | mov edx,Lantanoid_text |
104 | int 0x40 |
106 | mcall |
105 | 107 | ||
Line 106... | Line 108... | ||
106 | add ebx,20 ; ªâ¨®¨¤ë |
108 | add ebx,20 ; ªâ¨®¨¤ë |
107 | mov edx,Actinoid_text |
109 | mov edx,Actinoid_text |
108 | int 0x40 |
110 | mcall |
Line 109... | Line 111... | ||
109 | 111 | ||
110 | mov ebx,150*65536+280 |
112 | mov ebx,150*65536+255 |
111 | mov edx,Por_nomer |
113 | mov edx,number |
Line 112... | Line 114... | ||
112 | int 0x40 |
114 | mcall |
113 | 115 | ||
114 | add ebx,15 |
116 | add ebx,15 |
Line 115... | Line 117... | ||
115 | mov edx,Nazvanie |
117 | mov edx,name |
116 | int 0x40 |
118 | mcall |
117 | 119 | ||
Line 118... | Line 120... | ||
118 | add ebx,15 |
120 | add ebx,15 |
119 | mov edx,Angl_nazv |
121 | mov edx,eng_name |
120 | int 0x40 |
122 | mcall |
Line 121... | Line 123... | ||
121 | 123 | ||
122 | add ebx,15 |
124 | add ebx,15 |
123 | mov edx,Atomic_massa |
125 | mov edx,Atomic_massa |
Line 124... | Line 126... | ||
124 | int 0x40 |
126 | mcall |
125 | 127 | ||
126 | add ebx,15 |
128 | add ebx,15 |
Line 127... | Line 129... | ||
127 | mov edx,Plotnost_caption |
129 | mov edx,density |
128 | int 0x40 |
130 | mcall |
129 | 131 | ||
Line 130... | Line 132... | ||
130 | add ebx,15 |
132 | add ebx,15 |
131 | mov edx,Step_okisl |
133 | mov edx,Step_okisl |
132 | int 0x40 |
134 | mcall |
133 | 135 | ||
Line 134... | Line 136... | ||
134 | add ebx,15 |
136 | add ebx,15 |
135 | mov edx,Electrootr |
137 | mov edx,Electrootr |
136 | int 0x40 |
138 | mcall |
137 | 139 | ||
Line 165... | Line 167... | ||
165 | jmp Table |
167 | jmp Table |
Line 166... | Line 168... | ||
166 | 168 | ||
167 | @@: |
169 | @@: |
168 | add ebx,20 |
170 | add ebx,20 |
169 | add edx,4 ;â.ª. áâப = 4 ¡ ©â ¬(á ã«ñ¬) |
171 | add edx,4 ;â.ª. áâப = 4 ¡ ©â ¬(á ã«ñ¬) |
170 | int 0x40 |
172 | mcall |
Line 171... | Line 173... | ||
171 | ret |
173 | ret |
172 | 174 | ||
173 | Table: ;âà¨á®¢ª â ¡«¨æë ¢ ¢¨¤¥ ª®®¯®ç¥ª |
175 | Table: ;âà¨á®¢ª â ¡«¨æë ¢ ¢¨¤¥ ª®®¯®ç¥ª |
174 | table_rjad_1: |
176 | table_row_1: |
175 | shl eax,1 |
177 | shl eax,1 |
176 | mov ebx,50*65536+25 |
178 | mov ebx,50*65536+25 |
177 | mov ecx,60*65536+20 |
179 | mov ecx,35*65536+20 |
178 | mov edx,200 |
180 | mov edx,200 |
179 | mov esi,0xE19123 |
181 | mov esi,0xE19123 |
180 | int 0x40 |
182 | mcall |
181 | He_: |
183 | He_: |
182 | mov ebx,491*65536+25 |
184 | mov ebx,491*65536+25 |
183 | mov esi,0x0f0c314 |
185 | mov esi,0x0f0c314 |
184 | mov edx,2 |
186 | mov edx,2 |
185 | int 0x40 |
187 | mcall |
186 | table_rjad_2: |
188 | table_row_2: |
187 | Li: |
189 | Li: |
188 | mov ebx,50*65536+25 |
190 | mov ebx,50*65536+25 |
189 | mov ecx,81*65536+20 |
191 | mov ecx,56*65536+20 |
190 | mov esi,0xE19123 |
192 | mov esi,0xE19123 |
191 | inc edx |
193 | inc edx |
192 | int 0x40 |
194 | mcall |
193 | Be: |
195 | Be: |
194 | mov ebx,76*65536+25 |
196 | mov ebx,76*65536+25 |
195 | inc edx |
197 | inc edx |
196 | int 0x40 |
198 | mcall |
197 | B_: |
199 | B_: |
198 | mov ebx,361*65536+25 |
200 | mov ebx,361*65536+25 |
199 | inc edx |
201 | inc edx |
200 | mov esi,0x0f0c314 |
202 | mov esi,0x0f0c314 |
201 | int 0x40 |
203 | mcall |
202 | mov edi,4 |
204 | mov edi,4 |
203 | table_rjad_2_loop: |
205 | table_row_2_loop: |
204 | add ebx,26*65536 |
206 | add ebx,26*65536 |
205 | inc edx |
207 | inc edx |
206 | int 0x40 |
208 | mcall |
207 | dec edi |
209 | dec edi |
208 | jns table_rjad_2_loop |
210 | jns table_row_2_loop |
209 | table_rjad_3: |
211 | table_row_3: |
210 | Na: |
212 | Na: |
211 | mov ebx,50*65536+25 |
213 | mov ebx,50*65536+25 |
212 | mov ecx,102*65536+20 |
214 | mov ecx,77*65536+20 |
213 | mov esi,0xE19123 |
215 | mov esi,0xE19123 |
Line 214... | Line 216... | ||
214 | inc edx |
216 | inc edx |
215 | int 0x40 |
217 | mcall |
216 | 218 | ||
Line 217... | Line 219... | ||
217 | mov ebx,76*65536+25 |
219 | mov ebx,76*65536+25 |
218 | inc edx |
220 | inc edx |
219 | int 0x40 |
221 | mcall |
220 | 222 | ||
221 | mov ebx,361*65536+25 |
223 | mov ebx,361*65536+25 |
222 | inc edx |
224 | inc edx |
223 | mov esi,0x0f0c314 |
225 | mov esi,0x0f0c314 |
224 | int 0x40 |
226 | mcall |
225 | mov edi,4 |
227 | mov edi,4 |
226 | table_rjad_3_loop: |
228 | table_row_3_loop: |
227 | add ebx,26*65536 |
229 | add ebx,26*65536 |
Line 228... | Line 230... | ||
228 | inc edx |
230 | inc edx |
229 | int 0x40 |
231 | mcall |
230 | dec edi |
232 | dec edi |
231 | jns table_rjad_3_loop |
233 | jns table_row_3_loop |
232 | 234 | ||
233 | Table_rjad_4: |
235 | Table_row_4: |
234 | K_: |
236 | K_: |
235 | mov ebx,50*65536+25 |
237 | mov ebx,50*65536+25 |
236 | mov ecx,123*65536+20 |
238 | mov ecx,98*65536+20 |
237 | mov esi,0xE19123 |
239 | mov esi,0xE19123 |
238 | inc edx |
240 | inc edx |
239 | int 0x40 |
241 | mcall |
240 | Ca: |
242 | Ca: |
241 | mov ebx,76*65536+25 |
243 | mov ebx,76*65536+25 |
242 | inc edx |
244 | inc edx |
243 | int 0x40 |
245 | mcall |
244 | Sc: |
246 | Sc: |
245 | mov ebx,102*65536+25 |
247 | mov ebx,102*65536+25 |
246 | inc edx |
248 | inc edx |
247 | mov esi,0x559beb |
249 | mov esi,0x559beb |
248 | int 0x40 |
250 | mcall |
249 | mov edi,8 |
251 | mov edi,8 |
250 | Table_rjad_4_loop1: |
252 | Table_row_4_loop1: |
Line 251... | Line 253... | ||
251 | add ebx,26*65536 |
253 | add ebx,26*65536 |
252 | inc edx |
254 | inc edx |
253 | int 0x40 |
255 | mcall |
254 | dec edi |
256 | dec edi |
255 | jns Table_rjad_4_loop1 |
257 | jns Table_row_4_loop1 |
256 | 258 | ||
257 | mov ebx,361*65536+25 |
259 | mov ebx,361*65536+25 |
258 | inc edx |
260 | inc edx |
259 | mov esi,0x0f0c314 |
261 | mov esi,0x0f0c314 |
260 | int 0x40 |
262 | mcall |
261 | mov edi,4 |
263 | mov edi,4 |
Line 262... | Line 264... | ||
262 | table_rjad_4_loop2: |
264 | table_row_4_loop2: |
263 | add ebx,26*65536 |
265 | add ebx,26*65536 |
264 | inc edx |
266 | inc edx |
265 | int 0x40 |
267 | mcall |
266 | dec edi |
268 | dec edi |
267 | jns table_rjad_4_loop2 |
269 | jns table_row_4_loop2 |
268 | 270 | ||
269 | Table_rjad_5: |
271 | Table_row_5: |
270 | Rb_: |
272 | Rb_: |
271 | mov ebx,50*65536+25 |
273 | mov ebx,50*65536+25 |
272 | mov ecx,144*65536+20 |
274 | mov ecx,119*65536+20 |
273 | mov esi,0xE19123 |
275 | mov esi,0xE19123 |
274 | inc edx |
276 | inc edx |
275 | int 0x40 |
277 | mcall |
276 | Sr_: |
278 | Sr_: |
277 | mov ebx,76*65536+25 |
279 | mov ebx,76*65536+25 |
278 | inc edx |
280 | inc edx |
279 | int 0x40 |
281 | mcall |
280 | Y_: |
282 | Y_: |
281 | mov ebx,102*65536+25 |
283 | mov ebx,102*65536+25 |
282 | inc edx |
284 | inc edx |
283 | mov esi,0x559beb |
285 | mov esi,0x559beb |
284 | int 0x40 |
286 | mcall |
Line 285... | Line 287... | ||
285 | mov edi,8 |
287 | mov edi,8 |
286 | Table_rjad_5_loop1: |
288 | Table_row_5_loop1: |
287 | add ebx,26*65536 |
289 | add ebx,26*65536 |
288 | inc edx |
290 | inc edx |
289 | int 0x40 |
291 | mcall |
290 | dec edi |
292 | dec edi |
291 | jns Table_rjad_5_loop1 |
293 | jns Table_row_5_loop1 |
292 | 294 | ||
293 | mov ebx,361*65536+25 |
295 | mov ebx,361*65536+25 |
294 | inc edx |
296 | inc edx |
295 | mov esi,0x0f0c314 |
297 | mov esi,0x0f0c314 |
Line 296... | Line 298... | ||
296 | int 0x40 |
298 | mcall |
297 | mov edi,4 |
299 | mov edi,4 |
298 | table_rjad_5_loop2: |
300 | table_row_5_loop2: |
299 | add ebx,26*65536 |
301 | add ebx,26*65536 |
300 | inc edx |
302 | inc edx |
301 | int 0x40 |
303 | mcall |
302 | dec edi |
304 | dec edi |
303 | jns table_rjad_5_loop2 |
305 | jns table_row_5_loop2 |
304 | 306 | ||
305 | Table_rjad_6: |
307 | Table_row_6: |
306 | Cs_: |
308 | Cs_: |
307 | mov ebx,50*65536+25 |
309 | mov ebx,50*65536+25 |
308 | mov ecx,165*65536+20 |
310 | mov ecx,140*65536+20 |
309 | mov esi,0xE19123 |
311 | mov esi,0xE19123 |
310 | inc edx |
312 | inc edx |
311 | int 0x40 |
313 | mcall |
312 | Ba_: |
314 | Ba_: |
313 | mov ebx,76*65536+25 |
315 | mov ebx,76*65536+25 |
314 | inc edx |
316 | inc edx |
315 | int 0x40 |
317 | mcall |
316 | La_: |
318 | La_: |
317 | mov ebx,102*65536+25 |
319 | mov ebx,102*65536+25 |
318 | inc edx |
320 | inc edx |
319 | mov esi,0x559beb |
321 | mov esi,0x559beb |
Line 320... | Line 322... | ||
320 | int 0x40 |
322 | mcall |
321 | mov edx,71 |
323 | mov edx,71 |
322 | mov edi,8 |
324 | mov edi,8 |
323 | Table_rjad_6_loop1: |
325 | Table_row_6_loop1: |
324 | add ebx,26*65536 |
326 | add ebx,26*65536 |
325 | inc edx |
327 | inc edx |
326 | int 0x40 |
328 | mcall |
327 | dec edi |
329 | dec edi |
328 | jns Table_rjad_6_loop1 |
330 | jns Table_row_6_loop1 |
329 | 331 | ||
330 | mov ebx,361*65536+25 |
332 | mov ebx,361*65536+25 |
Line 331... | Line 333... | ||
331 | inc edx |
333 | inc edx |
332 | mov esi,0x0f0c314 |
334 | mov esi,0x0f0c314 |
333 | int 0x40 |
335 | mcall |
334 | mov edi,4 |
336 | mov edi,4 |
335 | table_rjad_6_loop2: |
337 | table_row_6_loop2: |
336 | add ebx,26*65536 |
338 | add ebx,26*65536 |
337 | inc edx |
339 | inc edx |
338 | int 0x40 |
340 | mcall |
339 | dec edi |
341 | dec edi |
340 | jns table_rjad_6_loop2 |
342 | jns table_row_6_loop2 |
341 | 343 | ||
342 | Table_rjad_7: |
344 | Table_row_7: |
343 | Fr_: |
345 | Fr_: |
344 | mov ebx,50*65536+25 |
346 | mov ebx,50*65536+25 |
345 | mov ecx,186*65536+20 |
347 | mov ecx,161*65536+20 |
346 | mov esi,0xE19123 |
348 | mov esi,0xE19123 |
347 | inc edx |
349 | inc edx |
348 | int 0x40 |
350 | mcall |
349 | Ra_: |
351 | Ra_: |
350 | mov ebx,76*65536+25 |
352 | mov ebx,76*65536+25 |
351 | inc edx |
353 | inc edx |
352 | int 0x40 |
354 | mcall |
353 | Ac_: |
355 | Ac_: |
354 | mov ebx,102*65536+25 |
356 | mov ebx,102*65536+25 |
Line 355... | Line 357... | ||
355 | inc edx |
357 | inc edx |
356 | mov esi,0x559beb |
358 | mov esi,0x559beb |
357 | int 0x40 |
359 | mcall |
358 | mov edx,103 |
360 | mov edx,103 |
359 | mov edi,8 |
361 | mov edi,8 |
360 | Table_rjad_7_loop1: |
362 | Table_row_7_loop1: |
361 | add ebx,26*65536 |
363 | add ebx,26*65536 |
362 | inc edx |
364 | inc edx |
363 | int 0x40 |
365 | mcall |
364 | dec edi |
366 | dec edi |
365 | jns Table_rjad_7_loop1 |
367 | jns Table_row_7_loop1 |
Line 366... | Line 368... | ||
366 | 368 | ||
367 | mov ebx,361*65536+25 |
369 | mov ebx,361*65536+25 |
368 | inc edx |
370 | inc edx |
369 | mov esi,0x0f0c314 |
371 | mov esi,0x0f0c314 |
370 | int 0x40 |
372 | mcall |
371 | mov edi,2 |
373 | mov edi,2 |
372 | table_rjad_7_loop2: |
374 | table_row_7_loop2: |
373 | add ebx,26*65536 |
375 | add ebx,26*65536 |
Line 374... | Line 376... | ||
374 | inc edx |
376 | inc edx |
375 | int 0x40 |
377 | mcall |
376 | dec edi |
378 | dec edi |
377 | jns table_rjad_7_loop2 |
379 | jns table_row_7_loop2 |
378 | 380 | ||
379 | Rjad_1: |
381 | row_1: |
380 | Cerium_: |
382 | Cerium_: |
381 | mov ebx,102*65536+25 |
383 | mov ebx,102*65536+25 |
382 | mov ecx,215*65536+20 |
384 | mov ecx,190*65536+20 |
383 | mov edx,58 |
385 | mov edx,58 |
384 | mov esi,0x73beeb |
386 | mov esi,0x73beeb |
385 | int 0x40 |
387 | mcall |
386 | mov edi,12 |
388 | mov edi,12 |
387 | 389 | ||
Line 388... | Line 390... | ||
388 | Rjad_1_loop: |
390 | row_1_loop: |
389 | add ebx,26*65536 |
391 | add ebx,26*65536 |
390 | inc edx |
392 | inc edx |
391 | dec edi |
393 | dec edi |
392 | int 0x40 |
394 | mcall |
Line 393... | Line 395... | ||
393 | jns Rjad_1_loop |
395 | jns row_1_loop |
394 | Rjad_2: |
396 | row_2: |
395 | dgfsfHe_: |
397 | dgfsfHe_: |
396 | mov ebx,102*65536+25 |
398 | mov ebx,102*65536+25 |
397 | mov ecx,236*65536+20 |
399 | mov ecx,211*65536+20 |
398 | mov edx,90 |
400 | mov edx,90 |
399 | int 0x40 |
401 | mcall |
400 | mov edi,12 |
402 | mov edi,12 |
401 | Rjad_2_loop: |
403 | row_2_loop: |
402 | 404 | ||
403 | add ebx,26*65536 |
405 | add ebx,26*65536 |
404 | inc edx |
406 | inc edx |
405 | dec edi |
407 | dec edi |
406 | int 0x40 |
408 | mcall |
407 | jns Rjad_2_loop |
409 | jns row_2_loop |
408 | 410 | ||
409 | Nadpisi_na_knopkah: |
411 | text_on_buttons: |
Line 410... | Line 412... | ||
410 | nadp_rjad1: |
412 | text_row1: |
411 | ;H |
413 | ;H |
412 | shr eax,1 |
414 | shr eax,1 |
413 | mov ebx,62*65536+68 |
415 | mov ebx,62*65536+43 |
414 | mov ecx,0x00000000 |
416 | mov ecx,0x00000000 |
415 | mov edx,Symbols |
417 | mov edx,Symbols |
416 | mov esi,3 |
418 | mov esi,3 |
417 | int 0x40 |
419 | mcall |
Line 418... | Line 420... | ||
418 | ;Ne |
420 | ;Ne |
419 | mov ebx,500*65536+68 |
421 | mov ebx,500*65536+43 |
420 | add edx,3 |
422 | add edx,3 |
421 | int 0x40 |
423 | mcall |
Line 422... | Line 424... | ||
422 | nadp_rjad2_1: |
424 | text_row2_1: |
423 | mov ebx,60*65536+88 |
425 | mov ebx,60*65536+63 |
424 | add edx,3 |
426 | add edx,3 |
425 | int 0x40 |
427 | mcall |
426 | 428 | ||
427 | mov ebx,85*65536+88 |
429 | mov ebx,85*65536+63 |
Line 428... | Line 430... | ||
428 | add edx,3 |
430 | add edx,3 |
429 | int 0x40 |
431 | mcall |
430 | nadp_rjad2_2: |
432 | text_row2_2: |
431 | mov ebx,374*65536+88 |
433 | mov ebx,374*65536+63 |
432 | add edx,3 |
434 | add edx,3 |
433 | int 0x40 |
435 | mcall |
434 | mov edi,4 |
436 | mov edi,4 |
435 | 437 | ||
436 | nadp_rjad2_2_loop: |
438 | text_row2_2_loop: |
437 | add ebx,25*65536 |
439 | add ebx,25*65536 |
438 | add edx,3 |
440 | add edx,3 |
439 | int 0x40 |
441 | mcall |
Line 440... | Line 442... | ||
440 | 442 | ||
441 | dec edi |
443 | dec edi |
442 | jns nadp_rjad2_2_loop |
444 | jns text_row2_2_loop |
443 | nadp_rjad3_1: |
445 | text_row3_1: |
444 | mov ebx,60*65536+108 |
446 | mov ebx,60*65536+83 |
445 | add edx,3 |
447 | add edx,3 |
446 | int 0x40 |
448 | mcall |
447 | 449 | ||
448 | mov ebx,85*65536+108 |
450 | mov ebx,85*65536+83 |
449 | add edx,3 |
451 | add edx,3 |
450 | int 0x40 |
452 | mcall |
Line 451... | Line 453... | ||
451 | nadp_rjad3_2: |
453 | text_row3_2: |
452 | mov ebx,374*65536+108 |
454 | mov ebx,374*65536+83 |
453 | add edx,3 |
455 | add edx,3 |
454 | int 0x40 |
456 | mcall |
455 | mov edi,4 |
457 | mov edi,4 |
456 | nadp_rjad3_2_loop: |
458 | text_row3_2_loop: |
457 | add ebx,25*65536 |
459 | add ebx,25*65536 |
458 | add edx,3 |
460 | add edx,3 |
459 | int 0x40 |
461 | mcall |
460 | 462 | ||
461 | dec edi |
463 | dec edi |
Line 462... | Line 464... | ||
462 | jns nadp_rjad3_2_loop |
464 | jns text_row3_2_loop |
463 | nadp_rjad4: |
465 | text_row4: |
464 | mov ebx,60*65536+129 |
466 | mov ebx,60*65536+104 |
465 | add edx,3 |
467 | add edx,3 |
466 | int 0x40 |
468 | mcall |
467 | mov edi,16 |
469 | mov edi,16 |
468 | nadp_rjad4_loop: |
470 | text_row4_loop: |
469 | add ebx,26*65536 |
471 | add ebx,26*65536 |
470 | add edx,3 |
472 | add edx,3 |
471 | int 0x40 |
473 | mcall |
472 | 474 | ||
473 | dec edi |
475 | dec edi |
474 | jns nadp_rjad4_loop |
476 | jns text_row4_loop |
475 | nadp_rjad5: |
477 | text_row5: |
476 | mov ebx,60*65536+150 |
478 | mov ebx,60*65536+125 |
477 | add edx,3 |
479 | add edx,3 |
478 | int 0x40 |
480 | mcall |
479 | mov edi,16 |
481 | mov edi,16 |
480 | nadp_rjad5_loop: |
482 | text_row5_loop: |
481 | add ebx,26*65536 |
483 | add ebx,26*65536 |
482 | add edx,3 |
484 | add edx,3 |
483 | int 0x40 |
485 | mcall |
Line 484... | Line 486... | ||
484 | 486 | ||
485 | dec edi |
487 | dec edi |
486 | jns nadp_rjad5_loop |
488 | jns text_row5_loop |
487 | nadp_rjad6: |
489 | text_row6: |
488 | mov ebx,60*65536+171 |
490 | mov ebx,60*65536+146 |
489 | add edx,3 |
491 | add edx,3 |
490 | int 0x40 |
492 | mcall |
491 | mov edi,16 |
493 | mov edi,16 |
492 | nadp_rjad6_loop: |
494 | text_row6_loop: |
Line 493... | Line 495... | ||
493 | add ebx,26*65536 |
495 | add ebx,26*65536 |
494 | add edx,3 |
496 | add edx,3 |
495 | int 0x40 |
497 | mcall |
496 | dec edi |
498 | dec edi |
497 | jns nadp_rjad6_loop |
499 | jns text_row6_loop |
Line 498... | Line 500... | ||
498 | nadp_rjad7: |
500 | text_row7: |
499 | mov ebx,60*65536+192 |
501 | mov ebx,60*65536+167 |
500 | add edx,3 |
502 | add edx,3 |
501 | int 0x40 |
503 | mcall |
Line 502... | Line 504... | ||
502 | mov edi,9 |
504 | mov edi,9 |
503 | nadp_rjad7_loop: |
505 | text_row7_loop: |
Line 504... | Line 506... | ||
504 | add ebx,26*65536 |
506 | add ebx,26*65536 |
505 | add edx,3 |
507 | add edx,3 |
506 | int 0x40 |
508 | mcall |
507 | 509 | ||
508 | dec edi |
510 | dec edi |
Line 509... | Line 511... | ||
509 | jns nadp_rjad7_loop |
511 | jns text_row7_loop |
510 | mov edi,4 |
512 | mov edi,4 |
511 | nadp_rjad7_loop2: |
513 | text_row7_loop2: |
512 | add ebx,24*65536 |
514 | add ebx,24*65536 |
Line 513... | Line 515... | ||
513 | add edx,3 |
515 | add edx,3 |
514 | int 0x40 |
516 | mcall |
Line 515... | Line 517... | ||
515 | dec edi |
517 | dec edi |
516 | jns nadp_rjad7_loop2 |
518 | jns text_row7_loop2 |
517 | 519 | ||
Line 518... | Line 520... | ||
518 | nadp_rjad8: |
520 | text_row8: |
519 | mov ebx,111*65536+222 |
521 | mov ebx,111*65536+197 |
520 | add edx,3 |
522 | add edx,3 |
521 | int 0x40 |
523 | mcall |
522 | mov edi,12 |
524 | mov edi,12 |
Line 523... | Line 525... | ||
523 | 525 | ||
Line 524... | Line 526... | ||
524 | nadp_rjad8_loop: |
526 | text_row8_loop: |
525 | add ebx,26*65536 |
527 | add ebx,26*65536 |
526 | add edx,3 |
528 | add edx,3 |
527 | int 0x40 |
529 | mcall |
Line 568... | Line 570... | ||
568 | ;11 ¢ë¢®¤ ¨¬ñ ¯¥à¢®®âªàë¢ â¥«¥© [optmzd-mem] |
570 | ;11 ¢ë¢®¤ ¨¬ñ ¯¥à¢®®âªàë¢ â¥«¥© [optmzd-mem] |
Line 569... | Line 571... | ||
569 | 571 | ||
570 | ;; |
572 | ;; |
571 | mov eax,13 |
573 | mov eax,13 |
572 | mov ebx,320*65536+210 |
574 | mov ebx,320*65536+210 |
573 | mov ecx,280*65536+(15*11) |
575 | mov ecx,255*65536+(15*11) |
574 | mov edx,[sc.work] |
576 | mov edx,[sc.work] |
575 | int 0x40 |
577 | mcall |
Line 576... | Line 578... | ||
576 | ;; |
578 | ;; |
Line 577... | Line 579... | ||
577 | 579 | ||
578 | - | ||
579 | push edi ; çâ®¡ë ®¯â¨¬¨§¨à®¢ âì ¨§¬¥¥¨ï ebx |
580 | |
580 | 581 | push edi ; çâ®¡ë ®¯â¨¬¨§¨à®¢ âì ¨§¬¥¥¨ï ebx |
|
581 | ; 1 ¢ë¢®¤ ¯®à浪®¢®£® ®¬¥à [optmzd-mem] |
582 | |
582 | xor ebx,ebx |
583 | ; 1 ¢ë¢®¤ ¯®à浪®¢®£® ®¬¥à [optmzd-mem] |
583 | or ebx,00000000000000110000000000000000b |
584 | mov ebx,0x30000 ;¢ë¢®¤¨âì 3 æ¨äàë |
584 | mov ecx,[re_ID] |
585 | mov ecx,[re_ID] |
Line 585... | Line 586... | ||
585 | mov edx,320*65536+280+15*0 |
586 | mov edx,320*65536+255 |
586 | xor esi,esi |
587 | xor esi,esi |
587 | mov eax,47 |
588 | mov eax,47 |
588 | int 0x40 |
589 | mcall |
Line 589... | Line 590... | ||
589 | 590 | ||
590 | ; ! ð ! [ᤥ« ® ¤«ï ᮪à é¥¨ï ª®¤ 20 ¡ ©â :)))] |
591 | ; ! ð ! [ᤥ« ® ¤«ï ᮪à é¥¨ï ª®¤ 20 ¡ ©â :)))] |
591 | mov ecx,[sc.work_text] ; |
592 | mov ecx,[sc.work_text] ; |
592 | or ecx,0x80000000 ; asciiz |
593 | or ecx,0x80000000 ; asciiz |
Line 593... | Line 594... | ||
593 | mov eax,4 ; íâ äãªæ¨ï ¢ë§ë¢ ¥âáï 10 à §! â ª çâ® § ¯¨è¥¬ 1 à § |
594 | mov eax,4 ; íâ äãªæ¨ï ¢ë§ë¢ ¥âáï 10 à §! â ª çâ® § ¯¨è¥¬ 1 à § |
594 | 595 | ||
595 | ; 2 ¢ë¢®¤ [optmzd-mem] |
596 | ; 2 ¢ë¢®¤ [optmzd-mem] |
Line 604... | Line 605... | ||
604 | dec edi |
605 | dec edi |
605 | mov esi,12 ;¤«¨ áâப¨ |
606 | mov esi,12 ;¤«¨ áâப¨ |
606 | imul edi,esi ;áç¨â ¥¬ 㪠§ ⥫ì ã¦ãî áâபã |
607 | imul edi,esi ;áç¨â ¥¬ 㪠§ ⥫ì ã¦ãî áâபã |
607 | add edx,edi |
608 | add edx,edi |
608 | add ebx,15 ; 㢥«¨ç¨¢ ¥¬ y-ª®®à¤¨ âã ⥪áâ 15 ¯¨ªá¥«¥© |
609 | add ebx,15 ; 㢥«¨ç¨¢ ¥¬ y-ª®®à¤¨ âã ⥪áâ 15 ¯¨ªá¥«¥© |
609 | int 0x40 |
610 | mcall |
Line 610... | Line 611... | ||
610 | 611 | ||
611 | ; 4 ¢ë¢®¤ ⮬®© ¬ ááë [optmzd-spd] |
612 | ; 4 ¢ë¢®¤ ⮬®© ¬ ááë [optmzd-spd] |
612 | mov edx,MassNo |
613 | mov edx,MassNo |
613 | mov edi,[re_ID] |
614 | mov edi,[re_ID] |
614 | dec edi |
615 | dec edi |
615 | mov esi,7 ;¤«¨ áâப¨ |
616 | mov esi,7 ;¤«¨ áâப¨ |
616 | imul edi,esi ;áç¨â ¥¬ 㪠§ ⥫ì ã¦ãî áâபã |
617 | imul edi,esi ;áç¨â ¥¬ 㪠§ ⥫ì ã¦ãî áâபã |
617 | add edx,edi |
618 | add edx,edi |
618 | add ebx,15 |
619 | add ebx,15 |
Line 619... | Line 620... | ||
619 | int 0x40 |
620 | mcall |
620 | 621 | ||
621 | mov ecx,0x80000000 ;asciiz, !!! |
622 | mov ecx,0x80000000 ;asciiz, !!! |
622 | ; 5 ¢ë¢®¤ [optmzd-mem] |
623 | ; 5 ¢ë¢®¤ [optmzd-mem] |
Line 634... | Line 635... | ||
634 | dec edi |
635 | dec edi |
635 | mov esi,4 ;¤«¨ áâப¨ |
636 | mov esi,4 ;¤«¨ áâப¨ |
636 | shl edi,2 |
637 | shl edi,2 |
637 | add edx,edi |
638 | add edx,edi |
638 | add ebx,15 |
639 | add ebx,15 |
639 | int 0x40 |
640 | mcall |
Line 640... | Line 641... | ||
640 | 641 | ||
641 | mov ecx,0x80000000 ;asciiz, !!! |
642 | mov ecx,0x80000000 ;asciiz, !!! |
642 | ; 8 ¢ë¢®¤ [optmzd-mem] |
643 | ; 8 ¢ë¢®¤ [optmzd-mem] |
643 | mov edi,T_plavl |
644 | mov edi,T_plavl |
Line 663... | Line 664... | ||
663 | mov edx,[re_ID] |
664 | mov edx,[re_ID] |
664 | dec edx |
665 | dec edx |
665 | shl edx,2 ;㬮¦¨âì 4 (à §¬¥à 㪠§ ⥫ï) |
666 | shl edx,2 ;㬮¦¨âì 4 (à §¬¥à 㪠§ ⥫ï) |
666 | mov edx,[edx+edi] ;㪠§ ⥫ì áâப㠢 edx |
667 | mov edx,[edx+edi] ;㪠§ ⥫ì áâப㠢 edx |
667 | add ebx,15 |
668 | add ebx,15 |
668 | int 0x40 |
669 | mcall |
669 | ret |
670 | ret |
Line 670... | Line 671... | ||
670 | 671 | ||
671 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
672 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
672 | ;; ;; |
673 | ;; ;; |
673 | ;; ;; |
674 | ;; ;; |
674 | ;; ;; |
675 | ;; ;; |
675 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
676 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
676 | ;---- begin ---- ë¥ ¤«ï ®ª -------------------------- |
677 | ;---- begin ---- ë¥ ¤«ï ®ª -------------------------- |
677 | Caption db '¥à¨®¤¨ç¥áª ï á¨á⥬ ..¥¤¥«¥¥¢ by [navanax] & [Johnny_B]',0 |
678 | caption db '¥à¨®¤¨ç¥áª ï á¨á⥬ ..¥¤¥«¥¥¢ by [navanax] & [Johnny_B]',0 |
678 | Plotnost_caption db '«®â®áâì',0 |
679 | density db '«®â®áâì',0 |
679 | Atomic_massa db '⮬ ï ¬ áá ',0 |
680 | Atomic_massa db '⮬ ï ¬ áá ',0 |
680 | Nazvanie db ' §¢ ¨¥',0 |
681 | name db ' §¢ ¨¥',0 |
681 | Angl_nazv db '£«. §¢ ¨¥',0 |
682 | eng_name db '£«. §¢ ¨¥',0 |
682 | T_pl db '¥¬¯¥à âãà ¯«.',0 |
683 | T_pl db '¥¬¯¥à âãà ¯«.',0 |
683 | T_kip db '¥¬¯¥à âãà ª¨¯.',0 |
684 | T_kip db '¥¬¯¥à âãà ª¨¯.',0 |
684 | Electrootr db '«¥ªâà®®âà¨æ ⥫ì®áâì',0 |
685 | Electrootr db '«¥ªâà®®âà¨æ ⥫ì®áâì',0 |
685 | Raspr db ' á¯à¥¤¥«¥¨¥ ¢ §¥¬. ª®à¥',0 |
686 | Raspr db ' á¯à¥¤¥«¥¨¥ ¢ §¥¬. ª®à¥',0 |
686 | Step_okisl db '⥯¥ì ®ª¨á«¥¨ï',0 |
687 | Step_okisl db '⥯¥ì ®ª¨á«¥¨ï',0 |
687 | Otkrytie db 'âªàë⨥',0 |
688 | Otkrytie db 'âªàë⨥',0 |
688 | Por_nomer db '®à浪®¢ë© ®¬¥à',0 |
689 | number db '®à浪®¢ë© ®¬¥à',0 |
689 | Period_text: |
690 | Period_text: |
690 | db ' I',0 |
691 | db ' I',0 |
691 | db ' II',0 |
692 | db ' II',0 |
692 | db 'III',0 |
693 | db 'III',0 |
Line 946... | Line 947... | ||
946 | db 'No ' |
947 | db 'No ' |
947 | db 'Lr ' |
948 | db 'Lr ' |
Line 948... | Line 949... | ||
948 | 949 | ||
949 | ; |
950 | ; |
950 | MassNo: ;116 í«¥¬¥â®¢ |
951 | MassNo: ;116 í«¥¬¥â®¢ |
951 | db '1.00797' ; 1 |
952 | db '1.00794' ; 1 |
952 | db '4.0026 ' |
953 | db '4.0026 ' |
953 | db '6.939 ' |
954 | db '6.941 ' |
954 | db '9.0122 ' |
955 | db '9.01218' |
955 | db '10.811 ' |
956 | db '10.811 ' |
956 | db '12.0112' |
957 | db '12.0107' |
957 | db '14.0067' |
958 | db '14.0067' |
958 | db '15.9994' |
959 | db '15.9994' |
959 | db '18.9984' |
960 | db '18.9984' |
960 | db '20.179 ' ; 10 |
961 | db '20.179 ' ; 10 |
961 | db '22.9898' |
962 | db '22.9898' |
962 | db '24.305 ' |
963 | db '24.305 ' |
963 | db '26.9815' |
964 | db '26.9815' |
964 | db '28.086 ' |
965 | db '28.0855' |
965 | db '30.9738' |
966 | db '30.9738' |
966 | db '32.066 ' |
967 | db '32.066 ' |
967 | db '35.453 ' |
968 | db '35.453 ' |
968 | db '39.948 ' |
969 | db '39.948 ' |
969 | db '39.102 ' |
970 | db '39.0983' |
970 | db '40.08 ' ; 20 |
971 | db '40.078 ' ; 20 |
971 | db '44.958 ' |
972 | db '44.9559' |
972 | db '47.88 ' |
973 | db '47.88 ' |
973 | db '50.942 ' |
974 | db '50.9415' |
974 | db '51.996 ' |
975 | db '51.996 ' |
975 | db '54.938 ' |
976 | db '54.938 ' |
976 | db '55.847 ' |
977 | db '55.847 ' |
977 | db '58.9332' |
978 | db '58.9332' |
978 | db '58.69 ' |
979 | db '58.6934' |
979 | db '63.546 ' |
980 | db '63.546 ' |
980 | db '65.39 ' ; 30 |
981 | db '65.39 ' ; 30 |
981 | db '69.723 ' |
982 | db '69.723 ' |
982 | db '72.61 ' |
983 | db '72.61 ' |