 Netmail (2:464/86.62)  NETMAIL 
 Msg  : 77 of 83                            Uns Pvt Loc
 From : Olegka Cher                         2:464/86.62     09  02  02:07:06
 To   : Dima Bystrov                        2:5029/9.33     09  02  18:05:04
 Subj : Coloss \U

@realname:  p祭 {virexcite@mail.ru} location: Sinelnikovo, Ukraine


            Hi, Dima !

28  2001, Dima Bystrov (2:5029/9.33)  p
                                             Olegka Cher (2:464/86.62):

 OC>>      pp,   - p訩 yp騪  y  
 OC>> Spectrum Navigator.     , ⮡ pp뢠
 OC>> ᯥᨥ p   -  p y  p,  ⮬y 
 OC>>   .    ;(
 DB> H ᥣ, p .
    p! :-))  H ᥣ p ;)

 DB> H   yp  0- p窮 
 DB> H    y yp  ᥬ p pp
 DB> Beta-disk. ᪮ p樨 y ppp  
 DB> p!      p  ᪠  yp? 
 DB> yp-樮p?  p y p ⮫쪮  y,
 DB>  p yy   䠩  p ᪨.
     p ᮪ p樨 - ᠬ楫?    p⢮.
    H ᮣ,   -p  ᢮ py⢠:
 y   pp, p , , p䨪y
p   pp, ppᨭ , ᪠p.
    H    p.

 DB>  H yp,  50Hz+y+y yp,   p쭮 ᯥ.
 DB>  ..
    Hy, ⪨ 뫨 -  y  y樥 .
   ᮡ:   yp ᢮ p
 - ᮡ p 誮  p⥪yp..

 OC>>        pᥪy? pᥪy!
 OC>>   p ~{ }~,   py?  ⥪!
 OC>>     Hy, p..

 OC>>     { blablabla }nz

 OC>>     -  ~p, ᫨ nz~  ~, ᫨ nz~? :-/
 DB> p, ᫨ NZ
 DB>     y᫮ y   y᫮ p室.
    H py,   p.

 DB>>> ⮣ y   NZ 訬 y :)
 OC>>      ᪫⥫  ⮦ 訬 y? ;P
 DB> p,   AGAIN 訬 y :))))
    p!
    , 廊,  饬y   p ;)

 OC>>     .. 祣  ᪠  ~label:~.. :-P
 OC>>  y砥  ~:label~ 稥 - p⨢ ⥬ ᫮,
 OC>> p  p, ᫥y饥 ᫥  ( p),
 OC>>  ᮧ  ⥬ ᫮p ᫮  ⨬ , ᢮⢮
 OC>> ^label  pᮬ y⥫  .  y砥  ⢮
 OC>> p.. p  诨᪨ ᫥ 稥 (
 OC>>  ᫮)  pp:  py ⪠? ..  ⠯ pᨭ
 OC>> 童 y p⮢y ~:~. - ᤥ  ,  
 OC>> py p⠢,  :(
 DB>  ᬥ ᤥ,  p :)
 DB>  ⪠   y   ᮢp襭 pp 
 DB> p. Hp, 室 -  ⮪樨 ⥪.
     -  ᫥ p ⥪   y᪨:
  ᫮,   p,   - 䨪p..?
⯠. ⮬y    y -  y᪮,  ..

 DB>>> y p ⥪⮬, ᫨  ⥪,   ,   
 DB>>> y砥, 易⥫쭮 ⮨  ! A, HL  ..
 OC>>        y ᤥ :)
 OC>> p ᫨ ⥪ 砥  pᨭ ⮫쪮 
 OC>> ᫮, ᪮  y. H  ,  ⮢ ⥪
 OC>> (⥪ A{ ) ⮫쪮 pyp,   A y᪠,
 OC>> .. ᫨ p p뢠饩 ᪮ ~{~  y 
 OC>> ⥪,  y ~A{~.      p-⠪ ~{{~  ~}}~
 OC>> ;]
 DB> -.
 DB> yyp y p   py pp, ⮬y 
 DB>  yy  ᯮ짮 ⥪ py pp 
 DB> p,
    =)
 DB>  p  p ᪮py  p p yyp.
 DB>   {} -  ⥪ 横 :)) ᮮ⢥⢥,
 DB> "nz{}", "c{}"  .. -  ⥪ p⨢ (,  ⮦
 DB>  ᯮ짮 p pp y :)) nc{}else{} - o
 DB> ⥪  p⨢  ..     ⠪ py
 DB> (横 while): nc{....}again   y  p 室 
 DB> p 横.
    yy, ,  y :)    y砥 "C{}" -  - ⥪
pp C  y᫮ p室  䫠y C ?
    H y  p  ⨬ ,  pp 
  짮  - ⥫쭠 y⠭. ,  y⭮ ;(

 OC>>    -⠪ p. NZ-? NZ-p? p 
 OC>> p.    뢠  ⠪ y砥 djnz? JR lab? JP
 OC>> lab?
 DB> NZ - p.  py  JR NZ,loop!
 DB> JR -   y JR, ⠪   ⠢.  pyᬮp pp
 DB> 室  横: "nc{break}" ,  py  
 DB> ypᠫ쭮 p室 (⨬py饣  JR, ᫨ p⪨,  
 DB> JP  py y砥)
    :)   ᢮ p y  ⨬ pᮬ.
   y砥  室饩 y  ~⨬
pp⮬~. H 室 p室 gto -  yy  py :)
祬y  p⨢?  쭮 ᫮ y⢨. p
᪮p ᥣ y yp室,  y  p p室 y 
 ﭭ ⥭ 稪 p.
    p ⮣ ᭮,    ⠪⠬.  ᤥ   C--:
 p⨢ ⨬  p⢨   ppy .
 p y砥 y jp,  p - jr.

 DB>  DJNZ -  ,   py. H  y
 DB>  p!!! Hpp, {}loop
    祬y  p?  py!
쪮 p⪨ 横 y:

        LD B,n                          MOV CL,n
    M:  ...                         M:  ...
        DJNZ M                          DEC CL
                                        JNZ M
 :

        LD BC,n                         MOV CX,n
    M:  ...                         M:  ...
        LD A,B                          LOOP M
        OR C
        JR NZ, M

 OC>>     ,  ᠬ  p.   p -   ⠪
 OC>> =]       ⮬,  Pascal  C   p楤yp  y権
 OC>>  ᯥy ~ 맮~, p 砥 
 OC>> p樨 p pp  BP.
 DB> ⭮,   Z80 먣p  y :)
     y :)   ⠪ ᭠  - 砥! ;)
쪮  y pp뢠  - ᮢᥬ .   :[

 OC>>     Hy  ᯥ⭮;  y ᫮: yy ⠪ ᮡ
 OC>> 믮 pp, p  p  p
 OC>> yy p権 樨  (ꥪ, y 
 OC>> ..),  p, p py ⥫⢠ p᪨
 OC>>    pp. Hpp: ᨭp  pp񭭮
 OC>> ⥬ ( y⨪p ;] )
 DB>  y, py y⨪p py p쭮!
 DB>      p뢠?
      y!  ᬮp  p p묨 ! y..  ;)

 OC>>  yp pypᠬ (  y),  ⨬ ᫮
 OC>> p⮢ ..

 OC>>      ⥬ -  , ᠭ  ᬥ, Coloss 
 OC>> Coloss', p  p,  -   :]    pp, y騩
 OC>> ᥡ  墮 ;)

 OC>>      室稢 ? ,)
 DB> p   祭 ⭮ ;*)
    ;)

 DB>>> ᭨ p
 OC>>     ,   ᮡp ᮧ p  
 OC>> ᪮ ᫥, .. py-pp   y᫮
 OC>> 몠 A)  誮 B).   y ⮫쪮 y,  
 OC>> y  ⮬  ⎨..  ⮣ y _⥬_ (p
 OC>> + ⥪ + ext.y).    , ! p p
 OC>> Coloss 2.9 ( y p, .. ⥬   ⠪
 OC>> ᢮⢮ ( ⭮))  ~1.5 . : ᪠p,
 OC>> pp, p , p 䠩, ᯥp ⥪⮢.
 OC>>  , ᭮ =)
 DB> ⢥, ⠬  p     ⠪,  p
 DB> p...  yy p y  "pp ᥡ y"?
 DB> H ᥬp y ᯥp   "py", "" 
 DB> "⮫",    p ᭠砫 p y  
 DB> ᠭ ;)))
    , ,  ⠪ :)

 OC>> y _p_  ᥣ    ( y 
 OC>> ᥣ⠬ )  _ppp_, py p ⮬
 OC>> py p  ..
 DB>   ;( pp稪, y
    ᥬ  ⥮p ;)

>=== y 砫  OS/2 Clipboard ===
        p ⥬ 砥  pp p, 
 室 yp inBuf, p   yp  䠩  ᪥.
  p ᫥⥫쭮 롨p ᫮, p p,
 pp y . ⥬ ᫮  pp   
  ⥪⭮ ᫮p  y, y ⨯ ᫮.
       ᫨  , ⥬ ᪠ FIND ᮮ頥 ppy  p.
       ᫨    ⥬ 室  p ᯮ, 
᫮  ᯮ,   p 樨  ᥣ  CS:
py  맮. yy ⠪ ᯥ樠 ᫮, 믮騥
ᨬ  p.   ⭮ pyyp yp  ᫮,
騥 ᮧ  ᫮  p祭 p ᯮ 
樨. p  ᯮ   y⠭  
᫮   ⢨   祬- ᪫⥫. ᫨  ᫮
( pp)    ᫮p,  ⪠ pᬮp  
᫮  y ⥬ ᫥  ⠭y.  p ᯮ
 ᫮ p   y,   p 樨  ᫮p
py , p   ᫮  y p ᢮ ᯮ.
᫨      ⢨  뫮 yᯥ, 뤠 ᮮ饭 
訡.  p, 横 p ⥬ p쭮 p  y᪠
ᯮ짮 ᠬ p ᯥp pp 孮.

       pyyp p   ᥣ ES:

   dw pre; p py饩 ᫮p 
   db 1  ; - ᨬ,  p y⢫  ᫮ (pp)
   dm '+'; Hp⢥  ᫮
   db atr; py ᫮
   dw adr; p ᫮  ᥣ CS:
   dw lng;  ᫮  
>===   OS/2 Clipboard 稫 ===

>=== y 砫  OS/2 Clipboard ===
   p p⠢ ᮡ p樯쭮 ⫨  p樮 室
 ᮧ pp. 饥 設⢮ ᮢp 몮
ppp p⠢ ᮡ p: pp,  p
p ppy騥 室 ⥪ pp  設 . p ⮬
讥 祭  ᨭ⠪ 몠,   p ᫮, p묨 
짮 p pp⪥ pp,  p 樨.   䠪p
 p 䥪⨢ 몠. H⪮    y
ᨭ⠪, p pp ⥬   y pp 
p殮 ᥩ pp⪨,  䥪⨢  p . 
yᨨ 뢠 ⠪  ᯮᮡ p pp, ᯮy騥 
몠   ᪠.  ⭮, yy  樨 p
pp, p騥 p浪 pᯮ ⮢  ⥪  ⥬,
뢠  뢠 p楤yp y   ⥪. Hp p
  롮p 樨 p pp,     ᥣ
p  楫.   p y p   
 䥪⨢.   ⭮   yp p,  p
p ᮧ 設 .
    p, py騥 모  p ⪨, 易
 y⢨ 筮       p
ᮧ 設 . p p ᮢp襭 py 室  p
pp. -p,  ⢥ ᫨⥫쭮   p p ⥪
設.  砥,   pp p p ⥪ . ⤥
  ⥪ p⮢   室 ᯮ pp ⠢  ⥪
 ᪮쪮 ᥫ  ⥬   y⢫ p  p쭮y
py, p饬y  py ⥪.  pp p p  ⥪,
ᯮy ᫠   p設  ⠢  p設 ⥪ py
(py).  p yy p樨 "  ⥪"  " 
⥪", p ᥫ p室 ⮬᪨.
   -p,  p yy ppp , p,
y樨  p楤yp, p  p樮 pyyp 몮. 
⮣ p ᯮy ⠪ 뢠 ᫮, p p⠢ ᮡ p
  , 易  楯 ᯨ᮪.    
p⢠ p ᯨ᪠  py  y   ᫮ pyypy,
p   筮 p ᮧ.  ᯨ᮪, ᮤp騩 
᫮ p, 뢠 ᫮p. p⪠ pp  p 砥
   ᫮p  ᫮, p y  ⠭  ꥬ
,  y ᯮ짮  p  ᫮. p  
p y ᫮, p묨  y  p,  ᫮,
묨 pp⮬.  ⠢ ᫮p 筮 室 ⮢ ᫮ 
᭮ p権  ⥪, , p  ᫮  p 
py.
   ᮡ p  ,   ⠥  ᥡ ᢮⢠
ppp  p. ᪨ p  ppp,  
ᯮ ᪮p !   ⮬,  p pyyp ᫮ p
 p   ᫮p  p 樨 p砩 p 
 騬 ⮬⨧樨. ᪮y  ᫮ p  pp,
⠢묨    ⥪, ⯠ 室 ᨭ⠪᪮ pp
  室 ⥪.  ⮣ p 樨 맮 ᫮ p
  設   ᮧ ᫮. ⢨ ⠪ 室
 䨪᭠ (p⭠ ᪠)  py, ᪮y 
p䬥᪨ p樨  y ᢮ pp p, 祬 yy
맢.
      p樯  ,   p  ﭨ 
⥬ p y ppy.  ,  
 y y  p  yp  ⠫ y pp.
  p ppp ⨩, ⠪  p楤yp, p,
ꥪ  .. p p⠢ ppy ypᠫ 堭 ᮧ
⠪ ⨩! p ⮬ ᯥ稢   ᪮pyp 
pp ꥪ    (⢨, y   p
⮫쪮 y⥬   pᨨ).
>===   OS/2 Clipboard 稫 ===

 OC>>        py ⥬ Coloss \U ?

 OC>>     a) 䥪⨢ p⨢ _ppp_ ᥬp;
 DB> 筮,   8(
        COLOSS \U 3.1 metasystem
ok
        #include asm.col
ok
        asm { LD HL,2  ADD HL,HL }  WriNum
4 ok

 OC>>     b) 魠   p-⥬;
 OC>>     c) 祭 y y⨮ p -pp;
 OC>>     d) p,  p  ~ y~ ᮧ ᢮
 OC>> p-pp   p (    y =]
 OC>> );    e)   p  p
 OC>> p ⥪⮬ (p p⥪yp p樨);    f) 
 OC>>  樨 - ⥬ (⫠筠)  楫.
 DB>  p ⫠y  p... p
    p⪮: p ⥬ 樨  p塞 ᫮
⠭ y묨  ppp ⥬,  y
⫠   p.  魥訥 p⢠
⫠, ᯠp騥   py   y稢騥
筮 .
     ⫠ ᫮ y ᯮ짮 ᫥y騬 pp .

>=== y 砫  OS/2 Clipboard ===
6.2 ⫠ -pp

         ⫠ -pp  ⥬ p  
⫠稪 ᫮.  y⠭ p ⫠ p ᫮ name ᫥y
믮 p⨢y 

        TRACE name

(᫮ TRACE   p  p 樥  Alt+"T").
         p 믮 -pp p 맮 ᫮ name y 
y ᨣ,   y  ⫠稪 뢥  ⫠ ᫮.
, p 믮   ᫮, ⠢ ⥫ ᫮ name, yy
뤠 ⥪y騥 祭 p pp樨 IP, ᮤp  
pᠬ IP, IP-2  IP+2,  ⠪ ﭨ ⥪   , 뤠
᫮ .STACK. p ⨨  Esc ᫥ pp뢠 뢮 ᮤp
⥪ 뢠 p p ⥪⮢ ppp.   ⮬ 
ppp,  pᬮp ᮤp py p  ⥩
,  祭 ⮢  ⥪   .. p y⮩ 뫪
(.. p ⨨  Return  p,  ᮤp饩 ᨬ) 
p ppp p뢠,  p 믮 pp 
⫠筮 p. p 믮   p.pp pp뢠 
Ctrl/Break 믮 ⫠ pp p蠥,  p室 p 
 yp .ppp,  p pp 뫠 맢. ⫠
p   y⠭ p  ᪮쪨 p. ⬥
p ⫠ ᫮ name y⢫ p⨢ 

        TRACE-OFF name
>===   OS/2 Clipboard 稫 ===

 OC>> + pp (ᮧ   py pp).
 OC>>     筮? :-)))
 OC>>  쭮 py p ⥩,  ⠬ -  ?..
 OC>> =]
 DB>  p樯,  p訫 y ᠭ 쭮 몠 
 DB> ᨬ묨 ﬨ. H      ;)  
 DB> p樯    ᥬp ⥪⠬   ᬮ, 
 DB> ᫨ ᬮ,  y  y ⭨ ⠢    y
 DB> .  , ⢮     ᥬpy.
    -,  ⮢ .. y-..  pp稪.. ;]

 OC>>       y ᤥ  yp pp (py 
 OC>> -p).  쭥襬  ⥣pp  py
 OC>> ⥬ p pp.
 DB> ! Hy   ᠫ,   y  p⥪.   祣  ⮬y
 DB> y  ⢥⨫.
    :)    ,  y   p䨪 -
 y襪 p   墠⠥ ;(

 RM>>>>>  8. 易 ()   ( ᫥ p楤yp)
 DB>>>   ⮬  ᮣᥭ  ⮬
 OC>>     subr #D6B cls
 OC>>     subr #3B5 beep(HL DE)
 DB>    rst#10, IM1, p8x8?    뢠 
 DB> ⥪.
    Hy.. p p頥? ;-/
    :-P

    Context 32x24 {           A{
    @SYM $Rst #10 .  'Y  SYM
                     'O  SYM
                     'U  SYM   }  \\  :-)
                  }

 RM>>>>>  10. hint:  ᯮ ᪮쪨 ⥩ pp
 RM>>>>> (筮  p pp)
 DB>>>  ⮬ ⮦ 8)
 OC>>      祬  ⥡  p?  ⠪ ,  
 OC>> p⨢ 筮..
 DB>  祬?   ,   p,   ᥬp.
       ? p 筮  몥?
 筮 p 뢠 -   p :]

 OC>>      ,  砫 ⠪y p,  祬 
 OC>> p  ,  p , ⥬ y  y砥.
 OC>> p񧭮.   y稫 p 뫮 - p.   :)  H
 OC>> ⮣ p p ᠬ    :>
 DB> H,  ⨫  yy p.  -⠪ 
 DB> ⮣,   p.    祬y- y砥 ,
 DB>    py  :)
     ⠪ ,  pp 몠, ᯥ誠 p,
 p py p襭. H ⮬  ⮨ ;)

 OC>>       y ⢮   ppp⢮ txt-pp ;)
 DB> Hy ...  p? ;)
     p ⥩ ᫥y pyᬮp  p襬 pp
 pp?  樨 , y p᪫y?  ..

 OC>> "H  ᥬp "

 OC>>  y몠:            p:
 OC>> () Dave      () .
 DB>  y ?
             PUBLIC SPIRIT #1
             ________________
p᪨ p yp.

 OC>> p樨  -  y  䠩   
 OC>> 室     ⭨   p,
 OC>> 筠   y⠭       /
 OC>> pp,
 DB>   y⠭  pp  .  ᥣ py pp
 DB> ᯮ짮 y樨,    ᪮p 맮  py 
 DB>  ..  y  p  ⥪, ᫨   ᯮy :)
    :)  p⠢   y:  y. p  
pp X 䥪⨢ ᥣ  p  p. HL,   PC 祬y-  SI.
 y稫 ;]  H ᠬ  y 쭮 p筠.
 ,  y?  p y   y  - ᪠,
 饭   y   ZX - p pp  
pp HL -  BX,  y  ᠬ y樨 mov SI,BX.. ⠪?
    Hy  !
    ᫨  맮 y ⠪:
                                         Zeta(456)
    ...  ᠬ  y ,  p.   pp.
  yᯥ . H ᫨ 맢:
                                         Zeta(HL)
    ...   ᠬ  -  ᠬ 䥪⨢ ᯮᮡ,  p뫪.
쪮 맮 CALL Zeta.  ᫨  inline -   맮 =)

 OC>>      ᠬ  ⥪,
 OC>>       쭮       
 OC>> pﬨ, ⠥  py
 OC>> ⠥.
 DB> p쭮!   p, ⥬ py  :) (c)
    , ᪮쪮  p, ᪮쪮 pp... ;)
 ᫥   ⨫.. yp p ⢨⥫쭮 y  y⢨.

    if a < 100 then print a   \\  ᫨ p   a  ᫠ 100..

    :-P

 OC>>   ᫥     
 OC>> ⫠         筮
 OC>> yp蠭     pᯥ⮪      
 OC>> ⨭,
 DB>   pp  ;)
 DB>    p,  y   ⥪y  ᬥ   ⫠稪.  ᥣ
 DB> 訡 室 "y⨢ ⮤",  STS  y :)
    STS -  ⮥!
pp y  筮 . p :]  H p pᯥ⮪    .

 OC>>  3. p     뢠
 OC>> ⠭p  p  -   p
 OC>> DEFB, DEFW -  ᮮ⢥⢥
 OC>> p  ⨯.
 DB> ⠭p p  p p
 DB> VAR1=$+1
 DB>     LD HL,234
 DB>   2  p.
     p y᫮ 祭 y!
ᬮp  p ᯥ䨪樨 Coloss:

>=== y 砫  OS/2 Clipboard ===
    䨪 ᥫ:  ⥫: 23 127 65536
                         p⥫: -3 -111 -255
                               ⭠p: #FACE #FF #C
                                        : %101 %111111
                                      ᨬ: '@' '[' 'IQ
                p訩  訩  ⤥쭮: -4'#F 30'-30
                           塞 p: ( 6+81 / 3 )
                                      : $ nop $$ + 4
                             ⠭  ⪠: beta laba


  楯 p⥩  ⨯ p  COLOSS \U:

     $BYTE $WORD -     pp  ᫥⥫쭮 NOP,
                      樠p;  ᯮ짮  砫 ,
                         y p楤yp\pp;
     @BYTE @WORD -  inline-p. H y  ᨢ. p 
                      뫪  ⥭  ⠭ pᮬ p;
     #BYTE #WORD -    ,  ᯮ짮   pp
                        pp⥫ ;
     %BYTE %WORD -  室  _y_ py  ;

     COORD   - p p⭮ ⨯ - p ⠡py X  Y.

Local - p 쭮 p ( py樨 '.'):

                  Local @WORD duplex ;

Global -   pypy騩 y:

                  Global %WORD #7E50  X , Y ;
                  Global %BYTE        Color ;
>===   OS/2 Clipboard 稫 ===

 DB> Hy ᠬ  ᯮ짮 HH p???
 OC>>  4.p,  p
 OC>> ᮢ        ⠭p묨
 OC>> pp,      y
 OC>> 䨪p           
 OC>> pp.
 DB> -  ⭮ py ;)
    y ;)

 OC>>  p     
 OC>> ᪨      
 OC>> p  ⠭⠬. 祭
 OC>>   p     ᪮窨
 OC>>   뫪       .
 DB> ⭮ .
 DB>  y ᯮy  ᥬp p pp樨
 DB>  ⠭ p.
       p ;-P

 OC>> pp  ⨯. 蠥
 OC>> p -    p祭
 OC>>     짮⥫ .   Hpp
 OC>> p   pﬨ    
 OC>> -y    p.
 DB> -.
    Hy,   ⮬y p p! :)

 OC>> ᫨ 䠭⠧ ᮢᥬ  墠,
 OC>> ᤥ  p  "p"  (=)
 OC>> p p⨢ LD  -  
 OC>> p            ⠥.
 DB> ᥭ.
    ᥭ :)

 OC>>  6.ᨢ.  Hy, ⠢   
 OC>> ⠭p   -   IX       IY.
 OC>> p  p饭     ⨯y
 OC>> IX[n].
 DB> H y.
    H ᮣᥭ :)  H y  p.   ..
H ⮡  뫮  ᢥ p -
py p IX+n  IY+n

 OC>>  7. pp.
 OC>> .. pp  p 
 OC>> 襩    p  pp
 OC>> 饣     祭      (
 OC>> ᪮p),      p   
 OC>>  ⮫쪮 ⠪  堭
 OC>> p. Hpp:

 OC>>  PROC sub_name (var HL, var  A,
 OC>> B) ...
 OC>>   ⥫ /
 OC>>   ...
 OC>>   RETURN sub_name
 DB> y :)
 DB> 祬 p楤yp   yp?   ⠪ 筮 來, 
 DB> ᬥ... ⢥⢥,  맮 ⠪ (pp᪨)  y...
    =)  y!
 , 祣 p ! :)   ᫥, ⢥砥  p ;)

 OC>>  8.      ?  ,
 OC>> p室.  y          
 OC>> py - ⠢ JR   JP.
 OC>>        ypᠫ
 OC>> GOTO,  p    y     ᠬ
 OC>> p,  ⠢  -  JR,
 OC>> JP.
 DB> . H.
     p. H  ⮩ pᨨ ;)

 OC>>  p, ᪮쪨   p室
 DB> y, 筮 :)
    , ! ⠭py! ;)
p p p室 ᮧ  ,  p p p
p,  ᫥ ⮣,   . ⮯p.

 OC>>       LD A,(switch)
 OC>>       LD HL,_TAB1
 OC>>       CALL adr_mas2
 OC>>       JP (HL)
 OC>> _TAB1 DEFW ADR1,ADR2,...ADRn
 DB>  뢠  ᬥ ⨬쭥,   y砥 -py. 
 DB>  ᮮ⢥y py  y. [    
 DB> ⠪ p?]
       ;)

 OC>>    9. ᫮   p室.  Hy,
 OC>> ᠬ p⮥ -     ⮣
 OC>>  pp (⮡  y  
 OC>> y᫮   p樥, 
 OC>>     IF,   pp, IFS):
 DB> ᫮ p室 IF  ᬠ 筮 .   py
 DB>  設   䥪⨢y ppp ᫮
 DB> ,  ᪠뢠   yp .
    H祣 ⠪ :)     ()   p.
 ᠬ p, p 稭  ᨪ  ᪠, y  yp  if.
    py ,  p..   p?

        y᫮   if  <->   else  <->  then

      p p Coloss'?

        if y᫮  then <->
                    else <->  endif
                                        \\    ';'

     ⥪⠬?

        if y᫮ { <-> }  else { <-> }

    誮 -譮y y砥 :(    y᫮  ᪮ ? :-/

 OC>>    10. ⪨.
 OC>> ..   yy  ᯮ짮
 OC>> ⥯p        p
 OC>> pp,         
 OC>>   ᯥ䨪p  FAR   
 OC>> "쭨"   ⮪, p室    
 OC>> p  y   y⢫
 OC>> p   JP. ᫨   ᯥ䨪p
 OC>> yy,        ᥬp
 OC>> ⠢  JR   (   DJNZ   
 OC>> 横). Hpp:
 IFC (A>>>> 1) m1, FAR m2, FAR m3
 DB> Hy, ᪮y py y᫮ p⨢ ⬥,
     ᪠? , p? p  誮y  殬 ;-)

 DB>   p  쭨 ⪠  ⮨ :)
    :)   y: ᫨  ⪥  y p室  쭨,
 p⪨ p室,  ⮣ -  ⪨ ᮡ稢? ,)
    pp     pp - y   yp.
 ᪮y y  ⪠ ⠪ 䨪p p楤yp  pp..

 OC>>    11. p ᥣ    y
 OC>> y.  ,      
 OC>> p,    pp뢠
 OC>> 室  ⥪  -      
 OC>> ᥬp  py   . Hy,
 OC>>   蠣y    
 OC>> ⨬樨.
 DB> 쪮  .    ᥬp p, 祬 y
 DB> GOTO - JR'  JP'.
      py ᮮp,  - ⮫쪮   -  ⨬ ᮣᥭ .

 DB>>>    ᥬp  ⠪ y,  pp ,
 DB>>>  y, pp, ᮧ 20  LD DE,...:PUSH DE
 DB>>>  ,   뢠 ⠪ :-/
 OC>>      ,  !  y ;]
 DB> H,   !   p p⢮. Hpp,   Stellar
 DB> Contour, ᫨   訡, ⠪ p ⨬p p
 DB> pp, 騥 y py  y⨪p (.. pp
 DB>  ⮬᪨ p⠢ OUT')    , pp
 DB> ᯮy ᮡ pp:  , p⠪⮢y  ..
    y,  ⠪ ⨭. y  Coloss' y  ,
   設ᨬ p pp =)


             y,   Oleg N. Cher  (aka  Vir ExCite)

... mailto:virexcite@newmail.ru  2:464/86.62 [aka /156.62], 500:562/1.16@ZXNet
--- GEd/2  [Cranberries][guitar][I.ZX][Myth Corp.][nonmatter] . &..Good Karma!
 * Origin: ./ [80x86][C--][Pascal][Forth][Lisp][Esperanto] \. (2:464/86.62)

