diff options
| author | Kartik K. Agaram <vc@akkartik.com> | 2016-04-27 15:40:46 -0700 |
|---|---|---|
| committer | Kartik K. Agaram <vc@akkartik.com> | 2016-04-27 15:40:46 -0700 |
| commit | dea902172dd62d14eebc5fed9e11542ebcdc88e6 (patch) | |
| tree | a7ac5d97cb87eec2997a024fffa9ee41b6dab045 /html/chessboard.mu.html | |
| parent | 5109e78fab2e94059763eefaec93bd6649d22c1f (diff) | |
| download | mu-dea902172dd62d14eebc5fed9e11542ebcdc88e6.tar.gz | |
2875
Diffstat (limited to 'html/chessboard.mu.html')
| -rw-r--r-- | html/chessboard.mu.html | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/html/chessboard.mu.html b/html/chessboard.mu.html index 357c33ff..d4241248 100644 --- a/html/chessboard.mu.html +++ b/html/chessboard.mu.html @@ -71,7 +71,8 @@ body { font-size: 12pt; font-family: monospace; color: #eeeeee; background-color run [ screen:address:screen, console:address:console<span class="Special"> <- </span>chessboard screen:address:screen, console:address:console <span class="Comment"># icon for the cursor</span> - screen<span class="Special"> <- </span>print screen, <span class="Constant">9251/␣</span> + <span class="Constant">1</span>:character/cursor-icon<span class="Special"> <- </span>copy <span class="Constant">9251/␣</span> + screen<span class="Special"> <- </span>print screen, <span class="Constant">1</span>:character/cursor-icon ] screen-should-contain [ <span class="Comment"># 1 2 3 4 5 6 7 8 9 10 11</span> @@ -291,7 +292,7 @@ body { font-size: 12pt; font-family: monospace; color: #eeeeee; background-color to-rank:number, quit?, error?<span class="Special"> <- </span>read-rank stdin, screen <span class="muControl">return-if</span> quit?, <span class="Constant">0/dummy</span> <span class="muControl">return-if</span> error?, <span class="Constant">0/dummy</span> - *result<span class="Special"> <- </span>put *result, <span class="Constant">to-rank:offset</span>, to-file + *result<span class="Special"> <- </span>put *result, <span class="Constant">to-rank:offset</span>, to-rank error?<span class="Special"> <- </span>expect-from-channel stdin, <span class="Constant">10/newline</span>, screen <span class="muControl">return-if</span> error?, <span class="Constant">0/dummy</span>, <span class="Constant">0/quit</span> ] |