d0p1/ack
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

updated

Browse source
This commit is contained in:
ceriel 1988-07-04 11:45:53 +00:00
parent c39c666834
commit 93bdacae44
5 changed files with 9 additions and 57 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
lang/basic/test/Out.std
View file

@ -3,7 +3,7 @@ bull.b ------- execution error(s)-*- Ok
buzzword.b ------- execution error(s)-*- Ok
checker.b ------- execution error(s)-*- Ok
creator.b Undefined:
__inkey
__inkey
------- compilation error(s)
grafiek.b -*- Ok
gunner.b ------- execution error(s)-*- Ok
@ -47,8 +47,8 @@ test30.b ------- execution error(s)-*- Ok
test31.b -*- Ok
test32.b -*- Ok
test33.b -*- Ok
test34.b LINE 3:ERROR:too many indices
LINE 4:ERROR:too many indices
LINE 5:ERROR:too many indices
test34.b LINE 20:ERROR:too many indices
LINE 30:ERROR:too many indices
LINE 40:ERROR:too many indices
------- compilation error(s)
test35.b -*- Ok

11
lang/basic/test/bull.b.g
View file

@ -1,12 +1,3 @@
game of bullseye
in this game, up to 20 players throw darts at a target
with 10,20,30, and 40 point zones. The objective is
toget 200 point.
throw description probable score
1 fast overarm bullseye or complete miss
2 controlled overarm 10,20,30 points
3 underarm anything
how many players?LINE 110:ERROR 2: Out of data
Random number seed (-32768 to 32767) ? LINE 20:ERROR 2: Out of data

29
lang/basic/test/checker.b.g
View file

@ -6,30 +6,5 @@ disappear (same for triple!)
Wait for the computer to move!!!!!!
retry
retry
retry
retry
retry
retry
retry
retry
retry
retry
retry
retry
retry
retry
LINE 11300:ERROR 1: RETURN without GOSUB
I move from ( 2 6 ) to( 1 5 )
board?LINE 13500:ERROR 2: Out of data

16
lang/basic/test/gunner.b.g
View file

@ -1,15 +1 @@
this program simulates the results
of firing a field artillery weapon
you are the officer-in-charge, giving orders to the gun
crew, telling them the degrees of elevation you estimate
will place the projectile on target. A hit within 100 yards
of the target will destroy it. Take more than 5 shots,
end the enemy will destroy you!
maximum range of your gun is 46500 yards.
distance to the target is 42956 yards....
elevation?LINE 410:ERROR 2: Out of data
Random number seed (-32768 to 32767) ? LINE 90:ERROR 2: Out of data

2
lang/basic/test/runcmp
View file

@ -1,5 +1,5 @@
echo -n $1 " "
if abc - -o $1.x $1
if abc - -o $1.x -fp $1
then
if $1.x >$1.r
then :; else