//okhan 2/14/00 /'2A //Offset Balloon Paper 0 pen 100 //5 dots Command Shade X Y A P { Set [(X-13) (Y-13+A)] P Set [(X-9) (Y-12+A)] P Set [(X-5) (Y-10+A)] P Set [(X-3) (Y-8+A)] P Set [(X-1) (Y-4+A)] P } //10 dots Command String X Y A P { Set [(X-13) (Y-13+A)] P Set [(X-9) (Y-12+A)] P Set [(X-5) (Y-10+A)] P Set [(X-3) (Y-8+A)] P Set [(X-1) (Y-4+A)] P Set [(X-1) (Y+4-A)] P Set [(X-3) (Y+8-A)] P Set [(X-5) (Y+10-A)] P Set [(X-9) (Y+12-A)] P } //20 Dots Command Circle X Y A { Set [X Y] 100 Set [(X+4) (Y+1)] 100 Set [(X+8) (Y+3)] 100 Set [(X+10) (Y+5)] 100 Set [(X+12) (Y+9)] 100 Set [(X+13) (Y+13)] 100 Set [(X+12) (Y+17)] 100 Set [(X+10) (Y+21)] 100 Set [(X+8) (Y+23)] 100 Set [(X+4) (Y+25)] 100 Set [(X) (Y+26)] 100 Set [(X-4) (Y+25)] 100 Set [(X-8) (Y+23)] 100 Set [(X-10) (Y+21)] 100 Set [(X-12) (Y+17)] 100 Set [(X-13) (Y+13)] 100 Set [(X-12) (Y+9)] 100 Set [(X-10) (Y+5)] 100 Set [(X-8) (Y+3)] 100 Set [(X-4) (Y+1)] 100 } Command Stem X Y { Set [(X+5) (Y+20)] 100 Set [(X+7) (Y+22)] 100 Set [(X+9) (Y+24)] 100 Set [(X+10) (Y+25)] 100 } //20 dots Circle 70 30 1 // 4@5 dots = 20 Shade 83 43 2 50 Shade 81 43 3 40 Shade 83 43 4 30 Shade 81 43 5 20 // 10 dots String 85 20 3 60 Line 0 0 0 100 Line 0 100 100 100 Line 100 0 100 100 Line 0 0 100 0