-void
-Ispy::write(lisp::Writer& writer)
-{
- writer.start_list("ispy");
- writer.write("x", bbox.p1.x);
- writer.write("y", bbox.p1.y);
- writer.write("script", script);
- switch (dir)
- {
- case DOWN:
- writer.write("direction", "down"); break;
- case LEFT:
- writer.write("direction", "left"); break;
- case RIGHT:
- writer.write("direction", "right"); break;
- default: break;
- }
- writer.end_list("ispy");
-}
-