* Richard A. DeVenezia 11/28/2002; * Zodiac and planetary symbols (Euro) in SAS SPECIAL font; * http://www.devenezia.com; * * check out http://kofler.dot.at/astro/chart.html; %let stylen = %sysevalf ((&sysver > 6.12)*32 + 8); %let workpath = c:\temp; %macro outext (code=, desc=); xhold = x; style = 'SPECIALU'; xsys = '1'; text = byte (&code); output; x = 2; style = "SIMPLEX"; xsys = '7'; text = put (&code,3.) || ' ' || byte (&code) || " &desc"; output; x = xhold; %mend; options mprint; data anno / view=anno; length function $8 style $&stylen text $80 ; retain xsys ysys '1' function "label" position '>' style 'SIMPLEX' size 1.5; x = 2; y = 95; text='Portion of SAS SPECIAL font - ZODIAC and PLANETARY symbols'; output; dy = -7; size = 1.5; x = 2; y = 83; %outext (code = 46, desc = Ram / Aries) y + dy; %outext (code = 44, desc = Bull / Taurus) y + dy; %outext (code = 58, desc = Twins / Gemini) y + dy; %outext (code = 59, desc = Crab / Cancer) y + dy; %outext (code = 33, desc = Lion / Leo) y + dy; %outext (code = 63, desc = Virgin / Virgo) y + dy; %outext (code = 39, desc = Scales / Libra) y + dy; %outext (code = 34, desc = Scorpion / Scorpio) y + dy; %outext (code = 36, desc = Archer / Sagittarius) y + dy; %outext (code = 47, desc = Sea Goat / Capricorn) y + dy; %outext (code = 40, desc = Water Bearer / Aquarius) y + dy; %outext (code = 41, desc = Fishes / Pisces) x = 55; y = 83; %outext (code = 97, desc = Sun) y + dy; %outext (code = 98, desc = Mercury) y + dy; %outext (code = 99, desc = Venus) y + dy; %outext (code =100, desc = Earth) y + dy; %outext (code =101, desc = Mars) y + dy; %outext (code =102, desc = Jupiter) y + dy; %outext (code =103, desc = Saturn) y + dy; %outext (code =104, desc = Uranus) y + dy; %outext (code =105, desc = Neptune) y + dy; %outext (code =106, desc = Pluto) y + dy; %outext (code =107, desc = Moon) run; goptions reset=all target=png vsize=3in hsize=4.35in goutmode=replace; ods listing close; ods html path="&WORKPATH" body="zodiac-signs.html"; proc gslide anno=anno border; run; quit; ods html close;