Season's Greetings in LISP Style :)

Vaidas Guogis
Vaidas Guogis
in Programming and customization

Just run http://kitox.com/downloads/winter.lsp
Or see video at first: http://www.youtube.com/watch?v=LXL_mlsj018
Load file to Start, ESCAPE to Exit, REDRAW or PAN to Clean. And... run again, on your colleague's computer :)

We wish you Merry Chistmas and Happy New 2010 Year!
Have fun from... LISP and visit us sometimes at http://kitox.com :)

Comments

  • Vaidas Guogis
    Vaidas Guogis 
    Greetings in LISP style again :)

    (setq sapi (vlax-create-object "Sapi.SpVoice"))
    (vlax-invoke sapi "Speak" "I wish you the best of everything in New 2011 Year! Thanks for using KitoxToolset from www.kitox.com" 0)
    (vlax-release-object sapi)

  • Damian Harkin
    Damian Harkin

    Vaidas you're a nerd! :-)   Merry Christamas and Happy 2011!   (it's 40 degrees here!)

  • Vaidas Guogis
    Vaidas Guogis 

    (mapcar 'chr '(84 104 97 110 107 32 121 111 117))

    :o)

  • Its_Alive
    Its_Alive

    40? it's -3 here in Shanghai,  luckily I was able to locate a dozen  bottles of leffe blonde to take the edge off .. cheers, ganbei, Op uw gezonheid, I sveikas ... wake me up on the 3rd : )

  • Yaacov Lazar
    Yaacov Lazar

    (defun %strcat ($str / *s *str)
      (setq *str "")
      (foreach *s $str (setq *str (strcat *str *s)))
      *str
    )

    (%strcat (mapcar 'chr '(65 110 100 32 97 32 72 97 112 112 121 32 78 101 119 32 89 101 97 114 32 116 111 32 65 108 108 32 58 41)))

  • Its_Alive
    Its_Alive

    (vl-list->string '(71 111 32 66 114 105 99 115 99 97 100 32 105 110 32 48 49 49 33))

This discussion has been closed.