WPC), n=(ft6X1qkt6 0DHػsL=qt43iq6%iΖ蚞%F^i[ŧgF.DWM7^yP1v#ꢌ^/kH={X΀޷N cy5_xTϰ"\~~-hilp>|Y7Y|f{~؛xDA ̱C@,b)uNř n$NØ*}IHa(.z{-xt++IyG`A/c*~{J+[hҭ,siLw&=k ,#|0@:W${! KAt}18d59-zjy˄p,8.OwzvP9)Iٴ<z}syyNN3)cY1˜ *jOHX(F-Ndd+#Z %#) 0fUTU^ w4 mNUFU,=U:i  Q 0^#E## ##### B*########################################################################################################################################## C0$$$$$$$$$$$$$$$$$ D3B$ B7u$ B7$$$$$$$$$$$$$$$$$ 0$ D5e% B%%%%%%%%%%%%%%%%%% C% C% C% C& C& C9& CS& Cm& C& C& C& C&& D3& B"' B?' D/\' D3' B*' D3' B*( D3E( Bx( D3( D3( B(((( 0)))))))))))))))))))))))))))) 0)))))))))))))))) D3<* B*o* D3* AS*+ 0D+HP LaserJet 5L0XLevel 1Level 2Level 3Level 4Level 5(>@$XXXXڪXX. Z<Century Schoolbook RegularŅT4 9WT4:i3|xU. Z.Century Schoolbook ,iAZArial "Arial Regular  }'X XXX;XX   55CharlesE.Rossiter@ NewSave.wcm Ԉ(#Page  1  ڀof  2  ڈ  charles@rossiter.co.za@$Version13.0;(#2006February01 o 2(# WordPerfectversions813 Ԉ .~ @Y@A) xdExA95?H:\MasterMacros\NewSave.wcm5gn5 HoLQUITLOB*@$CHECKVERSION11@ HHB%LQB)o newsave.wcm*l!Ho Unwise moveLNEoPlease do not run me on myself!LNBn)@",LQUIT#l%HB8HB%FILENAME&HE8'HE(HE)H[LIE*H[LUE*+HEM,HE-HrFILENAMELN[LIEN.HoNewSaveLNoFile rFILENAMEKo" has been succcessfully saved anewLNBn)@/0HE*36Hx LIB)VHRT7H[L@[LIB,+ NNN8 rNNN aXb/FB2 rNNN a`/FB-9HvVANSLR!o Macro VersionLN]o+ You are running the first build of WPWin11rVHRToFThere is no certainty that any macro will run correctly in that build.rVHRTrVHRToYPlease install the latest service pack from ftp://ftp.corel.com/pub/WordPerfect/wpwin/11/rVHRTrVHRTo=Click "OK" to run the macro anyway. Click "Cancel" otherwiserVHRTLN[[LIBn)@?rVANS[-HE*A[|5[)51/LQUIT++13CHECKVERSION11N!OEN WordPerfect!OEN WordPerfect)OENPSMacroFacility/OENPSMacroInterpreter(Z3}$ @!X XXX;XX   Hs&p Pd d,Sticky Notedd'dxd3+0 d d d3+0 d d d(Z3}$ @!X XXX;XX   )!dxdx dd ddd(d2dq:StandardFontStandard Font Choice &E2%%&T XE X%&E2(Z3}$ @!X XXX;XX   &&&&'dxd&p d Pd'dxd)*E<<CLevel 1Level 2Level 3Level 4Level 5($$   1  @!X XXX;XX   _=dd=%  Application(WordPerfect;"WordPerfect";Default!)   ,,;IfPlatform("Comments01")#;,,#  ~ 53 5 };;;;  MacroNewSave.Wcm 0 0 (# (#0h(#(#0h(#h(#Version13.0;(#(#(#2006February01  o  CharlesE.Rossiter   . charles@rossiter.co.za 1(#WordPerfectversions813  p  @kr@A@ dd*A };;;;  Purpose: 0 ` Tosaveafilewitharefreshedinternalheader.l ` (#` (#  Action: 0 ` Selectthecontentsofthefileg ` (#` (#    ` Saveittotheclipboard &     ` Closetheoriginalfile h     ` Restorethefilecontentstoanewblankdocument '    0 ` Saveitwiththeoriginalfilename,overwritingtheoriginalfile,withoutaprompt.c ` (#` (# @d @A@ dd#A };;;;  Issue: 0  Donotrunthismacroonitself.Itwillfail!e_(#(# @`@ ,,;EndIfPlatform("Comments01")#;,,4#  OnCancel( lQuit ) Q  2(#. //CheckBuildofWPWin11  L  CallCheckVersion11()o       If(ToLower(?name)="newsave.wcm")     MessageBox(;"Unwisemove";"Pleasedonotrunmeonmyself!") H    Go( lQuit  )  !   EndIf I!" FileName=?path+?name "D$ SelectAll() #% EditCopy() E$& SelectOff() %' CloseNoSave(No!) %@( Wait(5) &) FileNew() A'* EditPaste() (}+ FileSave(filename;;Yes!) (< , MessageBox(;"NewSave";"File"+filename+"hasbeensucccessfullysavedanew") ~) - Label( lQuit  ) =*!. Quit *y"/    z,#1 ProcedureCheckVersion11()  2(#. //CheckBuildofWPWin11   ~ , vHRt=NToC(63754)  = nnn=VersionInfo(PerfectFitVersion!;ProductVersionNumber!)   If(nnn<11000000000300.0andnnn>11000000000000.0) >  MessageBox(vAns;"MacroVersion";"YouarerunningthefirstbuildofWPWin11"+vHRt+  z "Thereisnocertaintythatanymacrowillruncorrectlyinthatbuild."+vHRt+vHRt+  9 "Pleaseinstallthelatestservicepackfromftp://ftp.corel.com/pub/WordPerfect/wpwin/11/"+vHRt+vHRt+ { "Click""OK""torunthemacroanyway.Click""Cancel""otherwise"+vHRt; :  OKCancel!|IconWarning!) v  If(vAns>1)0 ` Quit0 ` (#` (#EndIf0 (# (#EndIfw (#(#  EndProc  r