From cc4f579a5f92bc033c4d7cb41199a1994bc71a15 Mon Sep 17 00:00:00 2001 From: neauoire Date: Sun, 11 Sep 2022 11:46:26 -0700 Subject: [PATCH] Limit eyesight --- ray/src/ray.tal | 9 +++------ 1 file changed, 3 insertions(+), 6 deletions(-) diff --git a/ray/src/ray.tal b/ray/src/ray.tal index e1e1fb6..fedd50a 100644 --- a/ray/src/ray.tal +++ b/ray/src/ray.tal @@ -170,10 +170,7 @@ JMP2r #05 .Screen/sprite DEO .player/x LDZ2 .player/y LDZ2 ;to-scale JSR2 - .player/r LDZ2 ;ray-pos JSR2 - OVR2 ;print JSR2 #2018 DEO - DUP2 ;print JSR2 #0a18 DEO - ;to-scale JSR2 + .player/r LDZ2 ;ray-pos JSR2 ;to-scale JSR2 #01 ;draw-line JSR2 .player/x LDZ2 .player/y LDZ2 ;to-scale JSR2 @@ -196,7 +193,7 @@ JMP2r @ray-pos ( angle* -- x* y* ) ,&angle STR2 - #0200 #0001 + #0100 #0001 &r [ LIT2 &angle $2 ] OVR2 ;raycast JSR2 DUP2 ,&y STR2 @@ -212,7 +209,7 @@ JMP2r @ray-tile ( angle* -- distance* color ) ,&angle STR2 - #0200 #0001 + #0100 #0001 &r DUP2 ,&distance STR2 [ LIT2 &angle $2 ] OVR2 ;raycast JSR2