value__ntId  __ntTemplate menuButtons viewJustify viewBoundsviewSetupFormScriptyes clearchild localfuncinfofunc  __ntDatatype __ntFlagsÿ, PROT@   [] EVAL   ÿšÀ NUMB     RECT   ÿÊ// be sure to call inherited:?ViewSetupFormScript() func() begin local me:={_proto: protoTextButton}; me.text:="i"; me.viewbounds:=relbounds(0,0,0,0); me.buttonclickscript:=self.infofunc; menubuttons:=[me]; local me:={_proto: protoTextButton}; me.text:="Copy Image"; me.viewbounds:=relbounds(0,0,0,0); me.buttonclickscript:=self.localfunc; addarrayslot(menubuttons,me); local me:={_proto: protoTextButton}; me.text:="Clear"; me.viewbounds:=relbounds(0,0,0,0); me.buttonclickscript:=self.clearchild; me.yes:=self.yes; addarrayslot(menubuttons,me); inherited:?ViewSetupFormScript(); end SCPT   ÿ0func(confirmed) begin if confirmed then begin while length(child.datain)>0 do arrayremovecount(child.datain,0,1); child:redochildren(); end; end SCPT    SCPTºfunc() begin self:confirm(kappname,"Are you sure? This is not undoable.",self,'yes); end   ÿtfunc() begin local k:=child.view1; local r:=k:localbox(); local m:=makebitmap(k.rightside,r.bottom,nil); r.right:=k.rightside; r.bottom:=r.bottom+1; k:viewintobitmap(r,nil,m); local4:={types: ['[picture]], label:"formula", data: [[{icon: m, viewbounds: r}]], bounds: r}; setClipboard(local4); end SCPT   ÿŠfunc() begin self:notify(knotifyqalert,kappname,"© 1997 Sine of the Times" && $\0D && "Written by Ashish Mishra" & $\0D & $\0D & "email: ash@sineware.com" & $\0D & "Web: www.sineware.com"); end SCPT€newtFloatingBar