drawcard.icn: Procedure to draw a playing card

link drawcard
December 31, 2014; Gregg M. Townsend
Requires: Version 9 graphics
This file is in the public domain.

   drawcard(win, x, y, c) draws the playing card labeled <c> with its
upper left corner at (x,y).  The card size is fixed at 80w x 124h.

   Card labelings are as follows.

       label: ABCDEFGHIJKLM NOPQRSTUVWXYZ abcdefghijklm nopqrstuvwxyz
       rank:  A23456789TJQK A23456789TJQK A23456789TJQK A23456789TJQK
       suit:  hearts....... spades....... clubs........ diamonds.....

These differ unintentionally from the card mappings used in the
"Mappings and Labelings" chapter of the Icon book (pp 243-244, 3/e).

If the label is unrecognized, the back of a card is drawn.
"-" is suggested as a conventional label for a card back.

Source code | Program Library Page | Icon Home Page