12
edits
APL logo: Difference between revisions
Jump to navigation
Jump to search
Add proposal
mNo edit summary |
(Add proposal) |
||
| Line 52: | Line 52: | ||
::'''[{{fullurl:{{TALKPAGENAME}}|action=edit§ion=new&preloadtitle=Display%20matrix%20comment%20by%20~~<noinclude></noinclude>~}} Click here to leave feedback on this logo.]''' | ::'''[{{fullurl:{{TALKPAGENAME}}|action=edit§ion=new&preloadtitle=Display%20matrix%20comment%20by%20~~<noinclude></noinclude>~}} Click here to leave feedback on this logo.]''' | ||
[[File:QuadAPL.png|120px|frameless|left]] | |||
=== Quad APL === | |||
This is the design by LdBeth that plotted by the MetaPost program below. It is composed by Quad, And, Jot, Up Tack, and forms the stylized "APL". One day he needs an icon for his APL keyboard layout and spent an hour to do the sketching and wrote the code in his favorite font design tool MetaFont, but converted to MetaPost for vectorized output. | |||
% show bound box | |||
prologues := 2; | |||
beginfig(1); | |||
% edge | |||
e=5; | |||
a=40;b=28; | |||
% misc points | |||
m=0.3a;n=0.5b;t=2; | |||
% center | |||
z0=(e+n,e+0.4a);r=7; | |||
% quad | |||
z1=(e,e);z2=(e,a+e);z3=(b+e,a+e);z4=(b+e,e); | |||
% and | |||
z5=(e+t,e+m);z6=(e+n,e+0.8a);z7=(e+b-t,e+m); | |||
% pi | |||
z8=z0+(0,r);z9=z0+(r,0); | |||
z10=z0-(0,r);z11=z0-(r,0); | |||
% bot | |||
z12=(z1+z4)/2; | |||
% draw | |||
pickup pencircle scaled 3; | |||
draw z1--z2--z3--z4--cycle; | |||
draw z5--z6--z7; | |||
draw z8..z9..z10..z11..cycle; | |||
draw z0--z12; | |||
endfig; | |||
end | |||