Re: hoe maak ik een :-) smile in LaTeX?

Re: hoe maak ik een :-) smile in LaTeX?

[Hans Hagen]

I cc this mail to the context list. The question concerned smilies. If
someone can provide me a full set of what these things are and represent, i
can make a few more definitions. Makes a good example for metafun.  

At 11:01 PM 1/11/01 +0100, you wrote:
>Een dubbele-punt-streepje-haakje ziet er niet uit. Toch wil ik ook in een
>LaTeX documentje nog wel eens glimlachen. Hoe doe ik dat?

Ik zou zeggen, met metapost: 

prologues := 2 ; % input mp-tool ; 

numeric smilesize ; smilesize := 12pt ; 

beginfig (1) ; 

pickup pencircle xscaled (smilesize/6) yscaled (smilesize/12) ; 
draw halfcircle rotated -90 scaled smilesize ;
pickup pencircle scaled (smilesize/4) ; 
for i=-1,+1 : draw origin shifted (0,i*smilesize/4) ; endfor ;

endfig ; 

beginfig (2) ; 

pickup pencircle xscaled (smilesize/6) yscaled (smilesize/12) ; 
draw halfcircle rotated -90 scaled smilesize ;
pickup pencircle scaled (smilesize/4) ; 
for i=-1,+1 : draw origin shifted (-smilesize/2,i*smilesize/4) ; endfor ;
pickup pencircle scaled (smilesize/6) ; 
draw (smilesize/4,0) -- (-smilesize/4,0) ; 

endfig ; 

end .

Met mpost thisfile.mp krijg je dan thisfile.1 en thisfile.2 die je
vervolgens met weet ik wat voor'n commando kunt includen. 

In ConTeXt zou het ook als volgt kunnen [zie metafun manual]:

% output=pdftex interface=english 

\setupcolors[state=start]

\setupMPvariables[smile][type=1,height=1.25ex,color=green]

\startuniqueMPgraphic{smile}{type,height,color}
  numeric size ; size := \MPvar{height} ; 
  drawoptions(withcolor \MPvar{color}) ;
  pickup pencircle xscaled (size/6) yscaled (size/12) ; 
  draw halfcircle rotated -90 scaled size ;
  pickup pencircle scaled (size/4) ; 
  if     \MPvar{type}=1 : 
    for i=-1,+1 : draw origin shifted (0,i*size/4) ; endfor ;
  elseif \MPvar{type}=2 : 
    for i=-1,+1 : draw origin shifted (-size/2,i*size/4) ; endfor ;
    pickup pencircle scaled (size/6) ; 
    draw (size/4,0) -- (-size/4,0) ; 
  fi ; 
\stopuniqueMPgraphic

\definesymbol[smile]    [\uniqueMPgraphic{smile}{type=1}]
\definesymbol[smilemore][\uniqueMPgraphic{smile}{type=2}]

\starttext 

Say it with a \symbol [smile]\ or maybe even a \symbol
[smilemore], although seeing too many \dorecurse {10}
{\symbol [smile]\ } \unskip in one text may make you cry. 

\setupMPvariables[smile][height=1ex,color=blue]

Say it with a \symbol [smile]\ or maybe even a \symbol
[smilemore], although seeing too many \dorecurse {10}
{\symbol [smile]\ } \unskip in one text may make you cry. 

\setupMPvariables[smile][color=red]

\midaligned{\switchtobodyfont[60pt]\symbol[smile]}

\stoptext

In dit geval worden de figuurtjes runtime berekent, passen ze zich aan het
korps aan, worden hergebruikt, en zijn manipuleerbaar. 

Hans

-------------------------------------------------------------------------
                                  Hans Hagen | PRAGMA ADE | pragma@wxs.nl
                      Ridderstraat 27 | 8061 GH Hasselt | The Netherlands
 tel: +31 (0)38 477 53 69 | fax: +31 (0)38 477 53 74 | www.pragma-ade.com
-------------------------------------------------------------------------

Re: hoe maak ik een :-) smile in LaTeX?

[Marc van Dongen]

Hans Hagen (pragma@wxs.nl) wrote:

: I cc this mail to the context list. The question concerned smilies. If
: someone can provide me a full set of what these things are and represent, i
: can make a few more definitions. Makes a good example for metafun.  

There must be plenty similar pages.
I thought I'ld send you one near by.

http://www.blinde-kuh.de/smiley/tabelle.html

Regards,

Marc

Re: hoe maak ik een :-) smile in LaTeX?

[H. Ramm]

Marc van Dongen wrote:
> There must be plenty similar pages.
...and there's a nice book full of smileys by O'Reilly.

But I would simply say {\tt ;-)}, perhaps you need an additional verbose...

Grüßlis vom Hraban!
---
http://www.planet-interkom.de/fiee.visuelle/formelsammlung.html

Re: hoe maak ik een :-) smile in LaTeX?

[Wybo Dekker]

On Fri, 12 Jan 2001, Hans Hagen wrote:

> I cc this mail to the context list. The question concerned smilies. If
> someone can provide me a full set of what these things are and represent, i
> can make a few more definitions. Makes a good example for metafun.

funny, indeed, although I feel that smileys should stay like graphics on
a primitive typewriter; so better use a typewriter font.  

In plain tex and latex you can include the metapost output below with:

\input epsf.tex
text... \epsfbox{thisfile.1}... more text... \epsfbox{thisfile.2} ...

> At 11:01 PM 1/11/01 +0100, you wrote:
> >Een dubbele-punt-streepje-haakje ziet er niet uit. Toch wil ik ook in een
> >LaTeX documentje nog wel eens glimlachen. Hoe doe ik dat?
> 
> Ik zou zeggen, met metapost:
> 
> prologues := 2 ; % input mp-tool ;
> 
> numeric smilesize ; smilesize := 12pt ;
> 
> beginfig (1) ;
> 
> pickup pencircle xscaled (smilesize/6) yscaled (smilesize/12) ;
> draw halfcircle rotated -90 scaled smilesize ;
> pickup pencircle scaled (smilesize/4) ;
> for i=-1,+1 : draw origin shifted (0,i*smilesize/4) ; endfor ;
> 
> endfig ;
> 
> beginfig (2) ;
> 
> pickup pencircle xscaled (smilesize/6) yscaled (smilesize/12) ;
> draw halfcircle rotated -90 scaled smilesize ;
> pickup pencircle scaled (smilesize/4) ;
> for i=-1,+1 : draw origin shifted (-smilesize/2,i*smilesize/4) ; endfor ;
> pickup pencircle scaled (smilesize/6) ;
> draw (smilesize/4,0) -- (-smilesize/4,0) ;
> 
> endfig ;
> 
> end .
> 
> Met mpost thisfile.mp krijg je dan thisfile.1 en thisfile.2 die je
> vervolgens met weet ik wat voor'n commando kunt includen.

Hartelijke groet, Wybo

__Servalys Analytical Chemistry Services__
Wybo H. Dekker      wybo@servalys.hobby.nl
Deilsedijk 60              www.servalys.nl
4158 CH Deil            tel +31-345-652164    
The Netherlands         fax +31-345-652383