Does anyone know where I can obtain MetaComCo BCPL?

Anything QL Software or Programming Related.
User avatar
XorA
Site Admin
Posts: 1616
Joined: Thu Jun 02, 2011 11:31 am
Location: Shotts, North Lanarkshire, Scotland, UK

Re: Does anyone know where I can obtain MetaComCo BCPL?

Post by XorA »

jobdone wrote: Wed Jun 07, 2023 6:19 am If it's any help, here is the output from qem-unzip on a different version of BCPL with the headers still intact.
Entry: ed
00 00 54 2C 00 01 00 00 12 C0 00 00 00 00 00 02 | ..T,............
65 64 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ed..............
00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................
00 00 00 00 49 43 AE 28 00 00 00 02 00 00 00 00 | ....IC.(........
Entry: install
00 00 09 94 00 00 00 00 00 00 00 00 00 00 00 07 | ................
69 6E 73 74 61 6C 6C 00 00 00 00 00 00 00 00 00 | install.........
00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................
00 00 00 00 49 43 AE 29 00 00 00 03 00 00 00 00 | ....IC.)........
Entry: bcpl_args
00 00 0E E4 00 00 00 00 00 00 00 00 00 00 00 09 | ................
62 63 70 6C 5F 61 72 67 73 00 00 00 00 00 00 00 | bcpl_args.......
00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................
00 00 00 00 49 43 AE 29 00 00 00 04 00 00 00 00 | ....IC.)........
Entry: bcpl_trn
00 00 28 AC 00 00 00 00 00 00 00 00 00 00 00 08 | ..(.............
62 63 70 6C 5F 74 72 6E 00 00 00 00 00 00 00 00 | bcpl_trn........
00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................
00 00 00 00 49 43 AE 2A 00 00 00 05 00 00 00 00 | ....IC.*........
Entry: bcpl_syn
00 00 2E C4 00 00 00 00 00 00 00 00 00 00 00 08 | ................
62 63 70 6C 5F 73 79 6E 00 00 00 00 00 00 00 00 | bcpl_syn........
00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................
00 00 00 00 49 43 AE 2A 00 00 00 06 00 00 00 00 | ....IC.*........
Entry: bcpl_err
00 00 08 BC 00 00 00 00 00 00 00 00 00 00 00 08 | ................
62 63 70 6C 5F 65 72 72 00 00 00 00 00 00 00 00 | bcpl_err........
00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................
00 00 00 00 49 43 AE 2A 00 00 00 07 00 00 00 00 | ....IC.*........
Entry: bcpl_cg
00 00 58 AC 00 00 00 00 00 00 00 00 00 00 00 07 | ..X.............
62 63 70 6C 5F 63 67 00 00 00 00 00 00 00 00 00 | bcpl_cg.........
00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................
00 00 00 00 49 43 AE 2B 00 00 00 08 00 00 00 00 | ....IC.+........
Entry: bcpl
00 00 23 08 00 01 00 00 17 70 00 00 00 00 00 04 | ..#......p......
62 63 70 6C 00 00 00 00 00 00 00 00 00 00 00 00 | bcpl............
00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................
00 00 00 00 49 43 AE 2B 00 00 00 09 00 00 00 00 | ....IC.+........
Entry: blink
00 00 32 18 00 01 00 00 1F 40 00 00 00 00 00 05 | ..2......@......
62 6C 69 6E 6B 00 00 00 00 00 00 00 00 00 00 00 | blink...........
00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................
00 00 00 00 49 43 AE 2B 00 00 00 0A 00 00 00 00 | ....IC.+........
Entry: libhdr
00 00 08 49 00 00 00 00 00 00 00 00 00 00 00 06 | ...I............
6C 69 62 68 64 72 00 00 00 00 00 00 00 00 00 00 | libhdr..........
00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................
00 00 00 00 49 43 AE 2C 00 00 00 0B 00 00 00 00 | ....IC.,........
Entry: boot_bcpl
00 00 01 88 00 00 00 00 00 00 00 00 00 00 00 09 | ................
62 6F 6F 74 5F 62 63 70 6C 00 00 00 00 00 00 00 | boot_bcpl.......
00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................
00 00 00 00 49 43 AE 2C 00 00 00 0C 00 00 00 00 | ....IC.,........
That would be the same numbers I quoted above ;-)


jobdone
Forum Moderator
Posts: 108
Joined: Wed Aug 07, 2019 4:59 am

Re: Does anyone know where I can obtain MetaComCo BCPL?

Post by jobdone »

and using your excellent tool to do so :)


User avatar
Finn
ROM Dongle
Posts: 4
Joined: Fri May 19, 2023 4:18 pm

Re: Does anyone know where I can obtain MetaComCo BCPL?

Post by Finn »

As a learning-experience, here is a real-world BCPL application, the source code for the Essex MUD1:

https://github.com/PDP-10/MUD1.git

You still can play a version of it online as described here:

http://www.british-legends.com/CMS/inde ... y-the-game

Personally, I logged on from Linux/Ubuntu with:

Code: Select all

telnet british-legends.com 27750
Regards,
Finn


swensont
Forum Moderator
Posts: 323
Joined: Tue Dec 06, 2011 3:30 am
Location: SF Bay Area
Contact:

Re: Does anyone know where I can obtain MetaComCo BCPL?

Post by swensont »

I'm late to this conversation, but I'm tinkering with BCPL. I've hit two snags. With the compiler running on SMSQmulator, the compiler window will disappear as soon as compilation has completed. If it completes with an error, you can't see what the error is. I don't see any options to pause the compiler to display the results of compilation. Since this the root of the issue is the PE, I switched over the sQLux to run BCPL. I'm now hitting an issue of when any BCPL program finished (like the compiler), sQLux just hangs.

Has any one else hit these issues and if so, have anyone found a workaround?

Tim


User avatar
pjw
QL Wafer Drive
Posts: 1608
Joined: Fri Jul 11, 2014 8:44 am
Location: Norway
Contact:

Re: Does anyone know where I can obtain MetaComCo BCPL?

Post by pjw »

Tim,

I dont remember whether BCPL can take its source program from the command line. If it can, try:

EXEP <path>BCPL; <source program>,'BCPL', U

or variations thereof..

U is a flag to Unlock the window..


Per
I love long walks, especially when they are taken by people who annoy me.
- Fred Allen
swensont
Forum Moderator
Posts: 323
Joined: Tue Dec 06, 2011 3:30 am
Location: SF Bay Area
Contact:

Re: Does anyone know where I can obtain MetaComCo BCPL?

Post by swensont »

PJW,

Just using the U flag has worked:

exep mdv1_bcpl,U

When the program finishes, the PE does remove it. I've never used EXEP so thanks for the tip (can learn something new after 38 years of QLing).

Tim


User avatar
pjw
QL Wafer Drive
Posts: 1608
Joined: Fri Jul 11, 2014 8:44 am
Location: Norway
Contact:

Re: Does anyone know where I can obtain MetaComCo BCPL?

Post by pjw »

There are four other flags that are worth knowing about. May come in handy in other tricky situations. See the relevant Keywords manual for your platform.


Per
I love long walks, especially when they are taken by people who annoy me.
- Fred Allen
Derek_Stewart
Font of All Knowledge
Posts: 4663
Joined: Mon Dec 20, 2010 11:40 am
Location: Sunny Runcorn, Cheshire, UK

Re: Does anyone know where I can obtain MetaComCo BCPL?

Post by Derek_Stewart »

Hi,

What if the extended environment is not loaded, the EXEP command is on present.

I used to use BCPL on a JS QL, with no problems, I will have look on real hardware and emulators.


Regards,

Derek
User avatar
pjw
QL Wafer Drive
Posts: 1608
Joined: Fri Jul 11, 2014 8:44 am
Location: Norway
Contact:

Re: Does anyone know where I can obtain MetaComCo BCPL?

Post by pjw »

Derek_Stewart wrote: Fri Nov 15, 2024 7:01 pm Hi,

What if the extended environment is not loaded, the EXEP command is on present.
<>
If theres no Extended Environment (Qdos/Minerva only) there is no need to "unlock" the screen. The EE is built in to SMSQ/E so there theres no getting away from it.


Per
I love long walks, especially when they are taken by people who annoy me.
- Fred Allen
Derek_Stewart
Font of All Knowledge
Posts: 4663
Joined: Mon Dec 20, 2010 11:40 am
Location: Sunny Runcorn, Cheshire, UK

Re: Does anyone know where I can obtain MetaComCo BCPL?

Post by Derek_Stewart »

pjw wrote: Fri Nov 15, 2024 7:08 pm
Derek_Stewart wrote: Fri Nov 15, 2024 7:01 pm Hi,

What if the extended environment is not loaded, the EXEP command is on present.
<>
If theres no Extended Environment (Qdos/Minerva only) there is no need to "unlock" the screen. The EE is built in to SMSQ/E so there theres no getting away from it.
There is always going to be problems, as BCPL pre-dates EE.


Regards,

Derek
Post Reply