hledej1
akt_nazev
mod46c
Slovn
 polo
RIIS 4.6
v1_slov
nazev_ces
nazev_ces
nazev_ces
typ_pol+' '
typ_pol
nazev_nem
nazev_nem
Anglick
nazev_angl
nazev_angl
POLEX
 bPROCX
n!RTOP
     RBOT
ska wCLEFT
   CRIGHT
= 2FREEZE
  aORDER
    HOR
eturn
 endifLEVA
cPRAVA
   NADPIS
&vlZAHL
JMENO
  HODN
33 &vSOUC
TITLE
if TITLECOLORPOC0
updatF0
   zmeF1
endiF2
*******F4
*******F6
*******F7
ure zmeF10
 whileF0PRG
   iF1ON
    F1PRG
 F4_JM
 do F4PRG
    TISKPRG
 xF7_JM
    F7PRG
  x=F9PRG
    F9KEY
t=t+F9KEY1
   F10_JM
<=hF10PRG
   RAMECEK
orRIIS
     NAZEVT
 KLICO
 endKLNAZ
    SPACEBAR
 TR_HL1
TR_HL2
 a=TR_HL3
elsTR_HL4
   TR_HL5
   TR_HL6
   TR_HL7
   TR_HL8
   TR_HL9
DET_JM
  ENTER
n&y DETAIL
DETPRG
ursPS_LINE
rePS_RETURN
PS_ZAZN
 KONEC
dkeyF5
 zmen&yV1_SLOV
y'NAZEV_CES
i=33MOD_PSV
RIIS 4.6
set color to b/w
set color to w+/bg
set color to b/bg,w+/rb
&barvau
MOD_SYS
 bANSI
n!OBRAZ
    W_TYPPOL
wTYP_POL
  W_CESKY
 2NAZEV_CES
W_NEMEC
  NAZEV_NEM
W_ANGL
difNAZEV_ANGLNOVY_Z
   ZMENA
&vlHOR
  POCET
3 &vY
BARVAS
if BARVAZ
LORBARVAU
datBARVA
 zmeMENU
ndiPORADI
**KONEC
****I
****X
*******R
re zmeU
 whileT
   iQ
    A
 ZMENY
 do PS_RETURN
NEXIT
 Aktualizace slovn
&barvaz
Typ polo
ky   : 
zev   : 
zev : 
Anglick
zev: 
W_TYPPOL
bW_CESKY
n!W_NEMEC
  W_ANGL
@ 14,33 &vloz w_typpol pict '@!X'
Typ polo
ky mus
t vypln
Typ polo
ky mus
t V nebo N!
@ 15,33 &vloz w_cesky
zev mus
t vypln
@ 16,33 &vloz w_nemec
@ 17,33 &vloz w_angl
if vloz='&vloz' and updated()
CESKY
n!W_TYPPOL
wHLASKA
 2W_CESKY
ZMENA
do proc&y
do zmen&y with 'get'
do zmen&y with 'say'
it pr
ci beze zm
n? (a/N)
KONEC
CESKY
TYPPOL
 2HOR
ZEV_NEM
ZEV_ANGLNOVY_Z
   ZMENA
&vlW_TYPPOL
TYP_POL
  W_CESKY
&vNAZEV_CES
W_NEMEC
f NAZEV_NEM
W_ANGL
datNAZEV_ANGLPROC1
ZEV_ANGLPOCET
****POM
            - 
                - ^PgDn
                - ^Home
      - ^End,Esc
Pohyb
znamu
znamu
Konec
colora
set color to &color
bCOLOR
n!OBR
colorz
FFFZ^D
ordera
 Vyhled
zev: 
nazev_ces
nazev_ces
set order to &st_order
select &st_sel
V1_SLOV
zev nebyl nalezen
set order to &st_order
select &st_sel
MCOLOR
bOBR_HL
n!ST_SEL
 ST_REC
wV1_SLOV
  ST_ORDER
2ST_FOR
 ST_ZAZ
NASEL
difCSNC
NGLUPPERCS
  NAZEV_CES
HLASKA
AKT_NAZEV
PORADI
    [
PROC1
41114
ZMEN1
99302
ZMENY
19930
29.30 <
HLASKA
HLEDEJ1
X:\OBEC\04\
MOD46C.FXP
X:\OBEC\04\MOD46C.PRG