
 FAR 1.71.2358 ( 㪠 宦  1.75.2573/2634  2.0.1807)

   

   騥 砭
   ६
   樨  ६묨
   ᪨ 樨
   ப
     $Date       ;  FAR 2.0 print(Date(...))
     $Text
     $IClip      ;  FAR 2.0 clip(5,0)
     $MMode      ;  FAR 2.0 mmode(1,2)
     $Exit
     $XLat
     $KbdSwitch  ;  FAR 2.0 kbdlayout(1)
     $If
     $While
     $Rep
   㭪樨
   㫥 ﭨ
   ﭨ
   ਬ ᮢ
   



        騥 砭


 FAR ॠ ਬ⨢ ,     ᫥⥫쭮   ,    (  )  ।⢮, 騬  ࠡ  FAR Manager.  㧪ᯥ樠஢, ਢ易  㭪樮 FAR Manager, ⮬   ᬠਢ  㭨ᠫ .

 몠  ᯮ짮  ६   ⠭ ࠧ.   몠    ⮫쪮 ⥬ 筮 ࠢ ॥  ⥬ ਬ ᯥ樠 ணࠬ/.




        ६


६     祭     .  ய᫥⥫쭮  ਬ    ६.


         

 쭮 ६ 稭  ᨬ '%',   ᫥ 㪢 ⨭᪮ 䠢,   ᨬ '_'.

 쭮 ६ 稭   ᨬ '%%',   ᫥ 㪢 ⨭᪮ 䠢, ,  ᨬ '_'.

 ॣ஭ᨬ: '%myStr'  '%MYstr' -     ६.

᢮ 祭 ६  稢 ᨬ ';'


         

६    ⨯ - 楫 ᫮  ப.

᫥ ⠭: NNN - 10-筠 ⠭, 0NNN - 8-筠 ⠭, 0xNNN - 16-筠 ⠭.

᫥ ⠭ 64-ࠧ來.


          ⢨

 ⢨ 쭮 ६ - ⥪ ய᫥⥫쭮.

 ⢨ 쭮 ६ - ⥪騩 ᥠ FAR.  ६  뢠  ᯥ樠  Vars.  ⮩  FAR 뢠  ६  .


         砭

 ⠪: msave()




        樨  ६묨


 ६묨  ந ᫥騥 樨:
   +   ᫮ ᫮
   -   ᫮ ⠭
   *   ᫮ 㬭
   /   ᫮ . FAR 뢠 ᯮ , ᫨ ந室   0
   &   ᪮ 㬭
   ^   ᪫饥  (XOR)
   |   ᪮ ᫮
   !   ᪮ 栭    %t="0"; $if(!%t || %t==0) "YES" $else "NO" $end   "NO"  FAR 1.75,  "YES"  FAR 2.0

   


        ᪨ 樨


 ப $If  $While  ⢥ ᫮ Expr  ᯮ짮 樨 ࠢ:
   ==   
   !=    ࠢ
   <    
   >    
   <=     ࠢ
   >=     ࠢ

!

    樨 ࠢ  ப ६ ॣ஧ᨬ.

㫥 ࠦ Expr   ᫮.  ⮬ 砥  ࠦ ꥤ   ᫥ ஢:
   &&   ᪮ 
   ||   ᪮ 

 ࠦ    㣫 ᪮.




        ப


 몥 ᯮ ᯥ樠 ப.
, ᯮ㥬  ⥪ ᮢ

 ப ᠭ
   $Date ["format"] ।祭  ⠢ ⥪饩 /६.
   $Text "string"   ।祭  ⠢ ந쭮 ⥪.
   $IClip             ஬ .
   $MMode 1           ० ᮢ ࠭  ६ ந뢠 ய᫥⥫쭮.
   $Exit            뢠 믮 ய᫥⥫쭮.
   $XLat            뢠 㭪 ࠭᫨樨.
   $KbdSwitch       ᪮ ४祭 ᪫ .
   $SelWord         뤥 襥 ᫮   ⥪⮢    ⥪饩 ப ।. (㬥஢ )
   $If (Expr) TruePart [$Else FalsePart] $End    ࣠    ⢫ ய᫥⥫쭮.
   $While (Expr) Sequence $End    ࣠   横᪨  - " ᫮ Expr ⨭ 믮 ᫥⥫쭮 Sequence".
   $Rep (Expr) Sequence $End    ࣠   横᪨  - "믮 Expr ࠧ ᫥⥫쭮 Sequence".
   $Continue        [FAR 2.0] த 横 $While  $Rep
   %var=value;
   %%var=value;     ᯮ짮 ६.




        $Date - 


 $Date ।祭  ⠢ ⥪饩 /६.

$Date ["format"]

 format
 饥 ६ ᯮ  ८ࠧ  ப  ଠ "format".  ଠ  ⮬,  뤠 ⨫ date (Unix).
 $Date ন ᫥ ᯥ䨪 ଠ  ( ଠ 㭪樨 strftime):
   %%   ᨬ %
   %a   ⪮    (Sun  )
   %A       (Sunday  ᥭ)
   %b   ⪮   (Jan  )
   %B      (January  )
   %c     ६  ଠ WDay Mnt Day HH:MM:SS yyyy (Mon Jan 10 04:11:54 2000    10 04:11:54 2000)
   %C   ⮫⨥  筮 ᫮ (00 - 99). 1992 => 19
   %d       (01 - 31)
   %D     %x
   %e     %d,   饣  㤥  ஡.
   %h     %b
   %H      (00 - 23)
   %I      (01 - 12)
   %j        (001 - 366)
   %k     %H,   饣  㤥  ஡.
   %l     %I,   饣  㤥  ஡.
   %L   ਣ, ४騩   楢    - ᪨/.

 FAR 訢  ⥬ 2  :
 1) ᪨  楢   
 2) , ᮮ⢥騥 ன ⥪饣 짮⥫ (LOCALE_USER_DEFAULT)
  㬮砭 ⠢ ᪨ .
   %m   ,  筮 ᫮ (1 - 12)
   %m0    %m,   騬 㫥 (01 - 12)
   %mh     ,  ⭠筮 ᫮ (1 - C)
   %M      (00 - 59)
   %n    ॢ ப `\\n'
 !  । ⮮  ࠡ⠥.
   %p   AM  PM
   %r    %I:%M:%S %p
   %R    %H:%M
   %S     ᥪ㭤 (00 - 59)
   %t    ᨬ ⠡樨 `\\t'
   %T    %X
   %U      ,  ᥭ (Sunday)     (00 - 53)
   %v     ଠ dd-mmm-yyyy (mmm -  孥 ॣ)
   %V      ᮮ⢥⢨  ISO 8601:
 "᫨ , ᮤঠ 1 ,  >= 4   祭  , ⮣   1;  ⨢ 砥  ᠬ ᫥ 㬥஢  諮  (52  53)"
   %w      0 - ᥭ (Sunday) (0 - 6)
   %W      ,  쭨 (Monday)     (00 - 53)
   %x     ଠ  dd<sep>mm<sep>yyyy (ࠧ⥫ <sep>    ஥; 冷 ,       ஥)
   %X   ६  ଠ HH<sep>MM<sep>SS (ࠧ⥫ <sep>    ஥)
   %y       ⮫ (00 - 99)
   %Y     ⮫⨥ (19yy-20yy)
   %Z    ᮢ   , ᫨ ᮢ   

ந ⥪  ଠ⭮ ப   ⮫쪮  OEM-஢.

 ப $Date ᪠ ਬ ᫥ escape-᫥⥫쭮⥩:
 ଠ  ᠭ
   \"     '"'
   \'     '''
   \\     '\'
   \n    ॢ ப `\n'
   \t     ⠡樨 `\t'
   \a    bell
   \b    `\b'
   \f    `\f'
   \v    `\v'
   \N
   \NN
   \NNN  8- ᨬ  OEM ஢
   \xNN  16- ᨬ  OEM ஢


         砭

1. ᫨ 㬥 "format"  㪠,  FAR 㤥 ᯮ짮 ଠ ப "%a %b %d %H:%M:%S %Z %Y".


         ਬ

REGEDIT

;⠢ ⥪饩 

[HKEY_CURRENT_USER\Software\Far\KeyMacros\Common\CtrlD]
"Sequence"="$If (Editor || Dialog || Search) $Date \"%d.%m0.%Y\" Space $Else CtrlD $End"
"DisableOutput"=dword:00000001




        $Text - 


 $Text ।祭  ⠢ ந쭮 ⥪.

$Text "string"

 string
 ⠢塞 ⥪ 'string'   ⮫쪮  OEM-஢.
 ᪠ ਬ ᫥ escape-᫥⥫쭮⥩:

 ଠ  ᠭ
   \"     '"'
   \'     '''
   \\     '\'
   \n    ॢ ப `\n'
   \t    樨 `\t'
   \a    bell
   \b    `\b'
   \f    `\f'
   \v    `\v'
   \N
   \NN
   \NNN  8- ᨬ  OEM ஢
   \xNN  16- ᨬ  OEM ஢


         砭

1. ப '$Text'  ᮪ 室   ࠭  ய᫥⥫쭮, ⠢饩  ⥪,  ᤥ   來.

2. ࠧ "$Text"   㪠뢠, .. ந ⥪   窠 த ਬ  $Text. ᪫祭 ⠢ ,  ᫥  窨  ஡ -  ⮬ 砥 "$Text" 㪠뢠 易⥫쭮.

3.  ᮦ, 祬- ᭨ 뤥   ।.  ᭨ 뤥 ⮫쪮 ᨬ,     ("... A b C ...").


         ਬ

REGEDIT

;ᮧ    = ⥪饩 

[HKEY_CURRENT_USER\Software\Far\KeyMacros\Shell\CtrlShiftF7]
"Sequence"="%Folder=date(\"%d.%m0.%Y\"); $If (!fexist(%Folder)) F7 $Text %Folder Enter $End"
"DisableOutput"=dword:00000001
"NoPluginPanels"=dword:00000001




        $IClip - 


 $IClip  ࣠ ࠡ  ஬ .

 㬮砭 FAR,   /⠢ , ࠡ⠥  ஬  Windows. ப '$IClip'   ।   ४ ७ 堭 FAR  ࠡ / ᯮ짮   Windows.
⠥  ਣ.  襭  ४ ⭮    Windows 易⥫쭮.

$IClip


         ਬ

REGEDIT4

;᪠   䠩  㣮     ⨢
;F5 ShiftEnter CtrlIns - ਬ ⮡   䠩  ᨬ
;/  cmdline  ᪮쪮 뤥   䠩

[HKEY_CURRENT_USER\Software\Far\KeyMacros\Shell\CtrlAltLeft]
"Sequence"="$IClip $If (((Bof && APanel.Root) || !Bof) && PPanel.Visible)
$If (fexist(PPanel.Path+\"\\\\\"+APanel.Current) == 1) F5 ShiftEnter
CtrlIns Esc Tab Home Alt< ShiftIns Esc $End $End"
"DisableOutput"=dword:00000001

[HKEY_CURRENT_USER\Software\Far\KeyMacros\Shell\CtrlAltRight]
"Sequence"="$IClip $If (((Bof && APanel.Root) || !Bof) && PPanel.Visible)
$If (fexist(PPanel.Path+\"\\\\\"+APanel.Current) == 1) F5 ShiftEnter CtrlIns
Esc Tab Home Alt< ShiftIns Esc $End $End"
"DisableOutput"=dword:00000001




        $MMode - 


 $MMode   ० ᮢ ࠭  ६ ந뢠 ய᫥⥫쭮.
⠥  ਣ.

$MMode 1

ࠬ
1
⢥ ࠬ. ᥣ = 1.


         ਬ

REGEDIT4

;⠢ ⥪饣 ६

[HKEY_CURRENT_USER\Software\Far\KeyMacros\Common\CtrlT]
"Sequence"="$If (Editor || Dialog) $Date \"%H:%M:%S\" CtrlU Space
$Else $MMode 1 CtrlT $End"
"DisableOutput"=dword:00000001




        $Exit - 


 $Exit 뢠 믮 ய᫥⥫쭮.

$Exit


         ਬ

REGEDIT4

;㤠 뤥 ᨬ   ப

[HKEY_CURRENT_USER\Software\Far\KeyMacros\Common\ShiftDel]
"Sequence"="$If (Qview || Shell)
$If (!APanel.Visible) ShiftDel $Exit $End CtrlO ShiftDel CtrlO
$Else ShiftDel $End"
"DisableOutput"=dword:00000001
"NotEmptyCommandLine"=dword:00000001




        $XLat - 


 $XLat 뢠 㭪 ࠭᫨樨.

$XLat


         砭

1. ⠥ ᨬ  ⮣,   稫  TechInfo#10.


         ਬ

REGEDIT4

;XLAT ४ ᫥ ᫮

[HKEY_CURRENT_USER\Software\Far\KeyMacros\Shell\ShiftBS]
"Sequence"="CtrlShiftLeft $XLat CtrlRight"
"DisableOutput"=dword:00000001
"NotEmptyCommandLine"=dword:00000001




        $KbdSwitch - 


 $KbdSwitch 横᪨ ४砥 ᪫ .

$KbdSwitch




        $If - 


᫮  $If  ࣠    ⢫ ய᫥⥫쭮.

$If (Expr) TruePart [$Else FalsePart] $End

Expr
ࠦ

TruePart
믮, ᫨ ࠦ Expr ⨭.

FalsePart
믮, ᫨ ࠦ Expr .


         砭

1.  $Else   㪠뢠.


         ਬ

REGEDIT4

; 㤮 樨   Alt'o

[HKEY_CURRENT_USER\Software\Far\KeyMacros\Common\AltUp]
"Sequence"="$If (Viewer || Qview) Up $Else AltUp $End"
"DisableOutput"=dword:00000001




        $While - 


 横 $While  ࣠   横᪨  - " ᫮ Expr ⨭ 믮 ᫥⥫쭮 Sequence".

$While (Expr) Sequence $End

Expr
ࠦ

Sequence
믮,  ᫮ Expr ⨭.


         ਬ

REGEDIT

; 室  ᬮ 䠩

[HKEY_CURRENT_USER\Software\Far\KeyMacros\Shell\AltAdd]
"Sequence"="$While (APanel.Folder && !APanel.Eof) Down $End"
"DisableOutput"=dword:00000001




        $Rep - 


 横 $Rep  ࣠   横᪨  - "믮 Expr ࠧ ᫥⥫쭮 Sequence".

$Rep (Expr) Sequence $End

Expr
ࠦ

Sequence
믮,  ࠦ Expr  ⠭ ࠢ 0.
[FAR 2.0] ꥪ RCounter 뤠 0 稪 横: $rep(3) RCounter $end  뤠 321. ४ᨢ.  横  ᫥ 襭  横 ࠢ 0.


         ਬ

REGEDIT4

;室  FAR'a

[HKEY_CURRENT_USER\Software\Far\KeyMacros\Common\AltX]
"Sequence"="$If (Editor && (Editor.State & 0x8)) F2 $End $Rep (2)
$If (!Shell) Esc $End $End F10"
"DisableOutput"=dword:00000001




        㭪樨


 ய᫥⥫쭮 ᪠ ᫥騥 㭪樨:

         ⥬᪨ 㭪樨

   N=abs(N)      頥 ᮫ 稭 ᫮ 㬥 {N}.

   N=max(N1,N2)  頥 ᨬ쭮 祭   ᫮묨 㬥⠬ {N1}  {N2}.

   N=min(N1,N2)  頥 쭮 祭   ᫮묨 㬥⠬ {N1}  {N2}.

   N=mod(N1,N2)   {N1}   {N2}.

   N=int(V)      ਢ 祭 ࠦ {V}  .


         ப 㭪樨

   N=index(S1,S2)   ᫨ ப {S2} ᮤন  ப {S1},  頥  ,  -1.

   N=rindex(S1,S2)  ᫨ ப {S2} ᮤন  ப {S1},  頥  ,  -1.     ப {S1}.

   Result=replace(Str,Find,Replace[,Cnt])    ப {Str}  ப {Find}  ப {Replace Cnt} ࠧ (㪠 {Cnt} ࠢ 0    ࠬ     ப).
   頥 १ .

   N=asc(S)   頥  ᨬ {S}.  FAR 2.0 頥  Unicode,  FAR 1.7x - OEM ( ⮡ࠦ  OEM ᨬ Unicode   䠩   63 -  ᨬ '?').

   S=chr(N)   頥 ᨬ,   {N}.
              ᪮ ᯮ Unicode FAR 2.0: asc(chr(256))==256  (FAR 1.7x  0)

   S=itoa(N[,Radix])    楫 ᫮ {N}  ப. 祭 {Radix} । ,   ᯮ짮  ८ࠧ ᫠ {N}. ⨬ 祭 {Radix}  2  36.
   ᫨ ࠬ {Radix}  㪠,  ࠧ㬥  10.

   N=len(V)   頥  ࠦ {V}. ᫮ 祭 ࠦ {V} ਢ  ப, ᫥ 祣   ப).

   S=string(V)   ॢ 祭 ࠦ {V}  ப.

   S=substr(V,N1[,N2])   頥 ப  ࠦ {V} 稭  樨 {N1}  {N2}.
   ᫨ ࠬ {N2}  㪠  ࠢ 0,  ୥ ப  樨 {N1}   ப.
    FAR 2.0 ন ⥫ 祭 N1,N2,   FAR 1.71/1.75 - .
    FAR 1.71 substr("...",0,0) 頥  ப,   ,  ᫥  

   S=trim(V[,N])   [FAR 1.75/2.0]   ஡ ᨬ (஡, ⠡樨, ॢ ப   ⪨)  ப V ᭠㦨 (N=0   㪠), ᫥ (N=1)  ࠢ (N=2).
    ᯮ짮 ஢ eval("trim(0)")==0  ࠧ祭  1.71 (頥 1:訡)  1.75/2.0 (頥 0:ᯥ譠 )

   S=xlat(S)   頥 ࠭᫨㥬 ப
   㭪 筠 ப $XLat,  ᯮ  ࠦ. ப 㬥 {S} 易⥫.

   S=lcase(S)   ८ࠧ ப {S}   ॣ.

   S=ucase(S)   ८ࠧ ப {S}  孨 ॣ.

   S=date(format)   頥 ⥪ /६  ଠ {format} (ᠭ {format} .  $Date).
   㭪 筠 ப $Date,  ᯮ  ࠦ. ப 㬥 {format}  ⫨稨  ப $Date 易⥫.


          㭪樨

   S=fsplit(path,N)     {path}    頥  ,  ᨬ   䫠 {N}:
     0x00000001  騩   ଠ "C:".  --  FAR3 ⢨⥫쭮 "C:",   FAR1  FAR2 "C:\",  ᫨ path=="C:"
                  ⥢ ⠫ - "\\server\share"
     0x00000002    ଠ "\Program Files\Far\"
     0x00000004  
     0x00000008  ७  ଠ ".EXT"  , ᫨ ७ .

   N=fexist(S)   ஢ ⢮ 䠩/⠫ {S} (頥 0  1).
    ࠬ {S} ᪠ ᯮ짮 ᨬ '*'  '?'.  ⮬ 砥 㭪 ஢ ⮫쪮 ࢮ 宦 䠩/⠫.
   㭪  ࠡ⠥  ﬨ.

   N=fattr(S)   頥 䠩 ਡ 䠩/⠫ {S}
     0x00000001  FILE_ATTRIBUTE_READONLY.  ⮫쪮  ⥭. ਫ   ⠪ 䠩,    뢠  㤠 .
     0x00000002  FILE_ATTRIBUTE_HIDDEN.  .  䠩  砥   ⨭ ⠫.
     0x00000004  FILE_ATTRIBUTE_SYSTEM.  䠩 -  樮 ⥬.
     0x00000010  FILE_ATTRIBUTE_DIRECTORY.  ⠫.
     0x00000020  FILE_ATTRIBUTE_ARCHIVE.  娢 䠩. ਫ  ᯮ짮  䫠  ஢, 娢஢  㤠.
     0x00000080  FILE_ATTRIBUTE_NORMAL.  ⮣ 䠩  ⠭ 㣨 ਡ.  祭 ४⭮ ⮫쪮  ᯮ짮  ⠫ 䫠.
     0x00000100  FILE_ATTRIBUTE_TEMPORARY.  ६ 䠩. ਫ  뢠  ⠪ 䠩 ⮫쪮  ࠩ 室.    䠩 室     뢠  , ⠪  䠩 㤥 㤠.
     0x00000200  FILE_ATTRIBUTE_SPARSE_FILE.   .. "Sparse file".
     0x00000400  FILE_ATTRIBUTE_REPARSE_POINT. ⠫  ᨬ᪮ .
     0x00000800  FILE_ATTRIBUTE_COMPRESSED.   ⠫ ᦠ.  䠩  砥,     ᦠ,  ⠫ -    㬮砭 ਬ  ᥬ  䠩  ⠫.
     0x00001000  FILE_ATTRIBUTE_OFFLINE.  䠩  㯭 ।⢥. 砥,  ॠ  䠩 뫨 䨧᪨ ६饭  ன⢠ ࠭.
     0x00002000  FILE_ATTRIBUTE_NOT_CONTENT_INDEXED.  䠩  ⠫   ஢ 㦡 ஢.
     0x00004000  FILE_ATTRIBUTE_ENCRYPTED.   ⠫ ஢.  䠩,  砥,     䠩 ஢.  ४,  砥,  ஢  㬮砭   ᮧ 䠩  ⠫.
     0x00010000  FILE_ATTRIBUTE_VIRTUAL.  䠩 - 㠫 䠩.
   ᫨ 䠩 ꥪ  , 㭪 頥 -1.
    ࠬ {S} ᪠ ᯮ짮 ᨬ '*'  '?'.  ⮬ 砥 㭪 頥 ਡ ⮫쪮  ࢮ  䠩/⠫.
   㭪  ࠡ⠥  ﬨ.

   N=testfolder(S)  [FAR 2.0] ஢ઠ 㯭 ⠫


         

   N=panel.fexist(panelType,S)   ஢ ⢮ 䠩/⠫ {S}  ⨢ ({panelType}=0)  ᨢ ({panelType}=1)  (頥 0  1;  FAR 2.0 頥 0  浪  >= 1).  ६  室  ਠ   ⮬,  ਠ  䠩  .
    ࠬ {S} ᪠ ᯮ짮 ᨬ '*'  '?'.  ⮬ 砥 㭪 ஢ ⮫쪮 ࢮ 宦 䠩/⠫.
   㭪 ࠡ⠥ ⮫쪮  ﬨ.

   N=panel.fattr(panelType,S)   頥 䠩 ਡ 䠩/⠫ {S}  ⨢ ({panelType}=0)  ᨢ ({panelType}=1) .
   ਡ ⠪ ,   N=fattr(S)
   ᫨ 䠩 ꥪ  , 㭪 頥 -1.
    ࠬ {S} ᪠ ᯮ짮 ᨬ '*'  '?'.  ⮬ 砥 㭪 頥 ਡ ⮫쪮  ࢮ  䠩/⠫.
   㭪 ࠡ⠥ ⮫쪮  ﬨ.

   V=panelitem(panelType,itemIndex,propIndex)   頥 ࠧ ଠ    {itemIndex} (稭  1)  ⨢ ({panelType}=0)  ᨢ ({panelType}=1) . {propIndex}     ᫥ 祭:
    0  String   䠩/⠫
    1  String  ⪮ 
    2  Number   ਡ
    3  String  /६ ᮧ
    4  String  /६ ᫥ 㯠
    5  String  /६ 䨪樨
    6  Number  
    7  Number   ࠧ ***
    8  Number  "뤥?"
    9  Number  ⢮ ⪨ 痢 (hard link) ***
    10  Number  SortGroup
    11  String   ᠭ 䠩 ( descript.ion / files.bbs) *** !!! FAR 2.0 , ᫨  index(panelitem(0,apanel.curpos,12)+"","text")  +""
    12  String    ***
    13  Number  CRC32
    14  Number      ⥭ 䠩 ⥬
    15..21  ७ FAR 2.0 (Change Date,    ᫠, -  騩 ࠧ ୠ⨢ ⮪ )

     "ॢ " 頥 ⮫쪮  䠩 ({propIndex}=0), ⠫ 祭 {propIndex} .
   /६ 頥  ଠ DD.MM.YYYY HH:MM:SS. ⥫  冷     ॣ ஥,   ࠧ , ᪨, ⠪    ଠ    CtrlA.    ଠ  ᪨  .
    祭   ⥪饬 䠩 ( ஬) {itemIndex}   ࠢ 0.
    FAR2  panelitem(...)  Panel.Item(...)
   ***      饭 ⮥ 祭 ᫨ ०    ⮡ࠦ ( CompressedSize = Uncompressed). ᫨ ३  ⮡ࠦ騩 ०  ⭮,  祭  

   N=panel.setpos(panelType,fileName)   樮      {fileName}  ⨢ ({panelType}=0)  ᨢ ({panelType}=1) .
   頥    0, ᫨ ⠪    .
   ਬ, ᮧ ⠫  , ᮮ⢥騬 ⥪饩   ଠ YYYYMMDD, ᫨ ⠫  - 樮஢   :

%dt=date("%Y%m0%d");
$If (fexist(%dt))
  panel.SetPos(0,%dt)
$Else
  F7 $Text %dt Enter
$End

   N=panel.setpath(panelType,pathName[,fileName])    ⨢ ({panelType}=0)  ᨢ ({panelType}=1)  ⠢ ᪮ ( !) ⠫ {pathName}  樮      {fileName} (᫨ 㪠 ࠬ {fileName}).
   頥 1  砥 ᯥ譮 ⠭ ⠫  0, ᫨ ⠫  .
   ⨢   ᮮ魨  訡, ᫨ 㪠 ⠫ 㯥
   ਬ,  ⨢  ⠢ ⠫ "C:\WINDOWS",  ᨢ - "C:\Program Files", ⨢  ᤥ ᫥  ⠭   ⠫ "FAR":

$if(APanel.Left) CtrlU $End
panel.SetPath(1,"C:\\WINDOWS")
panel.SetPath(0,"C:\\Program Files","FAR")

   N=panel.setposidx(panelType,indexItem)   樮     ᮬ {indexItem}  ⨢ ({panelType}=0)  ᨢ ({panelType}=1) .
   頥    0, ᫨ ⠪    .


         ࠢ騥 㭪樨

   V=iif(Cond,True,False)   ᫮ . ᫨ ᫮ {Cond} ୮,  頥 {True}-ࠦ,  {False}-ࠦ.


         । ᯮ

   S=env(V)   頥 祭 ६ । V, ਬ,

$if (Env("FARLANG") == "English") {- } $end

   B=msave(S)   ࠭ 祭 쭮 ६   {S}   Vars.  砥 㤠 頥 0.
   ਬ,

%%GlobalVars="Foo Bar"; %a=msave("%%GlobalVars");

   B=mload(S)   [FAR 2.0] 㧨 ६   S   ॥ Vars
     1   ⠪   ॥, ६ ⠭  㯭
     0   ⠪  ६

   V=akey(N)   頥    , 맢襩 ய᫥⥫쭮. {N} = 0 - 頥  , {N} = 1 - 頥  .
   ਬ .  ᠭ $AKey

   V=clip(Cmd,S)    ந ࠧࠧ 樨  Clipboard  ᨬ   {Cmd}:
     0  頥   Clipboard; ࠬ {S} ;  砥 訡 頥 0
     1   ப {S}  Clipboard;  砥 訡 頥 0
     2   ப {S}  Clipboard;  砥 訡 頥 0
     3  ஢ Windows Clipboard  ७  ; ࠬ {S} ;  砥 訡 頥 0
     4  ஢ ७    Windows Clipboard; ࠬ {S} ;  砥 訡 頥 0
   ਬ,   Clipboard ᯨ᮪ ⬥祭 䠩  ଠ CSV (  ࠧ):

Clip(1,"Name;Size\r\n")
Home
$While(!APanel.Eof)
  $If(!APanel.Folder && PanelItem(0,0,8))
     Clip(2,PanelItem(0,0,0)+";"+PanelItem(0,0,6)+"\r\n")
  $End
  Down
$End
   . ⠪  $IClip, IClip.

   V=flock(Nkey,NState)    ४ ﭨ Lock- (NumLock, CapsLock  ScrollLock).
    {Nkey}:
     0  NumLock
     1  CapsLock
     2  ScrollLock
   ﭨ {NState}:
     -1   ﭨ 
     0   
     1   
     2  ४   ⨢ ﭨ
    Windows 95/98/Me 㭪   ⮫쪮 ﭨ  CapsLock  ScrollLock.   NT (NT/2000/XP/...) ⮣ ࠭祭 .
   㭪 ਧ ( ᠭ ), ⮬ 짮   ஦. ।⠢  ஡  ࠪ⨢  

macro:post $MMode 1 $Rep(50) sleep(100) $Text flock(1,-1) Space $end

   ਬ, , 襭  CtrlCapsLock (४祭  )    離:

CtrlShiftTab
%a=flock(1,-1)&1;
$while((flock(1,-1)&1)==%a)
  sleep(50)
  flock(1,2)
$end

   N=sleep(N)   ࣠ প    {N} ᥪ㭤. ⥫쭮 祭 প ⠥ 訡  㭪 頥 0.

   S=waitkey(N)       頥  . ᫨ ६  {N} (ᥪ㭤) ⥪, 㭪 頥  ப.

   N=eval(S)   "ந" ய᫥⥫쭮  ப {S}. ᫨ {S} ᮤন ᨭ⠪᪨ 訡,  ய᫥⥫쭮 ᯮ  㤥.
   FAR  ᫥⥫쭮 {S}. ᫨  訡,  ﭨ ⥪饣  ࠭  稭 믮 ᫥⥫쭮 {S}. ᫥ ᯮ {S} ࢠ  த ࠡ.
    S  $exit 믮 室  S,    뢠饣 .

   㭪 頥 0  砥 ᯥ譮 樨 ᫥⥫쭮 {S}.

    ६ - 騥  ⥪饣 ᯮ塞   ய᫥⥫쭮, ᯮ塞 㭪樥 eval.

   ਬ, 室  F10 ᪠  ஢  ⠫  ⨢ , ᮤন  ப  ࠭.
     Vars  2 ப ६ ய楤, 뢠騥 ࠭  ⠭ ᮤন  ப:

%%CmdSave=$If (!CmdLine.Empty) %Flg_Cmd=1;
          %CmdCurPos=CmdLine.ItemCount-CmdLine.CurPos+1;
          %CmdVal=CmdLine.Value; Esc $End

%%CmdRestore=$If (%Flg_Cmd==1) $Text %CmdVal
          %Flg_Cmd=0; %Num=%CmdCurPos;
          $While (%Num!=0) %Num=%Num-1; CtrlS $End $End
   F10 蠥 :

$If (APanel.Visible && (!APanel.Plugin || (!APanel.Bof &&(APanel.OPIFlags & 0x20))))
  Eval(%%CmdSave)
  $If (APanel.Current == "..")
    .
    ShiftEnter
  $Else
    "%SystemRoot%\\explorer.exe /select,"
    $If (Apanel.LFN)
      CtrlN
    $End
    CtrlEnter
    $If (!Apanel.LFN)
      CtrlN
    $End
    Enter
  $End
  Eval(%%CmdRestore)
$End


         ⢨  짮⥫

   N=msgbox(Title,Text[,Flags])    뢠 ᮮ饭 {Text}   {Title}.  ࠬ {Text} ப ࠧ ᨬ '\n'.
   {Flags}   ஬ ᫥ 祭:
     0x00000001  ᯮ 梥 "।०" (筮  㪢  ᭮ 䮭).
     0x00000008   ᮮ饭  ப .
     0x00000010  ᯮ짮  ப ᮮ饭 ࠢ  ( 㬮砭 ப 뢮  業).
     0x00010000  뢮  <Ok>
     0x00020000  뢮  <Ok>  <Cancel>
     0x00030000  뢮  <Abort>, <Retry>  <Ignore>
     0x00040000  뢮  <Yes>  <No>
     0x00050000  뢮  <Yes>, <No>  <Cancel>
     0x00060000  뢮  <Retry>  <Cancel>
   ᫨ ࠬ {Flags} ࠢ 0 (  㪠),  뢮 ⠭    <Ok>
   㭪 頥 0, ᫨ 짮⥫ ⬥ ᮮ饭  ࠭   ( ࢮ  - 1,  ன - 2  ⠪ ).
    ࠢ   ᯮ ⮪ , ନ㥬 ᮬ, .. ᮮ饭 ᥣ 㤥 ࠪ⨢.

   N=Beep([Id])   [FAR 2.0] ⠭ 㪮 䥪 Windows
     0x00000040  񧤮窠
     0x00000030  ᪫栭
     0x00000010  ᪠ 訡
     0x00000020  
     0x0        ⠭ 
     0xFFFFFFFF ⠭   ஥ ; ???  ࠪ⨪  ,   beep(0),  
     㭪 頥 1  0 ( 砥 㤠).

   S=prompt("Title"[,"Prompt"[,flags[, "Src"[, "History"]]]])   㭪    ப ⥪.
   ࠬ: {Title} -  , {Prompt} - ਣ襭  , {Src} - 砫쭮 祭 ப , {History} -  ਨ 
   {Flags}   ஬ ᫥ 祭 ( ⠭⠬ FIB_*):
     0x00000001   ᫨ ப   㭪 ୥ 祭 ⮥ 祭.
     0x00000002  ᯮ   ஫ -  ⥪  ࠭ ᮢ뢠 ᨬ '*'.
     0x00000004  ᫥ ᯥ譮 ,  १饬 祭 {S} 䨪 ६ 㦥    祭, ਬ, ᫨ 짮⥫  '%TEMP%',  DestText 㤥 ᮤঠ 'C:\TEMP'.
     0x00000008   ᯮ짮 ।饥 祭  ਨ, ⠢ ப  ⮩; 㠫, ᫨ 㪠 ⮩ ࠬ {History}.
     0x00000010   ࠧ⥫    [Ok]  [Cancel].  㢥  2 ப.
     0x00000020   뢠  ਣ襭  ᠭ, ᯮ짮   । 祩 .
   㭪 頥 ப -  짮⥫ 祭.
   ਬ,  ஫  뢥 
   %s=prompt("Password","Input password:",0x02); $Text %s


          ࠢ

   N=checkhotkey(S)   頥 1 ( 浪    FAR 1.75/2.0), ᫨      {S}  ⥪騩 "ꥪ" - .  ⨢ 砥 頥 0 ( FAR 1.75/2.0 頥 -1  맮  ,   hotkeys - MainMenu, Menu, Disks, UserMenu,  0 ᫨ 祣  ).
   ਬ,   맮  (F11)  S&R 祭   '7'. ᫥⥫쭮 ப  ।:
   F11 $if (checkhotkey("7")) 7 1 $else Esc AltF7 $end
   맮 , ᫨ ⪥ 祭  ⠭  ᪠, ᫨ ⪥  祭.

   S=gethotkey(N)   頥 ⪥ {S}  㭪 {N}, ᫨       ⥪騩 "ꥪ" - .  ⨢ 砥 ( ;  ⪥; N  祬 ⢮ 㭪⮢ ) 頥 0.
    {N} -   ᯨ᪥  1 (0 - ⥪).

   N=Menu.Select(S[,N])     樮    㭪, ᮤঠ騩 ப {S}.  ப   ᨬ  㪠 ० {N}:
     0   ᮢ
     1  ᮢ  砫 ப  --  FAR 1.71 ࠡ⠥   ப,  FAR 1.75/2.0 -   㪢   (᫨ )  ஡ ᫥ 
     2  ᮢ   ப
     3  稥 ப           --  ন  FAR 1.71
    ॣ஭ᨬ. ᫨ ⠪ 㭪 ,  祣  .
   頥: 0=訡  樮஢ ( 㭪  㭪 ᠡ),  -  㭪 .
   F11 $if(Menu.Select("Advanced compare",0) > 0) Enter $end
   ᫨ ࠬ {N}  㪠, ࠧ㬥  ᮢ.


   B=Menu.ItemStatus([N])  [FAR 2.0] 頥  襬 ᫮  ⮢ 䫠 - ﭨ 㭪   ஬ Pos (⥪  - Pos=0   㪠):
           ᠭ 
     0x00000001 ਧ ⨢ 㭪 . 쪮  㭪   ⨢. 
     0x00000002 ਧ ⬥祭 㭪 . । ⥪⮬ 㤥 ⮡ࠦ ⪠ 롮. 
     0x00000004 㭪  ⮡ࠦ  ࠧ⥫. 
     0x00000008 㭪  㯥 
     0x00000010 ᫨ 䫠 ⠭,  㭪  㯥  樨,   㯥  롮. 
     0x00000020 ᫨ 䫠 ⠭,  㭪   뢮  ࠭. 
      襬 ᫮ -  ᨬ ⪨ (U+XXXX).
     ᫨ ⠢ 䫠 0x00000002  襥 ᫮ ࠢ 0,  Far ᯮ ᨬ ⪨ U+221A. 
     ᫨ ⠢ 䫠 0x00000002  襥 ᫮  ࠢ 0,  Far ᯮ ᨬ ⪨  襣 ᫮. 
$If(menu.itemstatus() & 0x00000002)
  msgbox("Selected", chr(menu.itemstatus()>>16))
$Else
  msgbox("Not Selected")
$End
     㭪 ࠡ⠥  ᥬ 㭪⠬ ,  ⮬ ᫥  ⥬,      ⮡ࠦ ( 㭪 뢠  樨).
     ᫨ ⥪騩 "ꥪ"     Pos  ( 0   ⢠ 㭪⮢  ),  㭪 頥 祭 -1 (  ⠭).

   S=Menu.GetValue([N])    [FAR 2.0] 頥 ⥪ 㭪   ஬ Pos.
     ᫨ ⥪騩 "ꥪ"     Pos   ( 0   ⢠ 㭪⮢  ),  頥  ப.
     ᫨ Pos  㪠  ࠢ 0,  ⢨ 筮 ਬ Menu.Value.
        .

   S=Menu.Value            [FAR 2.0]   ਨ  뤠 cmdline.value


   V=Dlg.GetValue(ID,Type)    ࠧ 祭 ⥪饣 .
   {ID} -    ( 㬥  1; 0 - ᠬ  ).
   {Type} - ⨯ 砥 ଠ樨,   ⨯ .  ᠬ  (ID=0) ⨬ ᫥騥 祭:
     0  Number  ⢮ ⮢ 
     2  Number  X1
     3  Number  Y1
     4  Number  X2
     5  Number  Y2
     6  Number  ID ⥪饣 , 饣 _ 䮪 _
    ⮢  ⨬:
     0  Number  CheckBox  ﭨ ४⥫
     0  Number  RadioButtons  ﭨ ४⥫
     0  String  ListBox  祭 ⥪饣  ᯨ᪠
     0  String  ComboBox  祭 ⥪饣  ᯨ᪠
     0  String  ⠫  ⮢ 祭 ( FarDialogItem.Data)
     1  Number      >> ../../dialogapi/controls/index.html
     2  Number    X1 ⭮⥫쭮 
     3  Number    Y1 ⭮⥫쭮 
     4  Number    X2 ⭮⥫쭮 
     5  Number    Y2 ⭮⥫쭮 
     6  Number      䮪?
     7  Number  CheckBox  ﭨ ४⥫
     7  Number  RadioButtons  ﭨ ४⥫
     7  String  ListBox     ᯨ᪥ ( 㭪 ᯨ᪠ = 1)
     7  String  ComboBox     ᯨ᪥ ( 㭪 ᯨ᪠ = 1)
     7  Number  ⠫  0
     8  Number      >>../../dialogapi/flags/index.html
     9  Number    , 騩,      "⮬  㬮砭".
     10 String  ⠫  ⮢ 祭 ( FarDialogItem.Data)
   頥 -1, ᫨ {ID}  ⢠ ⮢   祭 {Type}  ন.

   V=Editor.Set(Idx,Var)    ⥪饩  ।  ன.
     0  Number   ⠡樨
     1  Number  ८ࠧ ⠡樨
     2  Number  ﭭ 
     3  Number  Del 㤠 
     4  Number  ⮮
     5  Number  ⮮। ⠡ ᨬ
     6  Number  AnsiTableForNewFile
     7  Number    । ப
     8  Number    BackSpace (TechInfo #13)
     9  Number  ।⠢  ᨬ  ஬  ᭮ ப (TechInfo #32)
     10 Number  ࠭  䠩
     11 Number  ࠭ 
     12 String   ࠧ⥫ ᫮ (TechInfo #1)
     13 Number  EditorF7Rules (TechInfo #18)
     14 Number  AllowEmptySpaceAfterEof (TechInfo #67)
   祭 {Var}   ࠢ -1,  ⮬ 砥 㭪 祣  ,  ୥ ⥪饥 祭 ன.
   頥 ।饥 祭 権  -1, ᫨  㪠 ४⭮.
   ਬ, , ६騩 뤥 ࠣ   ப :
   $IClip CtrlX %a=Editor.Set(2,1); Down CtrlV %a=Editor.Set(2,%a);


           

   N=BM.Add()    ⥪騥 ࠬ   १ 墮 (   ᮬ  ⥪饣).

   N=BM.Clear()     

   N=BM.Del(Idx)      㪠 ᮬ {Idx} (㬥 稭  1). ᫨ ࠬ {Idx}  㪠  ࠢ 0 - 㤠 ⥪ . FAR 1.71   맮 BM.Del()  Idx.

   N=BM.Get(Idx,M)    ࠬ   ᮬ {Idx} (㬥 稭  1), Idx=0 - ⥪ .
   ࠬ {M}     ᫥:
     0  ᪨  ப  䠩 (稭  1)
     1  ᪠   ப (稭  1, ᨬ ⠡樨  1 )
     2  㠫쭠 , ᮮ⢥ ࢮ  ᨬ ⥪  ࠭ ᫥ (稭  1)
     3  㠫  ப ⭮⥫쭮 砫 ࠭ (稭  1)

   N=BM.Next()   ३  ᫥ .  맮 ᫥ BM.Clear() BM.Add() 室   .

   N=BM.Prev()   ३  । .  맮 ᫥ BM.Clear() BM.Add() 室   .

   N=BM.Stat([M])    ଠ  .
   ࠬ {M}     ᫥:
     0  ⥪饥 ⢮ 


         砭

1. 㭪樨 ࠡ   BM.XXX() 㯭 ⮫쪮  ।.

2. ࠬ 㭪権, 祭   ᪮   㪠뢠. 祭  㬮砭 .  ᠭ 㭪権.

3.  ࠭ 䨧᪮   ⥪   , 筮 짮⥫᪨ , ᮧ  RCtrl0..RCtrl9.




        㫥 ﭨ


  $If  $While ᪠ ਬ ᫥騥 祢 ᫮  ⢥ ᫮ (᫥ 㫥 ):


         ஢ઠ ,  ன ᯮ    ய᫥⥫쭮

   Shell           䠩 
   Viewer          ७ ணࠬ ᬮ
   Editor          ।
   Dialog          
   Search             
   Disks            롮 ᪮
   MainMenu        ᭮  ()
   Menu            稥 
   Help            ⥬ 
   Info            ଠ樮 
   QView            ண ᬮ
   Tree             ॢ 
   FindFolder       ᪠ 
   UserMenu        짮⥫᪮ 
   Other           ० ஢ ⥪  ࠭
   AutoCompletion  [FAR 2.0] ???


         ஢ઠ ﭨ 

   APanel.Bof
   PPanel.Bof        ⥪騩    砫 ᯨ᪠?
   APanel.Eof
   PPanel.Eof        ⥪騩     ᯨ᪠?
   APanel.Empty
   PPanel.Empty       ?
   APanel.LFN
   PPanel.LFN          "  䠩"?
   APanel.Selected
   PPanel.Selected      ⬥祭 䠩/?
   APanel.Root
   PPanel.Root         ୥ ⠫?
   APanel.Visible
   PPanel.Visible     ?
   APanel.Plugin
   PPanel.Plugin      ?
   APanel.Folder
   PPanel.Folder     ⥪騩   - ?
   APanel.Left
   PPanel.Left        ᫥?
   APanel.FilePanel
   PPanel.FilePanel  䠩 ?
   APanel.Filter
   PPanel.Filter     [FAR 2.0] 祭    䨫?


         ஢ઠ ࠧ ﭨ  ப

   CmdLine.Bof         砫 .ப
   CmdLine.Eof          .ப
   CmdLine.Empty      ப 
   CmdLine.Selected  뤥    ப.


         ஢ઠ ࠧ ﭨ,  ᨬ  ⥪ ᯮ 

   Bof         ⨣ 砫 䠩  ।, ணࠬ ᬮ;   - ⥪騩    砫 ᯨ᪠;  ப    -  砫 ப;  ᯨ᪠/ - 㪠⥫ ⠭  ࢮ 㭪.
   Eof         ⨣  䠩  ।, ணࠬ ᬮ;   - ⥪騩     ᯨ᪠;  ப    -   ப;  ᯨ᪠/ - 㪠⥫ ⠭  ᫥ 㭪
   Empty        ப  (᫨ ⥪  Shell); ப  ;  ।/ணࠬ ᬮ ⮩ 䠩; ᯨ᮪ .
   Selected    뤥   ப ,  ।  ணࠬ ᬮ, 뤥    ப (᫨ ⥪  Shell).
   IClip       FAR ࠡ⠥  ७ ஬ ? (. '$IClip')
   Windowed    FAR ࠡ⠥   ०?
   Fullscreen  [FAR 2.0] 1 ᫨ FAR  ࠭ ०, 0 -  
   IsUserAdmin [FAR 2.0] 1 ᫨ FAR 饭  ਢﬨ , 0 - 


         ஢ઠ 䫠 ப

   DisableOutput   饭 ᮢ ࠭?




        ﭨ


         

                    ᠭ
   APanel.ItemCount
   PPanel.ItemCount    Number  ᮤন ⢮ 䠩 ꥪ⮢  
   APanel.SelCount
   PPanel.SelCount     Number  ᮤন ⢮ 뤥 䠩   (᫮)
   APanel.CurPos
   PPanel.CurPos       Number  ᮤন 浪  䠩 ꥪ  
   APanel.Current
   PPanel.Current      String  ᮤন  䠩  ஬ (ப)
   APanel.Path
   PPanel.Path         String  ᮤন   ( ⥫쭮 '\',  .. C:).  砥    FAR 1.7x 頥 ᪮ ,  FAR 2.0 -   娢
   APanel.Path0
   PPanel.Path0        String  [FAR 2.0] ᮤন   (୥ ⠫ 蠥 襬: C:\ )
   APanel.Prefix
   PPanel.Prefix       String  [FAR 2.0] 䨪   ("reg", "tmp"  ..)
   APanel.Hostfile
   PPanel.Hostfile     String  [FAR 2.0]   䠩 娢   娢, "" 
   APanel.UNCPath
   PPanel.UNCPath      String  ᮤন UNC-  ( ⥫쭮 '\');  FAR 1.71  娢 ⮩,  FAR 1.75  娢 = InArchivePath,  FAR 2.0  娢 = Hostfile/InArchivePath
   APanel.Width
   PPanel.Width        Number  ᮤন ਭ 
   APanel.Height
   PPanel.Height       Number  ᮤন   ( 㦥  FAR 1.71.2358)
   APanel.ColumnCount
   PPanel.ColumnCount  Number  ᮤন ⢮    䠩
   APanel.Type
   PPanel.Type         Number  ᮤন ⨯ :
     祭 ᠭ
     0    
     1   ॢ 
     2    ண ᬮ
     3   ଠ樮 

   APanel.DriveType
   PPanel.DriveType   Number   ᮤন ⨯ ਢ  :
     祭 ᠭ
     -1    
     0     㤠 । ⨯ ਢ
     2     ਢ
     3    ⪨ 
     4    ⥢  
     5    CDROM
     6    㠫 
     15   SUBST-

   APanel.OPIFlags
   PPanel.OPIFlags   Number    ᫥ 祭   (᫨   ,  祭 㤥 = 0):
     祭     ᠭ
     0x00000001   ᯮ 䨫  
     0x00000002   ᯮ 㯯 ஢  
     0x00000004   ᯮ ᪠ 䠩  
     0x00000008   OPIF_ADDDOTS ( ".."?  㬥஢,  plugin.hpp)
     0x00000010       롨 ᨬ  ஥ FAR
     0x00000020   ᯮ ⠭⭠ ࠡ⪠ 䠩 FAR', ᫨ 襭   ন ; ᫨  䫠 㪠,       ॠ 䠩
     0x00000040      ⥩
     0x00000080    䠩 ஢  ࠢ 
     0x00000100    䠩   ਣ쭮 ॣ (ᨬ  ஥ FAR)
     0x00000400   OPIF_COMPAREFATTIME
     0x00000800   OPIF_EXTERNALGET
     0x00001000   OPIF_EXTERNALPUT
     0x00002000   OPIF_EXTERNALDELETE
     0x00004000   OPIF_EXTERNALMKDIR
     0x00008000   OPIF_USEATTRHIGHLIGHTING
     0x00010000   OPIF_USECRC32


         

   Dlg.ItemCount  Number   ⢮ ⮢ 
   Dlg.CurPos     Number    ⥪饣 䮪᭮  

   Dlg.ItemType   Number   ⨯ 䮪᭮  
     祭 ᠭ                                  祭  FAR 1.75/2.0
     0   訡; ਬ, Dlg.ItemType 맢       -1
     1                                                4
     2     ஫                                     5
     3     䨪஢ ࠧ                     6
     4    (Push Button)                                  7
     5   ஫ ४⥫ (Check Box)                 8
     6   ୠ  (Radio Button)                     9
     7   ஢ ᯨ᮪                                10
     8    ᯨ᪠                                           11
     9    ࠢ, ।塞 ணࠬ⮬        255
     11   ᯨ᪠  䠩  AltF7                 (11)
     0x8001   롮  ਨ                        0x8004
     0x8007   롮  ஢ ᯨ᪠                 0x800A

   Dlg.info.id    String  [FAR 2.0] GUID,  "{431A2F37-AC01-4ECD-BB6F-8CDE584E5A03}"


          ப

   CmdLine.ItemCount   Number   ⢮ ᨬ   ப
   CmdLine.CurPos   Number   ⥪     ப
   CmdLine.Value   String   ᮤন  ப


         

   Editor.FileName String    ।㥬 䠩
   Editor.CurLine  Number   ⥪饩   । (ࢠ ப ࠢ 1)
   Editor.CurPos   Number  ⥪    ப  । (砫 ப ࠢ 1).  㠫쭠,   "䨧᪮" ᬥ饭, .. ᨬ ⠡樨   ᪮쪮 権.
   Editor.RealPos  Number  ⥪    ப  । (砫 ப ࠢ 1)  ਢ離  ࠧ ⠡樨
   Editor.Value    Value   ᮤন ⥪饩 ப  ।  ஬.
   ਬ,  ⥪騩 ᨬ  ஬ (㤥 ࠡ ⮫쪮 ᫨  ⠡権!)

    MsgBox(substr(Editor.Value,Editor.CurPos-1,1),Editor.FileName,0)

   Editor.Lines   Number   ⢮ ப  ।
   Editor.State   Number   ࠧ ﭨ ⥪饣 । -  ⮢ 䫠:
     祭     ᠭ
     0x00000001   䠩 ᮢ襭    ᯥ 㤠
     0x00000002   ࠧ襭 ४祭    F6
     0x00000004   ᫥  । 㤠 䠩
     0x00000008   ।㥬 䠩 ஢ ( ᭮ ப ।  ᨬ '*')
     0x00000010    稨  뤥  
     0x00000020    稨  뤥 ⨪ 
     0x00000040   ।㥬 䠩   ᥠ ।஢
     0x00000080     ० 
     0x00000100     뫠  
     0x00000200   । ஢ (ReadOnly)
     0x00000400   ᯮ ﭭ 
   ਬ,

   $If (Editor.State & 0x8) 믮 ⢨, ᫨ 䠩 ஢ $End


         ணࠬ ᬮ

   Viewer.FileName   String     ᬠਢ 䠩
   Viewer.State   Number   ࠧ ﭨ ⥪饩 ணࠬ ᬮ -  ⮢ 䫠:
     祭     ᠭ
     0x00000001   祭 ⮮। ⠡ ᨬ
     0x00000002    ᯮ ⠡ ᨬ  ⥪  ஢ ANSI
     0x00000004   ० Unicode
     0x00000008   祭 ७ ப
     0x00000010   ᯮ ७ ப  ᫮,    㪢
     0x00000020   ⠢ 16- ०
   ਬ,

   $If (Viewer.State & 0x20) 믮 ⢨, ᫨ ⠢ 16- ० $End


          롮 ᪮

   Drv.ShowPos    Number     (AltF1, 祭 1)  ࠢ (AltF2, 祭 2)  맢  롮 ᪮.
   Drv.ShowMode   Number   䫠 ⮡ࠦ  롮 ᪮;  ⮢ 䫠:
     祭     ᠭ
     0x00000001   祭  ⨯ ᪮
     0x00000002   祭  ⥢  ( , 樨஢  SUBST-᪮  NT)
     0x00000004   祭  ⪨ ᪠
     0x00000008   祭  ⨯ 䠩 ⥬
     0x00000010   祭  饣  ᢮   ᪥
     0x00000020   祭  ࠬ஢ ᬥ ᪮
     0x00000040   祭   砥 㫥
     0x00000080   祭  ࠬ஢ -᪮
     0x00000100   祭  饣  ᢮   ᪥  ⨫ Windows Explorer
     0x00000200   祭  ࠬ஢  ⥢ ᪮


         祥

   MacroArea      String   ⥪饩 ம ᯮ ("Shell"  ..)
   ItemCount      Number  ᫮ ⮢  ⥪饬 ꥪ;   ࠧ⥫쭠  ⮦ 뢠
   CurPos         Number    ⥪饬 ꥪ, ࢠ  = 1
   Title          String   ⥪饣 ꥪ ( .. ,  .. ,  䨪ᮬ);  맮  Help 頥    .hlf 䠩 = Help.FileName
   Far.Width      Number  ਭ ᮫,  ன ࠡ⠥ FAR Manager
   Far.Height     Number   ᮫,  ன ࠡ⠥ FAR Manager
   Far.Title      String  ⥪騩  ᮫쭮  FAR
   Help.FileName  String    ᬠਢ 䠩 ;  ᯨ᪠   譨  (Shift-F2)  祭 
   Help.Topic     String  䨪 ᬠਢ ⥬ ( 饣 ᨬ '@')
   Help.SelTopic  String  䨪 뤥 ⮯ ( 饣 ᨬ '@')




        ਬ ᮢ


REGEDIT4

; 室   롮 ᪮  ⨢ 
; 祭    ன 㤥 ந室 ᬥ ᪠, ᫨   뫮

[HKEY_CURRENT_USER\Software\Far\KeyMacros\Disks\Tab]
"Sequence"="Esc $If (!PPanel.Visible) $If (APanel.Left) CtrlF2 $Else CtrlF1 $End $End Tab F9 Enter End Enter"
"DisableOutput"=dword:00000001
REGEDIT4

;뤥/( 뤥) ᫮()  ஬

[HKEY_CURRENT_USER\Software\Far\KeyMacros\Editor\RAlt]
"Sequence"="RCtrl9 CtrlRight CtrlLeft $If (!Selected) CtrlShiftRight $Else CtrlU $End Ctrl9"
"DisableOutput"=dword:00000001
REGEDIT4

;ᮧ    = ⥪饩 

[HKEY_CURRENT_USER\Software\Far\KeyMacros\Shell\CtrlShiftF7]
"Sequence"="%folder=date(\"%d.%m0.%Y\"); $If (!fexist(%folder)) F7 CtrlY $Text %folder Enter $End"
"DisableOutput"=dword:00000001
"NoPluginPanels"=dword:00000001
REGEDIT4

;᪠   䠩  㣮     ⨢
;F5 ShiftEnter CtrlIns - ਬ ⮡   䠩  ᨬ
;/  cmdline  ᪮쪮 뤥   䠩

[HKEY_CURRENT_USER\Software\Far\KeyMacros\Shell\CtrlAltLeft]
"Sequence"="$IClip $If (((Bof && APanel.Root) || !Bof) && PPanel.Visible)
$If (fexist(PPanel.Path+\"\\\\\"+APanel.Current) == 1) F5 ShiftEnter
CtrlIns Esc Tab Home Alt< ShiftIns Esc $End $End"
"DisableOutput"=dword:00000001

[HKEY_CURRENT_USER\Software\Far\KeyMacros\Shell\CtrlAltRight]
"Sequence"="$IClip $If (((Bof && APanel.Root) || !Bof) && PPanel.Visible)
$If (fexist(PPanel.Path+\"\\\\\"+APanel.Current) == 1) F5 ShiftEnter CtrlIns
Esc Tab Home Alt< ShiftIns Esc $End $End"
"DisableOutput"=dword:00000001
REGEDIT4

;뤥 ᫥ /孨 30 䠩

[HKEY_CURRENT_USER\Software\Far\KeyMacros\Shell\CtrlDown]
"Sequence"="$If (!Eof) $Rep (30) $If (Eof) Ins $Exit $Else Ins $End $End $End"
"DisableOutput"=dword:00000001

[HKEY_CURRENT_USER\Software\Far\KeyMacros\Shell\CtrlUp]
"Sequence"="Up $If (Bof) $If (!APanel.Root) Down $End $Exit $Else Down $End
$If (Eof) Ins $Else Ins Up $End $Rep (29) Up Ins Up $If (Bof)
$If (!APanel.Root) Down $End $Exit $End $End Up"
"DisableOutput"=dword:00000001
REGEDIT4

;ࠡ  ࠭  ⥪⮢ 䠩 far-screen.out
;ࠡ⠥   Dialog

[HKEY_CURRENT_USER\Software\Far\KeyMacros\Dialog\AltP]
"Sequence"="$IClip AltIns CtrlHome ShiftEnd ShiftPgDn Enter Esc
$If (!Shell) Esc $End $If (Shell && !APanel.Plugin) ShiftF4 CtrlY
\"far-screen.out\" Enter ShiftIns Enter Enter F2 Esc $End"
"DisableOutput"=dword:00000001
REGEDIT4

;㤠 䠩/   Del
;᫨ 﫨   ..  ⠥ 㤠  
;᫨     ப  㤠塞 ᨬ  

[HKEY_CURRENT_USER\Software\Far\KeyMacros\Shell\Del]
"Sequence"="$If (!CmdLine.Eof) Del $Exit $Else
$If ((APanel.Bof && !APanel.Selected) &&
(!APanel.Root || APanel.Plugin)) CtrlPgUp $End F8 $End"
"DisableOutput"=dword:00000001
REGEDIT4

; । 맮 ண ᬮ ᤥ ᨢ 
; ᨬ쭮 襣 ࠧ.
;  ⭮ 樨 ⠭ .

[HKEY_CURRENT_USER\Software\Far\KeyMacros\Shell\CtrlQ]
"Sequence"="Tab $If (QView) Tab Ctrl2 Tab CtrlClear $Else Tab Ctrl6 Tab
$If (APanel.Left) $Rep (APanel.width) CtrlRight $End $Else
$Rep (APanel.width) CtrlLeft $End $End $End Tab CtrlQ"
"DisableOutput"=dword:00000001




        


1.  䠩  (farmenu.ini)   macro:post ...  ⠭    !?...?!  CtrlY  ᫥騬 뢮   ப,   ᯮ짮  "᫥" ⥪  ணࠬ  ᮢ,  ண ॢ室  ஥ -ࠡ稪 if / cd  .  㣮 ஭, 맮 ⠪ 㭪⮢   ᮢ ਢ   ⮬ , ஥ .  ਬ, ᫨   ப  macro:post "macro:post a" Enter "bc"   "bca",   "abc".  ᫥    ४⭮ ᯮ짮  macro:post ⠭  !\!.!   !.!  ६  -   ⠢   䠩 ⮢, ᮢ⨬  ᨭ⠪ᮬ 몠 ᮢ.

2. FAR1,  ⫨稥  FAR2, ।,     ॥ ப   OEM-஢,   ⠥  Ansi ஢ .reg 䠩.

