WPC  ~qD[c8n' z's;Z>𠜷PV~BLj?)^׋?2}VDmpoe`˪{' 9=:knQ~RE3T](C/۲4×FO,iá ThAߋ!=i &}m}C }Q0+' E p!NJ#d̫"" ׫&@ ۝\?e5^Y"m|1-$ v(3N)̉*^ 4QޙPahUfzs[L>ZU)+(PPG/o%u,HS) TÈ%Vyм&Zw#.uζaLRxX'^3ȳ9L=uZ4HvdrgΦ3z,QElfAc~C~_= #UN % 0:N ^ w43B mD [Canon BJC-2100J/))/J0(9 Z6Times New Roman RegularX($USUS.,F3A f**arrays3|xU95 AC:\Documents and Settings\Timmy Da Mut\My Documents\Bidgood Corp\Websites\All Things WordPerfect\AllThingsWordPerfect\macros\Array.wcm5[ [MONTHS[[ X [ #(F1-VAR)[oJanuaryoFebruaryoMarchoApril oMayoJuneoJulyoAugusto SeptemberoOctoberoNovemberoDecember[ P  #(F1-VALS)[r #(F1-VAR)[ #(F1-VAR)r #(F1-VAR)[[S #(F1-VALS)[3r #(F1-VAR)[S #(F1-VALS)[VMONTH rX[rVMONTH MONTHS[ rX[ X  #(F1-VAR)[ #(F1-VALS)[H[ LUE*H[LIoJanuaryLNIoFebruaryLNIoMarchLNIoAprilLNI oMayLNIoJuneL NIoJulyL NIoAugustL NIo SeptemberL NIoOctoberL NIoNovemberLNIoDecemberLNIoQUITLNBo)VNMBRrVNMBR[ *HE*HE*HvVSTATUSLR+oMONTHS OF THE YEARLN!o You selected rVNMBR[SMONTHS[LN[ LIBn)@,START[)51START+N!OEN WordPerfect)OENPSMacroFacility/OENPSMacroInterpreter !USUS.,  _=XXdd=//APPLICATION(A1;"WordPerfect";Default;"EN")  //Declareanarrayofmonths  //DemonstrateDECLAREcommand,recursiveLABELstatement  DECLAREMonths[12] d x:=1 Q  FOREACH(vMonth;{"January";"February";"March";"April";"May";"June";"July";"August"; + { "September";"October";"November";"December"})  h Months[x]:=vMonth  U  x:=x+1  B  ENDFOR /  LABEL(Start)   WAIT(10)   MENU(vNmbr;Letter;;;{"January";"February";"March";"April";"May";"June";"July";   "August";"September";"October";"November";"December";"QUIT"})  IF(vNmbr=13) Z BEEP G QUIT 4 ELSE !q MESSAGEBOX(vStatus;"MONTHSOFTHEYEAR";"Youselected"+Months[vNmbr]; ^ IconInformation!) K GO(Start) 8 ENDIF=XXdXXd=