home *** CD-ROM | disk | FTP | other *** search
- i = "1";
- while("16" >= i)
- {
- loc_h = eval("n" add i add "loc") - int(eval("n" add i add "loc") / "4") * "4";
- if(loc_h == "0")
- {
- loc_h = "4";
- }
- set("/:$X",(eval("n" add i add "loc") - "1") / "4");
- loc_v = "1" + (eval("/:$X") >= int(eval("/:$X")) ? int(eval("/:$X")) : int(eval("/:$X") - "1"));
- tellTarget(i)
- {
- _X = eval("/:loc_h") * "80";
- _Y = eval("/:loc_v") * "60" + "30";
- }
- i += "1";
- }
- stop();
-