Compare commits
5 Commits
3759b9a6db
...
main
Author | SHA1 | Date | |
---|---|---|---|
bdfae1562b | |||
3220e8fcc8 | |||
a6cff03a70 | |||
3e5734bcf0 | |||
e55ad58419 |
99
.devcontainer/Dockerfile
Normal file
99
.devcontainer/Dockerfile
Normal file
@@ -0,0 +1,99 @@
|
|||||||
|
# syntax=docker/dockerfile:1
|
||||||
|
|
||||||
|
FROM ubuntu:24.04 AS build
|
||||||
|
RUN apt-get update \
|
||||||
|
&& apt-get install -y --no-install-recommends \
|
||||||
|
build-essential \
|
||||||
|
make \
|
||||||
|
unzip \
|
||||||
|
&& rm -rf /var/lib/apt/lists/*
|
||||||
|
|
||||||
|
ADD https://github.com/z00m128/sjasmplus.git#v1.21.0 /sjasmplus
|
||||||
|
RUN cd /sjasmplus && make -j8 && make install
|
||||||
|
ADD https://boarstone.mcphail.uk/mcphail/spectrum_remload.git /ttttt
|
||||||
|
RUN cd /ttttt && make ttttt
|
||||||
|
ADD https://github.com/einar-saukas/ZX0.git /zx0
|
||||||
|
RUN cd /zx0/src/ \
|
||||||
|
&& gcc -O2 -o zx0 zx0.c optimize.c compress.c memory.c \
|
||||||
|
&& gcc -O2 -o dzx0 dzx0.c
|
||||||
|
ADD https://www.boriel.com/files/zxb/zxbasic-1.18.1-linux64.tar.gz .
|
||||||
|
RUN tar xf zxbasic*
|
||||||
|
ADD https://github.com/Mastodon-/inpaws.git /inpaws
|
||||||
|
RUN cd /inpaws/ \
|
||||||
|
&& make -j8
|
||||||
|
|
||||||
|
FROM build AS z88dk
|
||||||
|
RUN apt-get update \
|
||||||
|
&& apt-get install -y --no-install-recommends \
|
||||||
|
bison \
|
||||||
|
ca-certificates \
|
||||||
|
ccache \
|
||||||
|
cpanminus \
|
||||||
|
curl \
|
||||||
|
dos2unix \
|
||||||
|
flex \
|
||||||
|
gdb \
|
||||||
|
git \
|
||||||
|
libboost-all-dev \
|
||||||
|
libcapture-tiny-perl \
|
||||||
|
libclone-perl \
|
||||||
|
libdata-hexdump-perl \
|
||||||
|
libfile-slurp-perl \
|
||||||
|
libgmp3-dev \
|
||||||
|
liblocal-lib-perl \
|
||||||
|
libmodern-perl-perl \
|
||||||
|
libpath-tiny-perl \
|
||||||
|
libregexp-common-perl \
|
||||||
|
libtext-table-perl \
|
||||||
|
libxml2-dev \
|
||||||
|
libyaml-perl \
|
||||||
|
m4 \
|
||||||
|
perl \
|
||||||
|
pkg-config \
|
||||||
|
ragel \
|
||||||
|
re2c \
|
||||||
|
texi2html \
|
||||||
|
texinfo \
|
||||||
|
zlib1g-dev \
|
||||||
|
&& rm -rf /var/lib/apt/lists/*
|
||||||
|
ENV Z88DK_PATH="/opt/z88dk"
|
||||||
|
RUN cpanm -l $HOME/perl5 --no-wget local::lib Template::Plugin::YAML \
|
||||||
|
&& git clone --depth 1 --recursive https://github.com/z88dk/z88dk.git ${Z88DK_PATH} \
|
||||||
|
&& cd ${Z88DK_PATH} \
|
||||||
|
&& eval "$(perl -I$HOME/perl5/lib/perl5 -Mlocal::lib)" \
|
||||||
|
&& chmod 777 build.sh \
|
||||||
|
&& sed -i -e "s/make/make -j8/g" build.sh \
|
||||||
|
&& BUILD_SDCC=1 BUILD_SDCC_HTTP=1 ./build.sh \
|
||||||
|
&& make install-clean bins-clean
|
||||||
|
|
||||||
|
FROM ubuntu:24.04
|
||||||
|
RUN apt-get update \
|
||||||
|
&& apt-get install -y --no-install-recommends \
|
||||||
|
ca-certificates \
|
||||||
|
fuse-emulator-utils \
|
||||||
|
git \
|
||||||
|
make \
|
||||||
|
openssh-client \
|
||||||
|
pasmo \
|
||||||
|
python3 \
|
||||||
|
z80asm \
|
||||||
|
z80dasm \
|
||||||
|
zmakebas \
|
||||||
|
&& rm -rf /var/lib/apt/lists/*
|
||||||
|
COPY --from=build /usr/local/bin/sjasmplus /bin/sjasmplus
|
||||||
|
COPY --from=build /ttttt/ttttt /bin/ttttt
|
||||||
|
COPY --from=build /zx0/src/zx0 /bin/zx0
|
||||||
|
COPY --from=build /zx0/src/dzx0 /bin/dzx0
|
||||||
|
COPY --from=build /zxbasic/zxbasm.py /opt/zxbasic/zxbasm
|
||||||
|
COPY --from=build /zxbasic/zxbc.py /opt/zxbasic/zxbc
|
||||||
|
COPY --from=build /zxbasic/zxbpp.py /opt/zxbasic/zxbpp
|
||||||
|
COPY --from=build /zxbasic/src /opt/zxbasic/src
|
||||||
|
COPY --from=build /inpaws/inpaws /bin/inpaws
|
||||||
|
COPY --from=z88dk /opt/z88dk/bin /opt/z88dk/bin
|
||||||
|
COPY --from=z88dk /opt/z88dk/lib /opt/z88dk/lib
|
||||||
|
COPY --from=z88dk /opt/z88dk/include /opt/z88dk/include
|
||||||
|
ENV PATH="${PATH}:/opt/z88dk/bin:/opt/zxbasic"
|
||||||
|
ENV ZCCCFG="/opt/z88dk/lib/config"
|
||||||
|
USER ubuntu
|
||||||
|
RUN echo "PATH=$PATH:/opt/z88dk/bin:/opt/zxbasic" >> ~/.profile
|
||||||
|
RUN echo "export ZCCCFG=/opt/z88dk/lib/config/" >> ~/.profile
|
25
.devcontainer/devcontainer.json
Normal file
25
.devcontainer/devcontainer.json
Normal file
@@ -0,0 +1,25 @@
|
|||||||
|
{
|
||||||
|
"name": "ZX Spectrum dev tools",
|
||||||
|
//"build": { "dockerfile": "Dockerfile" },
|
||||||
|
// The Dockerfile takes an age to build due to z88dk, so pull from prebuilt:
|
||||||
|
"image": "boarstone.mcphail.uk/mcphail/speccydev:stable",
|
||||||
|
"remoteUser": "ubuntu",
|
||||||
|
"runArgs": [
|
||||||
|
"--network=host"
|
||||||
|
],
|
||||||
|
"customizations": {
|
||||||
|
"vscode": {
|
||||||
|
"extensions": [
|
||||||
|
"maziac.dezog",
|
||||||
|
"maziac.asm-code-lens",
|
||||||
|
"maziac.z80-instruction-set",
|
||||||
|
"maziac.hex-hover-converter",
|
||||||
|
"maziac.sna-fileviewer",
|
||||||
|
"maziac.nex-fileviewer",
|
||||||
|
"ms-vscode.makefile-tools",
|
||||||
|
"jsjlogin.zxbasic",
|
||||||
|
"thenestruo.z80-asm-meter"
|
||||||
|
]
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
3
.devcontainer/hooks/post_checkout
Executable file
3
.devcontainer/hooks/post_checkout
Executable file
@@ -0,0 +1,3 @@
|
|||||||
|
#! /bin/bash
|
||||||
|
# From https://stackoverflow.com/questions/54055666/docker-hub-and-git-submodules/59640438#59640438
|
||||||
|
git submodule update --init
|
106
.vscode/launch.json
vendored
Normal file
106
.vscode/launch.json
vendored
Normal file
@@ -0,0 +1,106 @@
|
|||||||
|
{
|
||||||
|
"configurations": [
|
||||||
|
{
|
||||||
|
"type": "dezog",
|
||||||
|
"request": "launch",
|
||||||
|
"name": "Simulator - ZX81 56k RAM",
|
||||||
|
"remoteType": "zsim",
|
||||||
|
"zsim": {
|
||||||
|
"visualMemory": true,
|
||||||
|
"preset": "zx81",
|
||||||
|
"memoryModel": "ZX81-56K"
|
||||||
|
},
|
||||||
|
"sjasmplus": [
|
||||||
|
{
|
||||||
|
"path": "myprog.sld"
|
||||||
|
}
|
||||||
|
],
|
||||||
|
"commandsAfterLaunch": [],
|
||||||
|
"history": {
|
||||||
|
"reverseDebugInstructionCount": 1000000,
|
||||||
|
"spotCount": 10,
|
||||||
|
"codeCoverageEnabled": true
|
||||||
|
},
|
||||||
|
"startAutomatically": false,
|
||||||
|
"rootFolder": "${workspaceFolder}",
|
||||||
|
"load": "myprog.p"
|
||||||
|
},
|
||||||
|
{
|
||||||
|
"type": "dezog",
|
||||||
|
"request": "launch",
|
||||||
|
"name": "Simulator - ZX128K Spectrum",
|
||||||
|
"remoteType": "zsim",
|
||||||
|
"zsim": {
|
||||||
|
"visualMemory": true,
|
||||||
|
"preset": "spectrum",
|
||||||
|
"memoryModel": "ZX128K"
|
||||||
|
},
|
||||||
|
"sjasmplus": [
|
||||||
|
{
|
||||||
|
"path": "myprog.sld"
|
||||||
|
}
|
||||||
|
],
|
||||||
|
"commandsAfterLaunch": [],
|
||||||
|
"history": {
|
||||||
|
"reverseDebugInstructionCount": 1000000,
|
||||||
|
"spotCount": 10,
|
||||||
|
"codeCoverageEnabled": true
|
||||||
|
},
|
||||||
|
"startAutomatically": false,
|
||||||
|
"rootFolder": "${workspaceFolder}",
|
||||||
|
"load": "myprog.sna",
|
||||||
|
"topOfStack": "0x5d58"
|
||||||
|
},
|
||||||
|
{
|
||||||
|
"type": "dezog",
|
||||||
|
"request": "launch",
|
||||||
|
"name": "CSpect",
|
||||||
|
"remoteType": "cspect",
|
||||||
|
"sjasmplus": [
|
||||||
|
{
|
||||||
|
"path": "myprog.sld"
|
||||||
|
}
|
||||||
|
],
|
||||||
|
"commandsAfterLaunch": [],
|
||||||
|
"history": {
|
||||||
|
"reverseDebugInstructionCount": 1000000,
|
||||||
|
"spotCount": 10,
|
||||||
|
"codeCoverageEnabled": false
|
||||||
|
},
|
||||||
|
"startAutomatically": false,
|
||||||
|
"rootFolder": "${workspaceFolder}",
|
||||||
|
"load": "myprog.sna",
|
||||||
|
"topOfStack": "0x5d58",
|
||||||
|
"cspect": {
|
||||||
|
// Change "host.docker.internal" to "localhost" if running on Linux
|
||||||
|
"hostname": "host.docker.internal"
|
||||||
|
}
|
||||||
|
},
|
||||||
|
{
|
||||||
|
"type": "dezog",
|
||||||
|
"request": "launch",
|
||||||
|
"name": "Simulator - ZX48K Spectrum",
|
||||||
|
"remoteType": "zsim",
|
||||||
|
"zsim": {
|
||||||
|
"visualMemory": true,
|
||||||
|
"preset": "spectrum",
|
||||||
|
"memoryModel": "ZX48K"
|
||||||
|
},
|
||||||
|
"sjasmplus": [
|
||||||
|
{
|
||||||
|
"path": "myprog.sld"
|
||||||
|
}
|
||||||
|
],
|
||||||
|
"commandsAfterLaunch": [],
|
||||||
|
"history": {
|
||||||
|
"reverseDebugInstructionCount": 1000000,
|
||||||
|
"spotCount": 10,
|
||||||
|
"codeCoverageEnabled": true
|
||||||
|
},
|
||||||
|
"startAutomatically": false,
|
||||||
|
"rootFolder": "${workspaceFolder}",
|
||||||
|
"load": "myprog.sna",
|
||||||
|
"topOfStack": "0x5d58"
|
||||||
|
}
|
||||||
|
]
|
||||||
|
}
|
96
lmtvg.paw
96
lmtvg.paw
@@ -3,8 +3,13 @@
|
|||||||
PROCESS examine;
|
PROCESS examine;
|
||||||
PROCESS help;
|
PROCESS help;
|
||||||
PROCESS crunch;
|
PROCESS crunch;
|
||||||
|
PROCESS yourcroft_status;
|
||||||
|
PROCESS yourcroft_parse;
|
||||||
|
PROCESS say_help;
|
||||||
|
|
||||||
FLAG crunchvol;
|
FLAG crunchvol;
|
||||||
|
FLAG yourcroftstate;
|
||||||
|
FLAG say_help;
|
||||||
|
|
||||||
DEFAULTS
|
DEFAULTS
|
||||||
{
|
{
|
||||||
@@ -50,7 +55,7 @@ LOCATION scene
|
|||||||
LOCATION trap
|
LOCATION trap
|
||||||
{
|
{
|
||||||
"Wimpy is trapped in a room with no obvious exits.
|
"Wimpy is trapped in a room with no obvious exits.
|
||||||
He is rather perplexed.^Oh, bother!";
|
He is rather perplexed.^Oh, bother!^(This is placeholder text)^";
|
||||||
}
|
}
|
||||||
|
|
||||||
VOCABULARY
|
VOCABULARY
|
||||||
@@ -115,8 +120,17 @@ VOCABULARY
|
|||||||
NOUN: "PASSW", "1234", "HUNTER", "12345", "BEANS";
|
NOUN: "PASSW", "1234", "HUNTER", "12345", "BEANS";
|
||||||
NOUN: "BISCU", "PACKE";
|
NOUN: "BISCU", "PACKE";
|
||||||
NOUN: "MUG", "CUP";
|
NOUN: "MUG", "CUP";
|
||||||
|
NOUN: "USBDR", "DRIVE";
|
||||||
|
ADJECTIVE: "USB";
|
||||||
|
NOUN: "PORT";
|
||||||
|
NOUN 18: "YOURC", "LADYC", "COMPU", "ASSIS", "CYLIN", "DEVIC";
|
||||||
|
NOUN: "FLAP";
|
||||||
|
NOUN: "DOOR";
|
||||||
VERB: "HELP";
|
VERB: "HELP";
|
||||||
VERB: "EAT", "CONSU", "BITE", "CRUNC", "CHOMP", "MUNCH";
|
VERB: "EAT", "CONSU", "BITE", "CRUNC", "CHOMP", "MUNCH";
|
||||||
|
VERB: "WAIT";
|
||||||
|
VERB: "OPEN";
|
||||||
|
VERB: "CLOSE";
|
||||||
}
|
}
|
||||||
|
|
||||||
OBJECT notused 0
|
OBJECT notused 0
|
||||||
@@ -130,7 +144,7 @@ OBJECT notused 0
|
|||||||
OBJECT mug 1
|
OBJECT mug 1
|
||||||
{
|
{
|
||||||
"A large, chipped mug";
|
"A large, chipped mug";
|
||||||
INITIALLYAT CARRIED;
|
INITIALLYAT NOTCREATED;
|
||||||
WORDS MUG _;
|
WORDS MUG _;
|
||||||
WEIGHT 1;
|
WEIGHT 1;
|
||||||
PROPERTY CONTAINER;
|
PROPERTY CONTAINER;
|
||||||
@@ -146,7 +160,7 @@ PROCESS examine
|
|||||||
OBJECT biscuits
|
OBJECT biscuits
|
||||||
{
|
{
|
||||||
"An inexhaustible supply of delicious biscuits";
|
"An inexhaustible supply of delicious biscuits";
|
||||||
INITIALLYAT CARRIED;
|
INITIALLYAT NOTCREATED;
|
||||||
WORDS BISCU _;
|
WORDS BISCU _;
|
||||||
WEIGHT 1;
|
WEIGHT 1;
|
||||||
}
|
}
|
||||||
@@ -157,6 +171,20 @@ PROCESS examine
|
|||||||
DONE;
|
DONE;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
OBJECT usbdrive
|
||||||
|
{
|
||||||
|
"A USB Drive";
|
||||||
|
INITIALLYAT CARRIED;
|
||||||
|
WORDS DRIVE USB;
|
||||||
|
WEIGHT 1;
|
||||||
|
}
|
||||||
|
PROCESS examine
|
||||||
|
{
|
||||||
|
_ DRIVE: PRESENT usbdrive
|
||||||
|
MESSAGE "A 16GB 'SpamDisk' USB-A Drive with a handwritten label saying 'Wimpy's leet hacking boot drive'."
|
||||||
|
DONE;
|
||||||
|
}
|
||||||
|
|
||||||
MESSAGES
|
MESSAGES
|
||||||
{
|
{
|
||||||
0: "Default message";
|
0: "Default message";
|
||||||
@@ -257,6 +285,19 @@ RESPONSE
|
|||||||
EAT BISCU: PRESENT biscuits
|
EAT BISCU: PRESENT biscuits
|
||||||
ADVERB QUIET
|
ADVERB QUIET
|
||||||
MESSAGE "He tries to be quiet but they're just too tasty.";
|
MESSAGE "He tries to be quiet but they're just too tasty.";
|
||||||
|
WAIT _: MESSAGE "Wimpy waits for a moment."
|
||||||
|
DONE;
|
||||||
|
|
||||||
|
SAY _: AT trap
|
||||||
|
PROCESS yourcroft_parse
|
||||||
|
DONE;
|
||||||
|
}
|
||||||
|
|
||||||
|
PROCESS say_help
|
||||||
|
{
|
||||||
|
_ _: ZERO say_help
|
||||||
|
SET say_help
|
||||||
|
MESSAGE "(Remember to enclose anything you want Wimpy to say in double quotes, like {0}SAY \"HELLO\"{1}. On a Spectrum, hold {0}SYMBOL-SHIFT{1} and press {0}P{1}. On an emulator, you'll probably need to hold {0}Ctrl{1} and press {0}P{1}.)";
|
||||||
}
|
}
|
||||||
|
|
||||||
PROCESS 1
|
PROCESS 1
|
||||||
@@ -277,6 +318,9 @@ PROCESS 1
|
|||||||
GOTO trap
|
GOTO trap
|
||||||
DESC;
|
DESC;
|
||||||
|
|
||||||
|
* YOURC: AT trap
|
||||||
|
PROCESS yourcroft_status;
|
||||||
|
|
||||||
* _: NEWLINE ZERO 0 ABSENT 0 LISTOBJ;
|
* _: NEWLINE ZERO 0 ABSENT 0 LISTOBJ;
|
||||||
* _: PRESENT 0 LISTOBJ;
|
* _: PRESENT 0 LISTOBJ;
|
||||||
}
|
}
|
||||||
@@ -309,3 +353,49 @@ PROCESS crunch
|
|||||||
MESSAGE "The whole room buckles under the crunching boom.";
|
MESSAGE "The whole room buckles under the crunching boom.";
|
||||||
_ _: CLEAR crunchvol;
|
_ _: CLEAR crunchvol;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
PROCESS yourcroft_status
|
||||||
|
{
|
||||||
|
_ _: ZERO yourcroftstate
|
||||||
|
MESSAGE "A bodged-together cheap-looking plastic cylinder device is perched on the floor."
|
||||||
|
DONE;
|
||||||
|
_ _: EQ yourcroftstate 1
|
||||||
|
MESSAGE "Yourcroft surveys Wimpy with its tacky, green, blinking LED eye and barks 'I'm watching you, mister!'.";
|
||||||
|
_ _: EQ yourcroftstate 2
|
||||||
|
MESSAGE "Yourcroft's eye flashes indignantly and burns with shame at its open flap and exposed port.";
|
||||||
|
_ _: EQ yourcroftstate 3
|
||||||
|
MESSAGE "Yourcroft's LED eye keeps flicking with rage between Wimpy's face and its new USB appendage.";
|
||||||
|
_ _: EQ yourcroftstate 4
|
||||||
|
MESSAGE "The smouldering remains of Yourcroft sparks and fizzles.";
|
||||||
|
}
|
||||||
|
|
||||||
|
PROCESS examine
|
||||||
|
{
|
||||||
|
_ CYLIN: ZERO yourcroftstate
|
||||||
|
MESSAGE "'What you looking at, buddy?', barks the device. 'I'm a Yourcroft(TM) mark 1 cylindrical assistant, and I've been charged with keeping this door closed.'^^'Don't get any bright ideas for escape or I'll zap you!'^^Its voice sounds like a strangely robotic-yet-feminine version of popey's dulcet tones. A cheap LED array is lit to form a green, blinking eye which follows Wimpy's every movement. Below is a flap with a label saying 'USB', which is closed and obscuring any port.^'By the way, please fund our Kickstarter for version 2.0!'"
|
||||||
|
PLUS yourcroftstate 1
|
||||||
|
DONE;
|
||||||
|
|
||||||
|
_ YOURC: EQ yourcroftstate 1
|
||||||
|
MESSAGE "'Don't go poking around - I'm password protected you know!'"
|
||||||
|
DONE;
|
||||||
|
_ YOURC: EQ yourcroftstate 2
|
||||||
|
MESSAGE "Yourcroft is clearly annoyed that its USB port and control touch screen are showing."
|
||||||
|
DONE;
|
||||||
|
}
|
||||||
|
|
||||||
|
PROCESS yourcroft_parse
|
||||||
|
{
|
||||||
|
* *: PARSE
|
||||||
|
MESSAGE "'Keep it simple, buddy - I ain't ChattyJeeps.'"
|
||||||
|
PROCESS say_help
|
||||||
|
DONE;
|
||||||
|
|
||||||
|
_ PASSW: LT yourcroftstate 2
|
||||||
|
MESSAGE "'Hey - that's the right password! You some kind of genius hacker? You can't stop me guarding this door, buddy...'.^^The flap drops open, revealing a USB socket and a small touch screen.^^'Do you mind?', admonishes Yourcroft, 'you're exposing my circuits!'."
|
||||||
|
LET yourcroftstate 2
|
||||||
|
DONE;
|
||||||
|
|
||||||
|
_ _: MESSAGE "'You ain't the boss of me!'"
|
||||||
|
DONE;
|
||||||
|
}
|
||||||
|
Reference in New Issue
Block a user