Code: Select all
$.ASA.MENU $.ASA.HELP $.ASA.MNUA. $.ASA.MNUB. $.ASA.MNUC. $.ASA.MNUD. $.ASA.MNUE. $.ASA.MNUF. $.ASA.<N1>.<N2>.<N3>.
Code: Select all
$.ASA.MNUA.HELP $.ASA.MNUA.MENUDAT1 $.ASA.MNUA.MENUDAT2 $.ASA.MNUA.SORTDAT0 $.ASA.MNUA.SORTDAT1 $.ASA.MNUA.SORTDAT2 $.ASA.MNUA.SORTDAT3 $.ASA.MNUA.SPLASH
Code: Select all
$.ASA.0.1.0.BOOT $.ASA.0.1.0.SPHINX $.ASA.0.1.0.SPHINX1 $.ASA.0.1.0.SPHINX2 $.ASA.0.1.0.SPHINXIN
Perhaps creating a "RUN" executable that passes the rest of the command line to the CLI would work?hoglet wrote: ↑Tue May 21, 2019 2:57 pmThe Menu program needed a few tweaks to deal with this new directory structure. And also to deal with the fact the the *RUN command doesn't seem to be available from an Atom client. I've dealt with the cases where *RUN is used in the Menu system, but probably a few titles will use this directly, and so will fail.
Hi,hoglet wrote: ↑Tue May 21, 2019 2:57 pm
The end result is a scsi0.dat image that contains everything you need, including the L3 File Server itself:
https://www.dropbox.com/s/w3q8rcx2e8rkm ... t.zip?dl=0
It seem's that BeebSCSI is quite happy to create a .dsc file on the fly if it is missing.PhilYoung wrote: ↑Wed May 22, 2019 8:38 amI don't think I'll ever be in a position to use this, but out of interest for a BeebSCSI(mini) doesn't a scsix.dat file need an associated scsix.dsc file to describe the disk geometry that the dat file is an image of ? Or is it now implicit (I haven't used my BeebScsi mini in a while so I could be behind the latest version)
Thanks for the reply, I'll see if that happens with mine, not that I have the Atom Econet side of the equation of course,hoglet wrote: ↑Wed May 22, 2019 10:46 amIt seem's that BeebSCSI is quite happy to create a .dsc file on the fly if it is missing.PhilYoung wrote: ↑Wed May 22, 2019 8:38 amI don't think I'll ever be in a position to use this, but out of interest for a BeebSCSI(mini) doesn't a scsix.dat file need an associated scsix.dsc file to describe the disk geometry that the dat file is an image of ? Or is it now implicit (I haven't used my BeebScsi mini in a while so I could be behind the latest version)
But I will include a matching one in the next release.
I bundled them up for upload, but I set the access string wrong, so my auto-uploader skipped them. I'm currently sorting things for the Euro Election count tomorrow night, so I'll have a look when I've woken up afterwards.
Code: Select all
$ bbcbasic PDP11 BBC BASIC IV Version 0.32 (C) Copyright J.G.Harston 1989,2005-2020 >_
I've included some code in the build process automatically patch the v2.40 originals as well:jgharston wrote: ↑Wed May 22, 2019 3:52 pmI bundled them up for upload, but I set the access string wrong, so my auto-uploader skipped them. I'm currently sorting things for the Euro Election count tomorrow night, so I'll have a look when I've woken up afterwards.
Code: Select all
5db943487 Econet: Added ATOMLIB dir and null *NOMON command b5355a469 Econet: Added ^ as a directory back link 90e9e2931 Econet: Added *RUN command 5563dca8d Econet: Fix a memory conflict between the menu and the Econet ROM 3af5ca427 Econet: Added ATOMLIB Utils (inc. patching for 350) d9a1892a4 Econet: Changed library dir from ATOMLIB to LIBRARY
The program is in Chapter A of the Menu.
Code: Select all
10REM SPACE ADVENTURE 20REM COPYRIGHT D.P.SAVILLE 30DIMX22,Y22,S27,D2 40aCLEAR4;C.1;P.$21;E=0;T=0;G=0;H=0;A=#3F8A0;!S=#A1EB978;K=0 50S?5=185;GOS.c;F.N=0TO22;X?N=A.R.%126;Y?N=A.R.%176 60IFX?N<2X?N=2 70IFY?N<2Y?N=2 80IF?X>70IF?Y>99N=-1 90IFN<8IFN>0GOS.d 100IFN>17GOS.e 110N. 120bT=T+1;IFS?2<11G.y 130IFS?2<13G.u 140Q=A.R.%150;IFQ<5GOS.z 150IFT>5IFQ>147G.1410 160C.1;IN.$D;IF$D="T"GOS.s 170IF$D="ST"E=1;GOS.x 180S?4=?S;S?5=S?1;?S=?S+30;S?1=S?1+30;W=(S?2-11)*7/10 190IF$D="NE"?S=?S+W;S?1=S?1+W 200IF$D="NW"?S=?S-W;S?1=S?1+W 210IF$D="SE"?S=?S+W;S?1=S?1-W 220IF$D="SW"?S=?S-W;S?1=S?1-W 230IF$D="S"S?1=S?1-S?2+11 240IF$D="N"S?1=S?1+S?2-11 250IF$D="W"?S=?S-S?2+11 260IF$D="E"?S=?S+S?2-11 270?S=?S-30;S?1=S?1-30;PLOT14,(S?4),(S?5) 280C.0;PLOT9,-1,1;PLOT9,2,0;C.1;GOS.c 290IF?S<5OR?S>123G.i 300IFS?1<5ORS?1>186G.i 310P=?S;Q=S?1;B=A.(P-?X);C=A.(Q-?Y);N=1 320IFB<25IFC<25C.2;PLOT13,?X,?Y;PLOT9,-1,1;PLOT9,2,0;C.1 330PLOT13,P,Q;IFB<9IFC<9G.k 340qB=A.(P-X?N);C=A.(Q-Y?N) 350IF$D="F"IFN>7IFB<25IFC<25G.o 360IFB<15IFC<15G.o 370N=N+1;IFN=23G.b 380G.q 390oIF$D="F"GOS.f 400IFN<8GOS.l;G.b 410IFN<18GOS.m;G.b 420IFN<23GOS.n;G.b 430G.b 440dPLOT13,(X?N),(Y?N);PLOT9,1,0;PLOT9,0,1;PLOT9,-1,0;R. 450eM=(N-17)*4+4;S?M=X?N;S?(M+1)=Y?N;S?(M+3)=12;R. 460fIFS?3<6ORN=0R. 470S?3=S?3-1;PLOT5,(X?N),(Y?N);J=50;GOS.v 480IFN<8G.g 490IFN<18GOS.h;R. 500R=A.R.%2;IFR=0R. 510S?((N-17)*4+7)=5;G=G+1 520GOS.n;X?N=255;N=23;R. 530gCLEAR0;P.$6'"FIRING INTO THE SUN"'"MAKES IT GO NOVA!" 540J=99;S?2=0;GOS.v;G.y 550hPLOT14,(X?N),(Y?N);PLOT10,-1,0;PLOT10,1,-1;H=H+1 560PLOT10,1,1;PLOT10,-1,1;X?N=255;Z=260256;N=23;R. 570iCLEAR0;R=A.R.%2 580P.$6'"YOU HAVE FLOWN OFF INTO"'"UNCHARTED SPACE WHERE" 590IFR=0P.'"A FIERCE SPACE SERPENT LIVES" 600IFR=1P.'"A BLACK HOLE EXERTS ITS"'"BALEFUL INFLUENCE" 610R=A.R.%5;IFR=0P.'"YOUR SHIP IS LOST";G.x 620P.'"LUCKILY YOU MANAGE TO ESCAPE" 630J=350;GOS.v;P.$21;?#B000=#D0;GOS.r;G.b 640kCLEAR0;P.$6'"WELL DONE CAPTAIN!" 650IFT>30P.'"BUT WHAT KEPT YOU?" 660G.x 665lIFB<9IFC<9G.p 670R=A.R.%9;S?2=S?2-R;GOS.t;IFS?2>13R. 680CLEAR0;P.$6'"IT'S NOT WISE TO FLY SO CLOSE" 690P.'"TO THE SUN IN YOUR CONDITION";J=150;GOS.v;G.y 700pGOS.w;CLEAR0;P.$6'"YOU FLEW TOO CLOSE TO THE SUN" 710P.'"AND YOUR TANTHALLIUM HULL"'"HAS MELTED" 720P.'"..........OH...DEAR..!"'"THE DREADED XXIK HAS WON" 730P.'"MANKIND MAY BE DESTROYED.....!";G.x 740mC.2;PLOT13,(X?N),(Y?N);PLOT9,0,1;PLOT9,0,-2 750PLOT9,-1,1;PLOT9,2,0;C.1;IFB>9A.C>9X?N=255;R. 760R=4;R=R+A.R.%8;S?2=S?2-R;GOS.t;IFS?2<10G.y 780X?N=255;R. 790nC.3;GOS.j;M=(N-17)*4+7;IFS?M<10R. 800R=A.R.%9;S?2=S?2-R;GOS.t 810S?M=S?M-1;IFS?2<11G.y 820IFS?M<11X?N=255;R. 830C.0;GOS.j;M=R.%15;X?N=X?N+M;Y?N=Y?N+M 840IFX?N>126X?N=126 850IFY?N>190Y?N=190 860R. 870xJ=(S?2-10)*5;IFJ<3J=0 880V=S?3-5;IFV<0V=0 890IFE CLEAR0;P.$6'"STATUS REPORT" 900P.''"ENGINE POWER = "J"%" 910P.'"MISSILES LEFT = "V'"TIME TAKEN = "T;Z=260256 920P.'"XXIK KILLED = "G'"!ZYL KILLED = "H 930IFE IN.''"HIT RETURN KEY TO CONTINUE"'$D;P.$21;?#B000=#D0 935IFE GOS.r;E=0;R. 940IN.'"ANOTHER GAME PERHAPS"$D 950IF?D=89;G.a 960P.'"......SOB..SOB";END 970yGOS.w;CLEAR0 980P.$6'"YOU HAVE JUST BEEN"'"VAPORISED INTO A CLOUD OF" 990P.'"SUB-ATOMIC PARTICLES"'"SOME CAPTAIN YOU ARE....!";G.x 1000wCLEAR 0;P.$6,$7';S?2=0;S?3=0 1010P." ###"' 1020P." #######"' 1030P." #########"' 1040P." #########"' 1050P." ###"' 1060P." ###"' 1070P." ###"' 1080P." ############"';J=30;GOS.v;R. 1100tF.I=1TO4;GOS.c;J=9;GOS.v;C.1;GOS.c;GOS.v;N.;R. 1110uCLEAR0;P.$6'"YOUR SHIP IS CRIPPLED" 1120P.'"AND DRIFTING HELPLESSLY"'"IN SPACE";J=150;GOS.v 1130P.''"OOPS....SHIELDS LOOSING POWER";J=99;GOS.v;G.y 1140vF.U=1TOJ;WAIT;N.;R. 1150zCLEAR0;Q=A.R.%4;P.$6'"OH..DEAR!A " 1160IFQ=0P."FEROCIOUS"'"SCALY GRUNCHER" 1170IFQ=1P."GHASTLY"'"SLIME MONSTER" 1180IFQ=2P."DEADLY"'"BETAN SGRAAAL" 1190IFQ=3P."COLD-HEARTED"'"TAX MAN" 1200Q=A.R.%2;IFQ=0P." HAS APPEARED AND"'"IS CHASING YOU!"' 1210IFQ=1P." LIES RIGHT"'"IN YOUR PATH"' 1220J=150;GOS.v;Q=A.R.%8;IFQ=7P."LUCKILY IT'S JUST EATEN!" 1230IFQ=6P."IT ATTACKS AND DESTROYS YOU";G.x 1240IFQ=5P."HOWEVER YOU SCARE"'"IT OFF WITH SOME EXPLOSIVES" 1250IFQ=4P."BUT IT IS FEELING SLEEPY"'"AND YOU ESCAPE" 1260IFQ=3P."BUT IT CANNOT PENETRATE"'"YOUR SHIELDS" 1270IFQ<3P."THANKFULLY YOU OUTDISTANCE IT"'"BUT YOUR " 1280IFQ<3P."ENGINES ARE DAMAGED";S?2=S?2-4 1290IFS?2<13P.'"SO MUCH THAT YOU ARE"'"PROBABLY DOOMED!" 1300P.$21;GOS.v;?#B000=#D0;GOS.r;R. 1310cPLOT13,(?S),(S?1);PLOT9,-1,1;PLOT9,2,0;R. 1320jPLOT13,(X?N),(Y?N);PLOT9-1,1;PLOT9,2,0;PLOT9,0,-2 1330PLOT9,-2,0;R. 1340rC.0;F.N=176TO191;MOVE0,N;DRAW127,N;N.;C.1;R. 1350sCLEAR0;P.$6'"ENGINEERING TO CAPTAIN";V=S?2+(S?3-5)*3 1360IFS?3<6P.'"NO POWER LEFT TO TRANSFER" 1370IFV>30P.'"THE ENGINES WILNA TAK IT" 1380IFV<31IFS?3>5P.'"AYE AYE SIR!"'"ENGINES NOW ="(V-10)*5"%" 1390P.$21;J=250;GOS.v;IFV>30G.y 1400S?2=V;S?3=4;CLEAR0;?#B000=#D0;GOS.r;R. 1410CLEAR0;P.$6'"THE DREADED XXIK HAS FOUND"'"THE AMYTHEST" 1420P.''"YOU HAVE FAILED!";G.x 1430 "COPYRIGHT D.P.SAVILLE"
I've just checked, yep it hangs by several Atoms not even a flashing cursor...MarkMoxon wrote: ↑Wed May 06, 2020 1:57 pmHi all.
I'm having problems running the Ballistics game from Acornsoft's Games Pack 7 in the Atom Software Archive. I've tried various emulators and disk images, but they all hang on load, showing nothing other than a flashing cursor. Here's what I've tried:
- The latest Atom Software Archive on Atomulator
- The online Acorn Atom Software Archive
On all of the above, loading Ballistics (or Balistics as it's shown in the menu) fails - all I get is a cursor and a hung machine. Pressing F12 and doing OLD also crashes the machine.
- hoglet's online Atom emulator
I've also tried downloading the .dsk file from the Acorn Atom Software Archive and loading it into Atomulator without using the main archive menu, and although the disk CATs without a problem, doing a Shift-F12 and LOAD "BALLIST" both hang the machine in the same way.
Is anyone else having this problem? Sorry if it's me, but I thought I'd mention it in case there's a problem with the version in the archive.
Yes, it looks like the copy in the archive is corrupt; it's missing the end-of-basic-program terminator.
Hi Dave many thanks...