Macro MakeWindow
 ME (REPORT) RAWindow.rf
 ME me send on
 ME Template RAWindow "Righting Arm Curve" /pos:topright /gap:3 /backcolor:0FFFFFEh
 ME @ra$.jpg
 ME exit
 ME /
 ME .rawindow 
 ME if {{templok}} = 0 then quit
 ME (REPORT) Off
/

macro mkRApic
` if fexist ra$.jpg then erase ra$.jpg 
 disk temp$ra.dat /quiet
 ra /graph:noarea,nocrt /size:*
 disk off
 copy temp$ra.dat temp$ra.pf
 erase temp$ra.dat /norecyle
 `print temp$ra.dat /preview /spawn
 copy temp$ra.pf ra$.jpg  /convert:90 /crop:.75,1,7,5 /dpi:100  ` /Thickness:2:4 /BOLD 
 erase temp$ra.pf  /norecyle
/

Macro startRAsync
 .mkRApic
 .makewindow
 message send on
 Shell GHSOS RAWindow.RF /SPAWN   
 wait 0.5
/

macro quitRAsync
 message send template /refresh:cancel
 message send quit
 wait 1
 erase RAWindow.rf /norecycle
 erase ra$.jpg /norecycle
/

macro upd8RAsync
 .mkRApic
 Me send template /refresh
/




