Scheme2jsでscript.aculo.us

ゲームを書こうと思って始めたのに、エフェクトのデモになってしまった。
- http://eva-lu-ator.net/~gemma/geocities/scheme2js/aculo.html
Stripe & Pulsate がきれいでおすすめです。IEだと動かないかもしれません。Geckoなら動きました。

自分用メモ

hopに付属のminesweeper.hopは以下だが、

(define-service (home/demos/minesweeper)
   (<HTML>
      (<HEAD>
         (<SCRIPT> ~(define *minesweeper-directory* $*minesweeper-directory*)))
      (<HOP-SCHEME-HEAD>
         :sscript (string-append *minesweeper-directory* "minesweeper.scm"))
      (<BODY>
         (<TABLE>
            (<TR>
               (<TD>
                  (<BUTTON> :onclick ~(game-start!) "restart"))
               (<TD>
                  (<SPAN> :id "remaining"))))
         (<DIV> :id "board")
         (<SCRIPT> ~(begin
                       (board-init!)
                       (game-start!))))))

の

         (<SCRIPT> ~(begin
                       (board-init!)
                       (game-start!))))))

はあまりお行儀がよくないかもしれない？ ( :onload ~(begin ... のほうがよいかもしれん。