 Ѩ!

con-version([full])
con-execute(str)
(escape-str str)

 :


*- (    );  
.

onBeforeExec(addr [str])
onAfterExec(addr [str])
onBeforePeek(addr [str])
onAfterPeek(addr [str])
onBeforePoke(addr [str])
onAfterPoke(addr [str])
onBeforeIn(addr [str])
onAfterIn(addr [str])
onBeforeOut(addr [str])
onAfterOut(addr [str])

,         
  :
eventAddr (and port for xxxIn & xxxOut)
eventValue
eventAbort

     ,    .
  eventAbort  ,      onBeforeXXX
  DSP (Peek, Poke, PeekExec, In, Out)  
,     eventValue.


:

pause([bool])
   (  )  .  .

peek(addr [page])
poke(value addr [page]) --   
     .
  value in [-128..255]
  page: -1: ROM0 (48k)
        -2: ROM1 (128k)
        -3: TR-DOS
        -255: current page
        0..255: memory page

peek-buf(byte-buffer addr [page])
   -  .
     .

poke-buf(byte-buffer addr [page])
   -  .
     .

port-in(addr)
     .

port-out(value addr)
     .

ticks([new-value])
inc-ticks(inc-value)

z80reg(name [new-value])
    .
  reg: A,B,C,D,E,H,L,F,AF,BC,DE,HL,SP,PC,IX,IY
       AF',BC',DE',HL'
       I,R
       IFF: set iff1 & iff2 (only 0 or 1)
       IFF1, IFF2
       IM: set intr. mode (0, 1 or 2)

scr-update([rerender])
   (  -)    .

scr-peek(addr)
   addr in [0..6911]
scr-poke(value addr)
   addr in [0..6911]
scr-point(x y)
   --  "",  
scr-plot(bool-value x y)
    bool-value .
    .
attr-get(x y)
attr-set(new-value x y)
    . x  y --  .
scr-addr(x y)
       ( -1). x  y --  .
    -- [0..6143].
attr-addr(x y)
       ( -1).
    -- [6144..6911].
   --  .
scr-to-attr(addr)
  addr --   -- [0..6143].
       ( -1).
attr-to-scr(addr)
  addr --   -- [6144..6911].
       ( -1).
scr-line-up(addr)
scr-line-down(addr)

zxfloat2num(byte-buffer)
  byte-buffer --  5   
num2zxfloat(number byte-buffer)

label-find-code(addr)
    *nil*
label-find-data(addr)
    *nil*
label-find-name(name)
  *nil*  : (addr size sys-flag name)
label-add(name addr size sys-flag)
label-delete(name sys-flag)
labels-clear(sys-flag)
labels-load(fname sys-flag)
labels-save(fname sys-flag)

info-message(msg [pause])
   - -- 2 .
   --  

compress-rle(byte-buffer maxsize)
    byte-buffer,  -- *f*.
compress-x(byte-buffer maxsize)
    byte-buffer,  -- *f*.
decompress-rle(byte-buffer maxsize)
    byte-buffer,  -- *f*.
decompress-x(byte-buffer maxsize)
    byte-buffer,  -- *f*.
