` === WEIGHT GRAPH PROGRAM (PWTB1282)(` ,@A` ";: I 0D 10 H O A"W`( "A U 1000,1900"y`2 "S13 WEIGHT CHART FOR JUNE"`< (_)`F "U 1400,1810"`P "S13 BEN & JEF"`Z (_)`_ "U 200,300"`d I,  `n "U 200,";I ax "D 2810,";Ia I2a === LABEL Y AXIS ===Da "U 100,300"MaJda I  ta "U 80,";Ia "S12"a Ja (_)aJJa Ia C$a === DRAW VERTICAL LINES ===a "U 200,300a I  b "A ";I;",300";b "R D 0,1400 U 90,0 D 0,-1400 U A"Cb" ILb, C$nb6 === LABEL X AXIS ===b@ "U 200,200"bE (_)bJJbO C$bT I  Zb^ "A U ";I;",200"bh "S12"br Jb| (_)bJJb I5c === PRINT SECOND WEIGHT SCALE ON Y AXIS ===fc "CHANGE PEN COLOR FOR SECOND WEIGHT SCALE"oc C$xcJvc I  c "U 5,";Ic "S12"c Jc (_)cJJc Ic "@"c ,cxcJvc I  c "U 5,";Ic "S12"c Jc (_)cJJc Ic "@"c ,c