33 lines
850 B
HTML
33 lines
850 B
HTML
<html>
|
|
<head>
|
|
<title>MiniLogo Simulator</title>
|
|
<script src="minilogo.js"></script>
|
|
<script src="http://unpkg.com/elm-canvas/elm-canvas.js"></script>
|
|
<link rel="stylesheet" href="minilogo.css">
|
|
</head>
|
|
<body>
|
|
<div id="elm-container">
|
|
</div>
|
|
<script>
|
|
var program = `move(0, 0);
|
|
define line(x1, y1, x2, y2) {
|
|
pen up;
|
|
move(x1, y1);
|
|
pen down;
|
|
move(x2, y2);
|
|
}
|
|
define nix(x, y, width, height) {
|
|
call line (x, y, x + width, y + height);
|
|
call line (x + width, y, x, y + height);
|
|
}
|
|
call nix(0, 0, 20, 20);
|
|
`
|
|
var container = document.getElementById("elm-container");
|
|
var app = Elm.Main.init({
|
|
"flags": { initialText: program },
|
|
"node": container
|
|
});
|
|
</script>
|
|
</body>
|
|
</html>
|