rfivet/BCG101
1
0
Fork 0
mirror of https://github.com/rfivet/BCG101.git synced 2024-12-18 16:16:32 -05:00
Code

Compare commits

base: rfivet:a049b933251803ab4ac8981b856fa117dfcf4eea
Branches Tags
rfivet:main
...
compare: rfivet:63a4a686ce431612f7930dfe33808c272af70f77
Branches Tags
rfivet:main

2 Commits
a049b93325 ... 63a4a686ce

Author SHA1 Message Date
Renaud Fivet
63a4a686ce Propagate typo correction to TSS8 ported code. 
Insure consistency of EOL.
 2024-11-19 09:27:06 +08:00
ssolle
c1c3ab9037
Fixed some typos (note that these typos are not present in the original book) (#1) 
* Update BLKJAC.BAS

* Update BULCOW.BAS
 2024-11-19 09:03:17 +08:00
4 changed files with 4 additions and 3 deletions
Show Stats Expand all files Collapse all files

1
.gitattributes vendored Normal file
View File

@ -0,0 +1 @@
* text=auto

2
dec/BLKJAC.BAS
View File

@ -161,7 +161,7 @@
825 GOTO 660 825 GOTO 660
830 IF V(1)<>2 THEN 855 830 IF V(1)<>2 THEN 855
835 IF V(3)=2 THEN 850 835 IF V(3)=2 THEN 850
840 PRINT"TOO LATE TO DOUBLE, VHARLIE." 840 PRINT"TOO LATE TO DOUBLE, CHARLIE."
845 GOTO 660 845 GOTO 660
850 LET W(P)=2*W(P) 850 LET W(P)=2*W(P)
855 IF V(1)>0 THEN 430 855 IF V(1)>0 THEN 430

2
dec/BULCOW.BAS
View File

@ -32,7 +32,7 @@
220 FORI=0TOP-1:IFD(A,I)=D(A,P)GOTO210 220 FORI=0TOP-1:IFD(A,I)=D(A,P)GOTO210
230 NEXTI 230 NEXTI
240 NEXTP 240 NEXTP
250 IFA=0GGOTO30 250 IFA=0GOTO30
260 LETJ=1:GOTO70 260 LETJ=1:GOTO70
300 LETV=0:LETW=0 300 LETV=0:LETW=0
310 FORI=0TOP:IFD(A,I)=G(I)THENLETV=V+1 310 FORI=0TOP:IFD(A,I)=G(I)THENLETV=V+1

2
port/BLKJAC.BAS
View File

@ -161,7 +161,7 @@
825 GOTO 660 825 GOTO 660
830 IF V(1)<>2 THEN 855 830 IF V(1)<>2 THEN 855
835 IF V(3)=2 THEN 850 835 IF V(3)=2 THEN 850
840 PRINT"TOO LATE TO DOUBLE, VHARLIE." 840 PRINT"TOO LATE TO DOUBLE, CHARLIE."
845 GOTO 660 845 GOTO 660
850 LET W(P)=2*W(P) 850 LET W(P)=2*W(P)
855 IF V(1)>0 THEN 430 855 IF V(1)>0 THEN 430