> GrabScrn 0.12 ( Grab Spectrum screen from snapshot : (&A%=0:X%=1:os%=((&FFF4)&FF00)256 23 ctrl% 31,name% 80,mem% 255:X%=ctrl%:Y%=X%256 <%in%=0:out%=0:"Snapshot file: "f$ F+in%=(f$): in%=0:"'"f$"' not found": P2"Source screen address &"A$: A$="":A$="4000" Z/addr%=("&"+A$) :base%=&100+addr%-&4000 d,((#in%)&FF)=&1B:base%=&1B+addr%-&4000 n"Output screen file: "out$ xout%=(out$)  err::  ptr%=&40-&40 &5A-&40 *f_gbpb(3,in%,mem%,256,base%+ptr%*256) %f_gbpb(1,out%,mem%,256,ptr%*256) ptr% #out%:out%=0 #in% :in%=0 X%!2=&34000:A%=file(out$,2) X%!6=&34000:A%=file(out$,3)  : "ݤerr::in%:A%=in%:in%=0:#A% out%:A%=out%:out%=0:#A% := : Lݤfile(A$,A%):<&FFFFF:$name%=A$:?X%=name%:X%?1=name%256:=(&FFDD)&FF "=0 ,: 6%f_gbpb(A%,chn%,addr%,num%,ptr%) @??X%=chn%:X%!1=addr%:X%!5=num%:X%!9=ptr%:<&FFFFF: &FFD1: JA%=1A%=3:#?X%=X%!9 T5:A%=1A%=2:#?X%,?X%!1 A%=3A%=4:?X%!1=#?X% ^5X%!1=X%!1+1:X%!5=X%!5-1:(#?X% A%>2) X%!5<1: h: