'script to extract filename
' from acramatic
' search first 2 lines only 
if global1<2 then
    s=  GetIOLine
    x=instr(s,"NAME=""O")
    if x>0 then
        global1=9
         x=x+7
         s=mid(s,x,4)
         TriggerAutoSave("::"+s)      
    end if   
  global1=global1+1
end if