rfivet/BCG101
1
0
Fork 0
mirror of https://github.com/rfivet/BCG101.git synced 2025-02-20 23:47:22 -05:00
Code

Added missing lines from GOLF.BAS (#2)

Browse Source 
* Added missing line

* Added missing line
This commit is contained in:
ssolle 2025-02-09 04:26:35 +02:00 committed by GitHub
parent 1e651c96b1
commit 8e970e6b85
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194
2 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
dec/GOLF.BAS
View File

@ -72,6 +72,7 @@
810PRINT"IN WATER"\LETT=T+1\PRINT"YOU LOSE 1 STROKE"\LETC=ABS(H-X(D)) 810PRINT"IN WATER"\LETT=T+1\PRINT"YOU LOSE 1 STROKE"\LETC=ABS(H-X(D))
820GOTO850 820GOTO850
830LETC=ABS(H-X(D)) 830LETC=ABS(H-X(D))
840IFC<30THEN930
850PRINT"DISTANCE REMAINING TO PIN IS";C;"YARDS" 850PRINT"DISTANCE REMAINING TO PIN IS";C;"YARDS"
860LETH=C 860LETH=C
870GOTO540 870GOTO540

1
port/GOLF.BAS
View File

@ -72,6 +72,7 @@
810PRINT"IN WATER"\LETT=T+1\PRINT"YOU LOSE 1 STROKE"\LETC=ABS(H-X(D)) 810PRINT"IN WATER"\LETT=T+1\PRINT"YOU LOSE 1 STROKE"\LETC=ABS(H-X(D))
820GOTO850 820GOTO850
830LETC=ABS(H-X(D)) 830LETC=ABS(H-X(D))
840IFC<30THEN930
850PRINT"DISTANCE REMAINING TO PIN IS";C;"YARDS" 850PRINT"DISTANCE REMAINING TO PIN IS";C;"YARDS"
860LETH=C 860LETH=C
870GOTO540 870GOTO540