heck
/
heck_orca-c
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity
Browse Source

Change 'O' to use new offset

master
cancel 6 years ago
parent
6fafc0dc5a
commit
1dcdce362c
1 changed files with 2 additions and 2 deletions
Whitespace
Show all changes Ignore whitespace when comparing lines Ignore changes in amount of whitespace Ignore changes in whitespace at EOL
Unified View
Diff Options
Show Stats Download Patch File Download Diff File
  1. 4
      sim.c

4
sim.c
View File

@ -379,7 +379,7 @@ BEGIN_DUAL_PHASE_0(offset)
coords[1] = PEEK(0, -2); coords[1] = PEEK(0, -2);
STORE(coords); STORE(coords);
read_y = UCLAMP(INDEX(coords[0]), 0, 16); read_y = UCLAMP(INDEX(coords[0]), 0, 16);
read_x = UCLAMP(INDEX(coords[0]), 1, 16); read_x = UCLAMP(INDEX(coords[0]) + 1, 1, 16);
END_IF END_IF
BEGIN_DUAL_PORTS BEGIN_DUAL_PORTS
I_PORT(0, -1, LOCKING | HASTE); I_PORT(0, -1, LOCKING | HASTE);
@ -396,7 +396,7 @@ BEGIN_DUAL_PHASE_1(offset)
Glyph coords[2]; Glyph coords[2];
if (LOAD(coords)) { if (LOAD(coords)) {
read_y = (Isz)UCLAMP(INDEX(coords[0]), 0, 16); read_y = (Isz)UCLAMP(INDEX(coords[0]), 0, 16);
read_x = (Isz)UCLAMP(INDEX(coords[1]), 1, 16); read_x = (Isz)UCLAMP(INDEX(coords[1]) + 1, 1, 16);
} }
POKE(1, 0, PEEK(read_y, read_x)); POKE(1, 0, PEEK(read_y, read_x));
STUN(0, 1); STUN(0, 1);

Write Preview
Loading…
Cancel
Save