retroforth/vm/nga-js/index.html
crc 3a000cc8f0 nga-js: two column display; hide canvas if nothing was drawn to it; glossary below input area
FossilOrigin-Name: cd673444c1019f2c34abd2ed290ae9bb9d47090c27a750bf909f46e17526b881
2019-11-22 22:02:02 +00:00

29 lines
722 B
HTML

<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<title>RETRO FORTH</title>
<link rel="stylesheet" href="style.css">
<script src="image.js"></script>
<script src="nga.js"></script>
</head>
<body onLoad='loadproject()'>
<div class='left'>
<textarea id='input' onchange='saveproject()'>
</textarea>
<iframe src='http://forth.works:9999'></iframe>
</div>
<div class='right'>
<div style='border-bottom: 1px solid #FDF6E3; color: #657B83; background: #FDF6E3;'>
<button onclick='cls()'>Clear</button>
<button onclick='go()'>Go</button>
</div>
<div>
<canvas id="canvas" width="300" height="300"></canvas>
<xmp id='console'>
</xmp>
</div>
</div>
</body>
</html>