05-07-2022, 11:40 PM
(05-07-2022, 11:33 PM)PhilOfPerth Wrote: As you were, bplus...
I was confused (again) with which file you were referring to. Alchemy doesn't require any attachments. The data is in the data statements, and when you play for the first time the Best Scores file is created. If you do a "Replace Best" before playing it you will get that error. I should have said that in the Instructions. I'll fix that.
OK I am trying to run Alchemy and it keeps stopping at line 166 and saying file not found I continue and 20 more times it says file not found continue, Yes and even after we print 20 lines of 0's it still says file not found.
Here is the troubled code Sub:
Code: (Select All)
Sub LoadPairs
Restore
Cls
Color 14: Print Tab(37); "Word Pairs"
Print Tab(20); "Pair"; Tab(30); "First"; Tab(40); "Last"; Tab(50); "Best"; Tab(62); "By"
Color 15
Open "pairs" For Input As #1
For a = 1 To numpairs
Input #1, firstwords$(a), lastwords$(a), targets(a), names$(a) ' loads word-pairs from "pairs" file
Color 14: Print Tab(20); a;: Color 15: Print Tab(30); firstwords$(a); Tab(40); lastwords$(a); Tab(50); targets(a); Tab(60); names$(a)
Next
Close #1
End Sub
b = b + ...