
Ŀ
                                                                    
                        
                                    
                           
                                          
Ĵ
                                  3                           
ٰ



                                     


                                         ᨥ    㬭 
                                   ᫮: ⮡  ࠭楢  ᡨ  
                                                             ⮫ ⠫.
                                   ⮬  饭, ᫨ -  
                                                     ⠪ ᫮ 㬥묨.


							 -  :
							楯  -  㪠,
							⤥ - .
								Sassa-san <-)



  ७樨    ᮧ , ࠦ饣 
室.   , 㦤⥫ . 


 , ⮨  ਬ୮ ⠪  ,) : 

ந ⮡ࠦ Alg ⠪,   Text,  ண 믮

Compiler( Text ) -> Alg
Alg( t ) -> Text

 ⮡ࠦ ⥪  ࠭⢮ ⬮ ;),   ⮡ࠦ
६   ᠬ ⥪.


                        -= भ   =-

,    祫᪮ , ࠢ  ஥  
⭮ ࠭. 殢   ᯮᮡ  ⠪:

  - ணࠬ஢   (᫨  !) 浪 , 祬 ३ - 
      । ⠭ ⠪  쬠 ࠭祭
  - ணࠬ   栬 - । ⠭ 
  - ᫨  -⠪ 﫨 栬 - ணࠬ ⠥ ᭠砫 ᮧ,
        ணࠬ  ,   ⮬ .  ந室 
      - ७,   ⢠.
  -  樨  㦨 code corrupt - । ⠭ 襭 
      privacy,  ࠧ 室   ⭮  ⠪ 
      祫 ( , ,   ! #-) 

⮬ ⠪   ᬮ ࠭ ᠬ⥫쭮, 筥,   
宧鶴.  类 砥, ᫥⢨     ࠭. 
 ⥬    ,   ࠧ㬭  祫᪮ , 
⨬  ।⠢ ,      .


                           -= ᫮  =-

 - ४ᨢ  室.
筮  뢮 祣- 㤠- 뢠 맮 楤  
 몠. 楤 뢮  .  ⥯ 㦭 뢥  ᠬ 맮
楤:
a=1             ; 
PRINT "a=1"	; 楤,  뢮
PRINT "PRINT "a=1"" ; 楤, 뢮 楤, 뢮 
...

 - 뢮 ⠥ ᨬ.
 ⠪  ᫨ ࠧ⥫ ப, ᨬ 室   ப, 
 稥. ਬ,  ।饬 ਬ ப

PRINT "PRINT "a=1"" 

㤥 ⭮ 㣠 ᨪ


		      -= । ࠢ 襭 =-

 -  뢮 室    ⠥ ᨬ
 -  ८ࠧ뢠 室  ⠥묨 ᨬ  室  
 ⠥묨 ᨬ


筮 모  । ⥪⮢ ६.
ࠧ᫨ ,  ,   ⮬ 砥  ࠧ   
蠣:
- 뢮 室  ,  ஬ । ⥪⮢ ६ "";
- 뢮 । ⮩ ६ (⬨᪮ ८ࠧ ⥪ 
 ⠥묨 ᨬ); 
- 뢮 室   ணࠬ - 祬  ⫨砥  ࢮ 蠣.

 ⮬, ᫨ ६ "" ࠧ  ᪮쪮 ப,
  ப   묨   ( ८ࠧ 
⬨᪨ 룮   横). 


    襭  ᨪ. (, ᠬ ⪮, ஥ 
  .   -  ⠥   ४.  
⮢ 㤨  襭,   몥)

a$=":print chr$(97)+chr$(38)+chr$(61)+chr$(34)+a$+chr$(34)+a$":print chr$(97)+chr$(38)+chr$(61)+chr$(34)+a$+chr$(34)+a$

    .  த 뢮 ⭠筮   
ᥬ 権.

  , ⮬ 襭   ⠯ 뢮 室,   
।: 

print a$  --   稫 뢮 室   ᨬ. 
             㦭 ⮫쪮 ᢮ ६ a$ ᮮ⢥饥 祭.

a$=":print a$":print "a$="+a$+":"+a$ --  뢮 "室"  ଠ쭮 

print "a" -> print chr$(97)+chr$(38)+chr$(97) --  ⬨᪮ 
             ८ࠧ ⠥ ᨬ  "⠥" : 㭪
             chr$(x) -- ⮡ࠦ ࠭⢠ ᥫ  ࠭⢮ 
                     ASCII-ᨬ ;)

  ᭥:

a$( 3 ) = "a$( 1 ) = "
a$( 1 ) = "a$("
a$( 4 ) = "a$( 2 ) = "
a$( 2 ) = ") ="
a$( 5 ) = "FOR i = 3 TO 10"
FOR i = 3 TO 10
a$( 6 ) = "  PRINT a$( 1 ); i; a$( 2 );"
  PRINT a$( 1 ); i; a$( 2 );
a$( 7 ) = "  WRITE a$( i )"
  WRITE a$( i )
a$( 8 ) = "  PRINT a$( i );"
  PRINT a$( i );
a$( 9 ) = "  IF i <= 4 THEN WRITE a$(i - 2) ELSE PRINT"
  IF i <= 4 THEN WRITE a$(i - 2) ELSE PRINT
a$( 10 ) = "NEXT"
NEXT

ᨪ ᥭ ⥬,  ᠬ ।⠢ ।⢠  뢮 ⠥
ᨬ: write "a" ⠥: 
"a"


                                -= ६ =-

襬  । -: , ࠦ騩 bat-䠩 樮
⥬ M$-D0$.  ⥫ ਫ  䠩 KTULU.BAT
 ਢ ᠭ ⬠ 뢮 ⥪ 室  䠩, 
ᯮ짮  ⮬ .

:
訢  砫 ⭨, ࠡ⠥, ⤠ ࠢ ஬ ⭨

 㦭   ६ 㦥 ( ਤ  ஢ 
  ᢮): 㦭   COMMAND.COM.
ᨬ    ,   뤥 :

COMMAND.COM /E:10000 /C %0 Memory_allocated

:
/E:10000 -  졠 뤥 㦥  10.
/C - 믮 䠩  ࠬࠬ
%0 - ⠢  ⭨ 
Memory_allocated - 稪,  ஬  㧭,   뤥.

⮬  砫   "⨯" - ࠧ  楤ࠬ.
  ⭨ 믮 ᮮ 楤 - ᪠    楤, 
   믮:

if _%1==_Memory_allocated goto MAlloc 

%1 -  ࠬ ப
_%1 - , ⮡ ᫨ ࠬ  । ( ),  ⮡ 
       㣠,  if ==Memory_allocated .. - ࠢ ⮩ ப.
       㤭   ࠢ ப ᯥ। "_"

...  뤥. ⮢ 稫. 뤥 ⥫   ⤥
䠩, ⮡ ⮬  몠   砫  ⭨.

 饬,   ⠪:

echo if _%1==_Memory_allocated goto MAlloc>>tmp.bat

 ⥯ 㦭 뢥   "echo if ...>>tmp.bat"
  蠥 ⠪:  ࠢ     ࠭ (command.com 
⮪ 믮 -䠩  ࠭) - ⮬ ७ࠢ
뢮  ࠭  䠩, ।⥫쭮 ⠭ PROMPT="":

set RPOMPT=$a           ;  ⮡  ,   ஡,   ப
			; ᫨  set PROMPT=
			;  command.com 㤥 ⠢ <⥪騩 >'>'
COMMAND.COM /C %0 Write_to_File >tmp2.bat

⥯    TMP.BAT 㤥 ࢠ  䠩 (echo 뢮  㤠), 
  TMP2.BAT --   ,  뢮  ;))))))(command.com  
⮪ 㤠). 

      ᯮᮡ. ਬ, ⠪:

type TMP2.BAT>>TMP.BAT

... ⠫ ਤ㬠,  뢥  䠩 
COMMAND.COM /C %0 Write_to_File >tmp2.bat

,    ਫ: 
echo COMMAND.COM /C %0 Write_to_File >tmp2.bat >>tmp.bat

... ...  㤠   㩤?     ?
஡ ⠥ ᨬ: '>' ( '%'!)

 ॥:

@set PROMPT=COMMAND.COM /C %0 Write_to_File $gtmp2.bat
;
⥯  ६ 믮 ன "" (';')  䠩 TMP2.BAT (㤠
७ࠢ ࠭) 뢠 ப 
COMMAND.COM /C %0 Write_to_File >tmp2.bat;

(⬨᪮ ८ࠧ '>'  ⠥ : '$g')
  ,  ஢ ;)
   ஡,  뢥 %

᫨  ⠢  業,   뢥.
 ᫨  -   TMP2.BAT ( ⮪) 㩤 ⮦ ⮫쪮  (  !)

...
᫮塞   ⠪:
  
echo if _%1==_Memory_allocated goto MAlloc>>tmp.bat

襬
echo @echo if _%prc%1==_Memory_allocated goto MAlloc>>tmp.bat

 뢠 ᥡ,    ࠧ.
 ⥯  TMP.BAT --  ᠬ 室,  ண,  뢮.
⮨  
set prc=%%

 맢 
COMMAND.COM /C TMP.BAT >>TMP3.BAT

⥯  TMP3.BAT -- 室   뢮   䠩.

⥯ 稭 ⠪ (!):
set prc=%prc%prc%prc%

娪! ⥯
echo %prc%
뢥  ࠭

%prc%

㫮? ;)
set prc=%%
echo if _%prc%1==_Memory_allocated goto MAlloc>>tmp.bat
뢥

if _%1==_Memory_allocated goto MAlloc

⥯ 
set prc=%prc%prc%prc%
echo @echo if _%prc%1==_Memory_allocated goto MAlloc>>tmp.bat
뢥

@echo if _%prc%1==_Memory_allocated goto MAlloc

  ⮪ 㤥 ᠭ   ப 室!
echo @echo if _%prc%1==_Memory_allocated goto MAlloc>>tmp.bat

...

, 
set prc=%%
set prc=%prc%prc%prc%
COMMAND.COM /C %0 Write_to_File >tmp2.bat
set prc=%%
COMMAND.COM /C TMP.BAT >TMP3.BAT 

㠫!

 १ࠦ ?   ᭮...

 ⠪ 㪠:
for %%i in (*.bat) do ...

⥯  横 ६ %i ᫥⥫쭮  ।  䠩 
*.bat ⥪饣 ⠫.



 ।, ࠦ  䠩?
grep ...
 find ...

  ⠭ ...

砥 ᯥ। goto label
᫨ label  䠩 ,  믮 ࢥ.
᫨ label  䠩 ,  ந 室  .
⮬ ⠢    ,    ,  
室 !

,  砥, ᫨ ࠦ 䠩 ,  stderr command.com 
뤠 ᮮ饭 "Label not found".     ࡠ   
⢨ ;) 

    ⮣  ਤ㬠  ᯮᮡ 
। ࠦ - 졠  ﬨ  .
,  쬠 業   ᫨  ⮬ .


᭮   ᭨.

⥯, 뢠, ᫨ 

echo hihix
echo gygy

  䠩 ⮪ (TMP2.BAT) 㤥 ᠭ 
echo hihix

echo gygy

(: 
#define hihix h>>file1
#define gygy h1>>file1
᫨  ७ࠢ,   ⮦  䠩 ⮪)

 ,      㤥 .      
⢨,    ᯥਬ (  襬  ,  ண, 뢮
᢮ ! ;)   ⮣, ᫨ .   砥  "ண, 
뢮 ",  "ண, 뢮 ___⢨_ ".

뢠, :

echo hihix
@
echo gygy

 䠩 ⮪ 㤥 ᠭ, 
echo hihix
echo gygy
   ⥫.   ⥯ 㦭   ,  

echo hihix
@
echo gygy

,  窠 - ࠧ :
echo hihix
@
@call spacer.bat
@
echo gygy

[spacer.bat]
@echo @
@echo @call spacer.bat
@echo @

    ப ( 뫠 믮 ᫥ 
 spacer.bat - " ப",  ᥣ 㤥 , ᫨ 
䠩    echo,   㪠;    室  
"㭪樨"   implement ᠬ⥫쭮). 
⮬ 뢠 १ command.com
echo hihix
@
@command /C spacer.bat
@
echo gygy

[spacer.bat]
@echo @
@echo @command.com /C spacer.bat
@echo @
@exit

 ⥯ - 㣮 .


--
᫨ ⥫ ࠧࠫ  - - ,  㬠,  MYSELF.ASM  3apa3a.pas 
ࠧ -  类.  

MYSELF.ASM  ਫ,  ਫ ண,  : MYSELF.COM
     ६ -  20 ᥪ㭤. , ᫨ ਧ஢ ,  
    .  뫮  뢮  䠩
   訬 ; 뢮  䠩 ந室    ⭮ ;)

3apa3a.pas -- ண, ࠦ pas-室. ᭮ ⨥   :
   뢮 室  䠩.

(c:) 1998, Sassa, Apiary Inc.
  _____
@()(_)
/\\
mailto: 
 wow@shcherback.sumy.ua
 sassa@shcherback.sumy.ua
