Skip to content

Commit bb9bab9

Browse files
fixes from github
1 parent 1e16a41 commit bb9bab9

1 file changed

Lines changed: 6 additions & 6 deletions

File tree

awari.bas

Lines changed: 6 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -1,11 +1,11 @@
11
5 DATA0
22
10 DIMB(13),G(13),F(50):READN
33
15 FORI=0TON-1:READF(I):NEXTI
4-
20 PRINT\PRINT "GAME OF AWANI ***"\E=0
4+
20 PRINT\PRINT "GAME OF *** AWARI ***"\E=0
55
25 FORI=0TO12:LETB(I)=3:NEXTI
6-
30 LETC=0:LETF(N)=0:LETB(13)=0:LETA(6)=0
6+
30 LETC=0:LETF(N)=0:LETB(13)=0:LETB(6)=0
77
35 GOSUB500
8-
40 PRINT "YOUR MOVE";:GOSUB110
8+
40 PRINT"YOUR MOVE";:GOSUB110
99
45 IFE=0GOTO80
1010
50 IFM=6THENGOSUB100
1111
55 IFE=1GOTO80
@@ -31,15 +31,15 @@
3131
225 RETURN
3232
230 FORI=7TO12:IFB(I)<>0THENLETE=1:RETURN
3333
235 GOTO220
34-
500 PRINT:PRINT" "
34+
500 PRINT:PRINT" ";
3535
505 FORI=12TO7STEP-1:GOSUB580
3636
510 NEXTI
3737
515 PRINT:LETI=13:GOSUB580
38-
520 PRINT," ";:PRINTB(6):PRINT " "
38+
520 PRINT," ";:PRINTB(6):PRINT " ";
3939
525 FORI=0TO5:GOSUB580
4040
530 NEXTI
4141
535 PRINT:PRINT:RETURN
42-
570 IFB(I)<>0THENPRINT" ";
42+
570 IFB(I)<>0THENPRINT" ";
4343
580 PRINTB(I):RETURN
4444
600 LETP=B(M):LETB(M)=0
4545
605 FORP=PTO1STEP-1:LETM=M+1:IFM>13THENLETM=M-14

0 commit comments

Comments
 (0)