Is it possible to do in BASIC?

I understand what you’re doing in C++, but wouldn’t that be pretty hard to do in BASIC?

I’m using QBasic’s latest version, btw

Oh… and here’s the whole program for those that care:

```
CLS
TEAMS = 2
OPEN "BQ3.DAT" FOR INPUT AS #1
DIM G(15)
FOR BIGLOOP = 1 TO TEAMS
INPUT #1, NB, TEAM$
PRINT TAB(40 - LEN(TEAM$) \ 2); TEAM$
PRINT : PRINT
PRINT " BOWLER G-1 G-2 G-3";
PRINT " TOTAL AVG HDCP HG"
PRINT
FOR SMALLLOOP = 1 TO NB
INPUT #1, BN$(SMALLLOOP)
FOR X = 1 TO 3
INPUT #1, A(X)
T = T + A(X)
NEXT X
AVG = FIX(T / 3)
HDCP = FIX((200 - AVG) * .75)
IF HDCP < 0 THEN HDCP = 0
PRINT USING "#.)"; SMALLLOOP;
PRINT TAB(4); BN$(SMALLLOOP);
PRINT USING "###"; TAB(22); A(1); SPC(3); A(2); SPC(3); A(3); SPC(8); T; SPC(4); AVG; SPC(6); HDCP;
1 FOR X = 1 TO 2
IF A(X) < A(X + 1) THEN SWAP A(X), A(X + 1): GOTO 1
NEXT X
PRINT USING "###"; SPC(4); A(1);
G(SMALLLOOP) = A(1)
FOR X = 1 TO 3
T(X) = T(X) + A(X)
NEXT X
T = 0
PRINT
NEXT SMALLLOOP
0 FOR X = 1 TO NB - 1
IF G(X) < G(X + 1) THEN SWAP G(X), G(X + 1): SWAP BN$(X), BN$(X + 1): GOTO 0
NEXT X
PRINT
PRINT "Highest game bowled by "; BN$(1); G(1)
PRINT : PRINT
SLEEP
NEXT BIGLOOP
'----I need help with this portion, the same problem...----
CLOSE
OPEN "BQ3.DAT" FOR INPUT AS #1
INPUT #1, A, T$
FOR X = 1 TO A
INPUT #1, BN$(X)
FOR Y = 1 TO 3
INPUT #1, A(X)
NEXT Y
NEXT X
'----This is like... the end =o----
END
```

And BQ3.DAT contains this:

```
5, Team #1
John King, 148,137,167,Joe Smith,201,135,192,Mary Lommer,180,170,156,Johnny Rotten,200,234,299,Jim Belushi,150,145,300
2, Team #2
Sally Ride,123,109,230,Last One,100,76,145
```