DataMuseum.dk

top - metrics - download

    Length: 1635 (0x663)
    Types: TextFile
    Names: »cursive.c«

└─⟦b20c6495f⟧ Bits:30007238 EUUGD18: Wien-båndet, efterår 1987
    └─⟦this⟧ »EUUGD18/General/Tetris/cursive.c« 

TextFile

/*
** written by adam margulies vespa@ssyx.ucsc.edu
**                           {...}!ucbvax!ucscc!ssyx!vespa
**
** permission is granted to freely distribute this code provided that you:
**
** 1) don't charge for it
** 2) leave my name and header on it
** 3) clearly document your changes and place your name on them
**
*/
/* Tetris: cursive()                                                         */
/* Draws the word "Tetris" in cursive writing on the screen                     */
#include "tetris.h"

void 
cursive()
{
    mvaddstr(0, 0, "_____                      ");
    mvaddstr(1, 0, "  |  _ ___  _  .  _        ");
    mvaddstr(2, 0, "  | (_  |  | ) | (         ");
    mvaddstr(3, 0, "  | (_  |  | \\ | _)        ");
    mvaddstr(4, 0, "              the addiction");

    /* Capital T */
    csr_draw(0, 0, 0, 4);
    csr_draw(1, 2, 1, 2);
    csr_draw(2, 2, 2, 2);
    csr_draw(3, 2, 3, 2);

    /* Little e */
    csr_draw(1, 5, 1, 5);
    csr_draw(2, 4, 2, 4);
    csr_draw(2, 5, 2, 5);
    csr_draw(3, 4, 3, 4);
    csr_draw(3, 5, 3, 5);

    /* Little t */
    csr_draw(1, 7, 1, 7);
    csr_draw(1, 8, 1, 8);
    csr_draw(1, 9, 1, 9);
    csr_draw(2, 8, 2, 8);
    csr_draw(3, 8, 3, 8);

    /* Little r */
    csr_draw(3, 11, 3, 11);
    csr_draw(2, 11, 2, 11);
    csr_draw(1, 12, 1, 12);
    csr_draw(2, 13, 2, 13);
    csr_draw(3, 11, 3, 15);

    /* Little i */
    csr_draw(2, 15, 2, 15);
    csr_draw(3, 15, 3, 16);

    /* Little s */
    csr_draw(1, 18, 1, 18);
    csr_draw(2, 17, 2, 17);
    csr_draw(3, 18, 3, 18);
    csr_draw(3, 17, 3, 17);

    csr_draw(1, 15, 1, 15);

    csr_draw(4, 0, 4, 26);
}