Subversion Repositories Kolibri OS

Compare Revisions

Regard whitespace Rev 228 → Rev 229

/programs/other/period/trunk/MACROS.INC
0,0 → 1,269
; new application structure
macro meos_app_start
{
use32
org 0x0
 
db 'MENUET01'
dd 0x01
dd __start
dd __end
dd __memory
dd __stack
 
if used __params & ~defined __params
dd __params
else
dd 0x0
end if
 
dd 0x0
}
MEOS_APP_START fix meos_app_start
 
macro code
{
__start:
}
CODE fix code
 
macro data
{
__data:
}
DATA fix data
 
macro udata
{
if used __params & ~defined __params
__params:
db 0
__end:
rb 255
else
__end:
end if
__udata:
}
UDATA fix udata
 
macro meos_app_end
{
align 32
rb 2048
__stack:
__memory:
}
MEOS_APP_END fix meos_app_end
 
 
; macro for defining multiline text data
struc mstr [sstring]
{
forward
local ssize
virtual at 0
db sstring
ssize = $
end virtual
dd ssize
db sstring
common
dd -1
}
 
 
; strings
macro sz name,[data] { ; from MFAR [mike.dld]
common
if used name
label name
end if
forward
if used name
db data
end if
common
if used name
.size = $-name
end if
}
 
macro lsz name,[lng,data] { ; from MFAR [mike.dld]
common
if used name
label name
end if
forward
if (used name)&(lang eq lng)
db data
end if
common
if used name
.size = $-name
end if
}
 
 
 
; easy system call macro
macro mpack dest, hsrc, lsrc
{
if (hsrc eqtype 0) & (lsrc eqtype 0)
mov dest, (hsrc) shl 16 + lsrc
else
if (hsrc eqtype 0) & (~lsrc eqtype 0)
mov dest, (hsrc) shl 16
add dest, lsrc
else
mov dest, hsrc
shl dest, 16
add dest, lsrc
end if
end if
}
 
macro __mov reg,a,b { ; mike.dld
if (~a eq)&(~b eq)
mpack reg,a,b
else if (~a eq)&(b eq)
mov reg,a
end if
}
 
macro mcall a,b,c,d,e,f { ; mike.dld
__mov eax,a
__mov ebx,b
__mov ecx,c
__mov edx,d
__mov esi,e
__mov edi,f
int 0x40
}
 
 
 
; optimize the code for size
__regs fix <eax,ebx,ecx,edx,esi,edi,ebp,esp>
 
macro add arg1,arg2
{
if (arg2 eqtype 0)
if (arg2) = 1
inc arg1
else
add arg1,arg2
end if
else
add arg1,arg2
end if
}
 
macro sub arg1,arg2
{
if (arg2 eqtype 0)
if (arg2) = 1
dec arg1
else
sub arg1,arg2
end if
else
sub arg1,arg2
end if
}
 
macro mov arg1,arg2
{
if (arg1 in __regs) & ((arg2 eqtype 0) | (arg2 eqtype '0'))
if (arg2) = 0
xor arg1,arg1
else if (arg2) = 1
xor arg1,arg1
inc arg1
else if (arg2) = -1
or arg1,-1
else if (arg2) > -128 & (arg2) < 128
push arg2
pop arg1
else
mov arg1,arg2
end if
else
mov arg1,arg2
end if
}
 
 
macro struct name
{
virtual at 0
name name
sizeof.#name = $ - name
end virtual
}
 
; structures used in MeOS
struc process_information
{
.cpu_usage dd ? ; +0
.window_stack_position dw ? ; +4
.window_stack_value dw ? ; +6
.not_used1 dw ? ; +8
.process_name rb 12 ; +10
.memory_start dd ? ; +22
.used_memory dd ? ; +26
.PID dd ? ; +30
.x_start dd ? ; +34
.y_start dd ? ; +38
.x_size dd ? ; +42
.y_size dd ? ; +46
.slot_state dw ? ; +50
dw ? ; +52 - reserved
.client_left dd ? ; +54
.client_top dd ? ; +58
.client_width dd ? ; +62
.client_height dd ? ; +66
.wnd_state db ? ; +70
rb (1024-71)
}
struct process_information
 
struc system_colors
{
.frame dd ?
.grab dd ?
.grab_button dd ?
.grab_button_text dd ?
.grab_text dd ?
.work dd ?
.work_button dd ?
.work_button_text dd ?
.work_text dd ?
.work_graph dd ?
}
struct system_colors
 
 
; constants
 
; events
EV_IDLE = 0
EV_TIMER = 0
EV_REDRAW = 1
EV_KEY = 2
EV_BUTTON = 3
EV_EXIT = 4
EV_BACKGROUND = 5
EV_MOUSE = 6
EV_IPC = 7
EV_STACK = 8
 
; event mask bits for function 40
EVM_REDRAW = 1b
EVM_KEY = 10b
EVM_BUTTON = 100b
EVM_EXIT = 1000b
EVM_BACKGROUND = 10000b
EVM_MOUSE = 100000b
EVM_IPC = 1000000b
EVM_STACK = 10000000b
/programs/other/period/trunk/build.bat
0,0 → 1,2
@fasm period.asm period
@pause
/programs/other/period/trunk/period.asm
0,0 → 1,2035
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Periodic Table for KolibriOS
;;
;; ¥à¨®¤¨ç¥áª ï á¨á⥬  娬¨ç¥áª¨å í«¥¬¥­â®¢
;; „¬¨âà¨ï ˆ¢ ­®¢¨ç  Œ¥­¤¥«¥¥¢ 
;; €¢â®àë:
;; navanax [violetlab+rambler.ru]
;; Johnny_B [john+kolibrios.org]
;;
;; ¬ ªà®á ¤«ï ᮧ¤ ­¨ï ¬ áᨢ  㪠§ â¥«¥© ­  ASCIIZ-áâப¨
 
include 'macros.inc'
macro strtbl name,[string]
{
common
label name dword
forward
local lbl
dd lbl
forward
lbl db string,0
}
 
use32
 
org 0x0
db 'MENUET01' ; áâ ­¤ àâ­ë© 8-¡ ©â®¢ë© § £®«®¢®ª ¤«ï ¨á¯®«­ï¥¬ëå ä ©«®¢ MeOS
dd 0x01 ; ¢¥àá¨ï § £®«®¢ª 
dd START ; 㪠§ â¥«ì ­  ­ ç «® ¨á¯®«­ï¥¬®£® ª®¤ 
dd I_END ; à §¬¥à ®¡à § 
dd I_END+0x1000 ; âॡ㥬 ï ¯ ¬ïâì ¤«ï ¯à¨«®¦¥­¨ï
dd I_END+0x1000 ; 㪠§ â¥«ì ­  ­ ç «  á⥪ 
dd 0x0 , 0x0 ; I_Param , I_Icon
 
;ƒ‹Ž€‹œ›… ……Œ…›… ˆ ŠŽ‘’€’›
re_ID dd 0x00000001 ;¤«ï åà ­¥­¨ï ­®¬¥à  ⥪ã饣® ¢ë¢®¤¨¬®£® í«¥¬¥­â 
 
START:
red:
call draw_window
 
still: ;®á­®¢­®© 横« ¯à®£à ¬¬ë
push 10 ;®¦¨¤ ­¨¥ ᮡëâ¨ï
pop eax
int 0x40
dec eax
je red
dec eax
jne button
 
key:
mov al,2
int 0x40
jmp still
 
button:
mov al,17 ;¯®«ãç ¥¬ ID ­ ¦ â®© ª­®¯ª¨
int 0x40
shr eax,8 ; eax=24-¡¨â­ë© ButtonID
 
cmp eax,1 ;­ ¦ â  «¨ "‡ ªàëâì" [x]
jne noclose
or eax,-1
int 0x40
 
noclose:
cmp eax,200
jne no_H
mov eax,1
no_H:
mov [re_ID],eax
;; <mistifi(ator>
call VYVOD
;; </mistifi(ator>
jmp still
 
draw_window:
mov eax,48
mov ebx,3
mov ecx,sc
mov edx,sizeof.system_colors
int 0x40
 
mov eax,12 ;begin drawing
xor ebx,ebx
inc ebx
int 0x40
; DRAW WINDOW
xor eax,eax
mov ebx,50*65536+550 ;x
mov ecx,30*65536+450 ;y
mov edx,[sc.work]
or edx,0x13000000 ;style
mov edi,Caption
int 0x40
 
Nadpisi_v_okne:
mov eax,4 ;¢ë¢®¤ ⥪áâ 
mov ecx,0x80000000 ;asciiz, –‚…’ !!!
 
mov ebx,40*65536+225 ;« ­â ­®¨¤ë
mov edx,Lantanoid_text
int 0x40
 
add ebx,20 ; ªâ¨­®¨¤ë
mov edx,Actinoid_text
int 0x40
 
mov ebx,150*65536+280
mov edx,Por_nomer
int 0x40
 
add ebx,15
mov edx,Nazvanie
int 0x40
 
add ebx,15
mov edx,Angl_nazv
int 0x40
 
add ebx,15
mov edx,Atomic_massa
int 0x40
 
add ebx,15
mov edx,Plotnost_caption
int 0x40
 
add ebx,15
mov edx,Step_okisl
int 0x40
 
add ebx,15
mov edx,Electrootr
int 0x40
 
add ebx,15
mov edx,T_pl
int 0x40
 
add ebx,15
mov edx,T_kip
int 0x40
 
add ebx,15
mov edx,Raspr
int 0x40
 
add ebx,15
mov edx,Otkrytie
int 0x40
 
; ‚›‚Ž„ ŽŒ…Ž‚ …ˆŽ„Ž‚
mov ebx,30*65536+68
mov edx,Period_text ;1
int 0x40
 
call @f ;2
call @f ;3
call @f ;4
call @f ;5
call @f ;6
call @f ;7
jmp Table
 
@@:
add ebx,20
add edx,4 ;â.ª. áâப  = 4 ¡ ©â ¬(á ­ã«ñ¬)
int 0x40
ret
 
Table: ;Žâà¨á®¢ª  â ¡«¨æë ¢ ¢¨¤¥ ª®­®¯®ç¥ª
table_rjad_1:
shl eax,1
mov ebx,50*65536+25
mov ecx,60*65536+20
mov edx,200
mov esi,0xE19123
int 0x40
He_:
mov ebx,491*65536+25
mov esi,0x0f0c314
mov edx,2
int 0x40
table_rjad_2:
Li:
mov ebx,50*65536+25
mov ecx,81*65536+20
mov esi,0xE19123
inc edx
int 0x40
Be:
mov ebx,76*65536+25
inc edx
int 0x40
B_:
mov ebx,361*65536+25
inc edx
mov esi,0x0f0c314
int 0x40
mov edi,4
table_rjad_2_loop:
add ebx,26*65536
inc edx
int 0x40
dec edi
jns table_rjad_2_loop
table_rjad_3:
Na:
mov ebx,50*65536+25
mov ecx,102*65536+20
mov esi,0xE19123
inc edx
int 0x40
 
mov ebx,76*65536+25
inc edx
int 0x40
 
mov ebx,361*65536+25
inc edx
mov esi,0x0f0c314
int 0x40
mov edi,4
table_rjad_3_loop:
add ebx,26*65536
inc edx
int 0x40
dec edi
jns table_rjad_3_loop
 
Table_rjad_4:
K_:
mov ebx,50*65536+25
mov ecx,123*65536+20
mov esi,0xE19123
inc edx
int 0x40
Ca:
mov ebx,76*65536+25
inc edx
int 0x40
Sc:
mov ebx,102*65536+25
inc edx
mov esi,0x559beb
int 0x40
mov edi,8
Table_rjad_4_loop1:
add ebx,26*65536
inc edx
int 0x40
dec edi
jns Table_rjad_4_loop1
 
mov ebx,361*65536+25
inc edx
mov esi,0x0f0c314
int 0x40
mov edi,4
table_rjad_4_loop2:
add ebx,26*65536
inc edx
int 0x40
dec edi
jns table_rjad_4_loop2
 
Table_rjad_5:
Rb_:
mov ebx,50*65536+25
mov ecx,144*65536+20
mov esi,0xE19123
inc edx
int 0x40
Sr_:
mov ebx,76*65536+25
inc edx
int 0x40
Y_:
mov ebx,102*65536+25
inc edx
mov esi,0x559beb
int 0x40
mov edi,8
Table_rjad_5_loop1:
add ebx,26*65536
inc edx
int 0x40
dec edi
jns Table_rjad_5_loop1
 
mov ebx,361*65536+25
inc edx
mov esi,0x0f0c314
int 0x40
mov edi,4
table_rjad_5_loop2:
add ebx,26*65536
inc edx
int 0x40
dec edi
jns table_rjad_5_loop2
 
Table_rjad_6:
Cs_:
mov ebx,50*65536+25
mov ecx,165*65536+20
mov esi,0xE19123
inc edx
int 0x40
Ba_:
mov ebx,76*65536+25
inc edx
int 0x40
La_:
mov ebx,102*65536+25
inc edx
mov esi,0x559beb
int 0x40
mov edx,71
mov edi,8
Table_rjad_6_loop1:
add ebx,26*65536
inc edx
int 0x40
dec edi
jns Table_rjad_6_loop1
 
mov ebx,361*65536+25
inc edx
mov esi,0x0f0c314
int 0x40
mov edi,4
table_rjad_6_loop2:
add ebx,26*65536
inc edx
int 0x40
dec edi
jns table_rjad_6_loop2
 
Table_rjad_7:
Fr_:
mov ebx,50*65536+25
mov ecx,186*65536+20
mov esi,0xE19123
inc edx
int 0x40
Ra_:
mov ebx,76*65536+25
inc edx
int 0x40
Ac_:
mov ebx,102*65536+25
inc edx
mov esi,0x559beb
int 0x40
mov edx,103
mov edi,8
Table_rjad_7_loop1:
add ebx,26*65536
inc edx
int 0x40
dec edi
jns Table_rjad_7_loop1
 
mov ebx,361*65536+25
inc edx
mov esi,0x0f0c314
int 0x40
mov edi,2
table_rjad_7_loop2:
add ebx,26*65536
inc edx
int 0x40
dec edi
jns table_rjad_7_loop2
 
Rjad_1:
Cerium_:
mov ebx,102*65536+25
mov ecx,215*65536+20
mov edx,58
mov esi,0x73beeb
int 0x40
mov edi,12
 
Rjad_1_loop:
add ebx,26*65536
inc edx
dec edi
int 0x40
jns Rjad_1_loop
Rjad_2:
dgfsfHe_:
mov ebx,102*65536+25
mov ecx,236*65536+20
mov edx,90
int 0x40
mov edi,12
Rjad_2_loop:
 
add ebx,26*65536
inc edx
dec edi
int 0x40
jns Rjad_2_loop
 
Nadpisi_na_knopkah:
nadp_rjad1:
;H
shr eax,1
mov ebx,62*65536+68
mov ecx,0x00000000
mov edx,Symbols
mov esi,3
int 0x40
;Ne
mov ebx,500*65536+68
add edx,3
int 0x40
nadp_rjad2_1:
mov ebx,60*65536+88
add edx,3
int 0x40
 
mov ebx,85*65536+88
add edx,3
int 0x40
nadp_rjad2_2:
mov ebx,374*65536+88
add edx,3
int 0x40
mov edi,4
 
nadp_rjad2_2_loop:
add ebx,25*65536
add edx,3
int 0x40
 
dec edi
jns nadp_rjad2_2_loop
nadp_rjad3_1:
mov ebx,60*65536+108
add edx,3
int 0x40
 
mov ebx,85*65536+108
add edx,3
int 0x40
nadp_rjad3_2:
mov ebx,374*65536+108
add edx,3
int 0x40
mov edi,4
nadp_rjad3_2_loop:
add ebx,25*65536
add edx,3
int 0x40
 
dec edi
jns nadp_rjad3_2_loop
nadp_rjad4:
mov ebx,60*65536+129
add edx,3
int 0x40
mov edi,16
nadp_rjad4_loop:
add ebx,26*65536
add edx,3
int 0x40
 
dec edi
jns nadp_rjad4_loop
nadp_rjad5:
mov ebx,60*65536+150
add edx,3
int 0x40
mov edi,16
nadp_rjad5_loop:
add ebx,26*65536
add edx,3
int 0x40
 
dec edi
jns nadp_rjad5_loop
nadp_rjad6:
mov ebx,60*65536+171
add edx,3
int 0x40
mov edi,16
nadp_rjad6_loop:
add ebx,26*65536
add edx,3
int 0x40
dec edi
jns nadp_rjad6_loop
nadp_rjad7:
mov ebx,60*65536+192
add edx,3
int 0x40
mov edi,9
nadp_rjad7_loop:
add ebx,26*65536
add edx,3
int 0x40
 
dec edi
jns nadp_rjad7_loop
mov edi,4
nadp_rjad7_loop2:
add ebx,24*65536
add edx,3
int 0x40
dec edi
jns nadp_rjad7_loop2
 
nadp_rjad8:
mov ebx,111*65536+222
add edx,3
int 0x40
mov edi,12
 
nadp_rjad8_loop:
add ebx,26*65536
add edx,3
int 0x40
 
dec edi
jns nadp_rjad8_loop
 
nadp_rjad9:
mov ebx,111*65536+242
add edx,3
int 0x40
mov edi,12
 
nadp_rjad9_loop:
add ebx,26*65536
add edx,3
int 0x40
 
dec edi
jns nadp_rjad9_loop
 
;; <mistifi(ator> - ª®à®ç¥ ¢ë­®á¨¬ ¢ ®â¤¥«ì­ãî ¯à®æ¥¤ãàã
call VYVOD
;; </mistifi(ator>
 
finish:
mov eax,12 ;end drawing
mov ebx,2
int 0x40
ret
 
VYVOD:
 
; 1 ¢ë¢®¤ ¯®à浪®¢®£® ­®¬¥à  [optmzd-mem]
; 2 ¢ë¢®¤ àãá᪮£® ­ §¢ ­¨ï [optmzd-mem]
; 3 ¢ë¢®¤  ­£«¨©áª®£® ­ §¢ ­¨ï [optmzd-spd]
; 4 ¢ë¢®¤  â®¬­®© ¬ ááë [optmzd-spd]
; 5 ¢ë¢®¤ ¯«®â­®áâì [optmzd-mem]
; 6 ¢ë¢®¤ á⥯¥­ì ®ª¨á«¥­¨ï [optmzd-mem]
; 7 ¢ë¢®¤ í«¥ªâà®®âà¨æ â¥«ì­®á⨠[optmzd-spd]
; 8 ¢ë¢®¤ ⥬¯¥à âãà  ¯« ¢«¥­¨ï [optmzd-mem]
; 9 ¢ë¢®¤ ⥬¯¥à âãà  ª¨¯¥­¨ï [optmzd-mem]
;10 ¢ë¢®¤ à á¯à¥¤¥«¥­¨¥ ¢ §¥¬­®© ª®à¥ [optmzd-mem]
;11 ¢ë¢®¤ ¨¬ñ­ ¯¥à¢®®âªà뢠⥫¥© [optmzd-mem]
 
;; <mistifi(ator> - § ªà áª , çâ®-¡ë ­¥ ¡ë«® ­ «®¦¥­¨ï ¯à¨ ¯à®à¨á®¢ª¥ ⥪áâ 
mov eax,13
mov ebx,320*65536+210
mov ecx,280*65536+(15*11)
mov edx,[sc.work]
int 0x40
;; </mistifi(ator>
 
push edi ; çâ®¡ë ®¯â¨¬¨§¨à®¢ âì ¨§¬¥­¥­¨ï ebx
 
; 1 ¢ë¢®¤ ¯®à浪®¢®£® ­®¬¥à  [optmzd-mem]
xor ebx,ebx
or ebx,00000000000000110000000000000000b
mov ecx,[re_ID]
mov edx,320*65536+280+15*0
xor esi,esi
mov eax,47
int 0x40
 
;‚ˆŒ€ˆ…! ‡„…‘œ ‡€„€ð’‘Ÿ –‚…’ ‚‘…ƒŽ Ž‘’€‹œŽƒŽ ’…Š‘’€! [ᤥ« ­® ¤«ï ᮪à é¥­¨ï ª®¤  ­  20 ¡ ©â :)))]
mov ecx,[sc.work_text] ; –‚…’
or ecx,0x80000000 ; asciiz
mov eax,4 ; íâ  äã­ªæ¨ï ¢ë§ë¢ ¥âáï 10 à §! â ª çâ® § ¯¨è¥¬ 1 à §
 
; 2 ¢ë¢®¤ “‘‘ŠŽ… €‡‚€ˆ… [optmzd-mem]
mov edi,Rus_nazv ;㪠§ â¥«ì ­  ­ ç «® ¬ áᨢ  㪠§ â¥«¥© ;)
mov ebx,320*65536+280+15*0 ;§¤¥áì ¢­®áïâáï ª®®à¤¨­ âë, ¤ «ìè¥ ¡ã¤¥â «¨èì add ebx,15
call out_asciiz_item
 
xor ecx,ecx ;color
; 3 ¢ë¢®¤  ­£«¨©áª®£® ­ §¢ ­¨ï [optmzd-spd]
mov edx,Elements
mov edi,[re_ID]
dec edi
mov esi,12 ;¤«¨­  áâப¨
imul edi,esi ;áç¨â ¥¬ 㪠§ â¥«ì ­  ­ã¦­ãî áâபã
add edx,edi
add ebx,15 ; 㢥«¨ç¨¢ ¥¬ y-ª®®à¤¨­ âã ⥪áâ  ­  15 ¯¨ªá¥«¥©
int 0x40
 
; 4 ¢ë¢®¤  â®¬­®© ¬ ááë [optmzd-spd]
mov edx,MassNo
mov edi,[re_ID]
dec edi
mov esi,7 ;¤«¨­  áâப¨
imul edi,esi ;áç¨â ¥¬ 㪠§ â¥«ì ­  ­ã¦­ãî áâபã
add edx,edi
add ebx,15
int 0x40
 
mov ecx,0x80000000 ;asciiz, –‚…’ !!!
; 5 ¢ë¢®¤ ‹Ž’Ž‘’œ [optmzd-mem]
mov edi,Plotnost
call out_asciiz_item
 
; 6 ¢ë¢®¤ ‘’……œ ŽŠˆ‘‹…ˆŸ [optmzd-mem]
mov edi,Step_ok
call out_asciiz_item
 
xor ecx,ecx ;color
; 7 ¢ë¢®¤ ‹…Š’ŽŽ’ˆ–€’…‹œŽ‘’œ [optmzd-spd]
mov edx,Electr
mov edi,[re_ID]
dec edi
mov esi,4 ;¤«¨­  áâப¨
shl edi,2
add edx,edi
add ebx,15
int 0x40
 
mov ecx,0x80000000 ;asciiz, –‚…’ !!!
; 8 ¢ë¢®¤ ’…Œ…€’“€ ‹€‚‹…ˆŸ [optmzd-mem]
mov edi,T_plavl
call out_asciiz_item
 
; 9 ¢ë¢®¤ ’…Œ…€’“€ Šˆ…ˆŸ [optmzd-mem]
mov edi,T_kipen
call out_asciiz_item
 
;10 ¢ë¢®¤ €‘…„…‹…ˆ… ‚ ‡…ŒŽ‰ ŠŽ… [optmzd-mem]
mov edi,Rasprostr
call out_asciiz_item
 
;11 ¢ë¢®¤ ¨¬ñ­ ¯¥à¢®®âªà뢠⥫¥© [optmzd-mem]
mov edi,First_Explore
call out_asciiz_item
 
pop edi ; ®­ ¡ë« á®åà ­ñ­ ¢ ­ ç «¥ :)
ret
 
;äã­ªæ¨ï ¢ë¯®«­ï¥â ­ ¡®à ¤¥©á⢨© ¤«ï ¢ë¢®¤  ¨­ä®à¬ æ¨¨
out_asciiz_item:
mov edx,[re_ID]
dec edx
shl edx,2 ;㬭®¦¨âì ­  4 (à §¬¥à 㪠§ â¥«ï)
mov edx,[edx+edi] ;㪠§ â¥«ì ­  áâப㠢 edx
add ebx,15
int 0x40
ret
 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; ;;
;; Ž‹€‘’œ „€›• ;;
;; ;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;---- begin ---- „ ­­ë¥ ¤«ï ƒ‹€‚ŽƒŽ ®ª­  --------------------------
Caption db '¥à¨®¤¨ç¥áª ï á¨á⥬  „.ˆ.Œ¥­¤¥«¥¥¢  by [navanax] & [Johnny_B]',0
Plotnost_caption db '«®â­®áâì',0
Atomic_massa db '€â®¬­ ï ¬ áá ',0
Nazvanie db ' §¢ ­¨¥',0
Angl_nazv db '€­£«. ­ §¢ ­¨¥',0
T_pl db '’¥¬¯¥à âãà  ¯«.',0
T_kip db '’¥¬¯¥à âãà  ª¨¯.',0
Electrootr db '«¥ªâà®®âà¨æ â¥«ì­®áâì',0
Raspr db ' á¯à¥¤¥«¥­¨¥ ¢ §¥¬­. ª®à¥',0
Step_okisl db '‘⥯¥­ì ®ª¨á«¥­¨ï',0
Otkrytie db 'Žâªàë⨥',0
Por_nomer db '®à浪®¢ë© ­®¬¥à',0
Period_text:
db ' I',0
db ' II',0
db 'III',0
db ' IV',0
db ' V',0
db ' VI',0
db 'VII',0
Lantanoid_text db '‹ ­â ­®¨¤ë',0
Actinoid_text db ' €ªâ¨­®¨¤ë',0
;---- end ------ „ ­­ë¥ ¤«ï ƒ‹€‚ŽƒŽ ®ª­  --------------------------
 
 
;*********************************************
; €‡€ „€›• Ž •ˆŒˆ—…‘ŠˆŒ ‹…Œ…’€Œ
;*********************************************
;®¯à¥¤¥«¨¬áï, çâ® ª®«-¢® í«¥¬¥­â®¢ = 116. ¨ ¡®«ìè¥, ­¨ ¬¥­ìè¥!
;Š ¦¤ë© ¬ áᨢ ¤®«¦¥­ ᮤ¥à¦ âì 116 í«¥¬¥­â®¢,
;çâ®¡ë ­¥ ¡ë«® ¢ë室  §  ¥£® ¯à¥¤¥«ë
 
;€­£«¨©áª®¥ ­ §¢ ­¨¥
Elements: ;116 í«¥¬¥­â®¢
db 'Hydrogen ' ; 1
db 'Helium '
db 'Lithium '
db 'Beryllium '
db 'Boron '
db 'Carbon '
db 'Nitrogen '
db 'Oxygen '
db 'Fluorine '
db 'Neon '
db 'Sodium '
db 'Magnesium '
db 'Aluminum '
db 'Silicon '
db 'Phosphorus '
db 'Sulfur '
db 'Chlorine '
db 'Argon '
db 'Potassium '
db 'Calcium ' ;20
db 'Scandium '
db 'Titanium '
db 'Vandium '
db 'Chromium '
db 'Manganese '
db 'Iron '
db 'Cobalt '
db 'Nickel '
db 'Copper '
db 'Zinc ' ;30
db 'Gallium '
db 'Germanium '
db 'Arsenic '
db 'Selenium '
db 'Bromine '
db 'Krypton '
db 'Rubidium '
db 'Strontium '
db 'Yttrium '
db 'Zirconium '
db 'Niobium '
db 'Molybdenum '
db 'Technetium '
db 'Ruthenium '
db 'Rhodium '
db 'Palladium '
db 'Silver '
db 'Cadmium '
db 'Indium '
db 'Tin ' ;50
db 'Antimony '
db 'Tellurium '
db 'Iodine '
db 'Xenon '
db 'Cesium '
db 'Barium '
db 'Lanthanum '
db 'Cerium '
db 'Praseodymium'
db 'Neodymium '
db 'Promethium '
db 'Samarium '
db 'Europium '
db 'Gadolinium '
db 'Terbium '
db 'Dysprosium '
db 'Homium '
db 'Erbium '
db 'Thulium '
db 'Ytterbium ' ;70
db 'Lutetium '
db 'Hafnium '
db 'Tantalum '
db 'Tungsten '
db 'Rhenium '
db 'Osmium '
db 'Iridum '
db 'Platinum '
db 'Gold '
db 'Mercury ' ;80
db 'Thallium '
db 'Lead '
db 'Bismuth '
db 'Polonium '
db 'Astatine '
db 'Radon '
db 'Francium '
db 'Radium '
db 'Actinum '
db 'Thorium ' ;90
db 'Protactinium'
db 'Uranium '
db 'Neptunium '
db 'Plutonium '
db 'Americium '
db 'Curium '
db 'Berkelium '
db 'Californium '
db 'Einsteinium '
db 'Fermium ' ;100
db 'Mendelevium '
db 'Nobelium '
db 'Lawrencium '
db 'Reserfordium'
db 'Dubnium '
db 'Siborgovium '
db 'Boronium '
db 'Hassium '
db 'Meithnerium '
db 'Darmstadium ' ;110
db 'Roentgenium '
db 'Ununbium '
db 'Ununtrium '
db 'Ununquadium '
db 'Ununpentium '
db 'Ununhexium ' ;116
 
 
;---------------------------------
 
Symbols: ;116 í«¥¬¥­â®¢
db 'H '
db 'He '
db 'Li '
db 'Be '
db 'B '
db 'C '
db 'N '
db 'O '
db 'F '
db 'Ne '
db 'Na '
db 'Mg '
db 'Al '
db 'Si '
db 'P '
db 'S '
db 'Cl '
db 'Ar '
db 'K '
db 'Ca '
db 'Sc '
db 'Ti '
db 'V '
db 'Cr '
db 'Mn '
db 'Fe '
db 'Co '
db 'Ni '
db 'Cu '
db 'Zn '
db 'Ga '
db 'Ge '
db 'As '
db 'Se '
db 'Br '
db 'Kr '
db 'Rb '
db 'Sr '
db 'Y '
db 'Zr '
db 'Nb '
db 'Mo '
db 'Tc '
db 'Ru '
db 'Rh '
db 'Pd '
db 'Ag '
db 'Cd '
db 'In '
db 'Sn '
db 'Sb '
db 'Te '
db 'I '
db 'Xe '
db 'Cs '
db 'Ba '
db 'La '
db 'Hf '
db 'Ta '
db 'W '
db 'Re '
db 'Os '
db 'Ir '
db 'Pt '
db 'Au '
db 'Hg '
db 'Tl '
db 'Pb '
db 'Bi '
db 'Po '
db 'At '
db 'Rn '
db 'Fr '
db 'Ra '
db 'Ac '
db 'Rf '
db 'Db '
db 'Sg '
db 'Bh '
db 'Hs '
db 'Mt '
db 'Ds '
db 'Rg '
db 'Uub'
db 'Uut'
db 'Uuq'
db 'Uup'
db 'Uuh'
db 'Ce '
db 'Pr '
db 'Nd '
db 'Pm '
db 'Sm '
db 'Eu '
db 'Gd '
db 'Tb '
db 'Dy '
db 'Ho '
db 'Er '
db 'Tm '
db 'Yb '
db 'Lu '
db 'Th '
db 'Pa '
db 'U '
db 'Np '
db 'Pu '
db 'Am '
db 'Cm '
db 'Bk '
db 'Cf '
db 'Es '
db 'Fm '
db 'Md '
db 'No '
db 'Lr '
 
;€’ŽŒ€Ÿ Œ€‘‘€
MassNo: ;116 í«¥¬¥­â®¢
db '1.00797' ; 1
db '4.0026 '
db '6.939 '
db '9.0122 '
db '10.811 '
db '12.0112'
db '14.0067'
db '15.9994'
db '18.9984'
db '20.179 ' ; 10
db '22.9898'
db '24.305 '
db '26.9815'
db '28.086 '
db '30.9738'
db '32.066 '
db '35.453 '
db '39.948 '
db '39.102 '
db '40.08 ' ; 20
db '44.958 '
db '47.88 '
db '50.942 '
db '51.996 '
db '54.938 '
db '55.847 '
db '58.9332'
db '58.69 '
db '63.546 '
db '65.39 ' ; 30
db '69.723 '
db '72.61 '
db '74.922 '
db '78.96 '
db '79.904 '
db '83.80 '
db '85.47 '
db '87.62 '
db '88.906 '
db '91.224 ' ; 40
db '92.906 '
db '95.94 '
db '(98) '
db '101.07 '
db '102.905'
db '106.42 '
db '107.868'
db '112.41 '
db '114.82 '
db '118.71 ' ; 50
db '121.75 '
db '127.60 '
db '126.90 '
db '131.29 '
db '132.90 '
db '137.33 '
db '138.91 '
db '140.12 '
db '140.91 '
db '144.24 ' ; 60
db '(147) '
db '150.36 '
db '151.96 '
db '157.25 '
db '158.92 '
db '162.50 '
db '164.93 '
db '167.26 '
db '168.93 '
db '173.04 ' ; 70
db '174.97 '
db '178.49 '
db '180.95 '
db '183.85 '
db '186.21 '
db '190.2 '
db '192.22 '
db '195.08 '
db '196.97 '
db '200.59 ' ; 80
db '204.38 '
db '207.19 '
db '208.98 '
db '(209) '
db '(210) '
db '(222) '
db '(223) '
db '(226) '
db '(227) '
db '232.04 ' ; 90
db '(231) '
db '238.029'
db '(237) '
db '(244) '
db '(243) '
db '(247) '
db '(247) '
db '(251) '
db '(254) '
db '(257) ' ; 100
db '(258) '
db '(259) '
db '(262) ' ;103
db '(261) '
db '(262) '
db '(266) '
db '(264) '
db '(269) '
db '(268) '
db '(271) ' ; 110
db '(272) '
db '(285) '
db '(284) '
db '(289) '
db '(288) '
db '(292) ' ;116
 
 
;-----------------------
 
;‹…Š’ŽŽ’ˆ–€’…‹œŽ‘’œ
Electr: ; 116 í«¥¬¥­â®¢
db '2,1 ' ; 1
db '5,5 '
db '0,97'
db '1,47'
db '2,01'
db '2,50'
db '3,07'
db '3,50'
db '4,10'
db '4,84' ; 10
db '0,93'
db '1,23'
db '1,47'
db '2,25'
db '2,32'
db '2,60'
db '2,83'
db '3,20'
db '0,91'
db '1,04' ; 20
db '1,20'
db '1,32'
db '1,45'
db '1,56'
db '1,60'
db '1,64'
db '1,70'
db '1,75'
db '1,75'
db '1,66' ; 30
db '1,82'
db '2,02'
db '2,11'
db '2,48'
db '2,74'
db '2,94'
db '0,89'
db '0,99'
db '1,11'
db '1,22' ;40
db '1,6 '
db '2,16'
db '1,9 '
db '2.2 '
db '2.28'
db '2,2 '
db '1,93'
db '1,69'
db '1,78'
db '1,96'
db '2,05'
db '2,1 '
db '2,66'
db '??? '
db '0,79'
db '0,89'
db '1,1 '
db '1,12'
db '1,13'
db '1,14' ;60
db '1,13'
db '1,17'
db '1,2 '
db '1,2 '
db '1,2 '
db '1,22'
db '1,23'
db '1,24'
db '1,25'
db '1,1 ' ; 70
db '1,27'
db '1,3 '
db '1,5 '
db '1,36'
db '1,46'
db '1,52'
db '1,55'
db '1,44'
db '1,42'
db '1,42' ; 80
db '1,42'
db '1,55'
db '1,67'
db '1,76'
db '1,90'
db '2,06'
db '0,86'
db '0,97'
db '1,00'
db '1,11' ;90
db '1,14'
db '1,22'
db '1,22'
db '1,2 '
db '1,1 '
db '1,2 '
db '1,1 '
db '1,2 '
db '??? '
db '??? ' ; 100
db '1,2 '
db '??? '
db '??? '
db '??? '
db '??? '
db '??? '
db '??? '
db '??? '
db '??? '
db '??? ' ; 110
db '??? '
db '??? '
db '??? '
db '??? '
db '??? '
db '??? ' ; 116
 
;-----------------------
 
;’…Œ…€’“€ ‹€‚‹…ˆŸ 116 í«¥¬¥­â®¢
strtbl T_plavl, \
"- 259,19", \
"- 271,15", \
"180,5", \
"1287", \
"2075", \
"4000(£à ä¨â)", \
"-210,0", \
"-218,7", \
"-219,699", \
"-248,6", \
"97,83", \
"648", \
"660,37", \
"1415", \
"44,14(¡¥«ë©) 593(ªà á­ë©)", \
"119,3", \
"-101,03", \
"-189,34", \
"63,51", \
"842", \ ;20
"1541", \
"1658", \
"1920", \
"1890", \
"1245", \
"1539", \
"1494", \
"1455", \
"1084,5", \
"419,5", \
"29,78", \
"937", \
"817 (¯®¤ ¤ ¢«¥­¨¥¬)", \
"217", \
"-7,25", \
"-157,37", \
"39,3", \
"768", \
"1528", \
"1855", \ ;40
"2470", \
"2620", \
"2250", \
"2607", \
"1963", \
"1554", \
"961,93", \
"321,108", \
"156,634", \
"231,9681", \
"630,74", \
"449,8", \
"113,5", \
"-111,85", \
"28,7", \
"727", \
"920", \
"804", \
"931", \
"1024", \ ;60
"1170", \
"1072", \
"826", \
"1312", \
"1356", \
"1409", \
"1470", \
"1522", \
"1545", \
"824", \
"1663", \
"2230", \
"3270", \
"3660", \
"3190", \
"3027", \
"2443", \
"1772", \
"1064,43", \
"-38,862", \ ;80
"303,6", \
"327,502", \
"271,44", \
"254", \
"575", \
"-71,0", \
"21", \
"969", \
"1050", \
"1750", \
"1580", \
"1134", \
"637", \
"640", \
"1292", \
"1345", \
"1050", \
"900", \
"860", \
"???", \ ;100
"???", \
"???", \
"???", \
"???", \
"???", \
"???", \
"???", \
"???", \
"???", \
"???", \ ;110
"???", \
"???", \
"???", \
"???", \
"???", \
"???" ; 116
 
 
 
;-----------------------
 
;’…Œ…€’“€ Šˆ…ˆŸ 116 í«¥¬¥­â®¢
strtbl T_kipen, \
"- 252,87", \
"- 268,935", \
"1336,6", \
"2471", \
"3700", \
"4200(£à ä¨â)", \
"-195,802", \
"-182,962", \
"-188,2", \
"-246,048", \
"886", \
"1095", \
"2500", \
"3250", \
"287,3 - ¡¥«ë© ", \
"444,674", \
"-34,1", \
"-185,86", \
"760", \
"1495", \ ;20
"2850", \
"3260", \
"3450", \
"2680", \
"2080", \
"3200", \
"2960", \
"2900", \
"2540", \
"906,2", \
"2403", \
"2850", \
"-", \
"685,3", \
"59,82", \
"153,35", \
"696", \
"1390", \
"3320", \
"4340", \ ;40
"4927", \
"4630", \
"4630", \
"4900", \
"3700", \
"2940", \
"2170", \
"766,5", \
"2024", \
"2620", \
"1634", \
"990", \
"184,35", \
"-108,12", \
"667,6", \
"1860", \
"3450", \
"3450", \
"3510", \
"3080", \ ;60
"3000", \
"1800", \
"1440", \
"3272", \
"3073", \
"2587", \
"2707", \
"2857", \
"1947", \
"1211", \
"3412", \
"4620", \
"5425", \
"6000", \
"5900", \
"5000", \
"4380", \
"3800", \
"2947", \
"356,66", \ ;80
"1457", \
"1745", \
"1564", \
"962", \
"309", \
"-61,9", \
"669", \
"1536", \
"3300", \
"4200", \
"4500", \
"4200", \
"4100", \
"3350", \
"2880", \
"3200", \
"2630", \
"1227", \
"???", \
"???", \ ;100
"???", \
"???", \
"???", \
"???", \
"???", \
"???", \
"???", \
"???", \
"???", \
"???", \ ; 110
"???", \
"???", \
"???", \
"???", \
"???", \
"???" ; 116
 
 
;ãá᪮¥ ­ §¢ ­¨¥ ; 116 í«¥¬¥­â®¢
strtbl Rus_nazv, \
"‚®¤®à®¤", \ ;1
"ƒ¥«¨©", \
"‹¨â¨©", \
"¥à¨««¨©", \
"®à", \
"“£«¥à®¤", \
"€§®â", \
"Š¨á«®à®¤", \
"”â®à", \
"¥®­", \ ;10
" â਩", \
"Œ £­¨©", \
"€«î¬¨­¨©", \
"Šà¥¬­¨©", \
"”®áä®à", \
"‘¥à ", \
"•«®à", \
"€à£®­", \
"Š «¨©", \
"Š «ì権", \
"‘ª ­¤¨©", \
"’¨â ­", \
"‚ ­ ¤¨©", \
"•à®¬", \
"Œ à£ ­¥æ", \
"†¥«¥§®", \
"Š®¡ «ìâ", \
"¨ª¥«ì", \
"Œ¥¤ì", \
"–¨­ª", \ ;30
"ƒ ««¨©", \
"ƒ¥à¬ ­¨©", \
"Œëèìïª", \
"‘¥«¥­", \
"à®¬", \
"Šà¨¯â®­", \
"ã¡¨¤¨©", \
"‘â஭権", \
"ˆââ਩", \
"–¨àª®­¨©", \
"¨®¡¨©", \
"Œ®«¨¡¤¥­", \
"’¥å­¥æ¨©", \
"ã⥭¨©", \
"®¤¨©", \
" «« ¤¨©", \
"‘¥à¥¡à®", \
"Š ¤¬¨©", \
"ˆ­¤¨©", \
"Ž«®¢®", \ ;50
"‘ãà쬠", \
"’¥««ãà", \
"‰®¤", \
"Šá¥­®­", \
"–¥§¨©", \
" à¨©", \
"‹ ­â ­", \
"–¥à¨©", \
"à §¥®¤¨¬", \
"¥®¤¨¬", \
"à®¬¥â¨©", \
"‘ ¬ à¨©", \
"…¢à®¯¨©", \
"ƒ ¤®«¨­¨©", \
"’¥à¡¨©", \
"„¨á¯à®§¨©", \
"ƒ®«ì¬¨©", \
"à¡¨©", \
"’㫨©", \
"ˆââ¥à¡¨©", \ ;70
"‹îâ¥æ¨©", \
"ƒ ä­¨©", \
"’ ­â «", \
"‚®«ìäà ¬", \
"¥­¨©", \
"Žá¬¨©", \
"ˆà¨¤¨©", \
"« â¨­ ", \
"‡®«®â®", \
"âãâì", \
"’ ««¨©", \
"‘¢¨­¥æ", \
"‚¨á¬ãâ", \
"®«®­¨©", \
"€áâ â", \
" ¤®­", \
"”࠭権", \
" ¤¨©", \
"€ªâ¨­¨©", \
"’®à¨©",\
"à®â ªâ¨­¨©",\
"“à ­",\
"¥¯âã­¨©", \ ;90
"«ãâ®­¨©", \
"€¬¥à¨æ¨©", \
"Šî਩", \
"¥àª«¨©", \
"Š «¨ä®à­¨©", \
"©­è⥩­¨©", \
"”¥à¬¨©", \
"Œ¥­¤¥«¥¢¨©", \
"®¡¥«¨©", \
"‹®ã७ᨩ", \
"¥§¥àä®à¤¨©", \
"„ã¡­¨©", \
"‘¨¡®à£®¢¨©", \
"®à¨©", \
"ƒ áᨩ", \
"Œ¥©â­¥à¨©", \
"?„ à¬áâ ¤¨©?", \
"¥­â£¥­¨©", \
"­¥â ­ §¢ ­¨ï", \
"­¥â ­ §¢ ­¨ï", \ ;110
"­¥â ­ §¢ ­¨ï", \
"­¥â ­ §¢ ­¨ï", \
"­¥â ­ §¢ ­¨ï" ;116
 
 
;¥à¢®®âªà뢠⥫¨ ; 116 í«¥¬¥­â®¢
strtbl First_Explore, \
"ƒ.Š ¢¥­¤¨è, 1766", \
"†.† ­á¥­, „¦..‹®ªì¥à, 1868", \
"€.€à䥤ᮭ, 1817", \
"‹.‚®ª«¥­, 1798", \
"‹.†.ƒ¥©-‹îáá ª 1808", \
"¨§¢¥á⥭ ¤® ­.í.", \
"„.¥§¥àä®à¤, 1772", \
"Š.‚.˜¥¥«¥, 1772", \
"€.Œã áá ­, 1886", \
"“. ¬§ ©,Œ.’à ¢¥àá 1898", \
"ƒ.„í¢¨, 1807",\
"ƒ.„í¢¨, 1808",\
"•.Š.àá⥤, 1825",\
"†.‹.ƒ¥©-‹îáá ª, ‹.†.’¥­ à, 1811",\
"•.à ­¤â, 1669",\
"¨§¢¥áâ­  ¤® ­.í.",\
"Š.‚.˜¥¥«¥, 1774",\
"“. ¬§ ©, „¦.í«¥©, 1894",\
"ƒ.„í¢¨, 1807",\
"ƒ.„í¢¨, 1808",\
"‹.”.¨«ìá®­, 1879",\
"“.ƒà¥£®à, 1790 ",\
"ƒ.®áª®, 1869",\
"‹..‚®ª«¥­, 1797",\
"ž.ƒ ­, 1774",\
"¨§¢¥áâ­® ¤® ­.í.",\
"ž.à ­¤â, 1735",\
"€.Šà®­è⥤â, 1751",\
"¨§¢¥áâ­  ¤® ­.í.",\
"¨§¢¥á⥭ á® á।­. ¢¥ª®¢",\
"..‹¥ª®ª ¤¥ ã ¡®¤à ­, 1875",\
"Š.€.‚¨­ª«¥à, 1886",\
"¨§¢¥á⥭ á® á।­. ¢¥ª®¢",\
"‰.¥à楫¨ãá, ‰.ƒ ­, 1817",\
"†. « à, 1826",\
"“. ¬§ ©, Œ.’à ¢¥àá, 1898",\
".ã­§¥­, ƒ.Š¨à壮ä, 1861",\
"€.Šà®ä®à¤, 1808",\
"ž.ƒ ¤®«¨­, 1794",\
"Œ.Š« ¯à®â, 1789",\
"—.• âç¥â, 1801",\
"Š.‚.˜¥¥«¥, 1778",\
".‘¥£à¥, Š.¥àì¥, 1937",\
"Š.Š.Š« ãá, 1844",\
"“.‚®«« áâ®­, 1804",\
"“.‚®«« áâ®­, 1803",\
"¨§¢¥áâ­® ¤® ­.í.",\
"”.˜â஬¥©¥à, 1817",\
".¥©å, ˆ.¨åâ¥à, 1863",\
"¨§¢¥áâ­® ¤® ­.í.",\
"¨§¢¥áâ­  ¤® ­.í.",\
"”.Œî««¥à, 1782",\
".Šãàâã , 1811",\
"“. ¬§ ©, Œ.’à ¢¥àá, 1898",\
".ã­§¥­, ƒ.Š¨à壮ä, 1860",\
"ƒ.„í¢¨, 1774",\
"Š.Œ®á ­¤¥à, 1839",\
"Š.Œ®á ­¤¥à, 1839",\
"Š.€ãíà ä®­ ‚¥«ìá¡ å, 1885",\
"Š.€ãíà ä®­ ‚¥«ìá¡ å, 1842",\
"‹.ƒ«¥­¤¥­¨­, —.Š®à¨í«« ¨ ¤à., 1942",\
"..‹¥ª®ª ¤¥ ã ¡®¤à ­, 1879",\
".„¥¬ àá¥, 1901",\
"†.Œ à¨­ìïª, 1880",\
"Š.Œ®á ­¤¥à, 1843",\
"..‹¥ª®ª ¤¥ ã ¡®¤à ­, 1886",\
".Š«¥¢¥, 1879",\
"Š.Œ®á ­¤¥à, 1843",\
".Š«¥¢¥, 1879",\
"†.Œ à¨­ìïª, 1878",\
"†.“à¡í­, —.„¦¥©¬á, 1907",\
"„.Š®áâ¥à ¨ ¤à., 1922",\
"€.ƒ.ª¥¡¥à£, 1802",\
"Š.‚.˜¥¥«¥, 1781",\
"ˆ. ¨ ‚.®¤¤ ª, Ž.¥à£, 1925",\
"‘.’¥­­ ­â, 1804",\
"‘.’¥­­ ­â, 1804",\
"¨§¢. á ¤à¥¢­®áâ¨",\
"¨§¢¥áâ­® ¤® ­.í.",\
"¨§¢¥áâ­  ¤® ­.í.",\
"“.Šàãªá, 1861",\
"¨§¢¥á⥭ ¤® ­.í.",\
"ˆ.®ââ, 1739",\
"Œ. ¨ .Šîà¨, 1898",\
"„.Š®àá®­ ¤à., 1940",\
".„®à­, 1940",\
"Œ.¥à¥©, 1939",\
"Œ. ¨ .Šîà¨, †.¥¬î­, 1898",\
"€.„¥¡ì¥à­, 1899",\
"‰.¥à楫¨ãá, 1828",\
"Ž.ƒ ­, ‹.Œ¥©â­¥à, ”.‘®¤¤¨, 1918",\
"Œ.Š« ¯à®â, 1789",\
".Œ.Œ ª¬¨«« ­, ”.•.©¡«á®­, 1940",\
"ƒ.‘¨¡®à£ ¨ ¤à., 1940",\
"ƒ.‘¨¡®à£ ¨ ¤à., 1944",\
"ƒ.‘¨¡®à£ ¨ ¤à., 1944",\
"ƒ.‘¨¡®à£ ¨ ¤à., 1949",\
"ƒ.‘¨¡®à£ ¨ ¤à., 1950",\
"€.ƒ¨®àá®, ‘.’®¬¯á®­, 1952",\
"€.ƒ¨®àá®, ‘.’®¬¯á®­, 1952",\
"€.ƒ¨®àá® ¨ ¤à., 1955",\
"“çñ­ë¥ ‘‘‘, 1966",\
"€.ƒ¨®àá® ¨ ¤à., 1961",\
"ƒ..”«¥à®¢ ¨ ¤à., 1964",\
"ƒ..”«¥à®¢ ¨ ¤à., 1967",\
"ƒ..”«¥à®¢ ¨ ¤à., 1974",\
"P.Armbruster, G.Munzenber, 1981",\
"P.Armbruster, G.Munzenber, 1984",\
"P.Armbruster, G.Munzenber, 1982",\
"S.Hofmann, V. Ninov, 1994",\
"S.Hofmann, V. Ninov, 1994",\
"S.Hofmann, V. Ninov, 1996",\
"­¥ ®âªàëâ",\
"“çñ­ë¥ ®áᨨ, 1998",\
"­¥ ®âªàëâ",\
"ž.–.Ž£ ­¥ááï­, ‚.Š.“⥭ª®¢, 2000"
 
 
; «®â­®áâì 116 í«¥¬¥­â®¢
strtbl Plotnost, \
"-", \ ; 1
"-", \
"535", \
"1848", \
"2460", \
"2267", \
"-", \
"-", \
"-", \
"0,90035 £/«", \
"968", \ ; 10
"1738", \
"2700", \
"2330", \
"1823", \
"1960", \
"-", \
"1,7837 £/«", \
"856", \
"1550", \
"2985", \ ; 20
"4507", \
"6110", \
"7140", \
"7470", \
"7874", \
"8900", \
"8908", \
"8920", \
"7140", \
"5904", \ ; 30
"5323", \
"5727", \
"4819", \
"-", \
"3,745 £/«", \
"1532", \
"2630", \
"4472", \
"6511", \
"8570", \ ; 40
"10280", \
"11500", \
"12370", \
"12450", \
"12023", \
"10490", \
"8650", \
"7310", \
"7310", \
"6697", \ ; 50
"6240", \
"4940", \
"5,851 £/«", \
"1879", \
"3510", \
"6146", \
"6689", \
"6640", \
"6800", \
"7264", \ ; 60
"7353", \
"5244", \
"7901", \
"8219", \
"8551", \
"8795", \
"9066", \
"9321", \
"6570", \
"9841", \ ; 70
"13310", \
"16650", \
"19250", \
"21020", \
"22610", \
"22650", \
"21090", \
"19300", \
"-", \
"11850", \ ; 80
"11340", \
"9780", \
"9196", \
"-", \
"9,73 £/«", \
"2400", \
"5000", \
"10070", \
"11724", \
"15370", \ ; 90
"19050", \
"20450", \
"19816", \
"-", \
"13510", \
"14780", \
"15100", \
"-", \
"-", \
"-", \ ; 100
"-", \
"-", \
"-", \
"-", \
"-", \
"-", \
"-", \
"-", \
"-", \
"-", \ ; 110
"-", \
"-", \
"-", \
"-", \
"-", \
"-" ; 116
 
 
;€‘Ž‘’€…ˆ… ‚ ‡…ŒŽ‰ ŠŽ… 116 í«¥¬¥­â®¢
strtbl Rasprostr, \
"0,14 %", \ ; 1
"¬¥­¥¥ 0,0015 %", \
"0,0030 %", \
"0,0006 %", \
"0,005 %", \
"0,032 %", \
"0,0046 %", \
"46,60 %", \
"0,070 %", \
"0,00007 £/â", \ ; 10
"2,83 %", \
"2,09 %", \
"8,13 %", \
"27,72 %", \
"0,118 %", \
"0,052 %", \
"0,020 %", \
"0,000004 %", \
"2,59 %", \
"3,63 %", \ ; 20
"0,001 %", \
"0,57 %", \
"0,0110 %", \
"0,0200 %", \
"0,100 %", \
"5,00 %", \
"0,0023 %", \
"0,0080 %", \
"0,0045 %", \
"0,0065 %", \ ; 30
"0,0015 %", \
"0,00015 %", \
"0,00017 %", \
"0,000014 %", \
"0,00016 %", \
"0,000114 % (¢  â¬®áä¥à¥)", \
"0,0120 %", \
"???", \
"0,0040 %", \
"0,0160 %", \ ; 40
"0,0024 %", \
"0,0003 %", \
"-", \
"0,0000005 %", \
"0.0000001 %", \
"0,000001 %", \
"0,000007 %", \
"0,0000135 %", \
"0,00001 %", \
"0,008 %", \
"0,00005 %", \ ; 50
"0,000001 %", \
"0,00004 %", \
"0,000039 % (¢  â¬®áä¥à¥)", \
"0,00037 %", \
"0,040 %", \
"0,0029 %", \
"0,007 %", \
"0,0007 %", \
"0,0025 %", \
"-", \ ; 60
"0,0007 %", \
"0,00013 %", \
"0,00054 %", \
"0,00043 %", \
"0,0005 %", \
"0,00013 %", \
"0,00033 %", \
"0,000027 %", \
"0,000033 %", \
"0,00008 %", \ ; 70
"0,0003 - 0,0004 %", \
"0,00025 %", \
"0,0001 %", \
"0,00000007 %", \
"0,000005 %", \
"0,0000001 %", \
"0,0000005 %", \
"0,00000043 %", \
"0,000007 %", \
"0,0003 %", \ ; 80
"0,0015 %", \
"0,00002 %", \
"0,00000000000002 %", \
"17 ¬£ ¢ á«®¥ ª®àë 1,6 ª¬", \
"-", \
"-", \
"0,0000000001 %", \
"0,0000000006 %", \
"0,0008 %", \
"-", \ ; 90
"0,0003 %", \
"-", \
"-", \
"0,0003 %", \
"-", \
"-", \
"-", \
"-", \
"-", \
"-", \ ; 100
"-", \
"-", \
"-", \
"-", \
"-", \
"-", \
"-", \
"-", \
"-", \
"-", \ ; 110
"-", \
"-", \
"-", \
"-", \
"-" ; 116
 
 
; á⥯¥­ì ®ª¨á«¥­¨ï 116 í«¥¬¥­â®¢
strtbl Step_ok, \
"+1 -1", \ ; 1
"-", \
"+1", \
"+2 (+1)", \
"+3 (+2)", \
"+4 -4", \
"®â +5 ¤® -3 ", \
"+4 -4", \
"-1", \
"-", \ ; 10
"+1", \
"+2 (+1)", \
"+3 (+1 +2)", \
"+1 +2 +3 +4", \
"-3 +3 +5", \
"-2 +4 +6", \
"-1 +1 +3 +5 +7", \
"-", \
"+1", \
"+2 (+1)", \ ; 20
"+3 (+1 +2)", \
"+4 +2 +3", \
"®â +2 ¤® +5", \
"+2 +3 +6 (+4 +5 +1)", \
"®â +2 ¤® +7", \
"+2 +3 (+1 +2 +4 +6 +8)", \
"+2 +3 (+1 +4 +5)", \
"+2 (+1 +3 +4)", \
"+1 +2 (+3 +4)", \
"+2", \ ; 30
"+1 +3", \
"+4 +3 +2 +1", \
"+5 +3 -3", \
"+6 +4 -2 (+2)", \
"-1 +1 +3 +5 +7", \
"+2", \
"+1", \
"+2 (+1)", \
"+3", \
"+4 (+1 +2 +3)", \ ; 40
"+5 (+1 +2 +3 +4)", \
"®â +2 ¤® +6", \
"®â -1 ¤® +7", \
"+3 +4 +6 +8", \
"+1 +2 +3 +4 +5 +6", \
"+1 +2 +3 +4 (+5 +6)", \
"+1 +2 +3", \
"+2 (+1)", \
"+3 (+1)", \
"+2 +4", \ ; 50
"+3 +5 (-3)", \
"-2 +6 +4 (+2)", \
"-1 +1 +3 +5 +7", \
"+2 +4 +6 +8", \
"+1", \
"+2 (+1)", \
"+3", \
"+3 (+4)", \
"+4 +3 (+2)", \
"+4 +3 (+2)", \ ; 60
"+3", \
"+2 +3 (+2)", \
"+3 +2", \
"+3 (+2 +1)", \
"+1 +3 +4", \
"+3 (+2 +4)", \
"+3 (+2)", \
"+3 (+1)", \
"+3 +2 (+4)", \
"+2 +3", \ ; 70
"+3", \
"+4 (+3 +2)", \
"+5 (+2 +3 +4)", \
"®â +2 ¤® +6", \
"®â +7 ¤® -1", \
"+4 +6 +8 +1 +3 +5", \
"+4 +3 +1 +2 +6", \
"+4 +3 +2 (+5 +6)", \
"+1 +3 (+5)", \
"+2 +1", \ ; 80
"+1 +3", \
"+1 +4 +2", \
"+3 +5 -3 (+1 +2)", \
"+6 +4 +2 -2", \
"-1 +1 +5 (+7)", \
"+2 +4 +6", \
"+1", \
"+2", \
"+3", \
"+4 (+2 +3)", \ ; 90
"+4 +5 (+3)", \
"®â +2 ¤® +6", \
"+3 +4 +5 (+6 +7)", \
"®â +3 ¤® +7", \
"®â +2 ¤® +7", \
"+3 (+4 +6)", \
"+3 (+4)", \
"+2 +3 (+4)", \
"+2 +3", \
"+2 +3", \ ; 100
"+1 +2 +3", \
"+2 +3", \
"+3", \
"-", \
"-", \
"-", \
"-", \
"-", \
"-", \
"-", \ ; 110
"-", \
"-", \
"-", \
"-", \
"-", \
"-" ; 116
I_END:
sc system_colors