Full Code of rtrussell/BBCSDL for AI

Repository: rtrussell/BBCSDL
Branch: master
Commit: 483d7489af3b
Files: 390
Total size: 5.2 MB

Directory structure:
gitextract_wqkzv1mv/

├── .gitattributes
├── .gitignore
├── README.md
├── bbcsdl.bbc
├── bin/
│   ├── android/
│   │   ├── Android.mk
│   │   ├── AndroidManifest.xml
│   │   ├── Application.mk
│   │   ├── BBCBasic.java
│   │   ├── autorun.bbc
│   │   ├── bbdata_x86_64.asm
│   │   ├── build.gradle
│   │   ├── help.bbc
│   │   ├── help.txt
│   │   └── styles.xml
│   ├── ios/
│   │   ├── autorun.bbc
│   │   ├── exported.txt
│   │   ├── help.bbc
│   │   └── help.txt
│   ├── linux/
│   │   ├── install32.txt
│   │   ├── install64.txt
│   │   ├── makefile
│   │   └── mkicon.sh
│   ├── macos/
│   │   └── makefile
│   ├── raspi/
│   │   ├── gpiodemo.bbc
│   │   ├── gpiotest.bbc
│   │   ├── install-rpi.txt
│   │   ├── makefile
│   │   └── mkicon.sh
│   ├── rpi64/
│   │   ├── gpiodemo.bbc
│   │   ├── gpiotest.bbc
│   │   ├── install-rpi.txt
│   │   └── makefile
│   ├── wasm/
│   │   ├── BBC.h
│   │   ├── autorun.bbc
│   │   ├── bbcsdl.h
│   │   ├── bbcsdl_shell.html
│   │   ├── makefile
│   │   └── readme.txt
│   ├── win32/
│   │   ├── makefile
│   │   ├── sdlrun.c
│   │   └── unpack32.nas
│   └── win64/
│       ├── makefile
│       ├── sdlrun.c
│       └── unpack64.nas
├── console/
│   ├── linux/
│   │   └── makefile
│   ├── macm1/
│   │   └── makefile
│   ├── macos/
│   │   └── makefile
│   ├── raspi/
│   │   └── makefile
│   ├── rpi64/
│   │   └── makefile
│   └── win64/
│       └── makefile
├── examples/
│   ├── about.bbc
│   ├── games/
│   │   ├── .Tables/
│   │   │   ├── Choice.mtb
│   │   │   ├── CrnrPerm.mtb
│   │   │   ├── CrnrSlic.ptb
│   │   │   ├── EdgePerm.mtb
│   │   │   ├── EdgeSlic.ptb
│   │   │   ├── Flip.mtb
│   │   │   ├── FlipChce.ptb
│   │   │   ├── SlicPerm.mtb
│   │   │   ├── Twist.mtb
│   │   │   ├── TwstChce.ptb
│   │   │   └── TwstFlip.ptb
│   │   ├── 2048.bbc
│   │   ├── Rubik.bbc
│   │   ├── animal.bbc
│   │   ├── buggy.bbc
│   │   ├── bugs.bbc
│   │   ├── cowboy.bbc
│   │   ├── dibley.bbc
│   │   ├── dibley.txt
│   │   ├── dropperz.bbc
│   │   ├── gorillas.bbc
│   │   ├── hangman.bbc
│   │   ├── hanoi.bbc
│   │   ├── jigsaw.bbc
│   │   ├── lemmings.bbc
│   │   ├── rheolism.bbc
│   │   ├── snake.bbc
│   │   ├── sudoku.bbc
│   │   ├── tower.bbc
│   │   └── triples.bbc
│   ├── general/
│   │   ├── BBSterm.bbc
│   │   ├── SkyBaby.bbc
│   │   ├── analyser.bbc
│   │   ├── banner.bbc
│   │   ├── banner.xml
│   │   ├── bbcbasic.txt
│   │   ├── bezierfit.bbc
│   │   ├── bigdem.bbc
│   │   ├── calculator.bbc
│   │   ├── calendar.bbc
│   │   ├── ceefax.bbc
│   │   ├── ceefax.car
│   │   ├── client.bbc
│   │   ├── conway.bbc
│   │   ├── dlgdemo.bbc
│   │   ├── ellipsefit.bbc
│   │   ├── example.csv
│   │   ├── filters.bbc
│   │   ├── kerning.bbc
│   │   ├── lanchat.bbc
│   │   ├── listdemo.bbc
│   │   ├── mode7dem.bbc
│   │   ├── mode7dem.car
│   │   ├── multidem.bbc
│   │   ├── multitouch.bbc
│   │   ├── mysqldem.bbc
│   │   ├── optics.bbc
│   │   ├── pdfdemo.bbc
│   │   ├── poem.bbc
│   │   ├── polyfit.bbc
│   │   ├── polyfit.csv
│   │   ├── prompter.bbc
│   │   ├── recorder.bbc
│   │   ├── scroll.bbc
│   │   ├── server.bbc
│   │   ├── server_multi.bbc
│   │   ├── sheet.bbc
│   │   ├── solve.bbc
│   │   ├── sortdemo.bbc
│   │   ├── sorttest.bbc
│   │   ├── telstar.bbc
│   │   ├── textedit.bbc
│   │   ├── timerdem.bbc
│   │   ├── unicode.bbc
│   │   ├── video.bbc
│   │   ├── weather.car
│   │   └── welcome.bbc
│   ├── graphics/
│   │   ├── Demo.ptr
│   │   ├── aagfxdem.bbc
│   │   ├── aliens.bbc
│   │   ├── anigif.bbc
│   │   ├── bbcowl.bbc
│   │   ├── bounce.bbc
│   │   ├── candle.bbc
│   │   ├── chain.bbc
│   │   ├── clock.bbc
│   │   ├── colorcycle.bbc
│   │   ├── disco.bbc
│   │   ├── doodle.bbc
│   │   ├── ellipses.bbc
│   │   ├── fern.bbc
│   │   ├── fire.bbc
│   │   ├── flier.bbc
│   │   ├── flood.bbc
│   │   ├── fluid.bbc
│   │   ├── illusion.bbc
│   │   ├── jclock.bbc
│   │   ├── kaleidoscope.bbc
│   │   ├── knots.bbc
│   │   ├── lighting.bbc
│   │   ├── mandel.bbc
│   │   ├── opengl.bbc
│   │   ├── pageturn.bbc
│   │   ├── penrose.bbc
│   │   ├── persian.bbc
│   │   ├── piechart.bbc
│   │   ├── pointer.bbc
│   │   ├── polydots.bbc
│   │   ├── polygon.bbc
│   │   ├── pyramid.bbc
│   │   ├── raytrace.bbc
│   │   ├── saucer.bbc
│   │   ├── scarab.bbc
│   │   ├── seascape.bbc
│   │   ├── sine.bbc
│   │   ├── sliderule.bbc
│   │   ├── slitscan.bbc
│   │   ├── smithchart.bbc
│   │   ├── snowscene.bbc
│   │   ├── soccerball.bbc
│   │   ├── spectrum.bbc
│   │   ├── spotlight.bbc
│   │   ├── squares.bbc
│   │   ├── surks.bbc
│   │   ├── swirl.bbc
│   │   ├── teapot.bbc
│   │   ├── teapot.fvf
│   │   ├── torus2d.bbc
│   │   ├── truchet.bbc
│   │   ├── vampire.bbc
│   │   ├── voronoi.bbc
│   │   ├── wheel.bbc
│   │   └── world.bbc
│   ├── immediate.bbc
│   ├── keywords.bbc
│   ├── keywords.txt
│   ├── physics/
│   │   ├── .pinball/
│   │   │   ├── ball.fvf
│   │   │   ├── flipper1.fvf
│   │   │   ├── flipper2.fvf
│   │   │   ├── pinball.fvf
│   │   │   └── plunger.fvf
│   │   ├── bbclock.bbc
│   │   ├── cradle.bbc
│   │   ├── cradle.fvf
│   │   ├── crates.bbc
│   │   ├── dangle.bbc
│   │   ├── dunebuggy.bbc
│   │   ├── girder.fvf
│   │   ├── lotto.bbc
│   │   ├── pinball.bbc
│   │   ├── pintograph.bbc
│   │   ├── plinth.fvf
│   │   ├── samples/
│   │   │   ├── Hello_Box2D.bbc
│   │   │   ├── SAMPLES.bbc
│   │   │   ├── breakable.bbc
│   │   │   ├── bridge.bbc
│   │   │   ├── bullet.bbc
│   │   │   ├── cantilever.bbc
│   │   │   ├── car.bbc
│   │   │   ├── chain.bbc
│   │   │   ├── confined.bbc
│   │   │   ├── crank.bbc
│   │   │   ├── dominos.bbc
│   │   │   ├── gears.bbc
│   │   │   ├── lotto.bbc
│   │   │   ├── pendulum1.bbc
│   │   │   ├── pendulum2.bbc
│   │   │   ├── pendulum3.bbc
│   │   │   ├── pendulum4.bbc
│   │   │   ├── pendulum5.bbc
│   │   │   ├── pendulum6.bbc
│   │   │   ├── platform.bbc
│   │   │   ├── pyramid.bbc
│   │   │   ├── radialgravity.bbc
│   │   │   ├── sensor.bbc
│   │   │   └── wobble.bbc
│   │   ├── spinmaze.bbc
│   │   └── trebuchet.bbc
│   ├── sounds/
│   │   ├── bauble.bbc
│   │   ├── bauble.fvf
│   │   ├── belier.bbc
│   │   ├── blacksmith.bbc
│   │   ├── brandenburg.bbc
│   │   ├── carolmedley.bbc
│   │   ├── carousel.bbc
│   │   ├── carousel.fvf
│   │   ├── crank.fvf
│   │   ├── dubois.bbc
│   │   ├── entertainer.bbc
│   │   ├── figleaf.bbc
│   │   ├── forge.fvf
│   │   ├── ground.fvf
│   │   ├── handle.fvf
│   │   ├── horses.fvf
│   │   ├── icerink.fvf
│   │   ├── lights1.fvf
│   │   ├── lights2.fvf
│   │   ├── metronome.bbc
│   │   ├── nut.fvf
│   │   ├── piano.bbc
│   │   ├── platform.fvf
│   │   ├── polly.bbc
│   │   ├── skater.fvf
│   │   ├── skaters.bbc
│   │   ├── skaters.tun
│   │   ├── soldier.fvf
│   │   ├── soldiers.bbc
│   │   ├── tocfugue.bbc
│   │   ├── tofair.bbc
│   │   ├── tofair.tun
│   │   ├── widor.bbc
│   │   └── xmascene.fvf
│   ├── starcmds.bbc
│   ├── starcmds.txt
│   ├── tools/
│   │   ├── BBCEdit/
│   │   │   ├── bgroupmod.bbc
│   │   │   ├── dlgmod.bbc
│   │   │   ├── filedlgmod.bbc
│   │   │   ├── menumod.bbc
│   │   │   └── msgmod.bbc
│   │   ├── BBCEdit.bbc
│   │   ├── SDLIDE.bbc
│   │   ├── addconst.bbc
│   │   ├── compiler.bbc
│   │   ├── crossref.bbc
│   │   ├── getri.bbc
│   │   ├── hello.bbc
│   │   ├── listvars.bbc
│   │   ├── macrorec.bbc
│   │   ├── memmon.bbc
│   │   ├── mmap.bbc
│   │   ├── profiler.bbc
│   │   ├── saa505x.bbc
│   │   ├── searchin.bbc
│   │   ├── settab.bbc
│   │   ├── sysvars.bbc
│   │   ├── timing.bbc
│   │   ├── touchide.bbc
│   │   └── versinfo.bbc
│   ├── vducodes.bbc
│   └── vducodes.txt
├── include/
│   ├── BBC.h
│   ├── SDL2_gfxPrimitives.h
│   ├── SDL2_gfxPrimitives_font.h
│   ├── SDL2_rotozoom.h
│   ├── SDL_net.h
│   ├── SDL_stbimage.h
│   ├── SDL_ttf.h
│   ├── bbccon.h
│   ├── bbcsdl.h
│   ├── begin_code.h
│   ├── close_code.h
│   ├── dr_mp3.h
│   ├── stb_image.h
│   ├── version.h
│   ├── zconf.h
│   └── zlib.h
├── lib/
│   ├── Bedstead-ext.otf
│   ├── Bedstead.otf
│   ├── Unifont.otf
│   ├── aagfxlib.bbc
│   ├── arraylib.bbc
│   ├── audiolib.bbc
│   ├── bigint.bbc
│   ├── box2ddbg.bbc
│   ├── box2dgfx.bbc
│   ├── box2dlib.bbc
│   ├── classlib.bbc
│   ├── datelib.bbc
│   ├── dlglib.bbc
│   ├── editbox.bbc
│   ├── ellipse.bbc
│   ├── eventlib.bbc
│   ├── filedlg.bbc
│   ├── fnusing.bbc
│   ├── gfxlib.bbc
│   ├── gleslib.bbc
│   ├── gpiolib.bbc
│   ├── imglib.bbc
│   ├── listlib.bbc
│   ├── memusage.bbc
│   ├── menulib.bbc
│   ├── mode7lib.bbc
│   ├── msgbox.bbc
│   ├── multiwin.bbc
│   ├── mysqllib.bbc
│   ├── nowait.bbc
│   ├── ogllib.bbc
│   ├── pdflib.bbc
│   ├── script.bbc
│   ├── sdldebug.bbc
│   ├── shaderlib.bbc
│   ├── socklib.bbc
│   ├── sortlib.bbc
│   ├── stringlib.bbc
│   ├── timerlib.bbc
│   ├── treeview.bbc
│   ├── utf8lib.bbc
│   ├── webgllib.bbc
│   └── xmllib.bbc
├── licence.txt
├── src/
│   ├── SDL2_gfxPrimitives.c
│   ├── SDL2_rotozoom.c
│   ├── b2Alias.cpp
│   ├── bbasmb_arm_32.c
│   ├── bbasmb_arm_64.c
│   ├── bbasmb_arm_v6m.c
│   ├── bbasmb_wasm32.c
│   ├── bbasmb_x86_32.TODO.c
│   ├── bbasmb_x86_64.c
│   ├── bbccli.c
│   ├── bbccon.c
│   ├── bbccos.c
│   ├── bbcmos.c
│   ├── bbcsdl.c
│   ├── bbctmp.m
│   ├── bbcvdu.c
│   ├── bbcvtx.c
│   ├── bbdata_arm_32.s
│   ├── bbdata_arm_64.s
│   ├── bbdata_wasm32.c
│   ├── bbdata_x86_32.nas
│   ├── bbdata_x86_64.nas
│   ├── bbeval.c
│   ├── bbexec.c
│   ├── bbmain.c
│   ├── flood.c
│   ├── sort.c
│   └── sound_sdl.c
└── tests/
    ├── ALLTESTS.bbc
    ├── arraytst.bbc
    ├── byreftst.bbc
    ├── convertst.bbc
    ├── errortst.bbc
    ├── exittest.bbc
    ├── filetest.bbc
    ├── fortest.bbc
    ├── int64tst.bbc
    ├── slicetest.bbc
    └── structst.bbc

================================================
FILE CONTENTS
================================================

================================================
FILE: .gitattributes
================================================
*.ptb binary


================================================
FILE: .gitignore
================================================
# Prerequisites
*.d
*.bat

# Object files
*.o
*.ko
*.obj
build/

# Linker output
*.ilk
*.map
*.exp

# Precompiled Headers
*.gch
*.pch

# Libraries
*.lib
*.a
*.la
*.lo

# Shared objects (inc. Windows DLLs)
*.dll
*.so
*.so.*
*.dylib

# Executables
*.exe
*.out
*.app
*.i*86
*.x86_64
*.hex

# Debug files
*.dSYM/
*.su
*.idb
*.pdb

# Editor files
*~
#*
.#*


================================================
FILE: README.md
================================================
# BBCSDL
BBC BASIC for SDL 2.0 (BBCSDL) is a cross-platform implementation of the BBC BASIC programming language for
Windows, Linux (x86), MacOS, Raspbian (Raspberry Pi OS), Android, iOS and Emscripten / WebAssembly.
It is highly compatible with BBC BASIC for Windows and has the same language extensions, but uses
SDL 2.0 as an OS abstraction layer to achieve cross-platform compatibility.

The BBC BASIC Console Mode editions (BBCTTY) are lightweight implementations for Windows, Linux (x86),
MacOS and Raspbian (Raspberry Pi OS) which do not support graphics or sound but are otherwise 
compatible with the desktop, mobile and web editions.  They take their input from stdin and
send their output to stdout, so may be used for scripting, CGI and remote terminal applications.

![Architecture](https://www.bbcbasic.co.uk/bbcsdl/arch.png)

The files in green constitute the generic BBC BASIC interpreter which is shared by all the
editions.  The files in the red box are used to build the Console Mode editions.  The files in
the blue box are used to build the SDL 2.0 editions.  The files in brown run in the GUI (main)
thread, all the others run in the interpreter thread.

The files with the 1 and 2 superscripts are CPU-specific and the different variants are listed
beneath (not all exist!).  Note that bbasmb_wasm32.c isn't an assembler, but has been used as a
convenient place to put the function wrappers needed to support SYS in the in-browser edition.

Not indicated in the diagram is that the in-browser edition uses different versions of bbc.h
and bbcsdl.h from the rest.

Note that the name 'BBC BASIC' is used by permission of the British Broadcasting Corporation
and is not transferrable to a derived or forked work.


================================================
FILE: bin/android/Android.mk
================================================
LOCAL_PATH := $(call my-dir)

include $(CLEAR_VARS)

LOCAL_MODULE := libbbc-prebuilt

LOCAL_MODULE := main

SDL_PATH := ../SDL

LOCAL_C_INCLUDES := $(LOCAL_PATH)/$(SDL_PATH)/include

LOCAL_LDLIBS := -lGLESv1_CM -lGLESv2 -lOpenSLES -llog -landroid

LOCAL_LDFLAGS += -Wl,-z,max-page-size=16384

ifeq ($(TARGET_ARCH),x86_64)

LOCAL_SRC_FILES := bbdata_x86_64.asm bbmain.c bbexec.c bbeval.c bbcmos.c bbccli.c bbcvdu.c \
	bbcvtx.c flood.c bbcsdl.c bbasmb_x86_64.c SDL2_gfxPrimitives.c SDL2_rotozoom.c

LOCAL_CFLAGS := -fsigned-char

endif

ifeq ($(TARGET_ARCH),arm)

LOCAL_SRC_FILES := bbdata_arm_32.s bbmain.c bbexec.c bbeval.c bbcmos.c.neon bbccli.c bbcvdu.c \
	bbcvtx.c flood.c bbcsdl.c bbasmb_arm_32.c SDL2_gfxPrimitives.c SDL2_rotozoom.c sort.c

LOCAL_CFLAGS := -munaligned-access -fsigned-char

endif

ifeq ($(TARGET_ARCH),arm64)

LOCAL_SRC_FILES := bbdata_arm_64.s bbmain.c bbexec.c bbeval.c bbcmos.c.neon bbccli.c bbcvdu.c \
	bbcvtx.c flood.c bbcsdl.c bbasmb_arm_64.c SDL2_gfxPrimitives.c SDL2_rotozoom.c sort.c

LOCAL_CFLAGS := -fsigned-char

endif

LOCAL_SHARED_LIBRARIES := SDL2 SDL2_ttf SDL2_net Box2D

include $(BUILD_SHARED_LIBRARY)


================================================
FILE: bin/android/AndroidManifest.xml
================================================
<?xml version="1.0" encoding="utf-8"?>
<!-- Replace com.test.game with the identifier of your game below, e.g.
     com.gamemaker.game
-->
<manifest xmlns:android="http://schemas.android.com/apk/res/android"
    android:versionCode="149"
    android:versionName="1.44a"
    android:installLocation="auto">

    <!-- OpenGL ES 2.0 -->
    <uses-feature android:glEsVersion="0x00020000" />

    <!-- Touchscreen support -->
    <uses-feature
        android:name="android.hardware.touchscreen"
        android:required="false" />

    <!-- Game controller support -->
    <uses-feature
        android:name="android.hardware.bluetooth"
        android:required="false" />
    <uses-feature
        android:name="android.hardware.gamepad"
        android:required="false" />
    <uses-feature
        android:name="android.hardware.usb.host"
        android:required="false" />

    <!-- External mouse input events -->
    <uses-feature
        android:name="android.hardware.type.pc"
        android:required="false" />

    <!-- Audio recording support -->
    <!-- if you want to capture audio, uncomment this. -->
    <uses-feature
        android:name="android.hardware.microphone"
        android:required="false" />

    <!-- Allow downloading to the external storage on Android 5.1 and older -->
    <uses-permission android:name="android.permission.WRITE_EXTERNAL_STORAGE" android:maxSdkVersion="22" />
    <uses-permission android:name="android.permission.READ_EXTERNAL_STORAGE" android:maxSdkVersion="32" />
    <uses-permission android:name="android.permission.READ_MEDIA_IMAGES" />
    <uses-permission android:name="android.permission.READ_MEDIA_VIDEO" />
    <uses-permission android:name="android.permission.READ_MEDIA_AUDIO" />

    <!-- Allow access to Bluetooth devices -->
    <!-- Currently this is just for Steam Controller support and requires setting SDL_HINT_JOYSTICK_HIDAPI_STEAM -->
    <!-- <uses-permission android:name="android.permission.BLUETOOTH" android:maxSdkVersion="30" /> -->
    <!-- <uses-permission android:name="android.permission.BLUETOOTH_CONNECT" /> -->

    <!-- Allow access to the vibrator -->
    <uses-permission android:name="android.permission.VIBRATE" />
    <uses-permission android:name="android.permission.INTERNET" />

    <!-- if you want to capture audio, uncomment this. -->
    <uses-permission android:name="android.permission.RECORD_AUDIO" />

    <!-- Create a Java class extending SDLActivity and place it in a
         directory under app/src/main/java matching the package, e.g. app/src/main/java/com/gamemaker/game/MyGame.java
 
         then replace "SDLActivity" with the name of your class (e.g. "MyGame")
         in the XML below.

         An example Java class can be found in README-android.md
    -->
    <application android:label="@string/app_name"
        android:icon="@mipmap/ic_launcher"
        android:allowBackup="true"
        android:theme="@style/AppTheme"
        android:hardwareAccelerated="true" >

        <!-- Example of setting SDL hints from AndroidManifest.xml:
        <meta-data android:name="SDL_ENV.SDL_ACCELEROMETER_AS_JOYSTICK" android:value="0"/>
         -->

        <meta-data android:name="android.window.extensions.disableEdgeToEdge" android:value="true" />
     
        <activity android:name="BBCBasic"
            android:label="@string/app_name"
            android:alwaysRetainTaskState="true"
            android:launchMode="singleInstance"
            android:configChanges="layoutDirection|locale|orientation|uiMode|screenLayout|screenSize|smallestScreenSize|keyboard|keyboardHidden|navigation"
            android:screenOrientation="fullSensor"
            android:exported="true"
            >
            <intent-filter>
                <action android:name="android.intent.action.MAIN" />
                <category android:name="android.intent.category.LAUNCHER" />
            </intent-filter>
            <!-- Let Android know that we can handle some USB devices and should receive this event -->
            <intent-filter>
                <action android:name="android.hardware.usb.action.USB_DEVICE_ATTACHED" />
            </intent-filter>
            <!-- Drop file event -->
            <intent-filter>
                <action android:name="android.intent.action.VIEW" />
                <category android:name="android.intent.category.DEFAULT" />
                <category android:name="android.intent.category.BROWSABLE"/>
                <data android:scheme="file"/>
                <data android:scheme="content"/>
                <data android:mimeType="*/*" />
                <data android:host="*"/>
                <data android:pathPattern=".*\\.bbc"/>
                <data android:pathPattern=".*\\..*\\.bbc"/>
                <data android:pathPattern=".*\\..*\\..*\\.bbc"/>
                <data android:pathPattern=".*\\..*\\..*\\..*\\.bbc"/>
            </intent-filter>
        </activity>
    </application>

</manifest>


================================================
FILE: bin/android/Application.mk
================================================

# Uncomment this if you're using STL in your project
# You can find more information here:
# https://developer.android.com/ndk/guides/cpp-support
APP_STL := c++_shared

APP_ABI := armeabi-v7a arm64-v8a x86_64
APP_CFLAGS += -Os
NDK_TOOLCHAIN_VERSION := 4.9

# Min runtime API level
APP_PLATFORM=android-16

# For 16K page size
APP_SUPPORT_FLEXIBLE_PAGE_SIZES := TRUE



================================================
FILE: bin/android/BBCBasic.java
================================================
package com.rtrussell.bbcbasic;

import org.libsdl.app.SDLActivity; 

public class BBCBasic extends SDLActivity
{
    protected String[] getLibraries() {
        return new String[] {
            "c++_shared",
            "Box2D",
            // "hidapi",
            "SDL2",
            // "SDL2_image",
            // "SDL2_mixer",
            "SDL2_net",
            "SDL2_ttf",
            "main"
        };
    }

    /**
     * Override so that BBC2APK can set orientation in manifest
     */
    public void setOrientationBis(int w, int h, boolean resizable, String hint)
    {
    }
}


================================================
FILE: bin/android/bbdata_x86_64.asm
================================================
;/*****************************************************************\
;*       BBC BASIC for SDL 2.0 (x86_64)                            *
;*       Copyright (c) R. T. Russell, 2000-2023                    *
;*                                                                 *
;*       BBCDATA.NAS RAM data definitions                          *
;*       Version 1.38a, 02-Sep-2023                                *
;\*****************************************************************/
;
MAX_PORTS       EQU     4       ; Maximum number of i/o ports
MAX_FILES       EQU     8       ; Maximum number of open files
SOUNDQE         EQU     4       ; Number of bytes per sound entry
SOUNDQL         EQU     5*SOUNDQE ; Number of bytes per channel
;
	GLOBAL	stavar,lc,oc,pc,dynvar,fnptr,proptr,prand
	GLOBAL	accs,buff,vpage,flist,lomem,pfree,himem
	GLOBAL	errtxt,onersp,errtrp,datptr,curlin,errlin
	GLOBAL	tracen,random,vcount,vwidth,errnum,liston,tmps
;
	GLOBAL	path,keystr,keybdq,keyptr,spchan,exchan,tweak
	GLOBAL	fcbtab,timoff,usrchr,soundq,envels,waves,libase
	GLOBAL	eventq,timtrp,clotrp,siztrp,systrp,moutrp
	GLOBAL	alltrp,iMsg,wParam,lParam,filbuf,portab,fvtab
;
	GLOBAL	forgnd,bakgnd,hfont,colmsk,modeno,lthick,hrect
	GLOBAL	origx,origy,lastx,lasty,prevx,prevy,pfont,cmcflg
	GLOBAL	textwl,textwr,textwt,textwb,sizex,sizey,sclflg
	GLOBAL	textx,texty,charx,chary,cursa,cursb,tempo
	GLOBAL	pixelx,pixely,txtfor,txtbak,optval,farray,fasize
;
	GLOBAL	vduq,queue,flags,kbdqw,kbdqr,keyexp,scroln
	GLOBAL	vflags,sndqw,sndqr,sacc,smix,evtqw,evtqr
	GLOBAL	eenvel,escale,epsect,easect,epitch,elevel,ecount
;
	GLOBAL	hwndProg,zoom,offsetx,offsety,platform
	GLOBAL	memhdc,reflag,sysflg,panx,pany
	GLOBAL	prntx,prnty,prchx,prchy,cursx
	GLOBAL	paperl,paperr,papert,paperb,lstopt
;
	GLOBAL	datend,sysvar,bbcfont,lastick,link00
	GLOBAL	cmdlen,cmdadr,dirlen,diradr,liblen,libadr
	GLOBAL	usrlen,usradr,tmplen,tmpadr,hwo
	GLOBAL	voices,chrmap
	GLOBAL	breakpt,breakhi,ttxtfont
;
	EXTERN	loadn,loads,storen,stores,getvar,putvar,expr,item,lexan
	EXTERN	xfloat,xfix,xeq,token,putevt,palette,str00,con,TTFcache
;
	EXTERN	gfxPrimitivesGetFont,gfxPrimitivesSetFont,RedefineChar
;
%define  checkalign
;
	SEGMENT .data		; Crashes if .bss
;
;The following locations are initialised to zero when program is RUN:
;Variables used by generic modules (bbmain, bbexec, bbeval, bbasmb)
;
	align	16,db 0
stavar:	times 12 dd 0		; Static variables @% to K%
lc:	dd	0		; Static variable L%
	times 2	dd 0		; Static variables M%, N%
oc:	dd	0		; Static variable O%
pc:	dd	0		; Static variable P%
	times 10 dd 0		; Static variables Q% to Z%
dynvar:	times 54 dd 0		; ( Pointers to dynamic vars   )
fnptr:	dd	0		; ( Pointer to user FuNctions  ) grouped
proptr:	dd	0		; ( Pointer to user PROCedures )
accs:	dd	0		; Pointer to string accumulator
	dd	0		; 64-bit pointer
vpage:	dd	0		; Current value of PAGE
tracen:	dd	0		; Maximum line number to trace
lomem:	dd	0		; Current value of LOMEM
pfree:	dd	0		; Pointer to start of free space
himem:	dd	0		; Current value of HIMEM
libase:	dd	0		; Pointer to INSTALLed library
errtxt:	dd	0		; Pointer to error text for REPORT
	dd	0		; 64-bit pointer
errtrp:	dd	0		; Pointer to ON ERROR statement
datptr:	dd	0		; Pointer to DATA statements
vcount:	dd	0		; Current value of COUNT
curlin:	dd	0		; Pointer to current statement
alltrp:				; Start of trap pointers
timtrp:	dd	0		; Pointer to ON TIME statement
clotrp:	dd	0		; Pointer to ON CLOSE statement
siztrp:	dd	0		; Pointer to ON MOVE statement
systrp:	dd	0		; Pointer to ON SYS statement
moutrp:	dd	0		; Pointer to ON MOUSE statement
errlin:	dd	0		; Pointer to last error statement
;
prand:
random:	times 5 db 0		; Current 'random' number (5 bytes)
vwidth:	db	0		; Current value of WIDTH
errnum:	db	0		; Error code of last error
liston:	db	0		; *FLOAT/*HEX/*LOWERCASE/OPT
;
;Variables used by OS-specific modules (bbcmos, bbccli, bbcvdu, bbcvtx)
;
	align	4,db 0
path:	dd	0		; Pointer to path/filename buffer
	dd	0		; 64-bit pointer
keybdq:	dd	0		; Pointer to keyboard queue
	dd	0		; 64-bit pointer
keyptr:	dd	0		; Pointer to *KEY string
	dd	0		; 64-bit pointer
;
lstopt:	db	0		; LISTO value (indentation)
sclflg:	db	0		; Scroll flag (COPY key)
optval:	db	0		; *OUTPUT and *INPUT values
;
; ------ End of 'absolutely-addressed' variables ------
;
farray:	db	0		; Number of dimensions = 1  |
fasize:	dd	0		; Number of elements = 16   |
filbuf:	dq	0		; Pointer to file buffers   | @hfile%%()
portab:	times MAX_PORTS dq 0	; Table of port handles     | 
chntab:	times MAX_FILES dq 0	; Table of file handles     | 
exchan:	dq	0		; Handle for *EXEC   @hfile%%(13)
spchan:	dq	0		; Handle for *SPOOL  @hfile%%(14)
ptchan:	dq	0		; Handle for printer @hfile%%(15)
;
fcbtab:	times MAX_FILES dd 0	; Table of FCBs
voices:	times 4 db 0		; Voices (waveforms) for sound channels
;
flist:	times 33 dq 0		; Pointers to string free lists
tmps:	dd	0		; Temp string descriptor: address
	dd	0		; Temp string descriptor: length
;
; Variables moved here to make room for 64-bit pointers and handles:
;
onersp:	dd	0		; ESP storage for ON ERROR LOCAL
	dd	0		; 64-bit pointer
buff:	dd	0		; Pointer to string input buffer
	dd	0		; 64-bit pointer
keystr:	dd	0		; Pointer to user *KEY strings
	dd	0		; 64-bit pointer
usrchr:	dd	0		; Pointer to user-defined characters
	dd	0		; 64-bit pointer
waves:	dd	0		; Pointer to SOUND waveforms
	dd	0		; 64-bit pointer
envels:	dd	0		; Pointer to ENVELOPEs
	dd	0		; 64-bit pointer
eventq:	dd	0		; Pointer to event queue
	dd	0		; 64-bit pointer
hrect:	dd	0		; Pointer to clip rect (part of @vdu{})
	dd	0		; 64-bit pointer
;
;Text/graphics metrics (pointed to by @vdu%):
;
vduvar:
origx:	dd	0		; Graphics horizontal origin
origy:	dd	0		; Graphics vertical origin
lastx:	dd	0		; Immediately preceding x-coordinate
lasty:	dd	0		; Immediately preceding y-coordinate
prevx:	dd	0		; Previous x-coordinate
prevy:	dd	0		; Previous y-coordinate
textwl:	dd	0		; Text window left (pixels)
textwr:	dd	0		; Text window right (pixels)
textwt:	dd	0		; Text window top (pixels)
textwb:	dd	0		; Text window bottom (pixels)
pixelx:	dd	0		; Width of a graphics pixel
pixely:	dd	0		; Height of a graphics pixel
textx:	dd	0		; Text pointer (cursor x)
texty:	dd	0		; Text pointer (cursor y)
hfont:	dd	0		; Handle of current font
	dd	0		; 64-bit handle
;
forgnd:	dw	0		; Graphics foreground colour/action
bakgnd:	dw	0		; Graphics background colour/action
;
cursa:	db	0		; Start (top) line of cursor
cursb:	db	0		; Finish (bottom) line of cursor
txtfor:	db	0		; Text foreground colour
txtbak:	db	0		; Text background colour
modeno:	db	0		; Mode number
colmsk:	db	0		; Mask for maximum number of colours
vflags:	db	0		; VDU driver flags
scroln:	db	0		; Scroll counter in paged mode
cursx:	db	0		; Cursor (caret) width
lthick:	db	0		; Line thickness (lines, outline shapes)
cmcflg:	db	0		; V5.3 cursor movement flags
tweak:	db	0		; Character spacing adjustment (signed) 
;
sndqw:	times 4 db 0		; Sound queue write pointers
sndqr:	times 4 db 0		; Sound queue read pointers
eenvel:	times 4 db 0		; Envelope number
escale:	times 4 db 0		; Envelope scaler
epsect:	times 4 db 0		; Envelope pitch section
easect:	times 4 db 0		; Envelope amplitude section
epitch:	times 4 db 0		; Envelope pitch (frequency)
ecount:	times 4 db 0		; Envelope count
soundq:	times 4*SOUNDQL db 0	; Sound queue (four channels)
vduq:	times 10 db 0		; VDU queue (must precede 'queue')
queue:	db	0		; VDU queue status
;
kbdqw:	db	0		; Keyboard queue write pointer
kbdqr:	db	0		; Keyboard queue read pointer
evtqw:	db	0		; Event queue write pointer
evtqr:	db	0		; Event queue read pointer
keyexp:	db	0		; *KEY character counter
;
	align	4,db 0
;
; ------ End of initialised variables ------
;
datend:
;
;The following locations are NOT initialised when program is RUN
;(but are guaranteed to be zero on initial execution).
;
sizex:	dd	0		; Total width of client area
sizey:	dd	0		; Total height of client area
charx:	dd	0		; Average character width
chary:	dd	0		; Average character height
prchx:	dd	0		; Average character width (printer)
prchy:	dd	0		; Average character height (printer)
paperl:	dd	0		; Printer left edge
paperr:	dd	0		; Printer right edge
papert:	dd	0		; Printer top edge
paperb:	dd	0		; Printer bottom edge
prntx:	dd	0		; Horizontal printing position
prnty:	dd	0		; Vertical printing position
;
; ------ End of VDU variables ------
;
lastick:dd	0		; To check for TickCount wraparound
timoff:	dd	0		; Offset to add to TickCount
sacc:	times 4	dd 0		; Sound accumulators (not initialised)
smix:	times 4	dd 0		; Stereo mix
elevel:	times 4 db 0		; Envelope level (amplitude)
;
;The following variables are organised as a linked-list at
;sysvar, for access via 'system variables' starting with @:
;
	align	4,db 0
;
sysvar:	dd	link1 - sysvar
	db	'wparam%',0
	checkalign
wParam:	dd	0		; Saved wParam for ON xxxx interrupt
;
link3:	dd	link4 - link3
	db	'lparam%',0
	checkalign
lParam:	dd	0		; Saved lParam for ON xxxx interrupt
;
	db	0		; Padding
link23:	dd	link24 - link23
	db	'ispal%',0
	checkalign
bPaletted: dd	0		; Paletted display flag (BOOL)
;
	times 7	db 0		; Padding
link1:	dd	link3 - link1
	db	'memhdc%%',0    ; n.b. aliased to @memhdc%
	checkalign
memhdc:	dd	0		; Shadow screen device context
	dd	0		; 64-bit handle
;
	times 7	db 0		; Padding
link9:	dd	link10 - link9
	db	'msg%',0
	checkalign
iMsg:	dd	0		; Saved iMsg for ON xxxx interrupt
;
	db	0		; Padding
link4:	dd	link5 - link4
	db	'hwnd%%',0	; n.b. aliased to @hwnd%
	checkalign
hwndProg: dd	0		; Handle for program window
	dd	0		; 64-bit handle
;
	times 5	db 0		; Padding
link12:	dd	link13 - link12
	db	'flags%',0
	checkalign
tempo:	db	0		; *TEMPO value
sysflg:	db	0		; *SYS flags
reflag:	db	0		; *REFRESH flags
flags:	db	0		; Boolean flags (byte) @ 3FBH
;
	times 7	db 0		; Padding
link16:	dd	link17 - link16
	db	'chrmap%%',0	; n.b. aliased to @chrmap%
	checkalign
chrmap:	dd	0
	dd	0		; 64-bit pointer
;
	times 5	db 0		; Padding
link5:	dd	link6 - link5
	db	'hpal%%',0
	checkalign
	dq	palette		; Colour palette
;
	times 6	db 0		; Padding
link10:	dd	link11 - link10
	db	'vdu%%',0
	checkalign
	dq	vduvar		; Pointer to VDU variables
;
	times 6	db 0		; Padding
link00:	dd	0		; End of list
	db	'fn%%(',0
	checkalign
	dq	fnarr		; Pointer to function array
;
	dw	0		; Padding
link11:	dd	link12 - link11
	db	'platform%',0
	checkalign
platform: dd	0		; SDL version & OS
;
	dd	0		; Padding
link6:	dd	link7 - link6
	db	'ox%',0	
	checkalign
offsetx:dd	0		; x-offset memhdc->hwnd
;
	dd	0		; Padding
link7:	dd	link8 - link7
	db	'oy%',0	 
	checkalign
offsety:dd	0		; y-offset memhdc->hwnd
;
	times 3	db 0		; Padding
link17:	dd	link18 - link17
	db	'dir$',0
	checkalign
diradr:	dd	0		; Program directory address
dirlen:	dd	0		; Program directory length
;
	times 7	db 0		; Padding
link18:	dd	link19 - link18
	db	'lib$',0
	checkalign
libadr:	dd	0		; Library directory address
liblen:	dd	0		; Library directory length
;
	times 6	db 0		; Padding
link24:	dd	link25 - link24
	db	'panx%',0
	checkalign
panx:	dd	0		; Horizontal pan
;
	times 3	db 0		; Padding
link19:	dd	link20 - link19
	db	'cmd$',0
	checkalign
cmdadr:	dd	0		; Command line address
cmdlen:	dd	0		; Command line length
;
	times 7	db 0		; Padding
link20:	dd	link21 - link20
	db	'usr$',0
	checkalign
usradr:	dd	0		; User directory address
usrlen:	dd	0		; User directory length
;
	times 6	db 0		; Padding
link25:	dd	link26 - link25
	db	'pany%',0
	checkalign
pany:	dd	0		; Vertical pan
;
	times 3	db 0		; Padding
link21:	dd	link22 - link21
	db	'tmp$',0
	checkalign
tmpadr:	dd	0		; Temp directory address
tmplen:	dd	0		; Temp directory length
;
	times 7	db 0		; Padding
link22:	dd	link23 - link22
	db	'vdu{',0
	checkalign
	dq	vdufmt		; Structure format address 
	dq	hrect		; Structure data address
;
	times 6	db 0		; Padding
link14:	dd	link15 - link14
	db	'zoom%',0
	checkalign
zoom:	dd	0
;
	times 7	db 0		; Padding
link8:	dd	link9 - link8
	db	'hfile%%(',0
	checkalign
	dq	farray		; Pointer to file handles array
;
	times 5	db 0		; Padding
link26:	dd	link27 - link26
	db	'brkpt%',0
	checkalign
breakpt:dd	0		; Breakpoint (bottom of range)
;
	times 3	db 0		; Padding
link15:	dd	link16 - link15
	db	'hwo%',0
	checkalign
hwo:	dd	0		; Handle for wave output
;
	db	0		; Padding
link27:	dd	link28 - link27
	db	'brkhi%',0
	checkalign
breakhi:dd	0		; Breakpoint (top of range)
;
	dw	0		; Padding
link28:	dd	link29 - link28
	db	'size{',0	; V6.1 Member name
	checkalign
	dq	ptfmt		; V6.1 Format address
	dq	sizex		; V6.1 Data offset
;
	times 6	db 0		; Padding
link29:	dd	link00 - link29
	db	'char{',0	; V6.1 Member name
	checkalign
	dq	ptfmt		; V6.1 Format address
	dq	charx		; V6.1 Data offset
;
	dd	0		; Padding
link13:	dd	link14 - link13
	db	'cache%%',0
	checkalign
	dq	TTFcache	; Font cache
;
; Structure @vdu{o{x%,y%}, l{x%,y%}, p{x%,y%}, tl%, tr%, tt%, tb%,
;                d{x%,y%}, c{x%,y%}, hf%%, hr%%,
;                g{a&,b&,c&,d&}, t{a&,b&,c&,d&}, m{a&,b&,c&,d&}}
;
	times 5	db 0		; Padding
vdufmt:	dd	sndqw-hrect	; Total length (bytes)
vlnk00:	dd	vlnk01 - vlnk00	; Link to next
	db	'o{',0		; Member name
	checkalign
	dq	ptfmt
	dq	origx-hrect	; Data offset
;
	db	0		; Padding
vlnk01:	dd	vlnk02 - vlnk01
	db	'l{',0		; Member name
	checkalign
	dq	ptfmt
	dq	lastx-hrect	; Data offset
;
	db	0		; Padding
vlnk02:	dd	vlnk03 - vlnk02
	db	'p{',0		; Member name
	checkalign
	dq	ptfmt
	dq	prevx-hrect	; Data offset
;
vlnk03:	dd	vlnk04 - vlnk03
	db	'tl%',0		; Member name
	checkalign
	dd	textwl-hrect	; Data offset
;
	dd	0		; Padding
vlnk04:	dd	vlnk05 - vlnk04
	db	'tr%',0		; Member name
	checkalign
	dd	textwr-hrect	; Data offset
;
	dd	0		; Padding
vlnk05:	dd	vlnk06 - vlnk05
	db	'tt%',0		; Member name
	checkalign
	dd	textwt-hrect	; Data offset
;
	dd	0		; Padding
vlnk06:	dd	vlnk07 - vlnk06
	db	'tb%',0		; Member name
	checkalign
	dd	textwb-hrect	; Data offset
;
	times 5	db 0		; Padding
vlnk07:	dd	vlnk08 - vlnk07
	db	'd{',0		; Member name
	checkalign
	dq	ptfmt
	dq	pixelx-hrect	; Data offset
;
	db	0		; Padding
vlnk08:	dd	vlnk09 - vlnk08
	db	'c{',0		; Member name
	checkalign
	dq	ptfmt
	dq	textx-hrect	; Data offset
;
	times 7	db 0		; Padding
vlnk09:	dd	vlnk10 - vlnk09
	db	'hf%%',0	; Member name
	checkalign
	dd	hfont-hrect	; Data offset
;
	times 3	db 0		; Padding
vlnk10:	dd	vlnk11 - vlnk10
	db	'hr%%',0	; Member name
	checkalign
	dd	hrect-hrect	; Data offset
;
	times 5	db 0		; Padding
vlnk11:	dd	vlnk12 - vlnk11
	db	'g{',0		; Member name
	checkalign
	dq	b4fmt
	dq	forgnd-hrect	; Data offset
;
	db	0		; Padding
vlnk12:	dd	vlnk13 - vlnk12
	db	't{',0		; Member name
	checkalign
	dq	b4fmt
	dq	cursa-hrect	; Data offset
;
	db	0		; Padding
vlnk13:	dd	vlnk14 - vlnk13
	db	'm{',0		; Member name
	checkalign
	dq	b4fmt
	dq	modeno-hrect	; Data offset
;
	db	0		; Padding
vlnk14:	dd	0
	db	'w{',0		; V6.1 Member name
	checkalign
	dq	b4fmt		; V6.1 Format address
	dq	cursx-hrect	; V6.1 Data offset
;
	SEGMENT .text
;
bbcfont:
	DB	00H,00H,00H,00H,00H,00H,00H,00H		;NUL
	DB	07EH,081H,0A5H,081H,0BDH,099H,081H,07EH	;SOH
	DB	07EH,0FFH,0DBH,0FFH,0C3H,0E7H,0FFH,07EH	;STX
	DB	06CH,0FEH,0FEH,0FEH,07CH,038H,010H,00H	;ETX
	DB	010H,038H,07CH,0FEH,07CH,038H,010H,00H	;EOT
	DB	010H,038H,038H,0D6H,0FEH,0D6H,010H,038H	;ENQ
	DB	010H,038H,07CH,0FEH,0FEH,0FEH,038H,07CH	;ACK
	DB	00H,00H,018H,03CH,03CH,018H,00H,00H	;BEL
	DB	0FFH,0FFH,0E7H,0C3H,0C3H,0E7H,0FFH,0FFH	;BS
	DB	00H,03CH,066H,042H,042H,066H,03CH,00H	;HT
	DB	0FFH,0C3H,099H,0BDH,0BDH,099H,0C3H,0FFH	;LF
	DB	0FH,07H,0FH,07DH,0CCH,0CCH,0CCH,078H	;VT
	DB	03CH,066H,066H,066H,03CH,018H,07EH,018H	;FF
	DB	03FH,033H,03FH,030H,030H,070H,0F0H,0E0H	;CR
	DB	07FH,063H,07FH,063H,063H,067H,0E6H,0C0H	;SO
	DB	099H,05AH,03CH,0E7H,0E7H,03CH,05AH,099H	;SI
	DB	080H,0E0H,0F8H,0FEH,0F8H,0E0H,080H,00H	;DLE
	DB	02H,0EH,03EH,0FEH,03EH,0EH,02H,00H	;DC1
	DB	018H,03CH,07EH,018H,018H,07EH,03CH,018H	;DC2
	DB	066H,066H,066H,066H,066H,00H,066H,00H	;DC3
	DB	07FH,0DBH,0DBH,07BH,01BH,01BH,01BH,00H	;DC4
	DB	03EH,063H,038H,06CH,06CH,038H,0CCH,078H	;NAK
	DB	00H,00H,00H,00H,07EH,07EH,07EH,00H	;SYN
	DB	018H,03CH,07EH,018H,07EH,03CH,018H,0FFH	;ETB
	DB	018H,03CH,07EH,018H,018H,018H,018H,00H	;CAN
	DB	018H,018H,018H,018H,07EH,03CH,018H,00H	;EM
	DB	00H,018H,0CH,0FEH,0CH,018H,00H,00H	;SUB
	DB	00H,030H,060H,0FEH,060H,030H,00H,00H	;ESC
	DB	00H,00H,0C0H,0C0H,0C0H,0FEH,00H,00H	;FS
	DB	00H,024H,066H,0FFH,066H,024H,00H,00H	;GS
	DB	00H,018H,03CH,07EH,0FFH,0FFH,00H,00H	;RS
	DB	00H,0FFH,0FFH,07EH,03CH,018H,00H,00H	;US
	DB	00H,00H,00H,00H,00H,00H,00H,00H		;" "
	DB	030H,030H,030H,030H,030H,00H,030H,00H	;"!"
	DB	06CH,06CH,06CH,00H,00H,00H,00H,00H	;"""
	DB	06CH,06CH,0FEH,06CH,0FEH,06CH,06CH,00H	;"#"
	DB	018H,07EH,0D0H,07CH,016H,0FCH,030H,00H	;"$"
	DB	0C0H,0CCH,018H,030H,060H,0CCH,0CH,00H	;"%"
	DB	038H,06CH,038H,076H,0DCH,0CCH,076H,00H	;"&"
	DB	018H,030H,060H,00H,00H,00H,00H,00H	;"'"
	DB	018H,030H,060H,060H,060H,030H,018H,00H	;"("
	DB	060H,030H,018H,018H,018H,030H,060H,00H	;")"
	DB	00H,06CH,038H,0FEH,038H,06CH,00H,00H	;"*"
	DB	00H,030H,030H,0FCH,030H,030H,00H,00H	;"+"
	DB	00H,00H,00H,00H,00H,030H,030H,060H	;","
	DB	00H,00H,00H,0FCH,00H,00H,00H,00H	;"-"
	DB	00H,00H,00H,00H,00H,030H,030H,00H	;"."
	DB	00H,0CH,018H,030H,060H,0C0H,00H,00H	;"/"
	DB	078H,0CCH,0DCH,0FCH,0ECH,0CCH,078H,00H	;"0"
	DB	030H,070H,030H,030H,030H,030H,0FCH,00H	;"1"
	DB	078H,0CCH,0CH,018H,030H,060H,0FCH,00H	;"2"
	DB	078H,0CCH,0CH,038H,0CH,0CCH,078H,00H	;"3"
	DB	018H,038H,078H,0D8H,0FCH,018H,018H,00H	;"4"
	DB	0FCH,0C0H,0F8H,0CH,0CH,0CCH,078H,00H	;"5"
	DB	038H,060H,0C0H,0F8H,0CCH,0CCH,078H,00H	;"6"
	DB	0FCH,0CH,018H,030H,060H,060H,060H,00H	;"7"
	DB	078H,0CCH,0CCH,078H,0CCH,0CCH,078H,00H	;"8"
	DB	078H,0CCH,0CCH,07CH,0CH,018H,070H,00H	;"9"
	DB	00H,00H,030H,030H,00H,030H,030H,00H	;":"
	DB	00H,00H,030H,030H,00H,030H,030H,060H	;";"
	DB	018H,030H,060H,0C0H,060H,030H,018H,00H	;"<"
	DB	00H,00H,0FCH,00H,0FCH,00H,00H,00H	;"="
	DB	060H,030H,018H,0CH,018H,030H,060H,00H	;">"
	DB	078H,0CCH,018H,030H,030H,00H,030H,00H	;"?"
	DB	078H,0CCH,0DCH,0D4H,0DCH,0C0H,078H,00H	;"@"
	DB	078H,0CCH,0CCH,0FCH,0CCH,0CCH,0CCH,00H	;"A"
	DB	0F8H,0CCH,0CCH,0F8H,0CCH,0CCH,0F8H,00H	;"B"
	DB	078H,0CCH,0C0H,0C0H,0C0H,0CCH,078H,00H	;"C"
	DB	0F0H,0D8H,0CCH,0CCH,0CCH,0D8H,0F0H,00H	;"D"
	DB	0FCH,0C0H,0C0H,0F8H,0C0H,0C0H,0FCH,00H	;"E"
	DB	0FCH,0C0H,0C0H,0F8H,0C0H,0C0H,0C0H,00H	;"F"
	DB	078H,0CCH,0C0H,0DCH,0CCH,0CCH,078H,00H	;"G"
	DB	0CCH,0CCH,0CCH,0FCH,0CCH,0CCH,0CCH,00H	;"H"
	DB	0FCH,030H,030H,030H,030H,030H,0FCH,00H	;"I"
	DB	07CH,018H,018H,018H,018H,0D8H,070H,00H	;"J"
	DB	0CCH,0D8H,0F0H,0E0H,0F0H,0D8H,0CCH,00H	;"K"
	DB	0C0H,0C0H,0C0H,0C0H,0C0H,0C0H,0FCH,00H	;"L"
	DB	0C6H,0EEH,0FEH,0D6H,0D6H,0C6H,0C6H,00H	;"M"
	DB	0CCH,0CCH,0ECH,0FCH,0DCH,0CCH,0CCH,00H	;"N"
	DB	078H,0CCH,0CCH,0CCH,0CCH,0CCH,078H,00H	;"O"
	DB	0F8H,0CCH,0CCH,0F8H,0C0H,0C0H,0C0H,00H	;"P"
	DB	078H,0CCH,0CCH,0CCH,0DCH,078H,01CH,00H	;"Q"
	DB	0F8H,0CCH,0CCH,0F8H,0D8H,0CCH,0CCH,00H	;"R"
	DB	078H,0CCH,0C0H,078H,0CH,0CCH,078H,00H	;"S"
	DB	0FCH,030H,030H,030H,030H,030H,030H,00H	;"T"
	DB	0CCH,0CCH,0CCH,0CCH,0CCH,0CCH,078H,00H	;"U"
	DB	0CCH,0CCH,0CCH,0CCH,0CCH,078H,030H,00H	;"V"
	DB	0C6H,0C6H,0D6H,0D6H,0FEH,0EEH,0C6H,00H	;"W"
	DB	0CCH,0CCH,078H,030H,078H,0CCH,0CCH,00H	;"X"
	DB	0CCH,0CCH,0CCH,078H,030H,030H,030H,00H	;"Y"
	DB	0FCH,0CH,018H,030H,060H,0C0H,0FCH,00H	;"Z"
	DB	0F8H,0C0H,0C0H,0C0H,0C0H,0C0H,0F8H,00H	;"["
	DB	00H,0C0H,060H,030H,018H,0CH,00H,00H	;"\"
	DB	07CH,0CH,0CH,0CH,0CH,0CH,07CH,00H	;"]"
	DB	010H,038H,06CH,0C6H,00H,00H,00H,00H	;"^"
	DB	00H,00H,00H,00H,00H,00H,00H,0FFH	;"_"
	DB	060H,030H,018H,00H,00H,00H,00H,00H	;"`"
	DB	00H,00H,078H,0CH,07CH,0CCH,07CH,00H	;"a"
	DB	0C0H,0C0H,0F8H,0CCH,0CCH,0CCH,0F8H,00H	;"b"
	DB	00H,00H,078H,0CCH,0C0H,0CCH,078H,00H	;"c"
	DB	0CH,0CH,07CH,0CCH,0CCH,0CCH,07CH,00H	;"d"
	DB	00H,00H,078H,0CCH,0FCH,0C0H,078H,00H	;"e"
	DB	038H,060H,060H,0F8H,060H,060H,060H,00H	;"f"
	DB	00H,00H,07CH,0CCH,0CCH,07CH,0CH,078H	;"g"
	DB	0C0H,0C0H,0F8H,0CCH,0CCH,0CCH,0CCH,00H	;"h"
	DB	030H,00H,070H,030H,030H,030H,078H,00H	;"i"
	DB	030H,00H,070H,030H,030H,030H,030H,0E0H	;"j"
	DB	0C0H,0C0H,0CCH,0D8H,0F0H,0D8H,0CCH,00H	;"k"
	DB	070H,030H,030H,030H,030H,030H,078H,00H	;"l"
	DB	00H,00H,06CH,0FEH,0D6H,0D6H,0C6H,00H	;"m"
	DB	00H,00H,0F8H,0CCH,0CCH,0CCH,0CCH,00H	;"n"
	DB	00H,00H,078H,0CCH,0CCH,0CCH,078H,00H	;"o"
	DB	00H,00H,0F8H,0CCH,0CCH,0F8H,0C0H,0C0H	;"p"
	DB	00H,00H,07CH,0CCH,0CCH,07CH,0CH,0EH	;"q"
	DB	00H,00H,0D8H,0ECH,0C0H,0C0H,0C0H,00H	;"r"
	DB	00H,00H,07CH,0C0H,078H,0CH,0F8H,00H	;"s"
	DB	060H,060H,0F8H,060H,060H,060H,038H,00H	;"t"
	DB	00H,00H,0CCH,0CCH,0CCH,0CCH,07CH,00H	;"u"
	DB	00H,00H,0CCH,0CCH,0CCH,078H,030H,00H	;"v"
	DB	00H,00H,0C6H,0D6H,0D6H,0FEH,06CH,00H	;"w"
	DB	00H,00H,0CCH,078H,030H,078H,0CCH,00H	;"x"
	DB	00H,00H,0CCH,0CCH,0CCH,07CH,0CH,078H	;"y"
	DB	00H,00H,0FCH,018H,030H,060H,0FCH,00H	;"z"
	DB	018H,030H,030H,0E0H,030H,030H,018H,00H	;"{"
	DB	030H,030H,030H,00H,030H,030H,030H,00H	;"|"
	DB	060H,030H,030H,01CH,030H,030H,060H,00H	;"}"
	DB	076H,0DCH,00H,00H,00H,00H,00H,00H	;"~"
	DB	00H,010H,038H,06CH,0C6H,0C6H,0FEH,00H	;DEL
	DB	03CH,062H,0F8H,060H,0F8H,062H,03CH,000H ; &80 euro symbol
	DB	000H,07EH,07EH,07EH,07EH,07EH,07EH,000H ; &81 block (teletext)
	DB	000H,000H,000H,000H,000H,018H,018H,030H ; &82 single low quotation mark
	DB	000H,00CH,018H,018H,03CH,018H,018H,070H ; &83 small letter f with hook
	DB	000H,000H,000H,000H,000H,06CH,06CH,0D8H ; &84 double low quotation mark
	DB	000H,000H,000H,000H,000H,000H,054H,000H ; &85 horizontal ellipsis
	DB	018H,018H,07EH,018H,018H,018H,018H,000H ; &86 dagger
	DB	018H,018H,07EH,018H,018H,07EH,018H,018H ; &87 double dagger
	DB	010H,038H,06CH,000H,000H,000H,000H,000H ; &88 circumflex accent
	DB	0C6H,0CCH,018H,030H,060H,0DBH,01BH,000H ; &89 per mille
	DB	038H,07CH,0C6H,070H,01CH,0C6H,07CH,000H ; &8A capital S caron
	DB	000H,018H,030H,060H,030H,018H,000H,000H ; &8B left angle quotation mark
	DB	07EH,0D8H,0D8H,0DEH,0D8H,0D8H,07EH,000H ; &8C capital OE ligature
	DB	030H,078H,0FCH,030H,030H,030H,030H,000H ; &8D up arrow (teletext)
	DB	038H,0FEH,00CH,018H,030H,060H,0FEH,000H ; &8E capital Z caron
	DB	000H,020H,060H,0FEH,060H,020H,000H,000H ; &8F left arrow (teletext)
	DB	000H,008H,00CH,0FEH,00CH,008H,000H,000H ; &90 right arrow (teletext)
	DB	030H,030H,018H,000H,000H,000H,000H,000H ; &91 left single quotation mark
	DB	018H,018H,030H,000H,000H,000H,000H,000H ; &92 right single quotation mark
	DB	06CH,06CH,036H,000H,000H,000H,000H,000H ; &93 left double quotation mark
	DB	036H,036H,06CH,000H,000H,000H,000H,000H ; &94 right double quotation mark
	DB	000H,000H,018H,03CH,03CH,018H,000H,000H ; &95 bullet
	DB	000H,000H,000H,0FEH,000H,000H,000H,000H ; &96 en dash
	DB	000H,000H,000H,0FFH,000H,000H,000H,000H ; &97 em dash
	DB	036H,06CH,000H,000H,000H,000H,000H,000H ; &98 small tilde
	DB	0EAH,04EH,04AH,04AH,000H,000H,000H,000H ; &99 trade mark sign
	DB	06CH,038H,07CH,0C0H,078H,00CH,0F8H,000H ; &9A small S caron
	DB	000H,030H,018H,00CH,018H,030H,000H,000H ; &9B right angle quotation mark
	DB	000H,000H,07EH,0DBH,0DFH,0D8H,07FH,000H ; &9C small OE ligature
	DB	0CCH,0CCH,0CCH,0CCH,0CCH,0CCH,0CCH,000H ; &9D double line (teletext)
	DB	06CH,038H,07CH,018H,030H,060H,07CH,000H ; &9E small Z caron
	DB	0CCH,000H,0CCH,0CCH,078H,030H,030H,000H ; &9F capital Y diaeresis
	DB	000H,000H,000H,000H,000H,000H,000H,000H ;" "
	DB	018H,000H,018H,018H,018H,018H,018H,000H ;" "
	DB	000H,018H,07EH,0D8H,0D8H,07EH,018H,000H ;" "
	DB	038H,06CH,060H,0F0H,060H,066H,0FCH,000H ;" "
	DB	066H,03CH,066H,03CH,066H,000H,000H,000H ;" "
	DB	0C3H,066H,03CH,018H,03CH,018H,018H,000H ;" "
	DB	018H,018H,018H,000H,018H,018H,018H,000H ;" "
	DB	03CH,060H,03CH,066H,066H,03CH,006H,03CH ;" "
	DB	066H,000H,000H,000H,000H,000H,000H,000H ;" "
	DB	07EH,081H,09DH,0B1H,0B1H,09DH,081H,07EH ;" "
	DB	03CH,06CH,06CH,03EH,000H,07EH,000H,000H ;" "
	DB	000H,033H,066H,0CCH,066H,033H,000H,000H ;" "
	DB	000H,07EH,006H,006H,000H,000H,000H,000H ;" "
	DB	000H,000H,000H,03CH,000H,000H,000H,000H ;" "
	DB	07EH,081H,0B9H,0A5H,0B9H,0A5H,081H,07EH ;" "
	DB	03CH,000H,000H,000H,000H,000H,000H,000H ;" "
	DB	03CH,066H,03CH,000H,000H,000H,000H,000H ;" "
	DB	018H,018H,07EH,018H,018H,000H,07EH,000H ;" "
	DB	070H,018H,030H,060H,078H,000H,000H,000H ;" "
	DB	078H,00CH,018H,00CH,078H,000H,000H,000H ;" "
	DB	00CH,018H,030H,000H,000H,000H,000H,000H ;" "
	DB	000H,000H,066H,066H,066H,07CH,060H,0C0H ;" "
	DB	03EH,07AH,07AH,03AH,01AH,01AH,01AH,000H ;" "
	DB	000H,000H,000H,018H,000H,000H,000H,000H ;" "
	DB	000H,000H,000H,000H,000H,008H,018H,000H ;" "
	DB	030H,070H,030H,030H,030H,000H,000H,000H ;" "
	DB	038H,06CH,06CH,038H,000H,07CH,000H,000H ;" "
	DB	000H,0CCH,066H,033H,066H,0CCH,000H,000H ;" "
	DB	043H,0C6H,04CH,05AH,036H,06AH,0CFH,002H ;" "
	DB	040H,0C6H,04CH,05EH,033H,066H,0CCH,00FH ;" "
	DB	0C0H,023H,066H,02DH,0DBH,035H,067H,001H ;" "
	DB	018H,000H,018H,030H,060H,066H,03CH,000H ;" "
	DB	070H,000H,03CH,066H,07EH,066H,066H,000H ;" "
	DB	00EH,000H,03CH,066H,07EH,066H,066H,000H ;" "
	DB	018H,066H,000H,03CH,066H,07EH,066H,000H ;" "
	DB	076H,0DCH,000H,03CH,066H,07EH,066H,000H ;" "
	DB	066H,000H,03CH,066H,07EH,066H,066H,000H ;" "
	DB	018H,018H,000H,03CH,066H,07EH,066H,000H ;" "
	DB	03FH,06CH,0CCH,0FEH,0CCH,0CCH,0CFH,000H ;" "
	DB	03CH,066H,060H,060H,060H,066H,03CH,018H ;" "
	DB	070H,000H,07EH,060H,07CH,060H,07EH,000H ;" "
	DB	00EH,000H,07EH,060H,07CH,060H,07EH,000H ;" "
	DB	018H,066H,000H,0FEH,0F0H,0C0H,0FEH,000H ;" "
	DB	066H,000H,07EH,060H,07CH,060H,07EH,000H ;" "
	DB	070H,000H,07EH,018H,018H,018H,07EH,000H ;" "
	DB	00EH,000H,07EH,018H,018H,018H,07EH,000H ;" "
	DB	018H,066H,000H,07EH,018H,018H,07EH,000H ;" "
	DB	066H,000H,07EH,018H,018H,018H,07EH,000H ;" "
	DB	078H,06CH,066H,0F6H,066H,06CH,078H,000H ;" "
	DB	076H,0DCH,000H,0C6H,0F6H,0DEH,0C6H,000H ;" "
	DB	070H,000H,07CH,0C6H,0C6H,0C6H,07CH,000H ;" "
	DB	00EH,000H,07CH,0C6H,0C6H,0C6H,07CH,000H ;" "
	DB	018H,066H,000H,07CH,0C6H,0C6H,07CH,000H ;" "
	DB	076H,0DCH,000H,07CH,0C6H,0C6H,07CH,000H ;" "
	DB	066H,000H,07CH,0C6H,0C6H,0C6H,07CH,000H ;" "
	DB	000H,0C6H,06CH,038H,06CH,0C6H,000H,000H ;" "
	DB	03EH,066H,06EH,07EH,076H,066H,07CH,000H ;" "
	DB	070H,000H,0C6H,0C6H,0C6H,0C6H,07CH,000H ;" "
	DB	00EH,000H,0C6H,0C6H,0C6H,0C6H,07CH,000H ;" "
	DB	018H,066H,000H,0C6H,0C6H,0C6H,07CH,000H ;" "
	DB	066H,000H,0C6H,0C6H,0C6H,0C6H,07CH,000H ;" "
	DB	00EH,000H,066H,066H,03CH,018H,018H,000H ;" "
	DB	0C0H,0C0H,0FCH,0C6H,0FCH,0C0H,0C0H,000H ;" "
	DB	03CH,066H,066H,06CH,066H,066H,06CH,000H ;" "
	DB	070H,000H,03CH,006H,03EH,066H,03EH,000H ;" "
	DB	00EH,000H,03CH,006H,03EH,066H,03EH,000H ;" "
	DB	018H,066H,000H,03EH,066H,0C6H,07EH,000H ;" "
	DB	076H,0DCH,000H,03EH,066H,0C6H,07EH,000H ;" "
	DB	066H,000H,03CH,006H,03EH,066H,03EH,000H ;" "
	DB	018H,018H,000H,03EH,066H,0C6H,07EH,000H ;" "
	DB	000H,000H,07EH,01BH,07FH,0D8H,077H,000H ;" "
	DB	000H,000H,03CH,060H,060H,060H,03CH,018H ;" "
	DB	070H,000H,03CH,066H,07EH,060H,03CH,000H ;" "
	DB	00EH,000H,03CH,066H,07EH,060H,03CH,000H ;" "
	DB	018H,066H,000H,03CH,07EH,060H,03CH,000H ;" "
	DB	066H,000H,03CH,066H,07EH,060H,03CH,000H ;" "
	DB	070H,000H,038H,018H,018H,018H,03CH,000H ;" "
	DB	00EH,000H,038H,018H,018H,018H,03CH,000H ;" "
	DB	018H,066H,000H,038H,018H,018H,03CH,000H ;" "
	DB	066H,000H,038H,018H,018H,018H,03CH,000H ;" "
	DB	00CH,03EH,00CH,07CH,0CCH,0CCH,078H,000H ;" "
	DB	076H,0DCH,000H,07CH,066H,066H,066H,000H ;" "
	DB	070H,000H,03CH,066H,066H,066H,03CH,000H ;" "
	DB	00EH,000H,03CH,066H,066H,066H,03CH,000H ;" "
	DB	018H,066H,000H,03CH,066H,066H,03CH,000H ;" "
	DB	076H,0DCH,000H,03CH,066H,066H,03CH,000H ;" "
	DB	066H,000H,03CH,066H,066H,066H,03CH,000H ;" "
	DB	018H,018H,000H,07EH,000H,018H,018H,000H ;" "
	DB	000H,002H,07CH,0CEH,0D6H,0E6H,07CH,080H ;" "
	DB	070H,000H,066H,066H,066H,066H,03EH,000H ;" "
	DB	00EH,000H,066H,066H,066H,066H,03EH,000H ;" "
	DB	018H,066H,000H,066H,066H,066H,03EH,000H ;" "
	DB	066H,000H,066H,066H,066H,066H,03EH,000H ;" "
	DB	00EH,000H,066H,066H,066H,03EH,006H,03CH ;" "
	DB	060H,060H,07CH,066H,066H,07CH,060H,060H ;" "
	DB	066H,000H,066H,066H,066H,03EH,006H,03CH ;" "
;
ttxtfont:
	DW	00000H,00011H,00011H,00019H,00015H,00013H,00011H,00011H,08800H,08800H,08800H,08800H,08800H,08800H,07000H,00000H,00000H,00000H,00000H,00000H ; NU
	DW	00000H,0000EH,00011H,00011H,0001FH,00011H,00011H,00011H,0F000H,08800H,08800H,0F000H,08800H,08800H,08800H,00000H,00000H,00000H,00000H,00000H ; AR
	DW	00000H,0000EH,00011H,00011H,0001FH,00011H,00011H,00011H,07000H,08800H,08000H,09800H,08800H,08800H,07000H,00000H,00000H,00000H,00000H,00000H ; AG
	DW	00000H,0000EH,00011H,00011H,0001FH,00011H,00011H,00011H,08800H,08800H,05000H,02000H,02000H,02000H,02000H,00000H,00000H,00000H,00000H,00000H ; AY
	DW	00000H,0000EH,00011H,00011H,0001FH,00011H,00011H,00011H,0F000H,08800H,08800H,0F000H,08800H,08800H,0F000H,00000H,00000H,00000H,00000H,00000H ; AB
	DW	00000H,0000EH,00011H,00011H,0001FH,00011H,00011H,00011H,08800H,0D800H,0A800H,0A800H,08800H,08800H,08800H,00000H,00000H,00000H,00000H,00000H ; AM
	DW	00000H,0000EH,00011H,00011H,0001FH,00011H,00011H,00011H,07000H,08800H,08000H,08000H,08000H,08800H,07000H,00000H,00000H,00000H,00000H,00000H ; AC
	DW	00000H,0000EH,00011H,00011H,0001FH,00011H,00011H,00011H,08800H,08800H,08800H,0A800H,0A800H,0D800H,08800H,00000H,00000H,00000H,00000H,00000H ; AW
	DW	00000H,0001FH,00010H,00010H,0001EH,00010H,00010H,00010H,08000H,08000H,08000H,08000H,08000H,08000H,0F800H,00000H,00000H,00000H,00000H,00000H ; FL
	DW	00000H,0000EH,00011H,00010H,0000EH,00001H,00011H,0000EH,0F800H,02000H,02000H,02000H,02000H,02000H,02000H,00000H,00000H,00000H,00000H,00000H ; ST
	DW	00000H,0001FH,00010H,00010H,0001EH,00010H,00010H,0001FH,0F000H,08800H,08800H,0F000H,08800H,08800H,0F000H,00000H,00000H,00000H,00000H,00000H ; EB
	DW	00000H,0000EH,00011H,00010H,0000EH,00001H,00011H,0000EH,0F000H,08800H,08800H,0F000H,08800H,08800H,0F000H,00000H,00000H,00000H,00000H,00000H ; SB
	DW	00000H,00011H,00011H,00019H,00015H,00013H,00011H,00011H,08800H,08800H,08800H,0F800H,08800H,08800H,08800H,00000H,00000H,00000H,00000H,00000H ; NH
	DW	00000H,0001CH,00012H,00011H,00011H,00011H,00012H,0001CH,08800H,08800H,08800H,0F800H,08800H,08800H,08800H,00000H,00000H,00000H,00000H,00000H ; DH
	DW	00000H,0000EH,00011H,00010H,0000EH,00001H,00011H,0000EH,07000H,08800H,08800H,08800H,08800H,08800H,07000H,00000H,00000H,00000H,00000H,00000H ; SO
	DW	00000H,0000EH,00011H,00010H,0000EH,00001H,00011H,0000EH,07000H,02000H,02000H,02000H,02000H,02000H,07000H,00000H,00000H,00000H,00000H,00000H ; SI
	DW	00000H,0001CH,00012H,00011H,00011H,00011H,00012H,0001CH,08000H,08000H,08000H,08000H,08000H,08000H,0F800H,00000H,00000H,00000H,00000H,00000H ; DL
	DW	00000H,0000EH,00011H,00010H,00013H,00011H,00011H,0000EH,0F000H,08800H,08800H,0F000H,08800H,08800H,08800H,00000H,00000H,00000H,00000H,00000H ; GR
	DW	00000H,0000EH,00011H,00010H,00013H,00011H,00011H,0000EH,07000H,08800H,08000H,09800H,08800H,08800H,07000H,00000H,00000H,00000H,00000H,00000H ; GG
	DW	00000H,0000EH,00011H,00010H,00013H,00011H,00011H,0000EH,08800H,08800H,05000H,02000H,02000H,02000H,02000H,00000H,00000H,00000H,00000H,00000H ; GY
	DW	00000H,0000EH,00011H,00010H,00013H,00011H,00011H,0000EH,0F000H,08800H,08800H,0F000H,08800H,08800H,0F000H,00000H,00000H,00000H,00000H,00000H ; GB
	DW	00000H,0000EH,00011H,00010H,00013H,00011H,00011H,0000EH,08800H,0D800H,0A800H,0A800H,08800H,08800H,08800H,00000H,00000H,00000H,00000H,00000H ; GM
	DW	00000H,0000EH,00011H,00010H,00013H,00011H,00011H,0000EH,07000H,08800H,08000H,08000H,08000H,08800H,07000H,00000H,00000H,00000H,00000H,00000H ; GC
	DW	00000H,0000EH,00011H,00010H,00013H,00011H,00011H,0000EH,08800H,08800H,08800H,0A800H,0A800H,0D800H,08800H,00000H,00000H,00000H,00000H,00000H ; GW
	DW	00000H,0000EH,00011H,00010H,00010H,00010H,00011H,0000EH,0E000H,09000H,08800H,08800H,08800H,09000H,0E000H,00000H,00000H,00000H,00000H,00000H ; CD
	DW	00000H,0000EH,00011H,00010H,00010H,00010H,00011H,0000EH,07000H,08800H,08000H,09800H,08800H,08800H,07000H,00000H,00000H,00000H,00000H,00000H ; CG
	DW	00000H,0000EH,00011H,00010H,0000EH,00001H,00011H,0000EH,07000H,08800H,08000H,09800H,08800H,08800H,07000H,00000H,00000H,00000H,00000H,00000H ; SG
	DW	00000H,0001FH,00010H,00010H,0001EH,00010H,00010H,0001FH,07000H,08800H,08000H,07000H,00800H,08800H,07000H,00000H,00000H,00000H,00000H,00000H ; ES
	DW	00000H,0001EH,00011H,00011H,0001EH,00011H,00011H,0001EH,0F000H,08800H,08800H,0F000H,08800H,08800H,0F000H,00000H,00000H,00000H,00000H,00000H ; BB
	DW	00000H,00011H,00011H,00019H,00015H,00013H,00011H,00011H,0F000H,08800H,08800H,0F000H,08800H,08800H,0F000H,00000H,00000H,00000H,00000H,00000H ; NB
	DW	00000H,00011H,00011H,00011H,0001FH,00011H,00011H,00011H,07000H,08800H,08000H,09800H,08800H,08800H,07000H,00000H,00000H,00000H,00000H,00000H ; HG
	DW	00000H,0001EH,00011H,00011H,0001EH,00011H,00011H,00011H,07000H,08800H,08000H,09800H,08800H,08800H,07000H,00000H,00000H,00000H,00000H,00000H ; RG
	DW	00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00000H,08001H,08001H,08001H,08001H,08001H,08001H,08001H,08001H,08001H,08001H,00000H,00000H,08001H,08001H,00000H,00000H,00000H,00000H,00000H ; "!"
	DW	00000H,0700EH,0700EH,0700EH,0700EH,0700EH,0700EH,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H ; """
	DW	00000H,0700EH,0700EH,0700EH,0700EH,0FC3FH,0FC3FH,0700EH,0700EH,0FC3FH,0FC3FH,0700EH,0700EH,0700EH,0700EH,00000H,00000H,00000H,00000H,00000H ; "#"
	DW	00000H,0F00FH,0F81FH,09C39H,08C31H,08031H,08039H,0F01FH,0F80FH,09C01H,08C01H,08C31H,09C39H,0F81FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; "$"
	DW	00000H,0003CH,00C3CH,01C3CH,0383CH,07000H,0E000H,0C001H,08003H,00007H,0000EH,03C1CH,03C38H,03C30H,03C00H,00000H,00000H,00000H,00000H,00000H ; "%"
	DW	00000H,0000EH,0001FH,0803BH,08031H,0803BH,0001FH,0000EH,0001FH,08C3BH,0DC31H,0F830H,0F838H,0DC1FH,08C0FH,00000H,00000H,00000H,00000H,00000H ; "&"
	DW	00000H,08001H,08001H,08001H,08001H,08001H,08001H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H ; "'"
	DW	00000H,06000H,0E000H,0C001H,08003H,00007H,00006H,00006H,00006H,00006H,00007H,08003H,0C001H,0E000H,06000H,00000H,00000H,00000H,00000H,00000H ; "("
	DW	00000H,00006H,00007H,08003H,0C001H,0E000H,06000H,06000H,06000H,06000H,0E000H,0C001H,08003H,00007H,00006H,00000H,00000H,00000H,00000H,00000H ; ")"
	DW	00000H,08001H,08001H,08C31H,09C39H,0F81FH,0F00FH,08001H,08001H,0F00FH,0F81FH,09C39H,08C31H,08001H,08001H,00000H,00000H,00000H,00000H,00000H ; "*"
	DW	00000H,00000H,00000H,08001H,08001H,08001H,08001H,0F81FH,0F81FH,08001H,08001H,08001H,08001H,00000H,00000H,00000H,00000H,00000H,00000H,00000H ; "+"
	DW	00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,08001H,08001H,08001H,08003H,00007H,00006H,00000H,00000H,00000H ; ","
	DW	00000H,00000H,00000H,00000H,00000H,00000H,00000H,0F00FH,0F00FH,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H ; "-"
	DW	00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,08001H,08001H,00000H,00000H,00000H,00000H,00000H ; "."
	DW	00000H,00000H,00C00H,01C00H,03800H,07000H,0E000H,0C001H,08003H,00007H,0000EH,0001CH,00038H,00030H,00000H,00000H,00000H,00000H,00000H,00000H ; "/"
	DW	00000H,0C003H,0E007H,0700EH,0381CH,01C38H,00C30H,00C30H,00C30H,00C30H,01C38H,0381CH,0700EH,0E007H,0C003H,00000H,00000H,00000H,00000H,00000H ; "0"
	DW	00000H,08001H,08001H,0800FH,0800FH,08001H,08001H,08001H,08001H,08001H,08001H,08001H,08001H,0F00FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; "1"
	DW	00000H,0F00FH,0F81FH,01C38H,00C30H,00C00H,01C00H,0F803H,0F007H,0000EH,0001CH,00038H,00030H,0FC3FH,0FC3FH,00000H,00000H,00000H,00000H,00000H ; "2"
	DW	00000H,0FC3FH,0FC3FH,01C00H,03800H,07000H,0E000H,0F801H,0FC01H,00C00H,00C00H,00C30H,01C38H,0F81FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; "3"
	DW	00000H,07000H,0F000H,0F001H,0B003H,03007H,0300EH,0301CH,03038H,0FC3FH,0FC3FH,03000H,03000H,03000H,03000H,00000H,00000H,00000H,00000H,00000H ; "4"
	DW	00000H,0FC3FH,0FC3FH,00030H,00030H,0F03FH,0F83FH,01C00H,00C00H,00C00H,00C00H,00C30H,01C38H,0F81FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; "5"
	DW	00000H,0F001H,0F007H,0000FH,0001CH,00038H,00030H,0F03FH,0F83FH,01C30H,00C30H,00C30H,01C38H,0F81FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; "6"
	DW	00000H,0FC3FH,0FC3FH,00C00H,01C00H,03800H,07000H,0E000H,0C001H,08003H,00007H,00006H,00006H,00006H,00006H,00000H,00000H,00000H,00000H,00000H ; "7"
	DW	00000H,0F00FH,0F81FH,01C38H,00C30H,00C30H,01C38H,0F81FH,0F81FH,01C38H,00C30H,00C30H,01C38H,0F81FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; "8"
	DW	00000H,0F00FH,0F81FH,01C38H,00C30H,00C30H,00C38H,0FC1FH,0FC0FH,00C00H,01C00H,03800H,0F000H,0E00FH,0800FH,00000H,00000H,00000H,00000H,00000H ; "9"
	DW	00000H,00000H,00000H,00000H,00000H,08001H,08001H,00000H,00000H,00000H,00000H,00000H,00000H,08001H,08001H,00000H,00000H,00000H,00000H,00000H ; ":"
	DW	00000H,00000H,00000H,00000H,00000H,08001H,08001H,00000H,00000H,00000H,00000H,08001H,08001H,08001H,08003H,00007H,00006H,00000H,00000H,00000H ; ";"
	DW	00000H,06000H,0E000H,0C001H,08003H,00007H,0000EH,0001CH,0001CH,0000EH,00007H,08003H,0C001H,0E000H,06000H,00000H,00000H,00000H,00000H,00000H ; "<"
	DW	00000H,00000H,00000H,00000H,00000H,0FC3FH,0FC3FH,00000H,00000H,0FC3FH,0FC3FH,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H ; "="
	DW	00000H,00006H,00007H,08003H,0C001H,0E000H,07000H,03800H,03800H,07000H,0E000H,0C001H,08003H,00007H,00006H,00000H,00000H,00000H,00000H,00000H ; ">"
	DW	00000H,0E00FH,0F01FH,03838H,01830H,03800H,07000H,0E000H,0C001H,08001H,08001H,00000H,00000H,08001H,08001H,00000H,00000H,00000H,00000H,00000H ; "?"
	DW	00000H,0F00FH,0F81FH,01C38H,00C30H,0FC31H,0FC31H,08C31H,08C31H,0FC31H,0FC31H,00030H,00038H,0F01FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; "@"
	DW	00000H,08001H,0C003H,0E007H,0700EH,0381CH,01C38H,00C30H,00C30H,0FC3FH,0FC3FH,00C30H,00C30H,00C30H,00C30H,00000H,00000H,00000H,00000H,00000H ; "A"
	DW	00000H,0F03FH,0F83FH,01C30H,00C30H,00C30H,01C30H,0F83FH,0F83FH,01C30H,00C30H,00C30H,01C30H,0F83FH,0F03FH,00000H,00000H,00000H,00000H,00000H ; "B"
	DW	00000H,0F00FH,0F81FH,01C38H,00C30H,00030H,00030H,00030H,00030H,00030H,00030H,00C30H,01C38H,0F81FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; "C"
	DW	00000H,0F03FH,0F83FH,01C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,01C30H,0F83FH,0F03FH,00000H,00000H,00000H,00000H,00000H ; "D"
	DW	00000H,0FC3FH,0FC3FH,00030H,00030H,00030H,00030H,0F03FH,0F03FH,00030H,00030H,00030H,00030H,0FC3FH,0FC3FH,00000H,00000H,00000H,00000H,00000H ; "E"
	DW	00000H,0FC3FH,0FC3FH,00030H,00030H,00030H,00030H,0F03FH,0F03FH,00030H,00030H,00030H,00030H,00030H,00030H,00000H,00000H,00000H,00000H,00000H ; "F"
	DW	00000H,0F00FH,0F81FH,01C38H,00C30H,00030H,00030H,00030H,00030H,03C30H,03C30H,00C30H,00C38H,0FC1FH,0FC0FH,00000H,00000H,00000H,00000H,00000H ; "G"
	DW	00000H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,0FC3FH,0FC3FH,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00000H,00000H,00000H,00000H,00000H ; "H"
	DW	00000H,0F00FH,0F00FH,08001H,08001H,08001H,08001H,08001H,08001H,08001H,08001H,08001H,08001H,0F00FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; "I"
	DW	00000H,00C00H,00C00H,00C00H,00C00H,00C00H,00C00H,00C00H,00C00H,00C00H,00C00H,00C30H,01C38H,0F81FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; "J"
	DW	00000H,01830H,03830H,07030H,0E030H,0C031H,08033H,0003FH,0003FH,08033H,0C031H,0E030H,07030H,03830H,01830H,00000H,00000H,00000H,00000H,00000H ; "K"
	DW	00000H,00030H,00030H,00030H,00030H,00030H,00030H,00030H,00030H,00030H,00030H,00030H,00030H,0FC3FH,0FC3FH,00000H,00000H,00000H,00000H,00000H ; "L"
	DW	00000H,00C30H,00C30H,01C38H,03C3CH,07C3EH,0EC37H,0CC33H,08C31H,08C31H,00C30H,00C30H,00C30H,00C30H,00C30H,00000H,00000H,00000H,00000H,00000H ; "M"
	DW	00000H,00C30H,00C30H,00C38H,00C3CH,00C3EH,00C37H,08C33H,0CC31H,0EC30H,07C30H,03C30H,01C30H,00C30H,00C30H,00000H,00000H,00000H,00000H,00000H ; "N"
	DW	00000H,0F00FH,0F81FH,01C38H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,01C38H,0F81FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; "O"
	DW	00000H,0F03FH,0F83FH,01C30H,00C30H,00C30H,01C30H,0F83FH,0F03FH,00030H,00030H,00030H,00030H,00030H,00030H,00000H,00000H,00000H,00000H,00000H ; "P"
	DW	00000H,0F00FH,0F81FH,01C38H,00C30H,00C30H,00C30H,00C30H,00C30H,0CC30H,0EC30H,07830H,03838H,0FC1FH,0CC0FH,00000H,00000H,00000H,00000H,00000H ; "Q"
	DW	00000H,0F03FH,0F83FH,01C30H,00C30H,00C30H,01C30H,0F83FH,0F03FH,0C031H,0E030H,07030H,03830H,01C30H,00C30H,00000H,00000H,00000H,00000H,00000H ; "R"
	DW	00000H,0F00FH,0F81FH,01C38H,00C30H,00030H,00038H,0F01FH,0F80FH,01C00H,00C00H,00C30H,01C38H,0F81FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; "S"
	DW	00000H,0FC3FH,0FC3FH,08001H,08001H,08001H,08001H,08001H,08001H,08001H,08001H,08001H,08001H,08001H,08001H,00000H,00000H,00000H,00000H,00000H ; "T"
	DW	00000H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,01C38H,0F81FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; "U"
	DW	00000H,00C30H,00C30H,00C30H,00C30H,01C38H,01818H,0381CH,0300CH,0700EH,0E007H,0C003H,0C003H,08001H,08001H,00000H,00000H,00000H,00000H,00000H ; "V"
	DW	00000H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,08C31H,08C31H,08C31H,08C31H,08C31H,0FC3FH,0F81FH,0700EH,00000H,00000H,00000H,00000H,00000H ; "W"
	DW	00000H,00C30H,00C30H,01C38H,0381CH,0700EH,0E007H,0C003H,0C003H,0E007H,0700EH,0381CH,01C38H,00C30H,00C30H,00000H,00000H,00000H,00000H,00000H ; "X"
	DW	00000H,00C30H,00C30H,01C38H,0381CH,0700EH,0E007H,0C003H,08001H,08001H,08001H,08001H,08001H,08001H,08001H,00000H,00000H,00000H,00000H,00000H ; "Y"
	DW	00000H,0FC3FH,0FC3FH,01C00H,03800H,07000H,0E000H,0C001H,08003H,00007H,0000EH,0001CH,00038H,0FC3FH,0FC3FH,00000H,00000H,00000H,00000H,00000H ; "Z"
	DW	00000H,0E007H,0E007H,00006H,00006H,00006H,00006H,00006H,00006H,00006H,00006H,00006H,00006H,0E007H,0E007H,00000H,00000H,00000H,00000H,00000H ; "["
	DW	00000H,00000H,00030H,00038H,0001CH,0000EH,00007H,08003H,0C001H,0E000H,07000H,03800H,01C00H,00C00H,00000H,00000H,00000H,00000H,00000H,00000H ; "\"
	DW	00000H,0E007H,0E007H,06000H,06000H,06000H,06000H,06000H,06000H,06000H,06000H,06000H,06000H,0E007H,0E007H,00000H,00000H,00000H,00000H,00000H ; "]"
	DW	00000H,08001H,0C003H,0E007H,0700EH,0381CH,01818H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H ; "^"
	DW	00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,0FFFFH,0FFFFH,00000H,00000H ; "_"
	DW	00000H,00006H,00007H,08003H,0C001H,0E000H,06000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H ; "`"
	DW	00000H,00000H,00000H,00000H,00000H,0F00FH,0F80FH,01C00H,00C00H,0FC1FH,0FC3FH,00C30H,00C30H,0FC3FH,0FC1FH,00000H,00000H,00000H,00000H,00000H ; "a"
	DW	00000H,00030H,00030H,00030H,00030H,0F03FH,0F83FH,01C30H,00C30H,00C30H,00C30H,00C30H,01C30H,0F83FH,0F03FH,00000H,00000H,00000H,00000H,00000H ; "b"
	DW	00000H,00000H,00000H,00000H,00000H,0FC0FH,0FC1FH,00038H,00030H,00030H,00030H,00030H,00038H,0FC1FH,0FC0FH,00000H,00000H,00000H,00000H,00000H ; "c"
	DW	00000H,00C00H,00C00H,00C00H,00C00H,0FC0FH,0FC1FH,00C38H,00C30H,00C30H,00C30H,00C30H,00C38H,0FC1FH,0FC0FH,00000H,00000H,00000H,00000H,00000H ; "d"
	DW	00000H,00000H,00000H,00000H,00000H,0F00FH,0F81FH,01C38H,00C30H,0FC3FH,0FC3FH,00030H,00038H,0F01FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; "e"
	DW	00000H,03000H,0F000H,0C001H,08001H,08001H,08001H,0F00FH,0F00FH,08001H,08001H,08001H,08001H,08001H,08001H,00000H,00000H,00000H,00000H,00000H ; "f"
	DW	00000H,00000H,00000H,00000H,00000H,0FC0FH,0FC1FH,00C38H,00C30H,00C30H,00C30H,00C30H,00C38H,0FC1FH,0FC0FH,00C00H,01C00H,0F80FH,0F00FH,00000H ; "g"
	DW	00000H,00030H,00030H,00030H,00030H,0F03FH,0F83FH,01C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00000H,00000H,00000H,00000H,00000H ; "h"
	DW	00000H,08001H,08001H,00000H,00000H,0800FH,0800FH,08001H,08001H,08001H,08001H,08001H,08001H,0F00FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; "i"
	DW	00000H,08001H,08001H,00000H,00000H,08001H,08001H,08001H,08001H,08001H,08001H,08001H,08001H,08001H,08001H,08001H,08003H,0000FH,0000CH,00000H ; "j"
	DW	00000H,0000CH,0000CH,0000CH,0180CH,0380CH,0700CH,0E00CH,0C00FH,0800FH,0C00DH,0E00CH,0700CH,0380CH,0180CH,00000H,00000H,00000H,00000H,00000H ; "k"
	DW	00000H,0800FH,0800FH,08001H,08001H,08001H,08001H,08001H,08001H,08001H,08001H,08001H,08001H,0F00FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; "l"
	DW	00000H,00000H,00000H,00000H,00000H,0303EH,0F83FH,0FC33H,08C31H,08C31H,08C31H,08C31H,08C31H,08C31H,08C31H,00000H,00000H,00000H,00000H,00000H ; "m"
	DW	00000H,00000H,00000H,00000H,00000H,0F03FH,0F83FH,01C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00000H,00000H,00000H,00000H,00000H ; "n"
	DW	00000H,00000H,00000H,00000H,00000H,0F00FH,0F81FH,01C38H,00C30H,00C30H,00C30H,00C30H,01C38H,0F81FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; "o"
	DW	00000H,00000H,00000H,00000H,00000H,0F03FH,0F83FH,01C30H,00C30H,00C30H,00C30H,00C30H,01C30H,0F83FH,0F03FH,00030H,00030H,00030H,00030H,00000H ; "p"
	DW	00000H,00000H,00000H,00000H,00000H,0FC0FH,0FC1FH,00C38H,00C30H,00C30H,00C30H,00C30H,00C38H,0FC1FH,0FC0FH,00C00H,00C00H,00C00H,00C00H,00000H ; "q"
	DW	00000H,00000H,00000H,00000H,00000H,0F819H,0F81BH,0001FH,0001EH,00018H,00018H,00018H,00018H,00018H,00018H,00000H,00000H,00000H,00000H,00000H ; "r"
	DW	00000H,00000H,00000H,00000H,00000H,0FC0FH,0FC1FH,00030H,00030H,0F01FH,0F80FH,00C00H,00C00H,0F83FH,0F03FH,00000H,00000H,00000H,00000H,00000H ; "s"
	DW	00000H,08001H,08001H,08001H,08001H,0F00FH,0F00FH,08001H,08001H,08001H,08001H,08001H,0C001H,0F000H,03000H,00000H,00000H,00000H,00000H,00000H ; "t"
	DW	00000H,00000H,00000H,00000H,00000H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00C38H,0FC1FH,0FC0FH,00000H,00000H,00000H,00000H,00000H ; "u"
	DW	00000H,00000H,00000H,00000H,00000H,00C30H,00C30H,00C30H,01C38H,01818H,0381CH,0700EH,0E007H,0C003H,08001H,00000H,00000H,00000H,00000H,00000H ; "v"
	DW	00000H,00000H,00000H,00000H,00000H,00C30H,00C30H,00C30H,00C30H,08C31H,08C31H,08C31H,0FC3FH,0F81FH,0700EH,00000H,00000H,00000H,00000H,00000H ; "w"
	DW	00000H,00000H,00000H,00000H,00000H,00C30H,01C38H,0781EH,0F00FH,0C003H,0C003H,0F00FH,0781EH,01C38H,00C30H,00000H,00000H,00000H,00000H,00000H ; "x"
	DW	00000H,00000H,00000H,00000H,00000H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00C38H,0FC1FH,0FC0FH,00C00H,01C00H,0F80FH,0F00FH,00000H ; "y"
	DW	00000H,00000H,00000H,00000H,00000H,0FC3FH,0FC3FH,03800H,07000H,0E001H,08007H,0000EH,0001CH,0FC3FH,0FC3FH,00000H,00000H,00000H,00000H,00000H ; "z"
	DW	00000H,0F000H,0F001H,08001H,08001H,08003H,00003H,0000FH,0000FH,00003H,08003H,08001H,08001H,0F000H,0F000H,00000H,00000H,00000H,00000H,00000H ; "{"
	DW	00000H,08001H,08001H,08001H,08001H,08001H,08001H,08001H,08001H,08001H,08001H,08001H,08001H,08001H,08001H,00000H,00000H,00000H,00000H,00000H ; "|"
	DW	00000H,0000FH,0800FH,08001H,08001H,0C001H,0C000H,0F000H,0F000H,0C000H,0C001H,08001H,08001H,0000FH,0000FH,00000H,00000H,00000H,00000H,00000H ; "}"
	DW	00000H,0000EH,00C1FH,0DC3BH,0F831H,07000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H ; "~"
	DW	00000H,08001H,0C003H,0C003H,06006H,06006H,0300CH,0300CH,01818H,01818H,00C30H,00C30H,00C30H,0FC3FH,0FC3FH,00000H,00000H,00000H,00000H,00000H ; &7F DEL
	DW	00000H,0F003H,0F807H,01C0EH,00C0CH,0C03FH,0C03FH,0000CH,0000CH,0803FH,0803FH,00C0CH,01C0EH,0F807H,0F003H,00000H,00000H,00000H,00000H,00000H ; &80 euro symbol
	DW	00000H,0FC3FH,0FC3FH,0FC3FH,0FC3FH,0FC3FH,0FC3FH,0FC3FH,0FC3FH,0FC3FH,0FC3FH,0FC3FH,0FC3FH,0FC3FH,0FC3FH,00000H,00000H,00000H,00000H,00000H ; &81 block (teletext)
	DW	00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,08003H,08003H,08001H,08003H,00007H,0000EH,00000H,00000H,00000H ; &82 single low quotation mark
	DW	00000H,07000H,0F000H,0C001H,08001H,08001H,08001H,0F00FH,0F00FH,08001H,08001H,08001H,08001H,08001H,08001H,08001H,08003H,0000FH,0000EH,00000H ; &83 small letter f with hook
	DW	00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,01C0EH,01C0EH,00C06H,01C0EH,0381CH,07038H,00000H,00000H,00000H ; &84 double low quotation mark
	DW	00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,09819H,09819H,00000H,00000H,00000H,00000H,00000H ; &85 horizontal ellipsis
	DW	00000H,08001H,08001H,08001H,0F00FH,0F00FH,08001H,08001H,08001H,08001H,08001H,08001H,08001H,08001H,08001H,00000H,00000H,00000H,00000H,00000H ; &86 dagger
	DW	00000H,08001H,08001H,08001H,0F00FH,0F00FH,08001H,08001H,08001H,08001H,0F00FH,0F00FH,08001H,08001H,08001H,00000H,00000H,00000H,00000H,00000H ; &87 double dagger
	DW	08001H,0C003H,06006H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H ; &88 circumflex accent
	DW	00000H,03038H,0706CH,0E06CH,0C039H,08003H,00007H,0000EH,0001CH,00038H,00070H,01C67H,0B60DH,0B60DH,01C07H,00000H,00000H,00000H,00000H,00000H ; &89 per mille
	DW	06006H,0E007H,0C003H,0F00FH,0F81FH,01C38H,00C30H,00038H,0F01FH,0F80FH,01C00H,00C30H,01C38H,0F81FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; &8A capital S caron
	DW	00000H,00000H,00000H,08001H,08003H,00007H,0000EH,0000CH,0000EH,00007H,08003H,08001H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H ; &8B left angle quotation mark
	DW	00000H,0FC0FH,0FC1FH,08039H,08031H,08031H,08031H,0F831H,0F831H,08031H,08031H,08031H,08039H,0FC1FH,0FC0FH,00000H,00000H,00000H,00000H,00000H ; &8C capital OE ligature
	DW	00000H,00000H,08001H,0C003H,0E007H,0F00FH,0B81DH,09C39H,08C31H,08001H,08001H,08001H,08001H,08001H,00000H,00000H,00000H,00000H,00000H,00000H ; &8D up arrow (teletext)
	DW	06006H,0E007H,0C003H,0FC3FH,0FC3FH,03800H,07000H,0E000H,0C001H,08003H,00007H,0000EH,0001CH,0FC3FH,0FC3FH,00000H,00000H,00000H,00000H,00000H ; &8E capital Z caron
	DW	00000H,00000H,08001H,08003H,00007H,0000EH,0001CH,0FC3FH,0FC3FH,0001CH,0000EH,00007H,08003H,08001H,00000H,00000H,00000H,00000H,00000H,00000H ; &8F left arrow (teletext)
	DW	00000H,00000H,08001H,0C001H,0E000H,07000H,03800H,0FC3FH,0FC3FH,03800H,07000H,0E000H,0C001H,08001H,00000H,00000H,00000H,00000H,00000H,00000H ; &90 right arrow (teletext)
	DW	00000H,07000H,0E000H,0C001H,08001H,0C001H,0C001H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H ; &91 left single quotation mark
	DW	00000H,08003H,08003H,08001H,08003H,00007H,0000EH,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H ; &92 right single quotation mark
	DW	00000H,01C0EH,0381CH,07038H,06030H,07038H,07038H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H ; &93 left double quotation mark
	DW	00000H,01C0EH,01C0EH,00C06H,01C0EH,0381CH,07038H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H ; &94 right double quotation mark
	DW	00000H,00000H,00000H,00000H,00000H,08001H,0C003H,0E007H,0E007H,0C003H,08001H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H ; &95 bullet
	DW	00000H,00000H,00000H,00000H,00000H,00000H,00000H,0F81FH,0F81FH,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H ; &96 en dash
	DW	00000H,00000H,00000H,00000H,00000H,00000H,00000H,0FE7FH,0FE7FH,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H ; &97 em dash
	DW	06007H,0C00DH,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H ; &98 small tilde
	DW	00000H,00000H,0C67EH,0C67EH,0EE18H,0FE18H,0D618H,0D618H,0C618H,0C618H,0C618H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H ; &99 trade mark sign
	DW	00000H,06006H,0E007H,0C003H,00000H,0FC0FH,0FC1FH,00038H,00038H,0F01FH,0F80FH,01C00H,01C00H,0F83FH,0F03FH,00000H,00000H,00000H,00000H,00000H ; &9A small S caron
	DW	00000H,00000H,00000H,08001H,0C001H,0E000H,07000H,03000H,07000H,0E000H,0C001H,08001H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H ; &9B right angle quotation mark
	DW	00000H,00000H,00000H,00000H,00000H,0780EH,0FC1FH,0CC3BH,08C31H,0FC31H,0FC31H,08031H,0C03BH,0FC1FH,07C0EH,00000H,00000H,00000H,00000H,00000H ; &9C small OE ligature
	DW	00000H,0381CH,0381CH,0381CH,0381CH,0381CH,0381CH,0381CH,0381CH,0381CH,0381CH,0381CH,0381CH,0381CH,0381CH,00000H,00000H,00000H,00000H,00000H ; &9D double line (teletext)
	DW	00000H,06006H,0E007H,0C003H,00000H,0FC3FH,0FC3FH,03800H,07000H,0E001H,08007H,0000EH,0001CH,0FC3FH,0FC3FH,00000H,00000H,00000H,00000H,00000H ; &9E small Z caron
	DW	0300CH,0300CH,0300CH,00000H,00C30H,01C38H,0381CH,0700EH,0E007H,0C003H,08001H,08001H,08001H,08001H,08001H,00000H,00000H,00000H,00000H,00000H ; &9F capital Y diaeresis
	DW	00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H ; &A0 non-break space
	DW	00000H,00000H,00000H,00000H,00000H,08001H,08001H,00000H,00000H,08001H,08001H,08001H,08001H,08001H,08001H,08001H,08001H,08001H,08001H,00000H ; " "
	DW	00000H,00000H,00000H,08001H,08001H,0FC0FH,0FC1FH,08039H,08031H,08031H,08031H,08031H,08039H,0FC1FH,0FC0FH,08001H,08001H,00000H,00000H,00000H ; " "
	DW	00000H,0F003H,0F807H,01C0EH,00C0CH,0000CH,0000CH,0803FH,0803FH,0000CH,0000CH,0000CH,0000CH,0FC3FH,0FC3FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00000H,00000H,00000H,00000H,00000H,00C30H,01C38H,0F81FH,0F00FH,0700EH,0700EH,0F00FH,0F81FH,01C38H,00C30H,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00000H,00C30H,01C38H,0381CH,0700EH,0FC3FH,0FC3FH,08001H,08001H,0FC3FH,0FC3FH,08001H,08001H,08001H,08001H,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00000H,08001H,08001H,08001H,08001H,08001H,08001H,00000H,00000H,08001H,08001H,08001H,08001H,08001H,08001H,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00000H,0F00FH,0F81FH,01C38H,00C30H,00030H,00038H,0F01FH,0F81FH,01C38H,01C38H,0F81FH,0F80FH,01C00H,00C00H,00C30H,01C38H,0F81FH,0F00FH,00000H ; " "
	DW	01818H,01818H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00000H,0F00FH,0F81FH,01C38H,00C30H,0CC33H,0EC37H,06C36H,00C36H,00C36H,00C36H,06C36H,0EC37H,0CC33H,00C30H,00C30H,01C38H,0F81FH,0F00FH,00000H ; " "
	DW	00000H,0F00FH,0F80FH,01C00H,00C00H,0FC0FH,0FC1FH,00C38H,00C38H,0FC1FH,0FC0FH,00000H,00000H,0FC3FH,0FC3FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00000H,00000H,00000H,00000H,00000H,00000H,00000H,01C0EH,0381CH,07038H,07038H,0381CH,01C0EH,00000H,00000H,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00000H,00000H,00000H,00000H,00000H,0FC3FH,0FC3FH,00C00H,00C00H,00C00H,00C00H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00000H,00000H,00000H,00000H,00000H,00000H,00000H,0E007H,0E007H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00000H,0F00FH,0F81FH,01C38H,00C30H,0CC37H,0EC37H,06C36H,06C36H,0CC37H,08C37H,0CC37H,0EC36H,06C36H,00C30H,00C30H,01C38H,0F81FH,0F00FH,00000H ; " "
	DW	00000H,0F00FH,0F00FH,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H ; " "
	DW	0C003H,0E007H,0700EH,0381CH,0700EH,0E007H,0C003H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00000H,08001H,08001H,08001H,08001H,0FC3FH,0FC3FH,08001H,08001H,08001H,08001H,00000H,00000H,0FC3FH,0FC3FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00000H,0C00FH,0E00FH,07000H,07000H,0E003H,0C007H,0000EH,0000CH,0F00FH,0F00FH,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00000H,0C00FH,0E00FH,07000H,07000H,0E00FH,0E00FH,07000H,07000H,0E00FH,0C00FH,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00000H,06000H,0E000H,0C001H,08003H,00007H,00006H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00000H,00000H,00000H,00000H,00000H,06030H,06030H,06030H,06030H,06030H,06030H,06030H,0F830H,0FC3FH,08C3FH,00030H,00030H,00030H,00030H,00000H ; " "
	DW	00000H,08C0FH,08C1FH,08C39H,08C31H,08C31H,08C39H,08C1FH,08C0FH,08C01H,08C01H,08C01H,08C01H,08C01H,08C01H,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00000H,00000H,00000H,00000H,00000H,00000H,00000H,08001H,08001H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,08001H,08001H,08003H,00007H,00006H,00000H ; " "
	DW	00000H,08003H,08007H,0800FH,0800DH,08001H,08001H,08001H,08001H,0F00FH,0F00FH,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00000H,0F00FH,0F81FH,01C38H,00C30H,00C30H,00C30H,00C30H,01C38H,0F81FH,0F00FH,00000H,00000H,0FC3FH,0FC3FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00000H,00000H,00000H,00000H,00000H,00000H,00000H,07038H,0381CH,01C0EH,01C0EH,0381CH,07038H,00000H,00000H,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00000H,0000CH,0000CH,0000CH,0000CH,0000CH,0000CH,0000CH,0000CH,01C0CH,03C0CH,07C00H,0EC00H,0CC01H,08C01H,0FC01H,0FC01H,00C00H,00C00H,00000H ; " "
	DW	00000H,00030H,00030H,00030H,00030H,00030H,00030H,00030H,00030H,0F831H,0FC31H,00C00H,00C00H,07C00H,0F800H,0C001H,08001H,0FC01H,0FC01H,00000H ; " "
	DW	00000H,0003EH,0003FH,08003H,08003H,0003FH,0003FH,08003H,08003H,01C3FH,03C3EH,07C00H,0EC00H,0CC01H,08C01H,0FC01H,0FC01H,00C00H,00C00H,00000H ; " "
	DW	00000H,00000H,00000H,00000H,00000H,08001H,08001H,00000H,00000H,08001H,08001H,08003H,00007H,0000EH,0001CH,00C18H,01C1CH,0F80FH,0F00FH,00000H ; " "
	DW	00006H,00007H,08003H,08001H,00000H,0F00FH,0F81FH,01C38H,00C30H,0FC3FH,0FC3FH,00C30H,00C30H,00C30H,00C30H,00000H,00000H,00000H,00000H,00000H ; " "
	DW	06000H,0E000H,0C001H,08001H,00000H,0F00FH,0F81FH,01C38H,00C30H,0FC3FH,0FC3FH,00C30H,00C30H,00C30H,00C30H,00000H,00000H,00000H,00000H,00000H ; " "
	DW	08001H,0C003H,0E007H,06006H,00000H,0F00FH,0F81FH,01C38H,00C30H,0FC3FH,0FC3FH,00C30H,00C30H,00C30H,00C30H,00000H,00000H,00000H,00000H,00000H ; " "
	DW	01807H,0B80FH,0F01DH,0E018H,00000H,0F00FH,0F81FH,01C38H,00C30H,0FC3FH,0FC3FH,00C30H,00C30H,00C30H,00C30H,00000H,00000H,00000H,00000H,00000H ; " "
	DW	0300CH,0300CH,0300CH,00000H,00000H,0F00FH,0F81FH,01C38H,00C30H,0FC3FH,0FC3FH,00C30H,00C30H,00C30H,00C30H,00000H,00000H,00000H,00000H,00000H ; " "
	DW	08001H,0C003H,06006H,06006H,0C003H,0F00FH,0F81FH,01C38H,00C30H,0FC3FH,0FC3FH,00C30H,00C30H,00C30H,00C30H,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00000H,0FC0FH,0FC1FH,08039H,08031H,08031H,08031H,0F83FH,0F83FH,08031H,08031H,08031H,08031H,0FC31H,0FC31H,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00000H,0F00FH,0F81FH,01C38H,00C30H,00030H,00030H,00030H,00030H,00030H,00030H,00C30H,01C38H,0F81FH,0F00FH,08001H,08003H,00007H,00006H,00000H ; " "
	DW	00006H,00007H,08003H,08001H,00000H,0FC3FH,0FC3FH,00030H,00030H,0F03FH,0F03FH,00030H,00030H,0FC3FH,0FC3FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	06000H,0E000H,0C001H,08001H,00000H,0FC3FH,0FC3FH,00030H,00030H,0F03FH,0F03FH,00030H,00030H,0FC3FH,0FC3FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	08001H,0C003H,0E007H,06006H,00000H,0FC3FH,0FC3FH,00030H,00030H,0F03FH,0F03FH,00030H,00030H,0FC3FH,0FC3FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	0300CH,0300CH,0300CH,00000H,00000H,0FC3FH,0FC3FH,00030H,00030H,0F03FH,0F03FH,00030H,00030H,0FC3FH,0FC3FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00006H,00007H,08003H,08001H,00000H,0F00FH,0F00FH,08001H,08001H,08001H,08001H,08001H,08001H,0F00FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	06000H,0E000H,0C001H,08001H,00000H,0F00FH,0F00FH,08001H,08001H,08001H,08001H,08001H,08001H,0F00FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	08001H,0C003H,0E007H,06006H,00000H,0F00FH,0F00FH,08001H,08001H,08001H,08001H,08001H,08001H,0F00FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	0300CH,0300CH,0300CH,00000H,00000H,0F00FH,0F00FH,08001H,08001H,08001H,08001H,08001H,08001H,0F00FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00000H,0F00FH,0F80FH,01C0CH,00C0CH,00C0CH,00C0CH,08C3FH,08C3FH,00C0CH,00C0CH,00C0CH,01C0CH,0F80FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	01807H,0B80FH,0F01DH,0E018H,00000H,00C30H,00C3CH,00C3EH,00C37H,08C33H,0CC31H,0EC30H,07C30H,03C30H,00C30H,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00006H,00007H,08003H,08001H,00000H,0F00FH,0F81FH,01C38H,00C30H,00C30H,00C30H,00C30H,01C38H,0F81FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	06000H,0E000H,0C001H,08001H,00000H,0F00FH,0F81FH,01C38H,00C30H,00C30H,00C30H,00C30H,01C38H,0F81FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	08001H,0C003H,0E007H,06006H,00000H,0F00FH,0F81FH,01C38H,00C30H,00C30H,00C30H,00C30H,01C38H,0F81FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	01807H,0B80FH,0F01DH,0E018H,00000H,0F00FH,0F81FH,01C38H,00C30H,00C30H,00C30H,00C30H,01C38H,0F81FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	0300CH,0300CH,0300CH,00000H,00000H,0F00FH,0F81FH,01C38H,00C30H,00C30H,00C30H,00C30H,01C38H,0F81FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00000H,00000H,00000H,01818H,0381CH,0700EH,0E007H,0C003H,0E007H,0700EH,0381CH,01818H,00000H,00000H,00000H,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00000H,0F00FH,0F81FH,01C38H,03C30H,07C30H,0EC30H,0CC31H,08C33H,00C37H,00C3EH,00C3CH,01C38H,0F81FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00006H,00007H,08003H,08001H,00000H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,01C38H,0F81FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	06000H,0E000H,0C001H,08001H,00000H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,01C38H,0F81FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	08001H,0C003H,0E007H,06006H,00000H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,01C38H,0F81FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	0300CH,0300CH,0300CH,00000H,00000H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,01C38H,0F81FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	06000H,0E000H,0C001H,08001H,00C30H,01C38H,0381CH,0700EH,0E007H,0C003H,08001H,08001H,08001H,08001H,08001H,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00000H,00030H,00030H,0F03FH,0F83FH,01C30H,00C30H,00C30H,01C30H,0F83FH,0F03FH,00030H,00030H,00030H,00030H,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00000H,0C00FH,0E01FH,07038H,03030H,03030H,03030H,0F031H,0F831H,01C30H,00C30H,00C30H,01C30H,0F831H,0F031H,00030H,00030H,00030H,00030H,00000H ; " "
	DW	00006H,00007H,08003H,08001H,00000H,0F00FH,0F80FH,01C00H,00C00H,0FC0FH,0FC1FH,00C38H,00C38H,0FC1FH,0FC0FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	06000H,0E000H,0C001H,08001H,00000H,0F00FH,0F80FH,01C00H,00C00H,0FC0FH,0FC1FH,00C38H,00C38H,0FC1FH,0FC0FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	08001H,0C003H,0E007H,06006H,00000H,0F00FH,0F80FH,01C00H,00C00H,0FC0FH,0FC1FH,00C38H,00C38H,0FC1FH,0FC0FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	01807H,0B80FH,0F01DH,0E018H,00000H,0F00FH,0F80FH,01C00H,00C00H,0FC0FH,0FC1FH,00C38H,00C38H,0FC1FH,0FC0FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00000H,0300CH,0300CH,0300CH,00000H,0F00FH,0F80FH,01C00H,00C00H,0FC0FH,0FC1FH,00C38H,00C38H,0FC1FH,0FC0FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	08001H,0C003H,06006H,0C003H,08001H,0F00FH,0F80FH,01C00H,00C00H,0FC0FH,0FC1FH,00C38H,00C38H,0FC1FH,0FC0FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00000H,00000H,00000H,00000H,00000H,0781EH,0FC1FH,08C03H,08C01H,0FC1FH,0FC3FH,08031H,08031H,0F83FH,0F81FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00000H,00000H,00000H,00000H,00000H,0FC0FH,0FC1FH,00038H,00030H,00030H,00030H,00030H,00038H,0FC1FH,0FC0FH,0C000H,0C001H,08003H,00003H,00000H ; " "
	DW	00006H,00007H,08003H,08001H,00000H,0F00FH,0F81FH,01C38H,00C30H,0FC3FH,0FC3FH,00030H,00038H,0F01FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	06000H,0E000H,0C001H,08001H,00000H,0F00FH,0F81FH,01C38H,00C30H,0FC3FH,0FC3FH,00030H,00038H,0F01FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	08001H,0C003H,0E007H,06006H,00000H,0F00FH,0F81FH,01C38H,00C30H,0FC3FH,0FC3FH,00030H,00038H,0F01FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00000H,0300CH,0300CH,0300CH,00000H,0F00FH,0F81FH,01C38H,00C30H,0FC3FH,0FC3FH,00030H,00038H,0F01FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00006H,00007H,08003H,08001H,00000H,0800FH,0800FH,08001H,08001H,08001H,08001H,08001H,08001H,0F00FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	06000H,0E000H,0C001H,08001H,00000H,0800FH,0800FH,08001H,08001H,08001H,08001H,08001H,08001H,0F00FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	08001H,0C003H,0E007H,06006H,00000H,0800FH,0800FH,08001H,08001H,08001H,08001H,08001H,08001H,0F00FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00000H,0300CH,0300CH,0300CH,00000H,0800FH,0800FH,08001H,08001H,08001H,08001H,08001H,08001H,0F00FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00000H,0601EH,0E01FH,0C003H,0E007H,0700EH,0380CH,01C00H,00C00H,0FC0FH,0FC1FH,01C38H,01C38H,0F81FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	01807H,0B80FH,0F01DH,0E018H,00000H,0F03FH,0F83FH,01C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00006H,00007H,08003H,08001H,00000H,00000H,0F00FH,0F81FH,01C38H,00C30H,00C30H,00C30H,01C38H,0F81FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	06000H,0E000H,0C001H,08001H,00000H,00000H,0F00FH,0F81FH,01C38H,00C30H,00C30H,00C30H,01C38H,0F81FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	08001H,0C003H,0E007H,06006H,00000H,00000H,0F00FH,0F81FH,01C38H,00C30H,00C30H,00C30H,01C38H,0F81FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	01807H,0B80FH,0F01DH,0E018H,00000H,00000H,0F00FH,0F81FH,01C38H,00C30H,00C30H,00C30H,01C38H,0F81FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00000H,0300CH,0300CH,0300CH,00000H,00000H,0F00FH,0F81FH,01C38H,00C30H,00C30H,00C30H,01C38H,0F81FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00000H,00000H,00000H,08001H,08001H,00000H,00000H,0FC3FH,0FC3FH,00000H,00000H,08001H,08001H,00000H,00000H,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00000H,00000H,00000H,00000H,00000H,0F00FH,0F81FH,07C38H,0EC30H,0CC31H,08C33H,00C37H,01C3EH,0F81FH,0F00FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00006H,00007H,08003H,08001H,00000H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00C38H,0FC1FH,0FC0FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	06000H,0E000H,0C001H,08001H,00000H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00C38H,0FC1FH,0FC0FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	08001H,0C003H,0E007H,06006H,00000H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00C38H,0FC1FH,0FC0FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	00000H,0300CH,0300CH,0300CH,00000H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00C38H,0FC1FH,0FC0FH,00000H,00000H,00000H,00000H,00000H ; " "
	DW	06000H,0E000H,0C001H,08001H,00000H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00C38H,0FC1FH,0FC0FH,00C00H,01C00H,0F80FH,0F00FH,00000H ; " "
	DW	00000H,00030H,00030H,00030H,00030H,0F03FH,0F83FH,01C30H,00C30H,00C30H,00C30H,00C30H,01C30H,0F83FH,0F03FH,00030H,00030H,00030H,00030H,00000H ; " "
	DW	00000H,0300CH,0300CH,0300CH,00000H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00C30H,00C38H,0FC1FH,0FC0FH,00C00H,01C00H,0F80FH,0F00FH,00000H ; " "
;
; Structure {x%,y%}
;
ptfmt:	dd	8		; Total length (bytes)
ptlnk0:	dd	ptlnk1 - ptlnk0	; Link to next member
	db	'x%',0		; Member name
	dd	0		; Member offset (bytes)
ptlnk1:	dd	0		; Terminating link
	db	'y%',0		; Member name
	dd	4		; Member offset (bytes)
;
; Structure {a&,b&,c&,d&}
;
b4fmt:	dd	4		; Total length (bytes)
b4lnk0:	dd	b4lnk1 - b4lnk0	; Link to next member
	db	'a&',0		; Member name
	dd	0		; Member offset (bytes)
b4lnk1:	dd	b4lnk2 - b4lnk1	; Link to next member
	db	'b&',0		; Member name
	dd	1		; Member offset (bytes)
b4lnk2:	dd	b4lnk3 - b4lnk2	; Link to next member
	db	'c&',0		; Member name
	dd	2		; Member offset (bytes)
b4lnk3:	dd	0		; Terminating link
	db	'd&',0		; Member name
	dd	3		; Member offset (bytes)
;
; FastVar token type values:
;
fvtab:	db	1		; &19 v&  Unsigned byte (8 bits)
	db	4		; &1A v%  Signed dword (32 bits)
	db	8		; &1B v#  Float double (64 bits)
	db	10		; &1C v   Variant numeric (80 bits)
	db	16		; &1D v{} Structure (8+8 bytes)
	db	40		; &1E v%% Signed qword (64 bits)
	db	136		; &1F v$  String (4+4 bytes)
;
	SEGMENT .data		; Necessary for Position Independent Code
;
; Array of function entry points:
;
	times 3	db 0		; Padding
fnarr:	db	1		; Number of dimensions
	dd	(fnarrt-fnarr0)/8 ; Number of entries
	checkalign
fnarr0:	dq	loadn		; Load numeric 
	dq	loads		; Load string
	dq	storen		; Store numeric
	dq	stores		; Store string
	dq	getvar		; Get variable address
	dq	putvar		; Create variable
	dq	expr		; Evaluate expression
	dq	item		; Evaluate item
	dq	lexan		; Lexical analysis (tokenise)
	dq	token		; Print character or keyword
	dq	xfloat		; Convert integer to float
	dq	xfix		; Convert float to integer
	dq	str00		; Convert a number to a string
	dq	con		; Convert a string to a number
	dq	0		; Reserved for sortup
	dq	0		; Reserved for sortdn
	dq	0		; Reserved for hook
	dq	xeq		; Return to BASIC
	dq	putevt		; Store event in queue
	dq	gfxPrimitivesGetFont
	dq	gfxPrimitivesSetFont
	dq	RedefineChar
fnarrt:
;


================================================
FILE: bin/android/build.gradle
================================================
def buildAsLibrary = project.hasProperty('BUILD_AS_LIBRARY');
def buildAsApplication = !buildAsLibrary
if (buildAsApplication) {
    apply plugin: 'com.android.application'
}
else {
    apply plugin: 'com.android.library'
}

android {
    namespace = 'com.rtrussell.bbcbasic'
    compileSdkVersion 35
    defaultConfig {
        if (buildAsApplication) {
            applicationId "com.rtrussell.bbcbasic"
        }
        ndkVersion = "27.3.13750724"
        minSdkVersion 21
        targetSdkVersion 35
        versionCode 149
        versionName "1.44a"
        externalNativeBuild {
            ndkBuild {
                arguments "APP_PLATFORM=android-16"
                abiFilters 'armeabi-v7a', 'arm64-v8a', 'x86_64'
            }
            // cmake {
            //     arguments "-DANDROID_APP_PLATFORM=android-16", "-DANDROID_STL=c++_static"
            //     // abiFilters 'armeabi-v7a', 'arm64-v8a', 'x86', 'x86_64'
            //     abiFilters 'arm64-v8a'
            // }
        }
    }
    buildTypes {
        release {
            debuggable false
            minifyEnabled false
            proguardFiles getDefaultProguardFile('proguard-android.txt'), 'proguard-rules.pro'
        }
    }
    applicationVariants.all { variant ->
        tasks["merge${variant.name.capitalize()}Assets"]
            .dependsOn("externalNativeBuild${variant.name.capitalize()}")
    }
    if (!project.hasProperty('EXCLUDE_NATIVE_LIBS')) {
        sourceSets.main {
            jniLibs.srcDir 'libs'
        }
        externalNativeBuild {
            ndkBuild {
                path 'jni/Android.mk'
            }
            // cmake {
            //     path 'jni/CMakeLists.txt'
            // }
        }

    }
    lintOptions {
        abortOnError = false
    }

    if (buildAsLibrary) {
        libraryVariants.all { variant ->
            variant.outputs.each { output ->
                def outputFile = output.outputFile
                if (outputFile != null && outputFile.name.endsWith(".aar")) {
                    def fileName = "com.rtrussell.bbcbasic.aar";
                    output.outputFile = new File(outputFile.parent, fileName);
                }
            }
        }
    }
}

dependencies {
    implementation fileTree(include: ['*.jar'], dir: 'libs')
}


================================================
FILE: bin/android/help.txt
================================================
•    BBC BASIC is the programming language originally specified and adopted by the British Broadcasting Corporation for its groundbreaking Computer Literacy Project of the early 1980s.

BBC BASIC for SDL 2.0 is an advanced cross-platform implementation which will run on Windows®, MacOS®, Linux® (x86), Raspberry Pi OS™, Android™, iOS® and in a browser.  The full help manual may be found <here>.

The Android, iOS and in-browser editions have a simplified user interface.  To run a program, navigate to the appropriate folder (games, general, graphics, physics, sounds or tools) and tap/click on the program's name.

To exit a program and return to the main menu, tap on the Back [<] button (Android) or press the Escape key.  In iOS there is a soft [<] button; it may not always be displayed but tapping in the top-left corner should still work.

To create a new program, first navigate to the @usr$ folder then long-press or right-click below the list of files and select New file from the context menu.  Alternatively create a new folder under @usr$ and put your program there.

To edit a program, long-press or right-click on the program's name and select Edit from the context menu.  To exit the editor tap on the [<] button or press the Escape key. You cannot edit the supplied example programs.

In the editor a long-press or right-click opens a menu of commands. A long press and drag selects a block of code; a horizontal drag selects part of a line, a vertical drag selects entire lines.  Tap on a selected region for options.

In Android and iOS the contents of the @usr$ folder may be accessed from a desktop computer using a USB connection, or from the Files app in iOS.

It is inevitable that from time to time BBC BASIC will crash (for example abort with an untrapped error), especially if you are testing and debugging your own programs. If this happens it will not damage your device or other apps, but it will be necessary to close BBC BASIC fully and open it again.

BBC BASIC for SDL 2.0 is the Copyright © 2026 of R.T.Russell.  The program and other materials are provided 'as is' and without any guarantee as to their quality or suitability.  Although they are thought to be free from serious bugs, and it is highly unlikely that they could do any harm to other software or systems, there is NO warranty that they will not and their use is at your own risk. 

The supplied example programs and libraries remain the Copyright © 2001-2026 of R.T.Russell and others, but you may incorporate them in whole or in part within your own programs so long as any copyright notice is retained.


================================================
FILE: bin/android/styles.xml
================================================
<resources>

    <!-- Base application theme. -->
    <style name="AppTheme" parent="android:Theme.DeviceDefault.NoActionBar">
        <item name="android:windowOptOutEdgeToEdgeEnforcement">true</item>
    </style>

</resources>


================================================
FILE: bin/ios/exported.txt
================================================
_SDL_AddEventWatch
_SDL_AddHintCallback
_SDL_AddTimer
_SDL_AllocFormat
_SDL_AllocPalette
_SDL_AllocRW
_SDL_AtomicAdd
_SDL_AtomicCAS
_SDL_AtomicCASPtr
_SDL_AtomicGet
_SDL_AtomicGetPtr
_SDL_AtomicLock
_SDL_AtomicSet
_SDL_AtomicSetPtr
_SDL_AtomicTryLock
_SDL_AtomicUnlock
_SDL_AudioInit
_SDL_AudioQuit
_SDL_BuildAudioCVT
_SDL_CalculateGammaRamp
_SDL_CaptureMouse
_SDL_ClearError
_SDL_ClearHints
_SDL_ClearQueuedAudio
_SDL_CloseAudio
_SDL_CloseAudioDevice
_SDL_ComposeCustomBlendMode
_SDL_CondBroadcast
_SDL_CondSignal
_SDL_CondWait
_SDL_CondWaitTimeout
_SDL_ConvertAudio
_SDL_ConvertPixels
_SDL_ConvertSurface
_SDL_ConvertSurfaceFormat
_SDL_CreateColorCursor
_SDL_CreateCond
_SDL_CreateCursor
_SDL_CreateMutex
_SDL_CreateRGBSurface
_SDL_CreateRGBSurfaceFrom
_SDL_CreateRGBSurfaceWithFormat
_SDL_CreateRGBSurfaceWithFormatFrom
_SDL_CreateRenderer
_SDL_CreateSemaphore
_SDL_CreateSoftwareRenderer
_SDL_CreateSystemCursor
_SDL_CreateTexture
_SDL_CreateTextureFromSurface
_SDL_CreateThread
_SDL_CreateThreadWithStackSize
_SDL_CreateWindow
_SDL_CreateWindowAndRenderer
_SDL_CreateWindowFrom
_SDL_DelEventWatch
_SDL_DelHintCallback
_SDL_Delay
_SDL_DequeueAudio
_SDL_DestroyCond
_SDL_DestroyMutex
_SDL_DestroyRenderer
_SDL_DestroySemaphore
_SDL_DestroyTexture
_SDL_DestroyWindow
_SDL_DetachThread
_SDL_DisableScreenSaver
_SDL_EnableScreenSaver
_SDL_EnclosePoints
_SDL_EventState
_SDL_FillRect
_SDL_FillRects
_SDL_FilterEvents
_SDL_FlushEvent
_SDL_FlushEvents
_SDL_FreeCursor
_SDL_FreeFormat
_SDL_FreePalette
_SDL_FreeRW
_SDL_FreeSurface
_SDL_FreeWAV
_SDL_GL_BindTexture
_SDL_GL_CreateContext
_SDL_GL_DeleteContext
_SDL_GL_ExtensionSupported
_SDL_GL_GetAttribute
_SDL_GL_GetCurrentContext
_SDL_GL_GetCurrentWindow
_SDL_GL_GetDrawableSize
_SDL_GL_GetProcAddress
_SDL_GL_GetSwapInterval
_SDL_GL_LoadLibrary
_SDL_GL_MakeCurrent
_SDL_GL_ResetAttributes
_SDL_GL_SetAttribute
_SDL_GL_SetSwapInterval
_SDL_GL_SwapWindow
_SDL_GL_UnbindTexture
_SDL_GL_UnloadLibrary
_SDL_GameControllerAddMapping
_SDL_GameControllerAddMappingsFromRW
_SDL_GameControllerClose
_SDL_GameControllerEventState
_SDL_GameControllerFromInstanceID
_SDL_GameControllerGetAttached
_SDL_GameControllerGetAxis
_SDL_GameControllerGetAxisFromString
_SDL_GameControllerGetBindForAxis
_SDL_GameControllerGetBindForButton
_SDL_GameControllerGetButton
_SDL_GameControllerGetButtonFromString
_SDL_GameControllerGetJoystick
_SDL_GameControllerGetStringForAxis
_SDL_GameControllerGetStringForButton
_SDL_GameControllerMapping
_SDL_GameControllerMappingForGUID
_SDL_GameControllerName
_SDL_GameControllerNameForIndex
_SDL_GameControllerOpen
_SDL_GameControllerUpdate
_SDL_GetAssertionHandler
_SDL_GetAssertionReport
_SDL_GetAudioDeviceName
_SDL_GetAudioDeviceStatus
_SDL_GetAudioDriver
_SDL_GetAudioStatus
_SDL_GetBasePath
_SDL_GetCPUCacheLineSize
_SDL_GetCPUCount
_SDL_GetClipRect
_SDL_GetClipboardText
_SDL_GetClosestDisplayMode
_SDL_GetColorKey
_SDL_GetCurrentAudioDriver
_SDL_GetCurrentDisplayMode
_SDL_GetCurrentVideoDriver
_SDL_GetCursor
_SDL_GetDefaultAssertionHandler
_SDL_GetDefaultCursor
_SDL_GetDesktopDisplayMode
_SDL_GetDisplayBounds
_SDL_GetDisplayDPI
_SDL_GetDisplayMode
_SDL_GetDisplayName
_SDL_GetDisplayUsableBounds
_SDL_GetError
_SDL_GetEventFilter
_SDL_GetGlobalMouseState
_SDL_GetGrabbedWindow
_SDL_GetHint
_SDL_GetHintBoolean
_SDL_GetKeyFromName
_SDL_GetKeyFromScancode
_SDL_GetKeyName
_SDL_GetKeyboardFocus
_SDL_GetKeyboardState
_SDL_GetModState
_SDL_GetMouseFocus
_SDL_GetMouseState
_SDL_GetNumAudioDevices
_SDL_GetNumAudioDrivers
_SDL_GetNumDisplayModes
_SDL_GetNumRenderDrivers
_SDL_GetNumTouchDevices
_SDL_GetNumTouchFingers
_SDL_GetNumVideoDisplays
_SDL_GetNumVideoDrivers
_SDL_GetPerformanceCounter
_SDL_GetPerformanceFrequency
_SDL_GetPixelFormatName
_SDL_GetPlatform
_SDL_GetPowerInfo
_SDL_GetPrefPath
_SDL_GetQueuedAudioSize
_SDL_GetRGB
_SDL_GetRGBA
_SDL_GetRelativeMouseMode
_SDL_GetRelativeMouseState
_SDL_GetRenderDrawBlendMode
_SDL_GetRenderDrawColor
_SDL_GetRenderDriverInfo
_SDL_GetRenderTarget
_SDL_GetRenderer
_SDL_GetRendererInfo
_SDL_GetRendererOutputSize
_SDL_GetRevision
_SDL_GetRevisionNumber
_SDL_GetScancodeFromKey
_SDL_GetScancodeFromName
_SDL_GetScancodeName
_SDL_GetSurfaceAlphaMod
_SDL_GetSurfaceBlendMode
_SDL_GetSurfaceColorMod
_SDL_GetSystemRAM
_SDL_GetTextureAlphaMod
_SDL_GetTextureBlendMode
_SDL_GetTextureColorMod
_SDL_GetThreadID
_SDL_GetThreadName
_SDL_GetTicks
_SDL_GetTicks64
_SDL_GetTouchDevice
_SDL_GetTouchFinger
_SDL_GetVersion
_SDL_GetVideoDriver
_SDL_GetWindowBordersSize
_SDL_GetWindowBrightness
_SDL_GetWindowData
_SDL_GetWindowDisplayIndex
_SDL_GetWindowDisplayMode
_SDL_GetWindowFlags
_SDL_GetWindowFromID
_SDL_GetWindowGammaRamp
_SDL_GetWindowGrab
_SDL_GetWindowID
_SDL_GetWindowMaximumSize
_SDL_GetWindowMinimumSize
_SDL_GetWindowOpacity
_SDL_GetWindowPixelFormat
_SDL_GetWindowPosition
_SDL_GetWindowSize
_SDL_GetWindowSurface
_SDL_GetWindowTitle
_SDL_GetWindowWMInfo
_SDL_HapticClose
_SDL_HapticDestroyEffect
_SDL_HapticEffectSupported
_SDL_HapticGetEffectStatus
_SDL_HapticIndex
_SDL_HapticName
_SDL_HapticNewEffect
_SDL_HapticNumAxes
_SDL_HapticNumEffects
_SDL_HapticNumEffectsPlaying
_SDL_HapticOpen
_SDL_HapticOpenFromJoystick
_SDL_HapticOpenFromMouse
_SDL_HapticOpened
_SDL_HapticPause
_SDL_HapticQuery
_SDL_HapticRumbleInit
_SDL_HapticRumblePlay
_SDL_HapticRumbleStop
_SDL_HapticRumbleSupported
_SDL_HapticRunEffect
_SDL_HapticSetAutocenter
_SDL_HapticSetGain
_SDL_HapticStopAll
_SDL_HapticStopEffect
_SDL_HapticUnpause
_SDL_HapticUpdateEffect
_SDL_Has3DNow
_SDL_HasAVX
_SDL_HasAVX2
_SDL_HasAltiVec
_SDL_HasClipboardText
_SDL_HasEvent
_SDL_HasEvents
_SDL_HasIntersection
_SDL_HasMMX
_SDL_HasRDTSC
_SDL_HasSSE
_SDL_HasSSE2
_SDL_HasSSE3
_SDL_HasSSE41
_SDL_HasSSE42
_SDL_HasScreenKeyboardSupport
_SDL_HideWindow
_SDL_Init
_SDL_InitSubSystem
_SDL_IntersectRect
_SDL_IntersectRectAndLine
_SDL_IsGameController
_SDL_IsScreenKeyboardShown
_SDL_IsScreenSaverEnabled
_SDL_IsTextInputActive
_SDL_JoystickClose
_SDL_JoystickCurrentPowerLevel
_SDL_JoystickEventState
_SDL_JoystickFromInstanceID
_SDL_JoystickGetAttached
_SDL_JoystickGetAxis
_SDL_JoystickGetBall
_SDL_JoystickGetButton
_SDL_JoystickGetDeviceGUID
_SDL_JoystickGetGUID
_SDL_JoystickGetGUIDFromString
_SDL_JoystickGetGUIDString
_SDL_JoystickGetHat
_SDL_JoystickInstanceID
_SDL_JoystickIsHaptic
_SDL_JoystickName
_SDL_JoystickNameForIndex
_SDL_JoystickNumAxes
_SDL_JoystickNumBalls
_SDL_JoystickNumButtons
_SDL_JoystickNumHats
_SDL_JoystickOpen
_SDL_JoystickUpdate
_SDL_LoadBMP_RW
_SDL_LoadDollarTemplates
_SDL_LoadFunction
_SDL_LoadObject
_SDL_LoadWAV_RW
_SDL_LockAudio
_SDL_LockAudioDevice
_SDL_LockMutex
_SDL_LockSurface
_SDL_LockTexture
_SDL_Log
_SDL_LogCritical
_SDL_LogDebug
_SDL_LogError
_SDL_LogGetOutputFunction
_SDL_LogGetPriority
_SDL_LogInfo
_SDL_LogMessage
_SDL_LogMessageV
_SDL_LogResetPriorities
_SDL_LogSetAllPriority
_SDL_LogSetOutputFunction
_SDL_LogSetPriority
_SDL_LogVerbose
_SDL_LogWarn
_SDL_LowerBlit
_SDL_LowerBlitScaled
_SDL_MapRGB
_SDL_MapRGBA
_SDL_MasksToPixelFormatEnum
_SDL_MaximizeWindow
_SDL_MinimizeWindow
_SDL_MixAudio
_SDL_MixAudioFormat
_SDL_MouseIsHaptic
_SDL_NumHaptics
_SDL_NumJoysticks
_SDL_NumSensors
_SDL_OpenAudio
_SDL_OpenAudioDevice
_SDL_OpenURL
_SDL_PauseAudio
_SDL_PauseAudioDevice
_SDL_PeepEvents
_SDL_PixelFormatEnumToMasks
_SDL_PollEvent
_SDL_PumpEvents
_SDL_PushEvent
_SDL_QueryTexture
_SDL_QueueAudio
_SDL_Quit
_SDL_QuitSubSystem
_SDL_RWFromConstMem
_SDL_RWFromFP
_SDL_RWFromFile
_SDL_RWFromMem
_SDL_RWclose
_SDL_RWread
_SDL_RWwrite
_SDL_RaiseWindow
_SDL_RecordGesture
_SDL_RegisterEvents
_SDL_RemoveTimer
_SDL_RenderClear
_SDL_RenderCopy
_SDL_RenderCopyEx
_SDL_RenderDrawLine
_SDL_RenderDrawLines
_SDL_RenderDrawPoint
_SDL_RenderDrawPoints
_SDL_RenderDrawRect
_SDL_RenderDrawRects
_SDL_RenderFillRect
_SDL_RenderFillRects
_SDL_RenderFlush
_SDL_RenderCopyF
_SDL_RenderCopyExF
_SDL_RenderDrawLineF
_SDL_RenderDrawLinesF
_SDL_RenderDrawPointF
_SDL_RenderDrawPointsF
_SDL_RenderDrawRectF
_SDL_RenderDrawRectsF
_SDL_RenderFillRectF
_SDL_RenderFillRectsF
_SDL_RenderFlush
_SDL_RenderGeometry
_SDL_RenderGetClipRect
_SDL_RenderGetIntegerScale
_SDL_RenderGetLogicalSize
_SDL_RenderGetScale
_SDL_RenderGetViewport
_SDL_RenderIsClipEnabled
_SDL_RenderPresent
_SDL_RenderReadPixels
_SDL_RenderSetClipRect
_SDL_RenderSetIntegerScale
_SDL_RenderSetLogicalSize
_SDL_RenderSetScale
_SDL_RenderSetViewport
_SDL_RenderTargetSupported
_SDL_ResetAssertionReport
_SDL_RestoreWindow
_SDL_SaveAllDollarTemplates
_SDL_SaveBMP_RW
_SDL_SaveDollarTemplate
_SDL_SemPost
_SDL_SemTryWait
_SDL_SemValue
_SDL_SemWait
_SDL_SemWaitTimeout
_SDL_SensorClose
_SDL_SensorFromInstanceID
_SDL_SensorGetData
_SDL_SensorGetDataWithTimestamp
_SDL_SensorGetDeviceInstanceID
_SDL_SensorGetDeviceName
_SDL_SensorGetDeviceNonPortableType
_SDL_SensorGetDeviceType
_SDL_SensorGetInstanceID
_SDL_SensorGetName
_SDL_SensorGetNonPortableType
_SDL_SensorGetType
_SDL_SensorOpen
_SDL_SensorUpdate
_SDL_SetAssertionHandler
_SDL_SetClipRect
_SDL_SetClipboardText
_SDL_SetColorKey
_SDL_SetCursor
_SDL_SetError
_SDL_SetEventFilter
_SDL_SetHint
_SDL_SetHintWithPriority
_SDL_SetMainReady
_SDL_SetModState
_SDL_SetPaletteColors
_SDL_SetPixelFormatPalette
_SDL_SetRelativeMouseMode
_SDL_SetRenderDrawBlendMode
_SDL_SetRenderDrawColor
_SDL_SetRenderTarget
_SDL_SetSurfaceAlphaMod
_SDL_SetSurfaceBlendMode
_SDL_SetSurfaceColorMod
_SDL_SetSurfacePalette
_SDL_SetSurfaceRLE
_SDL_SetTextInputRect
_SDL_SetTextureAlphaMod
_SDL_SetTextureBlendMode
_SDL_SetTextureColorMod
_SDL_SetThreadPriority
_SDL_SetWindowBordered
_SDL_SetWindowBrightness
_SDL_SetWindowData
_SDL_SetWindowDisplayMode
_SDL_SetWindowFullscreen
_SDL_SetWindowGammaRamp
_SDL_SetWindowGrab
_SDL_SetWindowHitTest
_SDL_SetWindowIcon
_SDL_SetWindowInputFocus
_SDL_SetWindowMaximumSize
_SDL_SetWindowMinimumSize
_SDL_SetWindowModalFor
_SDL_SetWindowOpacity
_SDL_SetWindowPosition
_SDL_SetWindowResizable
_SDL_SetWindowSize
_SDL_SetWindowTitle
_SDL_ShowCursor
_SDL_ShowMessageBox
_SDL_ShowSimpleMessageBox
_SDL_ShowWindow
_SDL_StartTextInput
_SDL_StopTextInput
_SDL_TLSCreate
_SDL_TLSGet
_SDL_TLSSet
_SDL_ThreadID
_SDL_TryLockMutex
_SDL_UnionRect
_SDL_UnloadObject
_SDL_UnlockAudio
_SDL_UnlockAudioDevice
_SDL_UnlockMutex
_SDL_UnlockSurface
_SDL_UnlockTexture
_SDL_UpdateTexture
_SDL_UpdateWindowSurface
_SDL_UpdateWindowSurfaceRects
_SDL_UpdateYUVTexture
_SDL_UpperBlit
_SDL_VideoInit
_SDL_VideoQuit
_SDL_WaitEvent
_SDL_WaitEventTimeout
_SDL_WaitThread
_SDL_WarpMouseGlobal
_SDL_WarpMouseInWindow
_SDL_WasInit
_SDLNet_ResolveHost
_SDLNet_ResolveIP
_SDLNet_TCP_Open
_SDLNet_TCP_Close
_SDLNet_TCP_Accept
_SDLNet_TCP_GetPeerAddress
_SDLNet_TCP_Send
_SDLNet_TCP_Recv
_SDLNet_AllocSocketSet
_SDLNet_FreeSocketSet
_SDLNet_AddSocket
_SDLNet_DelSocket
_SDLNet_CheckSockets
_SDLNet_Linked_Version
_SDLNet_UDP_Open
_SDLNet_UDP_Close
_SDLNet_UDP_Bind
_SDLNet_UDP_Unbind
_SDLNet_UDP_GetPeerAddress
_SDLNet_UDP_Send
_SDLNet_UDP_Recv
_TTF_ByteSwappedUNICODE
_TTF_CloseFont
_TTF_FontAscent
_TTF_FontDescent
_TTF_FontFaceFamilyName
_TTF_FontFaceIsFixedWidth
_TTF_FontFaces
_TTF_FontFaceStyleName
_TTF_FontHeight
_TTF_FontLineSkip
_TTF_GetFontHinting
_TTF_GetFontKerning
_TTF_GetFontKerningSizeGlyphs
_TTF_GetFontOutline
_TTF_GetFontStyle
_TTF_GlyphIsProvided
_TTF_GlyphMetrics
_TTF_Init
_TTF_Linked_Version
_TTF_OpenFont
_TTF_OpenFontIndex
_TTF_OpenFontIndexRW
_TTF_OpenFontRW
_TTF_Quit
_TTF_RenderGlyph_Blended
_TTF_RenderGlyph_Shaded
_TTF_RenderGlyph_Solid
_TTF_RenderText_Blended
_TTF_RenderText_Shaded
_TTF_RenderText_Solid
_TTF_RenderUNICODE_Blended
_TTF_RenderUNICODE_Shaded
_TTF_RenderUNICODE_Solid
_TTF_RenderUTF8_Blended
_TTF_RenderUTF8_Shaded
_TTF_RenderUTF8_Solid
_TTF_SetFontHinting
_TTF_SetFontKerning
_TTF_SetFontOutline
_TTF_SetFontStyle
_TTF_SetFontScriptName
_TTF_SetFontDirection
_TTF_SizeText
_TTF_SizeUNICODE
_TTF_SizeUTF8
_TTF_WasInit
_TTF_GetFreeTypeVersion
_TTF_GetHarfBuzzVersion
_STBIMG_Load
_STBIMG_Load_RW
_STBIMG_LoadFromMemory
_STBIMG_LoadTexture
_STBIMG_LoadTexture_RW
_STBIMG_LoadTextureFromMemory
_STBIMG_CreateSurface
_STBIMG_CreateTexture
_STBIMG_Load_RW_noSeek
_stbi_image_free
_stbi_load_gif_from_memory
_stbi_set_flip_vertically_on_load
_drmp3_init_file
_drmp3_init_memory
_drmp3_uninit
_drmp3_read_pcm_frames_f32
_drmp3_seek_to_pcm_frame
_drmp3_get_pcm_frame_count
_drmp3_open_memory_and_read_f32
_drmp3_open_file_and_read_f32
_drmp3_free
_drmp3dec_f32_to_s16
_GFX_bezierColor
_GFX_filledPolyBezierColor
_GFX_aaFilledEllipseColor
_GFX_aaFilledPolygonColor
_GFX_aaFilledPieColor
_GFX_aaArcColor
_GFX_aaBezierColor
_GFX_aaFilledPolyBezierColor
_GFX_EvaluateBezier
_GFX_RotoZoomSurface
_b2NewWorld
_b2CreateBody
_b2DestroyBody
_b2CircleShape
_b2PolygonShape
_b2ChainShape
_b2CreateChain
_b2CreateLoop
_b2SetNextVertex
_b2SetPrevVertex
_b2SetAsBox
_b2SetAsOrientedBox
_b2SetFilterData
_b2SetSensor
_b2CreateFixtureFromDef
_b2CreateFixtureFromShape
_b2GetBody
_b2GetShape
_b2DestroyFixture
_b2WorldStep
_b2GetTransform
_b2SetPolygon
_b2SetTransform
_b2SetActive
_b2SetAwake
_b2SetSleepingAllowed
_b2SetBullet
_b2SetFixedRotation
_b2IsAwake
_b2GetUserDataB
_b2GetUserDataF
_b2GetUserDataJ
_b2SetUserDataB
_b2SetUserDataF
_b2SetUserDataJ
_b2SetAngularVelocity
_b2SetLinearVelocity
_b2ApplyForce
_b2ApplyLinearImpulse
_b2ApplyTorque
_b2CreateJoint
_b2DestroyJoint
_b2DistanceJointInit
_b2FrictionJointInit
_b2PrismaticJointInit
_b2PulleyJointInit
_b2RevoluteJointInit
_b2WeldJointInit
_b2WheelJointInit
_b2EnableMotorP
_b2EnableMotorR
_b2EnableMotorW
_b2SetMaxMotorForceP
_b2SetMaxMotorTorqueR
_b2SetMaxMotorTorqueW
_b2SetMotorSpeedP
_b2SetMotorSpeedR
_b2SetMotorSpeedW
_b2SetTarget
_b2GetBodyA
_b2GetBodyB
_b2GetContactListW
_b2GetContactListB
_b2GetNextContact
_b2IsTouching
_b2GetFixtureA
_b2GetFixtureB
_b2GetChildIndexA
_b2GetChildIndexB
_b2GetBodyList
_b2GetNextBody
_b2SetGravity
_b2DistanceJointGetAnchorA
_b2DistanceJointGetAnchorB
_b2PulleyJointGetAnchorA
_b2PulleyJointGetAnchorB
_b2RopeJointGetAnchorA
_b2RopeJointGetAnchorB
_b2GetLinearVelocity
_b2GetAngularVelocity
_b2GetMass
_b2DebugInit
_b2DebugMatrix
_b2DrawDebugData
_SDL_malloc
_SDL_memset
_SDL_memcpy
_SDL_memcmp
_SDL_free
_getsockname
_szNotice


================================================
FILE: bin/ios/help.txt
================================================
•    BBC BASIC is the programming language originally specified and adopted by the British Broadcasting Corporation for its groundbreaking Computer Literacy Project of the early 1980s.

BBC BASIC for SDL 2.0 is an advanced cross-platform implementation which will run on Windows®, MacOS®, Linux® (x86), Raspberry Pi OS™, Android™, iOS® and in a browser.  The full help manual may be found <here>.

The Android, iOS and in-browser editions have a simplified user interface.  To run a program, navigate to the appropriate folder (games, general, graphics, physics, sounds or tools) and tap/click on the program's name.

To exit a program and return to the main menu, tap on the Back [<] button (Android) or press the Escape key.  In iOS there is a soft [<] button; it may not always be displayed but tapping in the top-left corner should still work.

To create a new program, first navigate to the @usr$ folder then long-press or right-click below the list of files and select New file from the context menu.  Alternatively create a new folder under @usr$ and put your program there.

To edit a program, long-press or right-click on the program's name and select Edit from the context menu.  To exit the editor tap on the [<] button or press the Escape key. You cannot edit the supplied example programs.

In the editor a long-press or right-click opens a menu of commands. A long press and drag selects a block of code; a horizontal drag selects part of a line, a vertical drag selects entire lines.  Tap on a selected region for options.

In Android and iOS the contents of the @usr$ folder may be accessed from a desktop computer using a USB connection, or from the Files app in iOS.

It is inevitable that from time to time BBC BASIC will crash (for example abort with an untrapped error), especially if you are testing and debugging your own programs. If this happens it will not damage your device or other apps, but it will be necessary to close BBC BASIC fully and open it again.

BBC BASIC for SDL 2.0 is the Copyright © 2026 of R.T.Russell.  The program and other materials are provided 'as is' and without any guarantee as to their quality or suitability.  Although they are thought to be free from serious bugs, and it is highly unlikely that they could do any harm to other software or systems, there is NO warranty that they will not and their use is at your own risk. 

The supplied example programs and libraries remain the Copyright © 2001-2026 of R.T.Russell and others, but you may incorporate them in whole or in part within your own programs so long as any copyright notice is retained.


================================================
FILE: bin/linux/install32.txt
================================================
Installing SDL 2.0 on Linux systems:

32-bit Debian / Mint / Ubuntu:

 sudo apt-get install libsdl2-2.0-0
 sudo apt-get install libsdl2-ttf-2.0-0
 sudo apt-get install libsdl2-net-2.0-0

64-bit Debian / Mint / Ubuntu:

 sudo dpkg --add-architecture i386
 sudo apt-get update
 sudo apt-get dist-upgrade
 sudo apt-get install libglapi-mesa:i386
 sudo apt-get install libegl1-mesa:i386
 sudo apt-get install libgl1-mesa-glx:i386
 sudo apt-get install libudev1:i386
 sudo apt-get install libsdl2-2.0-0:i386
 sudo apt-get install libsdl2-ttf-2.0-0:i386
 sudo apt-get install libsdl2-net-2.0-0:i386

To start BBC BASIC:

 chmod +x bbcsdl
 ./bbcsdl

To create a desktop shortcut:

 chmod +x mkicon.sh
 ./mkicon.sh

If you receive an error message related to dbus_message_new_method_call
start BBC BASIC using:

 env IBUS_ADDRESS=0 ./bbcsdl


================================================
FILE: bin/linux/install64.txt
================================================
Installing SDL 2.0 on Linux systems:

64-bit Debian / Mint / Ubuntu:

 sudo apt-get install libsdl2-2.0-0
 sudo apt-get install libsdl2-ttf-2.0-0
 sudo apt-get install libsdl2-net-2.0-0

64-bit Fedora:

 sudo dnf install SDL2 SDL2_ttf SDL2_net

To start BBC BASIC:

 chmod +x bbcsdl
 ./bbcsdl

To create a desktop shortcut:

 chmod +x mkicon.sh
 ./mkicon.sh


================================================
FILE: bin/linux/makefile
================================================
# On Debian / Ubuntu / Mint download SDL 2.0 and NASM from the repository:
# sudo apt-get install libsdl2-dev
# sudo apt-get install libsdl2-ttf-dev
# sudo apt-get install libsdl2-net-dev
# sudo apt-get install libsdl2-2.0-0
# sudo apt-get install libsdl2-ttf-2.0-0
# sudo apt-get install libsdl2-net-2.0-0
# sudo apt-get install nasm

SDL_LIB = -L/usr/include -lSDL2 -lSDL2main -lSDL2_ttf -lSDL2_net -ldl -lm
LBITS := $(shell getconf LONG_BIT)

VPATH = ../../src ../../include
CXX = gcc -Wall -pthread -I ../../include

OBJ = bbmain.o bbexec.o bbeval.o bbcmos.o bbccli.o \
      bbcvdu.o bbcvtx.o flood.o bbdata.o bbcsdl.o \
      bbasmb.o SDL2_gfxPrimitives.o

all: bbcsdl

bbmain.o: bbmain.c BBC.h
	$(CXX) -c -O2 -freg-struct-return -ffast-math -fno-finite-math-only $< -o $@

bbexec.o: bbexec.c BBC.h
	$(CXX) -c -O2 -freg-struct-return -ffast-math -fno-finite-math-only $< -o $@

bbeval.o: bbeval.c BBC.h
	$(CXX) -Wno-array-bounds -c -O2 -freg-struct-return -ffast-math -fmath-errno -fno-finite-math-only $< -o $@

bbasmb.o: bbasmb_x86_64.c BBC.h
	$(CXX) -c -Os $< -o $@

bbcmos.o: bbcmos.c bbcsdl.h
	$(CXX) -Wno-unused-result -Wno-array-bounds -c -msse2 -O2 $< -o $@

bbccli.o: bbccli.c bbcsdl.h
	$(CXX) -Wno-unused-result -c -Os $< -o $@

bbcvdu.o: bbcvdu.c bbcsdl.h
	$(CXX) -c -Os $< -o $@

bbcvtx.o: bbcvtx.c bbcsdl.h
	$(CXX) -c -O3 $< -o $@

bbcsdl.o: bbcsdl.c bbcsdl.h version.h
	$(CXX) -Wno-unused-result -c -O2 $< -o $@

SDL2_gfxPrimitives.o: SDL2_gfxPrimitives.c SDL2_gfxPrimitives.h
	$(CXX) -c -O2 $< -o $@

SDL2_rotozoom.o: SDL2_rotozoom.c SDL2_rotozoom.h SDL2_gfxPrimitives.h SDL_stbimage.h stb_image.h dr_mp3.h
	$(CXX) -c -Os -fPIC $< -o $@

flood.o: flood.c
	$(CXX) -c -O3 $< -o $@

ifeq ($(LBITS),64)
bbdata.o: ../../src/bbdata_x86_64.nas
	nasm -f elf64 -s ../../src/bbdata_x86_64.nas -o bbdata.o
else
bbdata.o: ../../src/bbdata_x86_32.nas
	nasm -f elf32 -s ../../src/bbdata_x86_32.nas -o bbdata.o
endif

libstb.so: SDL2_rotozoom.o
	$(CXX) -shared -o libstb.so SDL2_rotozoom.o

bbcsdl: $(OBJ) libstb.so
	$(CXX) $(OBJ) -lz -lstb -L . \
	-o bbcsdl $(SDL_LIB) -Wl,-s -Wl,-R,'$$ORIGIN' -rdynamic
	cp bbcsdl ../../
	cp libstb.so ../../


================================================
FILE: bin/linux/mkicon.sh
================================================
#!/bin/bash
MYDIR="$( cd "$( dirname "${BASH_SOURCE[0]}" )" > /dev/null && pwd )"
echo "[Desktop Entry]
Name=BBC BASIC
Comment=BBC BASIC for Linux
Icon=$MYDIR/bbc256x.png
Exec=\"$MYDIR/bbcsdl\"
Type=Application
Encoding=UTF-8
Terminal=false
Categories=None;" > "$HOME/Desktop/bbcsdl.desktop"
chmod +x "$HOME/Desktop/bbcsdl.desktop"



================================================
FILE: bin/macos/makefile
================================================
# Download pre-compiled frameworks to /Library/Frameworks/
# SDL2     from https://www.libsdl.org/download-2.0.php
# SDL2_ttf from https://www.libsdl.org/projects/SDL_ttf/
# SDL2_net from https://www.libsdl.org/projects/SDL_net/

ARCH := $(shell uname -m)
SDL_LIB = -L/usr/include -ldl -lm
MIN_MACOS_VERSION = 10.7

VPATH = ../../src ../../include
CXX = gcc -Wall -pthread -mmacosx-version-min=$(MIN_MACOS_VERSION) -F /Library/Frameworks -I ../../include

ifeq ($(ARCH),arm64)
    OBJ_EXTRA = sort.o
endif

OBJ = bbmain.o bbexec.o bbeval.o bbcmos.o bbccli.o \
      bbcvdu.o bbcvtx.o flood.o bbdata.o bbcsdl.o \
      bbasmb.o bbctmp.o $(OBJ_EXTRA)

all: bbcsdl

clean:
	rm -f *.o bbcsdl libstb.dylib

bbmain.o: bbmain.c BBC.h
	$(CXX) -c -O2 -ffast-math -fno-finite-math-only $< -o $@

bbexec.o: bbexec.c BBC.h
	$(CXX) -c -O2 -ffast-math -fno-finite-math-only $< -o $@

bbeval.o: bbeval.c BBC.h
	$(CXX) -Wno-array-bounds -c -O2 -ffast-math -fmath-errno -fno-finite-math-only $< -o $@

bbcmos.o: bbcmos.c bbcsdl.h
	$(CXX) -Wno-unused-result -Wno-array-bounds -c -msse2 -O2 $< -o $@

bbccli.o: bbccli.c bbcsdl.h
	$(CXX) -Wno-unused-result -c -Os $< -o $@

bbcvdu.o: bbcvdu.c bbcsdl.h
	$(CXX) -c -Os $< -o $@

bbcvtx.o: bbcvtx.c bbcsdl.h
	$(CXX) -c -O3 $< -o $@

bbcsdl.o: bbcsdl.c bbcsdl.h version.h
	$(CXX) -Wno-unused-result -c -O2 $< -o $@

bbctmp.o: bbctmp.m
	$(CXX) -c -Os $< -o $@

SDL2_gfxPrimitives.o: SDL2_gfxPrimitives.c SDL2_gfxPrimitives.h
	$(CXX) -c -O2 $< -o $@

SDL2_rotozoom.o: SDL2_rotozoom.c SDL2_rotozoom.h SDL2_gfxPrimitives.h SDL_stbimage.h stb_image.h dr_mp3.h
	$(CXX) -c -Os -fPIC $< -o $@

flood.o: flood.c
	$(CXX) -c -O3 $< -o $@

sort.o: sort.c
	$(CXX) -c -O3 $< -o $@

ifeq ($(ARCH),arm64)
bbasmb.o: bbasmb_arm_64.c BBC.h
	$(CXX) -c -Os $< -o $@

    BBDATA_COMPILE = clang -mmacosx-version-min=$(MIN_MACOS_VERSION) -c
    BBDATA_SRC = ../../src/bbdata_arm_64.s
else 
bbasmb.o: bbasmb_x86_64.c BBC.h
	$(CXX) -c -Os $< -o $@

    BBDATA_COMPILE = nasm --prefix _ -f macho64 -s
    BBDATA_SRC = ../../src/bbdata_x86_64.nas
endif

bbdata.o: $(BBDATA_SRC)
	$(BBDATA_COMPILE) $(BBDATA_SRC) -o bbdata.o

libstb.dylib: SDL2_rotozoom.o SDL2_gfxPrimitives.o
	$(CXX) -dynamiclib -F/Library/Frameworks -framework SDL2 \
	-o libstb.dylib SDL2_rotozoom.o SDL2_gfxPrimitives.o

bbcsdl: $(OBJ) libstb.dylib
	$(CXX) $(OBJ) -lz -lstb -F/Library/Frameworks -L . \
	-framework SDL2 -framework SDL2_ttf -framework SDL2_net \
	-framework Foundation -Wl,-headerpad_max_install_names \
	-o bbcsdl $(SDL_LIB)
	install_name_tool -add_rpath /Library/Frameworks bbcsdl
	install_name_tool -change libstb.dylib "@executable_path/libstb.dylib" bbcsdl
	cp bbcsdl ../../
	cp libstb.dylib ../../


================================================
FILE: bin/raspi/install-rpi.txt
================================================
Update your Raspberry Pi (recommended):

 sudo apt-get update
 sudo apt-get dist-upgrade

Install SDL 2.0:

 sudo apt-get install libsdl2-2.0-0
 sudo apt-get install libsdl2-ttf-2.0-0
 sudo apt-get install libsdl2-net-2.0-0
 sudo apt-get install mesa-utils
 chmod +x bbcsdl
 chmod +x mkicon.sh

Enable the 'experimental' GL Driver (Raspberry Pi 3 only):

 sudo raspi-config
 Advanced Options... GL Driver... GL (Full KMS)... Ok... Finish

To start BBC BASIC:

 ./bbcsdl

To create a desktop shortcut:

 ./mkicon.sh

RTR 09-May-2021


================================================
FILE: bin/raspi/makefile
================================================
# Get SDL 2.0 from the Raspbian repository:
# sudo apt-get install libsdl2-dev
# sudo apt-get install libsdl2-ttf-dev
# sudo apt-get install libsdl2-net-dev
# sudo apt-get install libsdl2-2.0-0
# sudo apt-get install libsdl2-ttf-2.0-0
# sudo apt-get install libsdl2-net-2.0-0

SDL_LIB = -L/usr/lib/ -lSDL2 -lSDL2main -lSDL2_ttf -lSDL2_net -ldl -lm

VPATH = ../../src ../../include
CXX = gcc -Wall -pthread -I ../../include
CXXFLAGS = -march=armv7-a -mthumb -munaligned-access -mfloat-abi=hard -c

OBJ = bbmain.o bbexec.o bbeval.o bbcmos.o bbccli.o \
      bbcvdu.o bbcvtx.o flood.o bbdata.o bbcsdl.o \
      bbasmb.o SDL2_gfxPrimitives.o

all: bbcsdl

bbmain.o: bbmain.c BBC.h
	$(CXX) -Wno-attributes $(CXXFLAGS) -O2 -freg-struct-return -ffast-math -fno-finite-math-only $< -o $@

bbexec.o: bbexec.c BBC.h
	$(CXX) $(CXXFLAGS) -DARMHF -O2 -freg-struct-return -ffast-math -fno-finite-math-only $< -o $@

bbeval.o: bbeval.c BBC.h
	$(CXX) -Wno-array-bounds $(CXXFLAGS) -O2 -freg-struct-return -ffast-math -fmath-errno -fno-finite-math-only $< -o $@

bbasmb.o: bbasmb_arm_32.c BBC.h
	$(CXX) $(CXXFLAGS) -Os $< -o $@

bbcmos.o: bbcmos.c bbcsdl.h
	$(CXX) -Wno-unused-result -Wno-array-bounds $(CXXFLAGS) -mfpu=neon -O2 $< -o $@

bbccli.o: bbccli.c bbcsdl.h
	$(CXX) -Wno-unused-result $(CXXFLAGS) -Os $< -o $@

bbcvdu.o: bbcvdu.c bbcsdl.h
	$(CXX) $(CXXFLAGS) -DARMHF -Os $< -o $@

bbcvtx.o: bbcvtx.c bbcsdl.h
	$(CXX) $(CXXFLAGS) -O3 $< -o $@

bbcsdl.o: bbcsdl.c bbcsdl.h version.h
	$(CXX) -Wno-unused-result $(CXXFLAGS) -O2 $< -o $@

SDL2_gfxPrimitives.o: SDL2_gfxPrimitives.c SDL2_gfxPrimitives.h
	$(CXX) $(CXXFLAGS) -O2 $< -o $@

SDL2_rotozoom.o: SDL2_rotozoom.c SDL2_rotozoom.h SDL2_gfxPrimitives.h SDL_stbimage.h stb_image.h dr_mp3.h
	$(CXX) $(CXXFLAGS) -Os -fPIC $< -o $@

flood.o: flood.c
	$(CXX) $(CXXFLAGS) -O3 $< -o $@

bbdata.o: ../../src/bbdata_arm_32.s
	as ../../src/bbdata_arm_32.s -o bbdata.o

libstb.so: SDL2_rotozoom.o
	$(CXX) -shared -o libstb.so SDL2_rotozoom.o

bbcsdl: $(OBJ) libstb.so
	$(CXX) $(OBJ) -lz -lstb -L . \
	$(SDL_LIB) -o bbcsdl -Wl,-s -Wl,-R,'$$ORIGIN' -rdynamic
	cp bbcsdl ../../
	cp libstb.so ../../


================================================
FILE: bin/raspi/mkicon.sh
================================================
#!/bin/bash
MYDIR="$( cd "$( dirname "${BASH_SOURCE[0]}" )" > /dev/null && pwd )"
echo "[Desktop Entry]
Name=BBC BASIC
Comment=BBC BASIC for Raspberry Pi
Icon=$MYDIR/bbc256x.png
Exec=\"$MYDIR/bbcsdl\"
Type=Application
Encoding=UTF-8
Terminal=false
Categories=None;" > "$HOME/Desktop/bbcsdl.desktop"
chmod +x "$HOME/Desktop/bbcsdl.desktop"


================================================
FILE: bin/rpi64/install-rpi.txt
================================================
Update your Raspberry Pi (recommended):

 sudo apt-get update
 sudo apt-get dist-upgrade

Install SDL 2.0:

 sudo apt-get install libsdl2-2.0-0
 sudo apt-get install libsdl2-ttf-2.0-0
 sudo apt-get install libsdl2-net-2.0-0
 sudo apt-get install mesa-utils
 chmod +x bbcsdl
 chmod +x mkicon.sh

Enable the 'experimental' GL Driver (Raspberry Pi 3 only):

 sudo raspi-config
 Advanced Options... GL Driver... GL (Full KMS)... Ok... Finish

To start BBC BASIC:

 ./bbcsdl

To create a desktop shortcut:

 ./mkicon.sh

RTR 09-May-2021


================================================
FILE: bin/rpi64/makefile
================================================
# Get SDL 2.0 from the Raspbian repository:
# sudo apt-get install libsdl2-dev
# sudo apt-get install libsdl2-ttf-dev
# sudo apt-get install libsdl2-net-dev
# sudo apt-get install libsdl2-2.0-0
# sudo apt-get install libsdl2-ttf-2.0-0
# sudo apt-get install libsdl2-net-2.0-0

SDL_LIB = -L/usr/lib/ -lSDL2 -lSDL2main -lSDL2_ttf -lSDL2_net -ldl -lm

VPATH = ../../src ../../include
CXX = gcc -Wall -pthread -I ../../include
CXXFLAGS = -c

OBJ = bbmain.o bbexec.o bbeval.o bbcmos.o bbccli.o \
      bbcvdu.o bbcvtx.o flood.o bbdata.o bbcsdl.o \
      bbasmb.o SDL2_gfxPrimitives.o sort.o

all: bbcsdl

bbmain.o: bbmain.c BBC.h
	$(CXX) -Wno-attributes $(CXXFLAGS) -O2 -freg-struct-return -ffast-math -fno-finite-math-only $< -o $@

bbexec.o: bbexec.c BBC.h
	$(CXX) $(CXXFLAGS) -O2 -freg-struct-return -ffast-math -fno-finite-math-only $< -o $@

bbeval.o: bbeval.c BBC.h
	$(CXX) -Wno-array-bounds $(CXXFLAGS) -O2 -freg-struct-return -ffast-math -fmath-errno -fno-finite-math-only $< -o $@

bbasmb.o: bbasmb_arm_64.c BBC.h
	$(CXX) $(CXXFLAGS) -Os $< -o $@

bbcmos.o: bbcmos.c bbcsdl.h
	$(CXX) -Wno-unused-result -Wno-array-bounds $(CXXFLAGS) -O2 $< -o $@

bbccli.o: bbccli.c bbcsdl.h
	$(CXX) -Wno-unused-result $(CXXFLAGS) -Os $< -o $@

bbcvdu.o: bbcvdu.c bbcsdl.h
	$(CXX) $(CXXFLAGS) -Os $< -o $@

bbcvtx.o: bbcvtx.c bbcsdl.h
	$(CXX) $(CXXFLAGS) -O3 $< -o $@

bbcsdl.o: bbcsdl.c bbcsdl.h version.h
	$(CXX) -Wno-unused-result $(CXXFLAGS) -O2 $< -o $@

SDL2_gfxPrimitives.o: SDL2_gfxPrimitives.c SDL2_gfxPrimitives.h
	$(CXX) $(CXXFLAGS) -O2 $< -o $@

SDL2_rotozoom.o: SDL2_rotozoom.c SDL2_rotozoom.h SDL2_gfxPrimitives.h SDL_stbimage.h stb_image.h dr_mp3.h
	$(CXX) $(CXXFLAGS) -Os -fPIC $< -o $@

flood.o: flood.c
	$(CXX) $(CXXFLAGS) -O3 $< -o $@

sort.o: sort.c
	$(CXX) $(CXXFLAGS) -O3 $< -o $@

bbdata.o: ../../src/bbdata_arm_64.s
	sed 's/_\([a-z]*\)/\1/g' <../../../BBCSDL/src/bbdata_arm_64.s >bbdata.s
	as bbdata.s -o bbdata.o

libstb.so: SDL2_rotozoom.o
	$(CXX) -shared -o libstb.so SDL2_rotozoom.o

bbcsdl: $(OBJ) libstb.so
	$(CXX) $(OBJ) -lz -lstb -L . \
	$(SDL_LIB) -o bbcsdl -Wl,-s -Wl,-R,'$$ORIGIN' -rdynamic
	cp bbcsdl ../../
	cp libstb.so ../../


================================================
FILE: bin/wasm/BBC.h
================================================
/******************************************************************\
*       BBC BASIC for SDL 2.0 (Emscripten / Web Assembly)          *
*       Copyright (c) R. T. Russell, 2000-2022                     *
*                                                                  *
*       BBC.h constant and variable declarations                   *
*       Version 1.28a, 23-Jan-2022                                 *
\******************************************************************/

// Constants:
#define STACK_NEEDED 512
#define ACCSLEN 65536 // Must be the same in bbcsdl.h

// Sentinels:
#define CALCHK	0xC3414C43
#define DIMCHK	0xC4494D43
#define FNCHK	0xC64E4348
#define FORCHK	0xC64F5243
#define GOSCHK	0xC74F5343
#define LDCHK	0xCC444348
#define LOCCHK	0xCC4F4343
#define ONCHK	0xCF4E4348
#define PROCHK	0xD0524F43
#define REPCHK	0xD2455043
#define RETCHK	0xD2455443
#define WHICHK	0xD7484943

// Tokens:
#define TAND	-128
#define TDIV	-127
#define TEOR	-126
#define TMOD	-125
#define TOR	-124
#define TERROR	-123
#define TLINE	-122
#define TOFF	-121
#define TSTEP	-120
#define TSPC	-119
#define TTAB	-118
#define TELSE	-117
#define TTHEN	-116
#define TLINO	-115
#define TOPENIN	-114
#define TPTRR	-113

#define TPAGER	-112
#define TTIMER	-111
#define TLOMEMR	-110
#define THIMEMR	-109
#define TABS	-108
#define TACS	-107
#define TADVAL	-106
#define TASC	-105
#define TASN	-104
#define TATN	-103
#define TBGET	-102
#define TCOS	-101
#define TCOUNT	-100
#define TDEG	-99
#define TERL	-98
#define TERR	-97

#define TEVAL	-96
#define TEXP	-95
#define TEXTR	-94
#define TFALSE	-93
#define TFN	-92
#define TGET	-91
#define TINKEY	-90
#define TINSTR	-89
#define TINT	-88
#define TLEN	-87
#define TLN	-86
#define TLOG	-85
#define TNOT	-84
#define TOPENUP	-83
#define TOPENOUT -82
#define TPI	-81

#define TPOINT	-80
#define TPOS	-79
#define TRAD	-78
#define TRND	-77
#define TSGN	-76
#define TSIN	-75
#define TSQR	-74
#define TTAN	-73
#define TTO	-72
#define TTRUE	-71
#define TUSR	-70
#define TVAL	-69
#define TVPOS	-68
#define TCHR	-67
#define TGETS	-66
#define TINKEYS	-65

#define TLEFT	-64
#define TMID	-63
#define TRIGHT	-62
#define TSTR	-61
#define TSTRING	-60
#define TEOF	-59
#define TSUM	-58
#define TWHILE	-57
#define TCASE	-56
#define TWHEN	-55
#define TOF	-54
#define TENDCASE -53
#define TOTHERWISE -52
#define TENDIF	-51
#define TENDWHILE -50
#define TPTRL	-49

#define TPAGEL	-48
#define TTIMEL	-47
#define TLOMEML	-46
#define THIMEML	-45
#define TSOUND	-44
#define TBPUT	-43
#define TCALL	-42
#define TCHAIN	-41
#define TCLEAR	-40
#define TCLOSE	-39
#define TCLG	-38
#define TCLS	-37
#define TDATA	-36
#define TDEF	-35
#define TDIM	-34
#define TDRAW	-33

#define TEND	-32
#define TENDPROC -31
#define TENVEL	-30
#define TFOR	-29
#define TGOSUB	-28
#define TGOTO	-27
#define TGCOL	-26
#define TIF	-25
#define TINPUT	-24
#define TLET	-23
#define TLOCAL	-22
#define TMODE	-21
#define TMOVE	-20
#define TNEXT	-19
#define TON	-18
#define TVDU	-17

#define TPLOT	-16
#define TPRINT	-15
#define TPROC	-14
#define TREAD	-13
#define TREM	-12
#define TREPEAT	-11
#define TREPORT	-10
#define TRESTOR	-9
#define TRETURN	-8
#define TRUN	-7
#define TSTOP	-6
#define TCOLOUR	-5
#define TTRACE	-4
#define TUNTIL	-3
#define TWIDTH	-2
#define TOSCLI	-1

#define TCIRCLE	1
#define TELLIPSE 2
#define TFILL	3
#define TMOUSE	4
#define TORIGIN	5
#define TQUIT	6
#define TRECT	7
#define TSWAP	8
#define TSYS	9
#define TTINT	10
#define TWAIT	11
#define TINSTALL 12
#define TPRIVATE 14
#define TBY	15
#define TEXIT	16

#define FUNTOK	TLINO // first function token
#define TOKLO	TPTRR
#define TOKHI	THIMEMR
#define OFFSIT	TPTRL-TPTRR

// Non-token statements:
// * star command
// = return from function
// ( label
// : separator
// [ assembler

// Bit names:
#define BIT0	0x01
#define BIT1	0x02
#define BIT2	0x04
#define BIT3	0x08
#define BIT4	0x10
#define BIT5	0x20
#define BIT6	0x40
#define BIT7	0x80

// Flag bits:
#define ESCFLG	BIT7	// ESCape key pressed 
#define ESCDIS	BIT6	// ESCape key disabled (*ESC OFF)
#define ALERT	BIT5	// Pending event interrupt
#define FLASH	BIT4	// MODE 7 flash update needed
#define PHASE	BIT3    // MODE 7 flash phase
#define PAUSE	BIT2	// In debug paused state
#define SSTEP	BIT1	// Single-step requested
#define KILL	BIT0	// Program wants to terminate

// Special 32-bit 'pointer' type for BASIC's heap:
#define STRIDE sizeof(void *) / sizeof(heapptr)
typedef unsigned int heapptr ;

// Structures and unions:
typedef struct tagPARM
{
	size_t i[16] ;
	double f[8] ;
} PARM, *LPPARM ;

// A variant holds an 80-bit long double, a 64-bit long long or a string descriptor.
// n.b. GCC pads a long double to 16 bytes (128 bits) for alignment reasons but only
// the least-significant 80-bits need to be stored on the heap, in files etc.
// When a long double is 64-bits rather than 80-bits (e.g. ARM) it will be necessary
// to force the type word (.i.t or .s.t member) to a value other than 0 or -1. 
typedef union __attribute__ ((packed)) __attribute__ ((aligned (4))) tagVAR
{
#if defined(__arm__) || defined(__aarch64__) || defined(__EMSCRIPTEN__)
	double f ;
#else
        long double f ;
#endif
        struct
        {
          long long n ;
          short t ; // = 0
        } i ;
        struct
        {
          heapptr p ; // Assumed to be 32 bits
          unsigned int l ; // Must be unsigned for overflow tests in 'math'
          short t ; // = -1
        } s ;
	struct
	{
	  double d ;
	  short t ; // unused (loadn/storen only)
	} d ;
} VAR, *LPVAR ; 

// String descriptor:
typedef struct __attribute__ ((packed)) __attribute__ ((aligned (4))) tagSTR
{
	heapptr p ; // Assumed to be 32 bits
	int l ;
} STR, *LPSTR ;

typedef struct tagRND
{
	unsigned int l ;
	unsigned char h ;
} RND, *LPRND ;

// Structure for linked list of string free space
struct node
{
	struct node *next ;
	char *data ;
} ;
typedef struct node node ;

// Base address for 32-bit offsets into heap:
#if defined(__x86_64__) || defined(__aarch64__)
#define zero userRAM
#define TMASK 31
#define STYPE 16
#define ATYPE 40
#else
#define zero (void*) 0
#define TMASK 15
#define STYPE 24
#define ATYPE 4
#endif

// Register globals:
#ifdef __llvm__
extern signed char *esi ;		// Program pointer
extern heapptr *esp ;			// Stack pointer
#else
#ifdef __i386__
register signed char *esi asm ("esi") ;	// Program pointer
register heapptr *esp asm ("edi") ;	// Stack pointer
#endif
#ifdef __arm__
register signed char *esi asm ("r10") ;	// Program pointer
register heapptr *esp asm ("r11") ;	// Stack pointer
#endif
#ifdef __x86_64__
register signed char *esi asm ("r12") ;	// Program pointer
register heapptr *esp asm ("r13") ;	// Stack pointer
#endif
#ifdef __aarch64__
register signed char *esi asm ("r10") ;	// Program pointer
register heapptr *esp asm ("r11") ;	// Stack pointer
#endif
#endif

// Data locations (defined in bbcdata):
extern int stavar[] ;		// Static integer variables
#define dynvar ((heapptr *)((char*)stavar + 108))	// Linked-list pointers
#define fnptr  ((heapptr *)((char*)stavar + 324))	// Pointer to user FuNctions
#define proptr ((heapptr *)((char*)stavar + 328))	// Pointer to user PROCedures
#define accs   (*(char **)((char*)stavar + 332))	// String accumulator
#define buff   (*(char **)((char*)stavar + 336))	// Temporary line buffer
#define vpage  (*(heapptr *)((char*)stavar + 340))	// Value of PAGE
#define tracen (*(unsigned short *)((char*)stavar + 344))	// TRACE maximum line number
#define lomem  (*(heapptr *)((char*)stavar + 348))	// Pointer to base of heap
#define pfree  (*(heapptr *)((char*)stavar + 352))	// Pointer to free space
#define himem  (*(heapptr *)((char*)stavar + 356))	// Pointer to top of stack
#define libase (*(heapptr *)((char*)stavar + 360))	// Base of libraries 
#define errtxt (*(const char **)((char*)stavar + 364))	// Most recent error message
#define onersp (*(heapptr **)((char*)stavar + 368))	// ON ERROR LOCAL stack pointer
#define errtrp (*(heapptr *)((char*)stavar + 372))	// Pointer to ON ERROR handler
#define datptr (*(heapptr *)((char*)stavar + 376))	// DATA pointer
#define vcount (*(unsigned int *)((char*)stavar + 380))	// Character count since newline
#define curlin (*(heapptr *)((char*)stavar + 384))	// Pointer to current line
#define timtrp (*(heapptr *)((char*)stavar + 388))	// Pointer to ON TIME handler
#define clotrp (*(heapptr *)((char*)stavar + 392))	// Pointer to ON CLOSE handler
#define siztrp (*(heapptr *)((char*)stavar + 396))	// Pointer to ON MOVE handler
#define systrp (*(heapptr *)((char*)stavar + 400))	// Pointer to ON SYS handler
#define moutrp (*(heapptr *)((char*)stavar + 404))	// Pointer to ON MOUSE handler
#define errlin (*(heapptr *)((char*)stavar + 408))	// Pointer to error line
#define prand  (*(LPRND)((char*)stavar + 412))		// Pseudo-random number
#define vwidth (*(unsigned char *)((char*)stavar + 417))// Width for auto-newline
#define errnum (*(unsigned char *)((char*)stavar + 418))// Error code number
#define liston (*(unsigned char *)((char*)stavar + 419))// *FLOAT/*HEX/*LOWERCASE/OPT
#define lstopt (*(char *)((char*)stavar + 444))		// LISTO value

extern node *flist[] ;		// String free-lists
extern STR tmps ;		// Temporary string descriptor
extern unsigned char fvtab[] ;	// Table of 'fast' variable types

extern int vduvar[] ;		// VDU variables
#define modeno (*(char *)((char*)vduvar + 72))		// MODE number
#define evtqw (*(unsigned char *)((char*)vduvar + 205))	// Event queue write pointer
#define evtqr (*(unsigned char *)((char*)vduvar + 206))	// Event queue read pointer

extern int sysvar[] ;		// @ variables linked list
#define memhdc (*(size_t *)((char*)sysvar + 12))	// SDL Renderer
#define flags  (*(unsigned char *)((char*)sysvar + 183))// BASIC's Boolean flags byte
#define link00 (*(int *)((char*)sysvar + 490))		// Terminating link in @ list
#define diradr (*(heapptr *)((char*)sysvar + 228))
#define dirlen (*(int *)((char*)sysvar + 232))
#define libadr (*(heapptr *)((char*)sysvar + 248))
#define liblen (*(int *)((char*)sysvar + 252))
#define cmdadr (*(heapptr *)((char*)sysvar + 268))
#define cmdlen (*(int *)((char*)sysvar + 272))
#define usradr (*(heapptr *)((char*)sysvar + 288))
#define usrlen (*(int *)((char*)sysvar + 292))
#define tmpadr (*(heapptr *)((char*)sysvar + 308))
#define tmplen (*(int *)((char*)sysvar + 312))

// Defined in bbcsdl.c:
extern char *szCmdLine ;	// @cmd$
extern char *szLoadDir ;	// @dir$
extern char *szLibrary ;	// @lib$
extern char *szUserDir ;	// @usr$
extern char *szTempDir ;	// @tmp$
extern const char szNotice [] ;
extern void *progRAM ;
extern void *userRAM ;

// Alignment helper types:
typedef __attribute__((aligned(1))) int unaligned_int;
typedef __attribute__((aligned(1))) intptr_t unaligned_intptr_t;
typedef __attribute__((aligned(1))) unsigned int unaligned_uint;
typedef __attribute__((aligned(1))) unsigned short unaligned_ushort;
typedef __attribute__((aligned(1))) void* unaligned_void_ptr;
typedef __attribute__((aligned(1))) char* unaligned_char_ptr;
typedef __attribute__((aligned(1))) VAR unaligned_VAR;

// Helper macros to fix alignment problem:
#define ILOAD(p)    *((unaligned_int*)(p))
#define ISTORE(p,i) *((unaligned_int*)(p)) = i
#define TLOAD(p)    *((unaligned_intptr_t*)(p))
#define TSTORE(p,i) *((unaligned_intptr_t*)(p)) = i 
#define ULOAD(p)    *((unaligned_uint*)(p))
#define USTORE(p,i) *((unaligned_uint*)(p)) = i 
#define SLOAD(p)    *((unaligned_ushort*)(p))
#define SSTORE(p,i) *((unaligned_ushort*)(p)) = i 
#define VLOAD(p)    *((unaligned_void_ptr*)(p))
#define VSTORE(p,i) *((unaligned_void_ptr*)(p)) = i 
#define CLOAD(p)    *((unaligned_char_ptr*)(p))
#define CSTORE(p,i) *((unaligned_char_ptr*)(p)) = i 
#define NLOAD(p)    *((unaligned_VAR*)(p))
#define NSTORE(p,i) *((unaligned_VAR*)(p)) = i


================================================
FILE: bin/wasm/bbcsdl.h
================================================
/******************************************************************\
*       BBC BASIC for SDL 2.0 (Emscripten / Web Assembly)          *
*       Copyright (c) R. T. Russell, 2000-2023                     *
*                                                                  *
*       BBCSDL.H constant definitions                              *
*       Version 1.37a 28-Aug-2023                                  *
\******************************************************************/

// System constants :

#define	ACCSLEN 65536		// Must be the same in BBC.h
#define PAGE_OFFSET ACCSLEN + 0x21C00     // Offset of PAGE from memory base
#define XSCREEN        2048     // Width of screen output texture
#define YSCREEN        2048     // Height of screen output texture
#define MAX_PORTS	4	// Maximum number of port channels
#define MAX_FILES	8	// Maximum number of file channels
#define MAX_LINE_LEN   2304     // At least 252*RECTANGLE + 4
#define MARGINL        1000     // Default left margin (mm * 100)
#define MARGINR        1000     // Default right margin (mm * 100)
#define MARGINT        1000     // Default top margin (mm * 100)
#define MARGINB        1000     // Default bottom margin (mm * 100)
#define	SCREEN_WIDTH	640	// Initial width
#define	SCREEN_HEIGHT	500	// Initial height
#define	AUDIOLEN	441 * 4	// Length of audio block in bytes
#define	SOUNDQE         4       // Number of bytes per sound entry
#define SOUNDQL         5*SOUNDQE // Number of bytes per channel
#define MAX_EVENTS	512	// Maximum SDL events to queue
#define MAX_TEMPO	10	// Maximum (slowest) *TEMPO setting

// User-defined message IDs:

#define	WM_APP		0x8000
#define WMU_REALLOC     WM_APP+4  // must be the same in BBCEQUS.INC
#define WMU_WAVEOPEN    WM_APP+5  // must be the same in BBCEQUS.INC
#define WMU_WAVECLOSE   WM_APP+6  // must be the same in BBCEQUS.INC
#define WMU_TIMER       WM_APP+26

// Custom user-event IDs:

#define EVT_VDU		0x2000	// Send a VDU command
#define EVT_COPYKEY	0x2001	// Handle 'copy key' actions
#define EVT_TINT	0x2002	// Get RGB pixel value
#define EVT_DISPLAY	0x2003	// *DISPLAY command
#define EVT_PIXELS	0x2004	// Read back pixels
#define EVT_CARET	0x2005	// Get text caret coordinates
#define EVT_FONT	0x2006	// Open a font
#define EVT_CHAR	0x2007	// Get character at text x,y
#define EVT_WIDTH	0x2008	// Get width of a string
#define EVT_REFLAG	0x2009	// Update refresh flag
#define EVT_SYSCALL	0x200A	// Call in GUI thread context
#define EVT_QUIT	0x200B	// Terminate with exit code
#define EVT_MOUSE	0x200C	// Get mouse position/buttons
#define EVT_MOUSETO	0x200D	// Move mouse pointer
#define EVT_OSK		0x200E	// En/disable On Screen Keyboard
#define EVT_OSWORD	0x200F  // OSWORD call
#define EVT_TIMER	0x2010	// Set new timer period
#define EVT_FSSYNC	0x2011  // Sync filesystem (Emscripten)
#define EVT_RUNJS	0x2012  // Run Javascript (Emscripten)

// Bit names:

#define	BIT0		0x01
#define	BIT1		0x02
#define	BIT2		0x04
#define	BIT3		0x08
#define	BIT4		0x10
#define	BIT5		0x20
#define	BIT6		0x40
#define	BIT7		0x80

// Bits in [vflags]:

#define	IOFLAG		BIT0	// Insert/overtype
#define	EGAFLG		BIT1	// EGA-compatible modes (*EGA [ON])
#define	CGAFLG		BIT2	// CGA-compatible modes (*EGA OFF)
#define	PTFLAG		BIT3	// VDU 2 active
#define	HRGFLG		BIT4	// VDU 5 active
#define	VDUDIS		BIT5	// VDU 21 active
#define	UFONT		BIT6	// User font selected
#define	UTF8		BIT7	// UTF-8 mode selected

// Bits in flags byte:

#define ESCFLG          0x80
#define ESCDIS          0x40
#define ALERT           0x20
#define FLASH           0x10
#define PHASE           0x08    
#define PAUSE           0x04
#define SSTEP           0x02
#define KILL            0x01

// BASIC tokens:

#define TOK_ELSE       -117
#define TOK_THEN       -116
#define TOK_LINENO     -115
#define TOK_FN          -92
#define TOK_WHILE       -57
#define TOK_CASE        -56
#define TOK_WHEN        -55
#define TOK_ENDCASE     -53
#define TOK_OTHERWISE   -52
#define TOK_ENDIF       -51
#define TOK_ENDWHILE    -50
#define TOK_CALL        -42
#define TOK_DATA        -36
#define TOK_DEF         -35
#define TOK_FOR         -29
#define TOK_GOSUB       -28
#define TOK_GOTO        -27
#define TOK_IF          -25
#define TOK_LOCAL       -22
#define TOK_NEXT        -19
#define TOK_ON          -18
#define TOK_PROC        -14
#define TOK_READ        -13
#define TOK_REM         -12
#define TOK_REPEAT      -11
#define TOK_RUN          -7
#define TOK_UNTIL        -3
#define TOK_EXIT         16

#define TOKLO          -113   // first token with left and right forms
#define TOKHI          -109   // last token with left and right forms
#define OFFSIT           64   // offset from 'right' to 'left' form

// Special 32-bit 'pointer' type for BASIC's heap:
typedef unsigned int heapptr ;

// Structures and unions:
typedef struct tagPARM
{
	size_t i[16] ;
	double f[8] ;
} PARM, *LPPARM ;

typedef struct tagFCB
{
	unsigned char p ; // pointer
	unsigned char o ; // offset  (0-256)
	unsigned char w ; // written (0-256)
	signed char f ;   // bit0: offset<>0, bit7: written<>0
} FCB, *LPFCB ;

typedef struct tagRND
{
	unsigned int l ;
	unsigned char h ;
} RND, *LPRND ;

// Static variables:

extern int stavar[] ;		// Static integer variables
#define accs (*(char **)((char*)stavar +  332))		// String accumulator
#define buff (*(char **)((char*)stavar + 336))		// Temporary line buffer
#define vcount (*(unsigned int *)((char*)stavar + 380))	// Character count since newline
#define curlin (*(heapptr *)((char*)stavar + 384))
#define timtrp (*(heapptr *)((char*)stavar + 388))
#define clotrp (*(heapptr *)((char*)stavar + 392))
#define siztrp (*(heapptr *)((char*)stavar + 396))
#define systrp (*(heapptr *)((char*)stavar + 400))
#define moutrp (*(heapptr *)((char*)stavar + 404))
#define prand  (*(LPRND)((char*)stavar + 412))		// Pseudo-random number
#define liston (*(unsigned char *)((char*)stavar + 419))// *FLOAT/*HEX/*LOWERCASE/OPT
#define path   (*(char**)((char*)stavar + 420))		// File path buffer
#define keystr (*(char ***)((char*)stavar + 424))	// Pointers to user *KEY strings
#define keybdq (*(char **)((char*)stavar + 428))	// Keyboard queue (indirect) 
#define eventq (*(int **)((char*)stavar + 432))		// Event queue (indirect)
#define keyptr (*(unsigned char **)((char*)stavar + 436))// Pointer to *KEY string
#define usrchr (*(char **)((char*)stavar + 440))	// Pointer to user-defined chars
#define lstopt (*(char *)((char*)stavar + 444))
#define sclflg (*(char *)((char*)stavar + 445))
#define optval (*(unsigned char *)((char*)stavar + 446))// I/O redirection
#define farray (*(unsigned char *)((char*)stavar + 447))// @hfile%() number of dimensions
#define fasize (*(unsigned int *)((char*)stavar + 448))	// @hfile%() number of elements
#define filbuf ((void**)((char*)stavar + 452))		// @hfile%(0)
#define fcbtab ((FCB *)((char*) stavar + 504))		// fcbtab[]
#define spchan (*(SDL_RWops **)((char*)stavar + 536))	// SPOOL channel
#define exchan (*(SDL_RWops **)((char*)stavar + 540))	// EXEC channel
#define sacc   ((unsigned int *)((char*)stavar + 544))	// Sound DDS accumulators
#define smix   ((short *)((char*)stavar + 560))		// Stereo mix for each channel
#define datend ((char*)stavar + 576)			// End of initialised variables

// VDU variables allocated in bbdata_wasm32.c:

extern int vduvar[] ;		// VDU variables
#define origx  (*(int *)((char*)vduvar + 0))	 	// Graphics x-origin (BASIC units)
#define origy  (*(int *)((char*)vduvar + 4))	 	// Graphics y-origin (BASIC units)
#define lastx  (*(int *)((char*)vduvar + 8))	 	// Current x-coordinate (pixels)
#define lasty  (*(int *)((char*)vduvar + 12))	 	// Current y-coordinate (pixels)
#define prevx  (*(int *)((char*)vduvar + 16))	 	// Previous x-coordinate (pixels)
#define prevy  (*(int *)((char*)vduvar + 20))	 	// Previous y-coordinate (pixels)
#define textwl (*(int *)((char*)vduvar + 24))	 	// Text window left (pixels)
#define textwr (*(int *)((char*)vduvar + 28))	 	// Text window right (pixels)
#define textwt (*(int *)((char*)vduvar + 32))	 	// Text window top (pixels)
#define textwb (*(int *)((char*)vduvar + 36))	 	// Text window bottom (pixels)
#define pixelx (*(int *)((char*)vduvar + 40))	 	// Width of a graphics 'dot'
#define pixely (*(int *)((char*)vduvar + 44))	 	// Height of a graphics 'dot'
#define textx  (*(int *)((char*)vduvar + 48))	 	// Text caret x-position (pixels)
#define texty  (*(int *)((char*)vduvar + 52))	 	// Text caret y-position (pixels)
#define hfont  (*(TTF_Font **)((char*)vduvar + 56))	// Handle of current font
#define hrect  (*(SDL_Rect **)((char*)vduvar + 60))	// Pointer to clipping rect
#define forgnd (*(short *)((char*)vduvar + 64))	 	// Graphics foreground colour/action
#define bakgnd (*(short *)((char*)vduvar + 66))		// Graphics background colour/action
#define cursa  (*(unsigned char *)((char*)vduvar + 68))	// Start (top) line of caret
#define cursb  (*(unsigned char *)((char*)vduvar + 69))	// Finish (bottom) line of caret
#define txtfor (*(char *)((char*)vduvar + 70))	 	// Text foreground colour index
#define txtbak (*(char *)((char*)vduvar + 71))	 	// Text background colour index
#define modeno (*(signed char *)((char*)vduvar + 72))	// MODE number (can be -1)
#define colmsk (*(char *)((char*)vduvar + 73))	 	// Mask for maximum number of colours
#define vflags (*(unsigned char *)((char*)vduvar + 74))	// VDU drivers flags byte
#define scroln (*(signed char*)((char*)vduvar + 75)) 	// Scroll counter in paged mode
#define cursx  (*(unsigned char *)((char*)vduvar + 76))	// Cursor (caret) width
#define lthick (*(unsigned char *)((char*)vduvar + 77))	// Line thickness
#define cmcflg (*(char *)((char*)vduvar + 78))		// Cursor movement control
#define tweak  (*(signed char *)((char*)vduvar + 79))	// Character spacing adjustment

#define sndqw ((unsigned char *)((char*)vduvar + 80))	// Sound queue write pointers
#define sndqr ((unsigned char *)((char*)vduvar + 84))	// Sound queue read pointers
#define eenvel ((signed char *)((char*)vduvar + 88))	// Sound envelope numbers
#define escale ((unsigned char *)((char*)vduvar + 92)) 	// Envelope scalers
#define epsect ((unsigned char *)((char*)vduvar + 96)) 	// Envelope pitch section
#define easect ((unsigned char *)((char*)vduvar + 100))	// Envelope amplitude section
#define epitch ((unsigned char *)((char*)vduvar + 104))	// Envelope pitch (frequency)
#define ecount ((unsigned char *)((char*)vduvar + 108))	// Envelope count
#define soundq ((unsigned char *)((char*)vduvar + 112))	// 4*SOUNDQL = 80
#define vduq   ((unsigned char *)((char*)vduvar + 192))	// VDU queue (different from asm version)
#define queue  (*(unsigned char *)((char*)vduvar + 202))// VDU queue status
#define kbdqw  (*(unsigned char *)((char*)vduvar + 203))// Keyboard queue write pointer
#define kbdqr  (*(unsigned char *)((char*)vduvar + 204))// Keyboard queue read pointer
#define evtqw  (*(unsigned char *)((char*)vduvar + 205))// Event queue write pointer
#define evtqr  (*(unsigned char *)((char*)vduvar + 206))// Event queue read pointer
#define keyexp (*(unsigned char *)((char*)vduvar + 207))// *KEY expansion counter
#define sizex  (*(int *)((char*)vduvar + 208))	 	// Total width of client area (pixels)
#define sizey  (*(int *)((char*)vduvar + 212))	 	// Total height of client area (pixels)
#define charx  (*(int *)((char*)vduvar + 216))	 	// Average character width (pixels)
#define chary  (*(int *)((char*)vduvar + 220))	 	// Average character height (pixels)
#define prchx  (*(int *)((char*)vduvar + 224))	 	// Average character width (printer)
#define prchy  (*(int *)((char*)vduvar + 228))	 	// Average character height (printer)
#define timoff (*(int *)((char*)vduvar + 232))		// Offset to add to TickCount
#define envels (*(signed char **)((char*)vduvar + 236))	// Pointer to ENVELOPEs (16 x 16)
#define waves  (*(short **)((char*)vduvar + 240))	// Pointer to SOUND waveforms
#define elevel ((unsigned char*)((char*)vduvar+244))	// Envelope level (amplitude)
#define prntx  (*(int *)((char*)vduvar + 248))		// Horizontal printing position
#define prnty  (*(int *)((char*)vduvar + 252))		// Vertical printing position

extern unsigned char bbcfont[] ;
extern unsigned short ttxtfont[] ;
extern int lastick ;		// To test for TIME wrapping

// System variables:

extern int sysvar[] ;		// @ variables linked list
#define memhdc (*(SDL_Renderer **)((char*)sysvar + 12))	// @memhdc%
#define wParam (*(int *)((char*)sysvar + 28))		// @wparam%
#define lParam (*(int *)((char*)sysvar + 44))		// @lparam%
#define hwndProg (*(SDL_Window **)((char*)sysvar + 60))	// @hwnd%
#define offsetx (*(int *)((char*)sysvar + 88))		// @ox%
#define offsety (*(int *)((char*)sysvar + 100))		// @oy%
#define iMsg   (*(int *)((char*)sysvar + 132))		// @msg%
#define tempo  (*(unsigned char *)((char*)sysvar + 180))// @flags%
#define sysflg (*(char *)((char*)sysvar + 181))		// *SYS flag
#define reflag (*(char *)((char*)sysvar + 182))		// *REFRESH flag
#define flags  (*(unsigned char *)((char*)sysvar + 183))// BASIC's Boolean flags byte
#define zoom   (*(unsigned int *)((char*)sysvar + 212))	// @zoom%
#define hwo    (*(SDL_AudioDeviceID *)((char*)sysvar + 328)) // @hwo%
#define platform (*(unsigned int *)((char*)sysvar + 348)) // SDL version and OS platform
#define chrmap (*(short **)((char*)sysvar + 364))		// @chrmap%
#define panx   (*(int *)((char*)sysvar + 380))		// @panx%
#define pany   (*(int *)((char*)sysvar + 396))		// @pany%
#define breakpt (*(heapptr *)((char*)sysvar + 448))	// @brkpt%
#define breakhi (*(heapptr *)((char*)sysvar + 464))	// @brkhi%
#define voices ((unsigned char *)((char*)sysvar + 508)) // Voice (waveform) for each channel

// Variables declared in bbcsdl.c:
extern SDL_Rect ClipRect ;
extern int bChanged ;
extern SDL_Texture *TTFcache[65536] ;
extern unsigned int palette[256] ;
extern size_t iResult ;		// Result from user event
extern int nUserEv ;		// Number of pending user events
extern int OSKtime ;		// On-screen keyboard timeout
extern SDL_sem *Sema4 ;		// Semaphore for user event wait
extern SDL_mutex *Mutex ;	// Mutex to protect event queue
extern void *userRAM ;		// Base of user memory
extern void *progRAM ;		// Default LOMEM
extern void *userTOP ;		// Default HIMEM
extern const char szVersion[] ;	// Initial announcement
extern const char szNotice[] ;	// Copyright string
extern int bChanged ;		// Display refresh required
extern SDL_Joystick *Joystick ;	// Handle to joystick
extern SDL_TimerID UserTimerID ;
extern int bBackground ;	// BBC BASIC in the background
extern int useGPA ;		// Use SDL_GL_GetProcAddress


================================================
FILE: bin/wasm/bbcsdl_shell.html
================================================
<!doctype html>
<html lang="en-us">
  <head>
    <meta charset="utf-8">
    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
    <title>Emscripten-Generated Code</title>
    <style>
      body {
        font-family: arial;
        margin: 0;
        padding: none;
      }

      .emscripten { padding-right: 0; margin-left: auto; margin-right: auto; display: block; }
      div.emscripten { text-align: center; }      
      div.emscripten_border { border: 1px solid black; }
      /* the canvas *must not* have any border or padding, or mouse coords will be wrong */
      canvas.emscripten { border: 0px none; background-color: black; }

      #emscripten_logo {
        display: inline-block;
        margin: 0;
      }

      .spinner {
        height: 30px;
        width: 30px;
        margin: 0;
        margin-top: 20px;
        margin-left: 20px;
        display: inline-block;
        vertical-align: top;

        -webkit-animation: rotation .8s linear infinite;
        -moz-animation: rotation .8s linear infinite;
        -o-animation: rotation .8s linear infinite;
        animation: rotation 0.8s linear infinite;

        border-left: 5px solid rgb(235, 235, 235);
        border-right: 5px solid rgb(235, 235, 235);
        border-bottom: 5px solid rgb(235, 235, 235);
        border-top: 5px solid rgb(120, 120, 120);
        
        border-radius: 100%;
        background-color: rgb(189, 215, 46);
      }

      @-webkit-keyframes rotation {
        from {-webkit-transform: rotate(0deg);}
        to {-webkit-transform: rotate(360deg);}
      }
      @-moz-keyframes rotation {
        from {-moz-transform: rotate(0deg);}
        to {-moz-transform: rotate(360deg);}
      }
      @-o-keyframes rotation {
        from {-o-transform: rotate(0deg);}
        to {-o-transform: rotate(360deg);}
      }
      @keyframes rotation {
        from {transform: rotate(0deg);}
        to {transform: rotate(360deg);}
      }

      #status {
        display: inline-block;
        vertical-align: top;
        margin-top: 30px;
        margin-left: 20px;
        font-weight: bold;
        color: rgb(120, 120, 120);
      }

      #progress {
        height: 20px;
        width: 300px;
      }

      #controls {
        display: inline-block;
        float: right;
        vertical-align: top;
        margin-top: 30px;
        margin-right: 20px;
      }

      #output {
        width: 100%;
        height: 200px;
        margin: 0 auto;
        margin-top: 10px;
        border-left: 0px;
        border-right: 0px;
        padding-left: 0px;
        padding-right: 0px;
        display: block;
        background-color: black;
        color: white;
        font-family: 'Lucida Console', Monaco, monospace;
        outline: none;
      }
    </style>
  </head>
  <body>
    <a href="https://www.bbcbasic.co.uk/bbcsdl/">
<img src=
"data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAoAAAACACAIAAAAUME9dAAAAN3RFWHRTb2Z0d2FyZQBIYW5kbWFkZSBTb2Z0d2FyZSwgSW5jLiAtIEltYWdlIEFsY2hlbXkgdjEuMTEKyLAYAQAAEABJREFUeJzsnW1sHMd5x4cvos40ZdO0VFMwo5yKoyqoF0N23cQ5CTBrIIVJOgCDKKyQL0qKggrgD3cuzERB5YSuFaSICpSsbdhkhFoE/EEiFIAfLNIJJECCTdpI1DiRWZUWWfFiSxXtXJmzLVEnirzr7C653J19uX2ZfSP/vzjCcW/vmdmZ3fnvPDPzTHWpVCIAAAAA8JfqoDMAAAAArEcgwAAAAEAA+CrA165dm5ycrK6G6hNaCPPz88PDwy+//HLQeQEAABAA/mlhoVC4ePFibW2tbymGFqq+N27cOHPmTE1NTdB5AQAAEAw+CTBV37Nnz9bV1fmTXJiR1ZeWRj6fDzo7AAAAgsEPAYb6yijVN+i8AAAACBLPBRjqKwP1BQAAIOOtAEN9ZaC+AAAAlHgowFBfGagvAAAABq8EeHFx8fz58/X19R7ZjxCVlZWfffYZ1BcAAIASrwT4xRdfbGhoIKISe5RE+JFWPNN/L168CPUFAACgxCsBvnLlytzcHFXfnTt3rk8NprorRx3B6mcAAAAMXglwtQiV3mQyWSgUPEolzMRiMYT9AgAAYITn8rAoIv9ZU1MjuabXHrTHv7CwIP+5Pvv9AAAALOJr/6yurm56ejqVSvmZqG8cP348kUhAdwEAAFjBPwGmfV+qvvv37/ctRZ959tlnL1y4cOXKlcrKyqDzAgAAIOz4J8ANDQ1rte9LicfjMzMz9MPk5GQsFgs6OwAAAMIOpghxQFZfAAAAwCKBCfC3v126dSuoxHny8cdkbCzoTAAAAIgagQkwVd+1IcBr4yoAAAD4TPAuaFsLZSsrSVWVZ1lRsLREikWzE+i35icAAAAAJgQpwFRN776b/PrXZMMGq+dfv04+/9zjbIls2kS2bjWUWCrP9NsHHkD3FwAAgEMCE2CqpjdvkpGRoNIvA5V5c6WfmSF33UXa2vzKEAAAgLVFYAJM+76/+EVQifOBdn9//3ty331B5wMAAEAECUyA33svqJR5Mj1NWlqCzgQAAIAIEpgAv/9+UClz5ty5oHMAAAAgggQ6C7qXkLS1Mw8R8ktCfueZESVxQsyDamwnJGstRQAAAMCAQAU4b/nMfxH/6yHkeW+MyPxYPMGcmXJGAAAAgHIEvw7YBj2EfEfsgHpkZEbs/vqWEwAAAOuYSAkwEQUy7toDrGskbll9OeYEAADAeiU0Alxh+q2ybzpjfLJjI7sJYWZl6w70xtXDw/TzwxYGlQEAAAANoRFgc7ar5bOXkAxXI/s1Z2b1LGRXjMjshwADAABwQkQEmIjKV1r5nOdtpKA+J2tsIavW4ILxmQAAAIAx0RFg38jaOaHeq1wAAABY20CAHWE+2AwAAACUI5oCHAuNEQAAAMAR0RFg5dSnE4EaAQAAAFwTEQFWzl7OOp14zMUIAAAAwIPQCHCp/CkCWdP4U1yMAAAAAN4TGgG2CBfhhPoCAAAImqgJMAAAALAmiJoAz/Dov3IxAgAAALggNAJsMYxz3FQ+uRgBAAAAvCc0AmzOdrV87nY0h5mLEQAAAIAHERFgog7jvN+pdnIxAgAAALgmOgKspBAaIwAAAIAjoinAgSN3o/scbYwIAABg3QMB1hAvtyFSXPE5710+AAAArGWiI8DKMM71vI3E1OeYbAkcVxuJGZwWBkYPVrQNmJ6RSqVIMtnZ0d3emkgEYLAs06Ojp4eHhyYmyPj4uE46He2trTzSEfD56qb79jRnpGtK9U6NpV0ZnJ4ePX30yNCEopRSqa7Ozo72tFn5qC+5a6TU3+ogbR/riEm4j17zwEqiNL3k4cF+b9LyAy6VaIpQJUSolF0dOxzVijot9/etNXQLJpXsPNxtWjCuEjx64MhqekI1HObVpqmJiADPqPudGd5GThDyA/WZuhocV6svifqODsIdRv8/MJChN1nXiPvWi5dBsW3NDIwbfa9MR0ip16PHwzhVt8U1ejQjX9145uho2on2CUz3HTygV1I0n/S/TEYsHC8aqiDraHr04IE2JmkhvcuEOCzGYPGpEiVFEf4dkJo/z24OTujVs8i4QBu9tbg0W+VSFKqBJkZLa7Cf8xtHaATYYhhnwiMWtNbI71YWKckwQmtkJGs5xbAzPtDWPMHzbnZmsFyzrp9Spk0SRf+aE5fFNTqs6rQMHOnrbrX/aCt60YaIhTPEtZkKuo5GDzZb7fNFgIAqcdWud+9objDUXjXic8irJ16mKmhpNU9cGhlz+q6sR2gE2CJZHpqna0Q6GPc3JyFDuJuJM0ckD4MWnzmT1DJtE8Qft5iUnsPimu47wgjI+NDp6bTNfFMdKtdwy+YH2g7s4lIwwdfR6ME1pL7BVKLGsDfy7oqpYct32XimeQ+Hx95SVdBK2MOzEiIlwD2EPO+lEdqj/bF4gj858RedET5pbIXpygy0HeywpCmcDRq9fdLX886O9vZmklC6L6enp8nUlDD2OOBCDUzgXlxKQ6eHNHm27YZmdYjx8S6Pmw2M8yydENQRc9mCB7Lb+8EHr+BfieYD+StVomOTa1eSM6lU12FFNes8iOOZA33tbvJOb23mxlr1CkyP9h1oU44YuUxLSaACXG/5zEOE/NIgbgYXIzJUVgfL+Z/XjOc5kWilbX66m2lWB4ZH+1sddYIdG9Rr2U0dY0JLn0ikW2l6/c58ovbhVVzK4V8FttzQ6j40lSHWL7aSWXXb4YZQ1JHada+97EjhfyUqqkScaMT4MmhX8uAOjg4wDuiN8UrF0r5LdT+6mkjBPpPqqqDJjU3tUIx7cJTgQAU4w2MRLRcjSrLlYkqvNRLpwd4h5b3sXIEdGdRp2VO9I4M2BqWkdqpfaOOHHeTXHi6LS+t+XsGGG1rVh071Dho2PELbUWoXCthq/gwSDEcdTV+eUGagO0xSYRvfK1FtNNHaP1bqZkcUOHtY3dE1MmXsFU+kx0YuKSdlO5xIQTRvQr1T2qqgpTXSNaCQYDdyryBSLmjgEYn2zlRG4ZOauDxNXA0H2TA43XeAadlNHzvTVFu5PBPl03FRXGr3s7AuZHVxhfWneuqSwkhyR5m0aVM1RQ6etpZBPUJTR/auO+T4XIn6VqkKT7FdSY4eVhd0jEyVWynV2t2bGlD4hh1MpBBQd3+7DhuYUKfmXO5VQIABJbEjSe/fAAxqmnbx9TPwh78MzotL/aynOgcHyYHmVS3n9FRrSaT7005/G546UneAdzUHkIUgcVOJpmaZrmQoJLjVilOJeRUevzRFj9lNiRnW6DBMV52aU7lXAwEGAcIOh3aNBP3cewvzrNN37QQ53JVZbfycPNVuRwzKsN7qKBg8rsQyqP2rHD2sXsOh52BZfz1RYAhwsMSNB5ytL2p2j6prwcO5Z8kgOxzaNRKFZ544Li7mepefdbVny1rT17wrpWh3nMzEtkpk6yj8+FeJFmAlONgXAh9RP8um+svqvbMOtxoIcJDU1dUFnQURdg6g+V3IyyCzGic6c2ocFhcz/CtfbiKt6gRbcUOzo9ADbRXE6aisKaGoI/3VT+OZ5orM8meTxTc6cQxXAhlaCMylir2oTEVYD31keS2PuErGfuH7VonWYAZU14kCMw9luWEN9UuT67kyEOAAaWxs/N73nn3hBZ2vrl4lTU1+5YNdAee6j2PRINu2d7ZHwrHpuLjY4V/F5bZ2dJEBW25oRrSJ0Hw3T3APlRfROpIwXvi0GsjQkXSywUjGhTW0A/aDIvpUiZazo34hiIQCq/uvrqcFlJ8Kx7sLDAEOBqq+hw4d0t1NKZ8nP/kJeeUVr7NAuwbCknx1C6U7Bd8bg6pJoOFv290Wl3b4V/GnAzd0a/9U74S6YyiEyhMjGnELTRGxOlrFaiBDBxFFjQJhOglU5UslWoYZUOXQv/Mc9Q3qYOhMbaA8vLvAEOAAkNQ3T5VWAz32wx/SE/gnOtBWUWavH5sRYV0a5D7szBfOxaU//LuKAze0NHt1j2ZPAqk3xiW6b8jryBB7waKliKLWfL+s/0OF4QIWE7yvRBuo1YXHEKfH2JhApQ/nHrR9IMB+E4j6lifV1dnRzvNhL2fQ7qtnuLBZXEbDvwrsu6GFHwmrOHU20lmO7uu2AQ9JHVGRKonrb1SDwUab4Wk10kKAR2u918vSgiyFMiriSTkeuvG4Em0QsS5wubdaL+Dtgw5egDdtIlu3kmIx6HzYobqaTE46+SGjvvH46ldBqi+Rd6vh99bN3WCosHd1JsO/qziZDU3ExaFj7R16DtdQxtj3GnbRso5MywEeVYVmYfHrQCbDGlyOJ9V38ChxMz0NlegA7lNHgyBgAd65kzQ0kDt3gs2FE1payLlz9n6iVd+ZlaDTAavvKtyf97XdgFi6OvZF3chR6cQNvfxL3aiCyzkMb4x9D2BedcwuXCi0EaKY5GzlnSfVO6hjMCFGu3ZJCCqRGXIINcxTFZ01FGqCEeCZmRll5289ELj66q/UELdHOX16eEjpALO2zZ5Lg+rxptDBr7iYmcRmL+pMJ9jeQn/jBtxxjP2Q15EW1ZigvliqYCZBlZv4a8GiSzyoROeEeMyfdXQ4GX53ljDnQWP/BHhhYYGK0OzsrKi+cd/SDQOBq68h4vYo6XRrWvDIKWeuOA3KbtlgxMabJBwUFxtIquzsrlUcxCMyasCdVWfU6kitv5bmbKvX3pgrsF+zwPlWog2YSe/hjfWp2bzI6YsJ/8gaNvFPgOfm5s6cOXP16tU1rL6FQqGyspI5GF71VZFgl0S4DUdXziAz5ZJLZFX/sFpc6nmadnEWG1qMsM+OKDqqzmjVkTpUtEW1VCuw6TuGrz1CfpVoGeZeDW0HmN0T2k/vs+t1Twy+uqBzuVx1dTVVqVgs5me6/kCv6+zZs0xwq4iorwS70Z7rpfimBtlA6iFv3bVYKC7jvQct4rhUNCOcjqozWnXkbK8kVScoXEtv+FSiVRj9DeukJo38uhoWsLmul/uyJb/HgKkAv/XWW8VoTXpeYdv8tu9/6fv0w8/e/9mHtR8y39K+b5TVV4TxObp/2s0Msq17VALAr1KuuJjhXye4KRUO8X2jX0dRx68gzZqg3+HUX0Z+Xe8MYtMHzbsDHMQkrJqaGv8TdU/DQsMTrU/Mxmbp5wtNF3711q/mauZMzt+2bVtLSwvtFkt/RkB9BbhPuzEzqAmG69VmfJ5hXlw2puQyP1RGIHZTKkx8XweDuFGqI1VtWL7W0O9x6L4SLaDZ8yqU+quRX/cvg+r192Veb/jH7Qh+HXBUqCnWSOpLoR/onyYnJxKJRx55JGrqSzwIvWBqkA2GG8BMT3eYXp1p8ElTys6Gnu7rm0qnrawSdr1dW4TqyJkz2ZnjmgM+VmLZnDCxS0K5qIfJpZuouUqYTanMFJiJp8NjTp5XApzP5+vr64nohpV1KNJQxT33h3MtX2yhn+mHmm01jZWNumc2NDQ89NBDs7Oz0p/RUV/NQkD3r3jlDLIONpczPYX4+5fbfYtlb3Z1rsL0qLmDUM8AAAv/SURBVFVPz/E71LaH2C4nZ/ISnTpStaXW+urqavK5A+xjJZowepDZa8r71VYOYBYe8cuj9T0oPNBfzwT4tddee+aZZ+IiHiURIC30f9aIkvpq/VCun3ULBjXNO+1i7blkf0eYlb1vUr3tDjNrG7OrsxB80hTGM6YjJmI5jYyZ9wLUC3OcyktU6oh9bykb24pt1X3fbcLHStRFZ6fHUMov85LgeuhXicUAOMy9wmnlsYcu6LxAzDv74cex+lYHMTKgjaHrchzIqkHtljDyjjDWAuQbbjvnJeZXZyn4pClWgnKMD7RVTPSODBoEw2R9di7kJSp1xMbzbDbpYmrEx7doDir8q0S13dUo1gpSXKWNE659z9N9y6G2DbaMZO8anRc3TQeck4/ew5aedoIJebinx7sUQo1j9Y3F6MPhWbZYxNhO2n32iOMZDk4MJtJjU4R9FRd3hBF2bO083NHe3JxQbs4mJ6IOqe891q7OavBJU9SuMcP5x+OZtuaMtN3AahmJresRddm4bLojUkc6Q9YVQ+rNGJZ3Y2BrkMeMHqf4U4lCjZhViaC+4Rvcd935FQws3xBGQeuYu0Zy8OhsuCFngturmqddre2EZL20H17cqO/sLDl2jPz855yzZCMCExGfxXKPIl+DQvu+Qy8C3/iAuHW61WR4+c/cXJ2N4JNm2IgNvbw3hFkOORRM2OpIH93Oerns8ZrR4wYulWjvvlWY7rI/oiC83GSs2ncWylrrZ7JygarE2FA4+oO8mrg6xpXB9V7xToCfl9S3VPIshSjgQH17ez3NkQUcPixuDerG/rGRSFA7PrBXx64+cu6sMnRDJ9KDI+RAW8ZiQfGr0EjUkdGLQqCZ0hJYJWosh3WvFM30MC8Rd2auaCuj7rx99B4J8CQhPd5YjhK5HHnuuWipL/dn0aZBKQyuju/NLIlU1+HB7tZEENqrc3XqN253jl9jN3SiNT1Warcwssq/dY1CHVl8URCzFZz2BFiJktngnpzyaDu/zlBPZzR1SLX2l3R3Zl7GiZegHB4J8De8MRsxTp4kmzdbOjNY9U2lUslk566Odl779ro0KG6y2tovjtWdHr40NDFBxtUtPU2A0BQ6Otpb/W89Ta+Oy/DvKuZuaGlj2/7p0b7Tw0NDE8pCom0rLR/vdmIOeR2JWRReFAwKJ5XsVA0LB4i/lSjUilgtIbl6A3RmZztG8C6TlUlYVEJNHVLizszdwhwBxTi5OMnBmwLzQoCfF3vA653z50k2S9SxKfXxSn3p+1zJ/TalXhosg7BzerqVpP1Jjc/VJWifhmuGLWRLLKa0g1Q5XLKvdeSkcB0Xjoh/t3yQlRi+tPg+RoKqpq3nO7H8TsQtfRO8EOAeD2xGjFyOnDplqfurq76PPfaYJ9kCAAAQGrgL8HbeBiPJyZNEjANWBl31jcfj77zzjifZAgAAEBr4CnB23a47UmLR+WykvjPyAiYAAABrF74CzHZ/33zzyVisYPKDYnEpilsTVlRUVFUJRVcoxOLx7M6dk/JXFp3PUF8AAFjncBRgVn2/+93jjY2zJj9YWlpqbGzcurXxzp3FCMkwVd+FhYXLly9TGaUX+OSTbyq/teJ8hvoCAADgJcCTjPP5/PkWKk7m3V8ixKnI5nLTjSJR0eCqqqpr16Zqaxfm5uoPHDiu/KqvT1BWqq8mQH0BAAAQfgKsWviby20+dWrf5s25sj+rEsnlcp988gn9s1RdVRRdu5VLi9IH5WeOBzcuLVWLOx4siti9Wprn+fl79u07pbzGfF4Y+jXv/kJ9AQAASHARYHbh78mT++vr89Z/L8lwsarq7usfN3wwRY/M/UUz/VCiInlzfvavH95y8b84Hqy9OX/ur740+Z+/pQebmpqSyaRdDV5crI7Hs48/fk55sLubWjP7FdQXAACAjHsBnmQW/p4/35LNxuvqbtg1dPueTX/z3HOFmns3LMwXGu774tnz9OAH3+r48r+9eKemluPBm3/3zWN9/y4l+tJLL9H+t92s5vP16XSv8khfX5mQk1BfAAAAStwLMBt18sSJ/SZzr2IrA6S00yk7gekH2v3dcvl/qknlpmIx99Dupt9erK3eULG4dHdFxQZSEeN3cOPS0uid21IeGhsbaepylgq3Fyoqq+iHUnFJ+iB8XrrDXMKNG3V2nc9QXwAAAAwuBZh1Pvf1ZUyGfuvr60+cOEEF78aNG3v37r1w4QIR4pImJyYmqAZ/duvWV370T/Rg5eJiMrn34uQkPXjr2h+++qMf8D249PH1np4eepCq7+TkpJR6/tPPvtn+t59+JDjAN275wu0/fkQ1eKkwf++uryo1mL4tNDVdteV8hvoCAADQ4lKAe5R/5PP12WzcaPSX6u6pU6feffdd+rmjo6N3RZE2b9789ttvSwdf+ecXpINba+/+zciodwepAEsH6Wcp9ce/9uQn54buVG4oLhTuu+uez6feowc3NT/CXMXsbOMLLxxWHjF3PkN9AQAA6OJGgNmFv93d/0p7h0Zn19XV0b4mczCRSEiSHPjBv3zw/sXLpRIp1j7YfOvaFKmsKi3euWvr9lJxST6fvmEcPfqs0oK58xnqCwAAwAjHApzVLvw1dz6//vrre/fulcZ9c7mc7AROJpOTomc42IO/+e8r3/j633/64RRV3I1/9oWF3P+SysqbH31w786vlJaEBcrSzGemf2/ifIb6AgAAMMGxAKu6v+YLf5XOZwmlE5h++8YbbwR+8PGvPXn9zdeWXdC7n8hPCH5ppQvalvMZ6gsAAMAcZwLMOp/NF/7qOp8lQuWCrs5WV5CK6gcT8x99UCoWS4sLG7c0SS5oW85nqC8AAICyOBDgSa3z2WThr+x8JooJzyF0QV++9sfixgQ90lS7Nfnl5GKxRDNMe8OkVJR2XLDofIb6AgAAsIIDAbax8JdxPlOdC4O3WfegDBOaQ1p39PTTLynPMXI+Q30BAABYxK4A21v4q3Q+JxIJaeGvEj+9zXLqcuBJevDtsXHlabS/XigUlEe0Qa+MnM9QXwAAANaxJcCTthb+ys5nKmn0XyqKtAf86KOPkiBmQUtZoqnTb6nuPvXUU8K3/zf39D985+Z1QSA3bLp/45amxTsLN26s+tK1Qa+IgfMZ6gsAAMAWtgSYdT6bLPxlwm7ILl+JQLzNytTlmc9X3viPO5UbluY/3/atf7z1pznlabo7Lug6n6G+AAAA7GJdgFnns/nCX9q/lJ3P2r2G5CNUpbSeYS8Oyii/TWy5Z+nDylKxGHsgXlpkYz7ncputOJ+hvgAAABxgXYB7lH+U3fFX8vTW1dUJ84qbmuQQHNJX8hEpIrTkGU4mk9IJu3fv5ntQ9irTI9K3NG+F2wt/Hv/inzYIq4w23v9gUS3A+Xz9T396qOzMZ6gvAAAAZ1gUYHsLfymFQmHfvn3SZyp7VJOU30ryPDs7e+TIEfmgPBtZOS2Zy8FXX301n8/LSXd0dCxn8vbCpoQQakNY7FsqKrKnE/RK63yG+gIAAHCMFQHO2lr4K6OcTqx1BcdisePHj1tI3S2ZTCaXyykzoPwshZlkuHq1iQl6pXU+Q30BAAC4wYoAs91f8x1/KcWqqsqlJd0/pc9UfY8dO6ZcbusR9fX1VBT/v727V00YCgMwrJ0KgrgUCkJxL5SupTeSMVfh7bj2UjpKoXtGoRQcXYqNLUg4NTHWk6TV5xkkiQ7H6eV8/mS7/a1jsbiezdLgYjB8Vl8AjrQ3wGF9q3/42/tK7NXL69vd7Xd0i6fb43xznCRJmqbHLL2OfLN7UH1Xq8skeQouBsNn9QXgeNUBzoLhc5ZN5vP76k9/c8ubx4v3j52nwVPNy9/gqP6rl8tR8LujYPisvgBEUR3gcPs7mWQ/x7OnrTh8Vl8AYqkI8EN7q/irisNn9QUgoooAP7e2iL+pOHxWXwDiKg3wIV9dOkHDYW867Y3Hm2P1BSC60gDvvNX8WRkMNo/qC0ATfnE/4DOivgA0RIBLqS8AzRHgUnl9g//KVF8AYikNcL/f5jL+AfUFICI74FrUF4C4BHg/9QUgOgHeQ30BaEJpgNfrdZvrAICzYgcMAB0QYADogAADQAcEGAA68AkG0LjCwnHj5QAAAABJRU5ErkJggg=="
width="320" height="64"></a>

    <div class="spinner" id='spinner'></div>
    <div class="emscripten" id="status">Downloading...</div>

<span id='controls'>
  <span><input type="button" value="Fullscreen" onclick="Module.requestFullscreen()">
  </span>
</span>

    <div class="emscripten">
      <progress value="0" max="100" id="progress" hidden=1></progress>
    </div>

    
    <div class="emscripten_border">
      <canvas class="emscripten" id="canvas" oncontextmenu="event.preventDefault()" tabindex=-1></canvas>
    </div>
    <textarea id="output" rows="8"></textarea>

    <script type='text/javascript'>
      var statusElement = document.getElementById('status');
      var progressElement = document.getElementById('progress');
      var spinnerElement = document.getElementById('spinner');

      var Module = {
        preRun: [],
        postRun: [],
        print: (function() {
          var element = document.getElementById('output');
          if (element) element.value = ''; // clear browser cache
          return function(text) {
            if (arguments.length > 1) text = Array.prototype.slice.call(arguments).join(' ');
            // These replacements are necessary if you render to raw HTML
            //text = text.replace(/&/g, "&amp;");
            //text = text.replace(/</g, "&lt;");
            //text = text.replace(/>/g, "&gt;");
            //text = text.replace('\n', '<br>', 'g');
            console.log(text);
            if (element) {
              element.value += text + "\n";
              element.scrollTop = element.scrollHeight; // focus on bottom
            }
          };
        })(),
        printErr: function(text) {
          if (arguments.length > 1) text = Array.prototype.slice.call(arguments).join(' ');
          console.error(text);
        },
        canvas: (function() {
          var canvas = document.getElementById('canvas');

          // As a default initial behavior, pop up an alert when webgl context is lost. To make your
          // application robust, you may want to override this behavior before shipping!
          // See http://www.khronos.org/registry/webgl/specs/latest/1.0/#5.15.2
          canvas.addEventListener("webglcontextlost", function(e) { alert('WebGL context lost. You will need to reload the page.'); e.preventDefault(); }, false);

          return canvas;
        })(),
        setStatus: function(text) {
          if (!Module.setStatus.last) Module.setStatus.last = { time: Date.now(), text: '' };
          if (text === Module.setStatus.last.text) return;
          var m = text.match(/([^(]+)\((\d+(\.\d+)?)\/(\d+)\)/);
          var now = Date.now();
          if (m && now - Module.setStatus.last.time < 30) return; // if this is a progress update, skip it if too soon
          Module.setStatus.last.time = now;
          Module.setStatus.last.text = text;
          if (m) {
            text = m[1];
            progressElement.value = parseInt(m[2])*100;
            progressElement.max = parseInt(m[4])*100;
            progressElement.hidden = false;
            spinnerElement.hidden = false;
          } else {
            progressElement.value = null;
            progressElement.max = null;
            progressElement.hidden = true;
            if (!text) spinnerElement.style.display = 'none';
          }
          statusElement.innerHTML = text;
        },
        totalDependencies: 0,
        monitorRunDependencies: function(left) {
          this.totalDependencies = Math.max(this.totalDependencies, left);
         // Module.setStatus(left ? 'Preparing... (' + (this.totalDependencies-left) + '/' + this.totalDependencies + ')' : 'All downloads complete.');
        }
      };
      Module.setStatus('Downloading...');
      window.onerror = function(event) {
        // TODO: do not warn on ok events like simulating an infinite loop or exitStatus
        Module.setStatus('Exception thrown, see JavaScript console');
        spinnerElement.style.display = 'none';
        Module.setStatus = function(text) {
          if (text) Module.printErr('[post-exception status] ' + text);
        };
      };
    </script>
    {{{ SCRIPT }}}
  </body>
</html>

================================================
FILE: bin/wasm/makefile
================================================
# Requires Python and the Emscripten SDK to be installed.

VPATH  = ../BBCSDL/src ../BBCSDL/include

CXX = emcc -s USE_PTHREADS=1 -s USE_SDL=2 -s USE_SDL_TTF=2 -s USE_SDL_NET=2 \
      -I . -I ../BBCSDL/include -pthread -Wall -Wno-pthreads-mem-growth

LXX = emcc -s USE_PTHREADS=1 -s USE_SDL=2 -s USE_SDL_TTF=2 -s USE_SDL_NET=2 -s MAXIMUM_MEMORY=1gb \
      -s PTHREAD_POOL_SIZE=2 -s ALLOW_MEMORY_GROWTH=1 -s WASM=1 -s ASSERTIONS=0 -s STACK_SIZE=5MB \
      -I . -I ../BBCSDL/include -pthread -Wall -Wno-pthreads-mem-growth

OBJ = bbmain.o bbexec.o bbeval.o bbcmos.o bbccli.o \
      bbcvdu.o bbcvtx.o flood.o sort.o bbdata.o bbcsdl.o \
      bbasmb.o SDL2_gfxPrimitives.o SDL2_rotozoom.o

all: bbcsdl.html

bbmain.o: bbmain.c BBC.h
	$(CXX) -c -O3 -ffast-math -fno-finite-math-only $< -o $@

bbexec.o: bbexec.c BBC.h
	$(CXX) -c -O3 -ffast-math -fno-finite-math-only $< -o $@

bbeval.o: bbeval.c BBC.h
	$(CXX) -c -O3 -ffast-math -fmath-errno -fno-finite-math-only $< -o $@

bbasmb.o: bbasmb_wasm32.c BBC.h
	$(CXX) -c -Os $< -o $@

bbcmos.o: bbcmos.c bbcsdl.h
	$(CXX) -c -O3 $< -o $@

bbccli.o: bbccli.c bbcsdl.h
	$(CXX) -c -Os $< -o $@

bbcvdu.o: bbcvdu.c bbcsdl.h
	$(CXX) -c -Os $< -o $@

bbcvtx.o: bbcvtx.c bbcsdl.h
	$(CXX) -c -O3 $< -o $@

bbcsdl.o: bbcsdl.c bbcsdl.h version.h
	$(CXX) -Wno-unused-value -c -O3 $< -o $@

SDL2_gfxPrimitives.o: SDL2_gfxPrimitives.c SDL2_gfxPrimitives.h
	$(CXX) -c -O3 $< -o $@

SDL2_rotozoom.o: SDL2_rotozoom.c SDL2_rotozoom.h SDL2_gfxPrimitives.h SDL_stbimage.h stb_image.h
	$(CXX) -c -Os $< -o $@

flood.o: flood.c
	$(CXX) -c -O3 $< -o $@

sort.o: sort.c
	$(CXX) -c -O3 $< -o $@

bbdata.o: bbdata_wasm32.c
	$(CXX) -c $< -o $@

bbcsdl.html: $(OBJ) Box2D231.o bbcsdl_shell.html
	$(LXX) -O3 --emrun --no-heap-copy --shell-file bbcsdl_shell.html $(OBJ) Box2D231.o \
	-lidbfs.js -o bbcsdl.html --preload-file examples/ --preload-file lib/

index.html: $(OBJ) Box2D231.o bbcsdl_shell.html
	$(LXX) -O3 --emrun --no-heap-copy --shell-file bbcsdl_shell.html $(OBJ) Box2D231.o \
	-lidbfs.js -o index.html


================================================
FILE: bin/wasm/readme.txt
================================================
If you get a build failure like:

'AssertionError: attempt to lock the cache while a parent process is holding the lock'

build the individual ports separately using:

embuilder build sdl2-mt
embuilder build sdl2_net
embuilder build sdl2_ttf


================================================
FILE: bin/win32/makefile
================================================
# Update these paths as necessary to match your installation
SDL_LIB = -LC:/SDL2-2.26.2/i686-w64-mingw32/lib -lSDL2main -lSDL2 \
          -LC:/SDL2_ttf-2.20.2/i686-w64-mingw32/lib -lSDL2_ttf \
          -LC:/SDL2_net-2.2.0/i686-w64-mingw32/lib -lSDL2_net 
SDL_INCLUDE = -IC:/SDL2-2.26.2/i686-w64-mingw32/include/ \
          -IC:/SDL2_ttf-2.20.2/i686-w64-mingw32/include/ \
          -IC:/SDL2_net-2.2.0/i686-w64-mingw32/include/ 

VPATH = ../../src ../../include
CXX = gcc -Wall -I ../../include

OBJ = bbmain.o bbexec.o bbeval.o bbcmos.o bbccli.o \
      bbcvdu.o bbcvtx.o flood.o bbdata.o bbcsdl.o \
      bbasmb.o SDL2_gfxPrimitives.o SDL2_rotozoom.o

all: bbcsdl.exe sdlrun.exe

bbmain.o: bbmain.c BBC.h
	$(CXX) -c -O2 -freg-struct-return -ffast-math -fno-finite-math-only $< -o $@

bbexec.o: bbexec.c BBC.h
	$(CXX) -c -O2 -freg-struct-return -ffast-math -fno-finite-math-only $< -o $@

bbeval.o: bbeval.c BBC.h
	$(CXX) -Wno-array-bounds -c -O2 -freg-struct-return -ffast-math -fmath-errno -fno-finite-math-only $< -o $@

# TODO: Need bbasmb_x86_32 assembler!!
bbasmb.o: bbasmb_arm_v6m.c BBC.h
	$(CXX) -c -Os $< -o $@

bbcmos.o: bbcmos.c bbcsdl.h
	$(CXX) -Wno-array-bounds -c $(SDL_INCLUDE) -msse2 -O2 $< -o $@

bbccli.o: bbccli.c bbcsdl.h
	$(CXX) -c $(SDL_INCLUDE) -Os $< -o $@

bbcvdu.o: bbcvdu.c bbcsdl.h
	$(CXX) -c $(SDL_INCLUDE) -Os $< -o $@

bbcvtx.o: bbcvtx.c bbcsdl.h
	$(CXX) -c $(SDL_INCLUDE) -O3 $< -o $@

bbcsdl.o: bbcsdl.c bbcsdl.h version.h
	$(CXX) -c -Wno-unused-value $(SDL_INCLUDE) -O2 $< -o $@

SDL2_gfxPrimitives.o: SDL2_gfxPrimitives.c SDL2_gfxPrimitives.h
	$(CXX) -c $(SDL_INCLUDE) -O2 $< -o $@

SDL2_rotozoom.o: SDL2_rotozoom.c SDL2_rotozoom.h SDL2_gfxPrimitives.h SDL_stbimage.h stb_image.h dr_mp3.h
	$(CXX) -c $(SDL_INCLUDE) -Os $< -o $@

flood.o: flood.c
	$(CXX) -c $(SDL_INCLUDE) -O3 $< -o $@

bbdata.o: ../../src/bbdata_x86_32.nas
	nasm --prefix _ -f win32 -s ../../src/bbdata_x86_32.nas -o bbdata.o

bbcsdl.exe: $(OBJ)
	$(CXX) $(OBJ) \
	-o bbcsdl.exe -lz -lmingw32 -lpsapi -mthreads -mwindows $(SDL_LIB) -Wl,-s -Wl,--export-all-symbols

sdlrun.o: sdlrun.c
	$(CXX) -Wall -c -O2 $< -o $@

unpack32.o: unpack32.nas
	nasm --prefix _ -f win32 -s unpack32.nas -o unpack32.o

sdlrun.exe: sdlrun.o unpack32.o
	$(CXX) sdlrun.o unpack32.o -o sdlrun.exe -lmingw32 -mwindows -Wl,-s 


================================================
FILE: bin/win32/sdlrun.c
================================================
/******************************************************************\
*	  BBC BASIC for SDL 2.0 (Windows edition)		   *
*	  Copyright (c) R. T. Russell, 2024			   *
*								   *
*	  Version 1.4, 15-Nov-2024				   *
\******************************************************************/

#include <windows.h>
#include <windowsx.h>
#include <objbase.h>
#include <shlobj.h>
#include "version.h"

#ifdef __x86_64__
#define SECURITY_PTR 0x128
#else
#define SECURITY_PTR 0x118
#endif
#define STACK_NEEDED 0x400

	// Functions in BBCUPCK.NAS

void WINAPI unpack (HANDLE, char*, int, DWORD*, int) ;
BOOL WINAPI verify (HANDLE, char*, int) ;

	// Structure declaration

typedef struct tagPROGINFO {
  int DefaultRAM ;
  int Library ;
  int WindowWidth ;
  int WindowHeight ;
  int CmdShow ;
  int Flags ;
  unsigned int SerialNumber ;
  int ProgLength ;
} PROGINFO, *LPPROGINFO ;

int WINAPI WinMain (HINSTANCE hInstance, HINSTANCE hPrevInstance,
		    PSTR szCmdLine, int iCmdShow)
    {
	char szAppName[_MAX_PATH] ;
	char szLoadDir[_MAX_PATH] ;
	char szTempDir[_MAX_PATH] ;
	char szLibrary[_MAX_PATH] ;
	char szBinaries[_MAX_PATH] ;
	char szFileName[_MAX_PATH] ;
	char szEmptyFile[_MAX_PATH] ;
	PROGINFO ProgInfo ;
	SHFILEOPSTRUCT shfo = {0} ;
	SHELLEXECUTEINFOA sei = {0} ;
	HANDLE ThisFile, EmbedFile ;
	int signature, offset ;
	int embedsize, remain, dirlen, liblen ;
	BOOL anyresources = 0 ;
	DWORD nRead ;
	char *nameptr ;
	void *pBuffer ;

	// Get the path to this file and open it:
	GetModuleFileName (NULL, szFileName, _MAX_PATH) ;

	ThisFile = CreateFile (szFileName, GENERIC_READ, FILE_SHARE_READ,
			    NULL, OPEN_EXISTING, 0, NULL) ;

	// It shouldn't be possible for the file not to exist:
	if (ThisFile == INVALID_HANDLE_VALUE)
	  return 1;

	// Discover if there is a signature and if so where it is:
	SetFilePointer (ThisFile, SECURITY_PTR, NULL, FILE_BEGIN) ;
	ReadFile (ThisFile, &signature, sizeof(int), &nRead, NULL) ;
	if (signature != 0)
		nRead = FILE_BEGIN ;
	else
		nRead = FILE_END ;

	// Read the ProgInfo structure either from the end or just before the signature:
	offset = SetFilePointer (ThisFile, signature-sizeof(PROGINFO), NULL, nRead) ;
	ReadFile (ThisFile, &ProgInfo, sizeof(PROGINFO), &nRead, NULL) ;

	// Quit if there are no embedded files:
	if ((ProgInfo.Library <= 0) || (ProgInfo.Library >= offset))
	    {
		CloseHandle (ThisFile) ;
		return 0 ;
	    }

	// Find directory containing this file:
	GetFullPathName (szFileName, _MAX_PATH, szLoadDir, &nameptr) ;
	*nameptr = '\0' ;
	dirlen = strlen (szLoadDir) ;

	// Get the path to the temporary directory:
	GetTempPath (_MAX_PATH, szTempDir) ;

	// Set the path to the binaries subdirectory and create it:
	GetTempFileName (szTempDir, "BBC", 0, szBinaries) ;
	DeleteFile (szBinaries) ;
	CreateDirectory (szBinaries, NULL) ;
	strcat (szBinaries, "\\") ;

	// Set the path to the libraries subdirectory (but don't create it):
	strcpy (szLibrary, szBinaries) ;
	strcat (szLibrary, "lib\\") ;
	liblen = strlen (szLibrary) ;

	// Set the path to an empty file bin\$ (but don't create it):
	strcpy (szEmptyFile, szBinaries) ;
	strcat (szEmptyFile, "$") ; 

	// Allocate a buffer to hold the uncompressed data:
	pBuffer = malloc (ProgInfo.DefaultRAM) ;
	if (pBuffer == NULL)
		return 2 ;

	// For each of the embedded files:
	int embedptr = offset - ProgInfo.ProgLength - ProgInfo.Library ;
	while (embedptr < (offset - ProgInfo.ProgLength)) 
	    {
		int len ;
		char type ;
		SetFilePointer (ThisFile, embedptr, NULL, FILE_BEGIN) ;
		ReadFile (ThisFile, &type, 1, &nRead, NULL) ;
		ReadFile (ThisFile, &embedsize, 4, &nRead, NULL) ;
		ReadFile (ThisFile, szFileName, _MAX_PATH, &nRead, NULL) ;
		len = strlen(szFileName) ;
		embedptr += len + 6 ;

		// type == 0/1 for @dir$, type == 2/3 for @dir$\bin\lib
		if (type & 2)
		    {
			memmove (szFileName + liblen, szFileName, len + 1) ;
			memcpy (szFileName, szLibrary, liblen) ;
		    }
		else
		    {
			memmove (szFileName + dirlen, szFileName, len + 1) ;
			memcpy (szFileName, szLoadDir, dirlen) ;
			anyresources = 1 ;
		    }

		// Check if the file already exists:
		EmbedFile = CreateFile (szFileName, GENERIC_READ,
			  FILE_SHARE_READ, NULL, OPEN_EXISTING, 0, NULL) ;

		// If it does, verify the existing contents against the embedded data:
		if (EmbedFile != INVALID_HANDLE_VALUE)
		    {
			int diff = 0 ;
			SetFilePointer (ThisFile, embedptr, NULL, FILE_BEGIN) ;

			while ((diff == 0) && ((remain = embedptr + embedsize -
				SetFilePointer (ThisFile, 0, NULL, FILE_CURRENT)) > 0))
			    {
				nRead = ProgInfo.SerialNumber ;
				unpack (ThisFile, pBuffer, min(remain, ProgInfo.DefaultRAM),
					 &nRead, type) ;
				diff = verify (EmbedFile, pBuffer, nRead) ;
			    }
			CloseHandle (EmbedFile) ;
			if (diff)
				EmbedFile = INVALID_HANDLE_VALUE ;
		    }

		// If the file doesn't exist OR is different from the existing one, create it:
		if (EmbedFile == INVALID_HANDLE_VALUE)
		    {
			CloseHandle (CreateFile (szEmptyFile, GENERIC_WRITE, 0,
						 NULL, CREATE_ALWAYS, 0, NULL)) ;
			
			shfo.hwnd = (HWND) 1 ; // Any non-zero value!
			shfo.wFunc = FO_MOVE ;
			shfo.pFrom = szEmptyFile ;
			shfo.pTo   = szFileName ;
			shfo.fFlags = FOF_SILENT | FOF_NOCONFIRMATION | FOF_NOCONFIRMMKDIR ;
			*(szFileName + strlen(szFileName) + 1) = '\0' ;
			*(szEmptyFile + strlen(szEmptyFile) + 1) = '\0' ;
			SHFileOperation (&shfo) ; // Create directory if necessary

			EmbedFile = CreateFile (szFileName, GENERIC_WRITE, 0,
					   NULL, CREATE_ALWAYS, 0, NULL) ;

			if (EmbedFile == INVALID_HANDLE_VALUE)
			    {
				MessageBox(NULL, szFileName, "SDLRUN: Cannot create file", 0);
				return 3 ;
			    }

			SetFilePointer (ThisFile, embedptr, NULL, FILE_BEGIN) ;

			while ((remain = embedptr + embedsize -
				SetFilePointer (ThisFile, 0, NULL, FILE_CURRENT)) > 0)
			    {
				nRead = ProgInfo.SerialNumber ;
				unpack (ThisFile, pBuffer, min(remain, ProgInfo.DefaultRAM),
					&nRead, type) ;
				WriteFile (EmbedFile, pBuffer, nRead, &nRead, NULL) ;
			    }

			CloseHandle (EmbedFile) ;
		    }
		embedptr += embedsize ;
	    }

	free (pBuffer) ;
	ReadFile (ThisFile, szAppName, _MAX_PATH, &nRead, NULL) ;
	CloseHandle (ThisFile) ;

	// Get path to program .bbc file and hide it:
	if (anyresources)
		strcpy (szFileName, szLoadDir) ;
	else
		strcpy (szFileName, szBinaries) ;
	strcat (szFileName, szAppName) ;
	strcat (szFileName, ".bbc") ;
	SetFileAttributes (szFileName, FILE_ATTRIBUTE_HIDDEN) ;

	// Enclose in quotes in case embedded space(s):
	strcpy (szEmptyFile, "\042") ;
	strcat (szEmptyFile, szFileName) ;
	strcat (szEmptyFile, "\042 ") ;
	strcat (szEmptyFile, szCmdLine) ;

	// Run BBCSDL:
	strcpy (szLibrary, szBinaries) ;
	strcat (szLibrary, "bbcsdl.exe") ;

	/// ShellExecute ((HWND) 0, "open", szLibrary, szEmptyFile, szLoadDir, ProgInfo.CmdShow) ;

	sei.cbSize = sizeof(sei) ;
        sei.fMask = SEE_MASK_NOCLOSEPROCESS ;
        sei.hwnd = NULL ;
	sei.lpVerb = "open" ;
        sei.lpFile = szLibrary ;
        sei.lpParameters = szEmptyFile ;
        sei.lpDirectory = szLoadDir ;
        sei.nShow = ProgInfo.CmdShow ;
        ShellExecuteEx (&sei) ;

	// Wait for process to finish:
        if (sei.hProcess)
	    {
		DWORD res ;
		do res = WaitForSingleObject (sei.hProcess, 1000) ;
		while (res == WAIT_TIMEOUT) ;
		CloseHandle (sei.hProcess) ;
	    }

	// Delete the binaries directory and all the files it contains:
	*(szBinaries + strlen(szBinaries) + 1) = '\0' ;
	shfo.hwnd = (HWND) 1 ; // Any non-zero value!
	shfo.pFrom = szBinaries ;
	shfo.wFunc = FO_DELETE ;
	shfo.fFlags = FOF_SILENT | FOF_NOCONFIRMATION | FOF_NOCONFIRMMKDIR ;
	SHFileOperation (&shfo) ; 

	return 0 ;
    }


================================================
FILE: bin/win32/unpack32.nas
================================================
;/*****************************************************************\
;*       BBC BASIC for SDL 2.0 (Windows edition)                   *
;*       Copyright (c) R. T. Russell, 2023                         *
;*       aPLib courtesy of Joergen Ibsen, www.ibsensoftware.com    *
;*                                                                 *
;*       UNPACK.NAS Compressed file unpacker (32-bit version)      *
;\*****************************************************************/
;
        GLOBAL  unpack@20,verify@12
        EXTERN  ReadFile@20,SetFilePointer@16
;
        SEGMENT .text
;
BUFSIZ  EQU     512
;
verify@12:
        pushad
        mov     ebp,esp         ; Save stack pointer
        mov     edi,[ebp+40]    ; Data pointer
        mov     ecx,[ebp+44]    ; Data size (bytes)
        mov     ebx,-BUFSIZ     ; V1.1
        and     esp,ebx         ; Align
        neg     ebx             ; mask -> BUFSIZ
        sub     esp,ebx         ; Make space on stack
        mov     esi,esp         ; Buffer pointer
vloop:  mov     eax,ecx         ; Get remaining size
        cmp     eax,ebx         ; Remaining > BUFSIZ ?
        jbe     vloop1
        mov     eax,ebx         ; If so, use BUFSIZ
vloop1: push    eax             ; Save bytes to load/compare
        push    ecx             ; Save bytes remaining
        push    eax             ; Make space for NumberOfBytesRead
        mov     ecx,esp
        mov     edx,[ebp+36]    ; File handle
        push    byte 0          ; lpOverlapped
        push    ecx             ; lpNumberOfBytesRead
        push    eax             ; nNumberOfBytesToRead
        push    esi             ; lpBuffer
        push    edx             ; hFile
        call    ReadFile@20
        pop     eax             ; Discard NumberOfBytesRead
        pop     eax             ; eax = bytes remaining
        pop     ecx             ; ecx = bytes to compare
        sub     eax,ecx         ; Adjust bytes remaining
        jecxz   vloop2
        push    esi
        repz    cmpsb           ; Compare file with memory
        pop     esi
vloop2: xchg    eax,ecx         ; ecx <- remaining, eax <- result
        jnz     vloopx          ; Different, so bailout
        or      ecx,ecx         ; Anything remaining?
        jnz     vloop           ; Continue comparing
vloopx: mov     esp,ebp         ; Restore stack pointer
        mov     [ebp+28],eax    ; Result
        popad
        ret     12              ; WINAPI calling convention
;
unpack@20:
        and     dword [esp+20],byte 1 ; Test bit 0, zero remainder
        jz      near ReadFile@20     ; n.b. lpOverlapped = NULL
        pushad
        mov     ebp,esp
        mov     edx,[ebp+36]    ; hFile
        mov     edi,[ebp+40]    ; lpBuffer
        mov     eax,[ebp+48]    ; &nRead
        mov     eax,[eax]       ; nRead
        mov     ebx,-BUFSIZ     ; Mask
        and     esp,ebx         ; Align stack pointer
        mov     esi,esp         ; Initial buffer pointer
        neg     ebx             ; Mask -> BUFSIZ
        sub     esp,ebx         ; Make space on stack for buffer
        push    edx             ; hFile [esi-4]
        push    eax             ; Space for last block size [esi-8]
        push    eax             ; nRead [esi-12]
        push    ebp

        mov     dl,80H
        xor     ebx,ebx
literal:
        call    getbyte
        stosb
        mov     bl,2
nexttag:
        call    getbit
        jnc     literal
        xor     ecx,ecx
        xor     eax,eax 
        call    getbit
        jnc     codepair
        call    getbit
        jnc     shortmatch
        mov     bl,2
        inc     ecx
        mov     al,10H
getmorebits:
        call    getbit
        adc     al,al
        jnc     getmorebits
        jnz     domatch
        stosb
nextt1: jmp     short nexttag
;        
codepair:
        call    getgamma
        sub     ecx,ebx
        jnz     normalcodepair
        call    getgamma
        jmp     short domatch_lastpos
;        
shortmatch:
        call    getbyte
        shr     eax,1
        rcl     ecx,1            
        jnz     domatch_with_2inc

        pop     ebp             ; saved stack pointer
        pop     eax             ; discard SerialNumber
        pop     eax             ; last block size
        pop     edx             ; hFile
        mov     esp,ebp         ; Restore stack pointer
        and     esi,BUFSIZ-1    ; Get offset into buffer
        jz      noptradj
        sub     esi,eax         ; How much to adjust pointer
        push    byte 1          ; dwMoveMethod = FILE_CURRENT
        push    byte 0          ; lpDistanceToMoveHigh
        push    esi             ; DistanceToMove (negative)
        push    edx             ; hFile
        call    SetFilePointer@16
noptradj:
        sub     edi,[ebp+40]
        mov     esi,[ebp+48]    ; &nRead
        mov     [esi],edi       ; return unpacked length
        popad
        ret     20              ; WINAPI calling convention
;        
normalcodepair:
        xchg    eax,ecx
        dec     eax
        shl     eax,8
        call    getbyte
        call    getgamma
        cmp     eax,32000
        jae     domatch_with_2inc
        cmp     ah,5
        jae     domatch_with_inc
        cmp     eax,byte 7FH
        ja      domatch_new_lastpos
domatch_with_2inc:
        inc     ecx
domatch_with_inc:
        inc     ecx
domatch_new_lastpos:
        xchg    eax,ebp
domatch_lastpos:
        mov     eax,ebp
        mov     bl,1
domatch:
        push    esi
        mov     esi,edi
        sub     esi,eax
        rep     movsb
        pop     esi
        jmp     short nextt1
;        
getbit:
        add     dl,dl
        jnz     stillbitsleft
        xchg    al,dl
        pushf
        call    getbyte
        popf
        xchg    al,dl
        adc     dl,dl
stillbitsleft:
        ret
;        
getgamma:
        inc     ecx
getgammaloop:
        call    getbit
        adc     ecx,ecx
        call    getbit
        jc      getgammaloop
        ret
;
getbyte:
        test    esi,BUFSIZ-1
        jnz     getbyt1
        sub     esi,BUFSIZ      ; Address start of buffer
        pushad
        push    eax             ; Make space for NumberOfBytesRead
        mov     ecx,esp
        push    byte 0          ; lpOverlapped
        push    ecx             ; lpNumberOfBytesRead
        push    dword BUFSIZ    ; nNumberOfBytesToRead
        push    esi             ; lpBuffer
        push    dword [esi-4]   ; hFile
        call    ReadFile@20
        pop     dword [esi-8]   ; NumberOfBytesRead (may not be BUFSIZ)
        popad
getbyt1:
        lodsb
        ret


================================================
FILE: bin/win64/makefile
================================================
# Update these paths as necessary to match your installation
SDL_LIB = -LC:/SDL2-2.26.2/x86_64-w64-mingw32/lib -lSDL2main -lSDL2 \
          -LC:/SDL2_ttf-2.20.2/x86_64-w64-mingw32/lib -lSDL2_ttf \
          -LC:/SDL2_net-2.2.0/x86_64-w64-mingw32/lib -lSDL2_net 
SDL_INCLUDE = -IC:/SDL2-2.26.2/x86_64-w64-mingw32/include/ \
          -IC:/SDL2_ttf-2.20.2/x86_64-w64-mingw32/include/ \
          -IC:/SDL2_net-2.2.0/x86_64-w64-mingw32/include/

VPATH = ../../src ../../include
CXX = gcc -Wall -I ../../include

OBJ = bbmain.o bbexec.o bbeval.o bbcmos.o bbccli.o \
      bbcvdu.o bbcvtx.o flood.o bbdata.o bbcsdl.o \
      bbasmb.o SDL2_gfxPrimitives.o SDL2_rotozoom.o

all: bbcsdl.exe sdlrun.exe

bbmain.o: bbmain.c BBC.h
	$(CXX) -c -O2 -freg-struct-return -ffast-math -fno-finite-math-only $< -o $@

bbexec.o: bbexec.c BBC.h
	$(CXX) -c -O2 -freg-struct-return -ffast-math -fno-finite-math-only $< -o $@

bbeval.o: bbeval.c BBC.h
	$(CXX) -Wno-array-bounds -c -O2 -freg-struct-return -ffast-math -fmath-errno -fno-finite-math-only $< -o $@

bbasmb.o: bbasmb_x86_64.c BBC.h
	$(CXX) -c -Os $< -o $@

bbcmos.o: bbcmos.c bbcsdl.h
	$(CXX) -Wno-array-bounds -c $(SDL_INCLUDE) -msse2 -O2 $< -o $@

bbccli.o: bbccli.c bbcsdl.h
	$(CXX) -c $(SDL_INCLUDE) -Os $< -o $@

bbcvdu.o: bbcvdu.c bbcsdl.h
	$(CXX) -c $(SDL_INCLUDE) -Os $< -o $@

bbcvtx.o: bbcvtx.c bbcsdl.h
	$(CXX) -c $(SDL_INCLUDE) -O3 $< -o $@

bbcsdl.o: bbcsdl.c bbcsdl.h version.h
	$(CXX) -Wno-unused-value -c $(SDL_INCLUDE) -O2 $< -o $@

SDL2_gfxPrimitives.o: SDL2_gfxPrimitives.c SDL2_gfxPrimitives.h
	$(CXX) -c $(SDL_INCLUDE) -O2 $< -o $@

SDL2_rotozoom.o: SDL2_rotozoom.c SDL2_rotozoom.h SDL2_gfxPrimitives.h SDL_stbimage.h stb_image.h dr_mp3.h
	$(CXX) -c $(SDL_INCLUDE) -Os $< -o $@

flood.o: flood.c
	$(CXX) -c $(SDL_INCLUDE) -O3 $< -o $@

bbdata.o: ../../src/bbdata_x86_64.nas
	nasm -f win64 -s ../../src/bbdata_x86_64.nas -o bbdata.o

bbcsdl.exe: $(OBJ)
	$(CXX) $(OBJ) \
	-o bbcsdl.exe -lz -lmingw32 -mthreads -mwindows $(SDL_LIB) -Wl,-s -Wl,--export-all-symbols

sdlrun.o: sdlrun.c
	$(CXX) -Wall -c -O2 $< -o $@

unpack64.o: unpack64.nas
	nasm -f win64 -s unpack64.nas -l unpack64.lst -o unpack64.o

sdlrun.exe: sdlrun.o unpack64.o
	$(CXX) sdlrun.o unpack64.o -o sdlrun.exe -lmingw32 -mwindows -Wl,-s 


================================================
FILE: bin/win64/sdlrun.c
================================================
/******************************************************************\
*	  BBC BASIC for SDL 2.0 (Windows edition)		   *
*	  Copyright (c) R. T. Russell, 2024			   *
*								   *
*	  Version 1.4, 15-Nov-2024				   *
\******************************************************************/

#include <windows.h>
#include <windowsx.h>
#include <objbase.h>
#include <shlobj.h>
#include "version.h"

#ifdef __x86_64__
#define SECURITY_PTR 0x128
#else
#define SECURITY_PTR 0x118
#endif
#define STACK_NEEDED 0x400

	// Functions in BBCUPCK.NAS

void WINAPI unpack (HANDLE, char*, int, DWORD*, int) ;
BOOL WINAPI verify (HANDLE, char*, int) ;

	// Structure declaration

typedef struct tagPROGINFO {
  int DefaultRAM ;
  int Library ;
  int WindowWidth ;
  int WindowHeight ;
  int CmdShow ;
  int Flags ;
  unsigned int SerialNumber ;
  int ProgLength ;
} PROGINFO, *LPPROGINFO ;

int WINAPI WinMain (HINSTANCE hInstance, HINSTANCE hPrevInstance,
		    PSTR szCmdLine, int iCmdShow)
    {
	char szAppName[_MAX_PATH] ;
	char szLoadDir[_MAX_PATH] ;
	char szTempDir[_MAX_PATH] ;
	char szLibrary[_MAX_PATH] ;
	char szBinaries[_MAX_PATH] ;
	char szFileName[_MAX_PATH] ;
	char szEmptyFile[_MAX_PATH] ;
	PROGINFO ProgInfo ;
	SHFILEOPSTRUCT shfo = {0} ;
	SHELLEXECUTEINFOA sei = {0} ;
	HANDLE ThisFile, EmbedFile ;
	int signature, offset ;
	int embedsize, remain, dirlen, liblen ;
	BOOL anyresources = 0 ;
	DWORD nRead ;
	char *nameptr ;
	void *pBuffer ;

	// Get the path to this file and open it:
	GetModuleFileName (NULL, szFileName, _MAX_PATH) ;

	ThisFile = CreateFile (szFileName, GENERIC_READ, FILE_SHARE_READ,
			    NULL, OPEN_EXISTING, 0, NULL) ;

	// It shouldn't be possible for the file not to exist:
	if (ThisFile == INVALID_HANDLE_VALUE)
	  return 1;

	// Discover if there is a signature and if so where it is:
	SetFilePointer (ThisFile, SECURITY_PTR, NULL, FILE_BEGIN) ;
	ReadFile (ThisFile, &signature, sizeof(int), &nRead, NULL) ;
	if (signature != 0)
		nRead = FILE_BEGIN ;
	else
		nRead = FILE_END ;

	// Read the ProgInfo structure either from the end or just before the signature:
	offset = SetFilePointer (ThisFile, signature-sizeof(PROGINFO), NULL, nRead) ;
	ReadFile (ThisFile, &ProgInfo, sizeof(PROGINFO), &nRead, NULL) ;

	// Quit if there are no embedded files:
	if ((ProgInfo.Library <= 0) || (ProgInfo.Library >= offset))
	    {
		CloseHandle (ThisFile) ;
		return 0 ;
	    }

	// Find directory containing this file:
	GetFullPathName (szFileName, _MAX_PATH, szLoadDir, &nameptr) ;
	*nameptr = '\0' ;
	dirlen = strlen (szLoadDir) ;

	// Get the path to the temporary directory:
	GetTempPath (_MAX_PATH, szTempDir) ;

	// Set the path to the binaries subdirectory and create it:
	GetTempFileName (szTempDir, "BBC", 0, szBinaries) ;
	DeleteFile (szBinaries) ;
	CreateDirectory (szBinaries, NULL) ;
	strcat (szBinaries, "\\") ;

	// Set the path to the libraries subdirectory (but don't create it):
	strcpy (szLibrary, szBinaries) ;
	strcat (szLibrary, "lib\\") ;
	liblen = strlen (szLibrary) ;

	// Set the path to an empty file bin\$ (but don't create it):
	strcpy (szEmptyFile, szBinaries) ;
	strcat (szEmptyFile, "$") ; 

	// Allocate a buffer to hold the uncompressed data:
	pBuffer = malloc (ProgInfo.DefaultRAM) ;
	if (pBuffer == NULL)
		return 2 ;

	// For each of the embedded files:
	int embedptr = offset - ProgInfo.ProgLength - ProgInfo.Library ;
	while (embedptr < (offset - ProgInfo.ProgLength)) 
	    {
		int len ;
		char type ;
		SetFilePointer (ThisFile, embedptr, NULL, FILE_BEGIN) ;
		ReadFile (ThisFile, &type, 1, &nRead, NULL) ;
		ReadFile (ThisFile, &embedsize, 4, &nRead, NULL) ;
		ReadFile (ThisFile, szFileName, _MAX_PATH, &nRead, NULL) ;
		len = strlen(szFileName) ;
		embedptr += len + 6 ;

		// type == 0/1 for @dir$, type == 2/3 for @dir$\bin\lib
		if (type & 2)
		    {
			memmove (szFileName + liblen, szFileName, len + 1) ;
			memcpy (szFileName, szLibrary, liblen) ;
		    }
		else
		    {
			memmove (szFileName + dirlen, szFileName, len + 1) ;
			memcpy (szFileName, szLoadDir, dirlen) ;
			anyresources = 1 ;
		    }

		// Check if the file already exists:
		EmbedFile = CreateFile (szFileName, GENERIC_READ,
			  FILE_SHARE_READ, NULL, OPEN_EXISTING, 0, NULL) ;

		// If it does, verify the existing contents against the embedded data:
		if (EmbedFile != INVALID_HANDLE_VALUE)
		    {
			int diff = 0 ;
			SetFilePointer (ThisFile, embedptr, NULL, FILE_BEGIN) ;

			while ((diff == 0) && ((remain = embedptr + embedsize -
				SetFilePointer (ThisFile, 0, NULL, FILE_CURRENT)) > 0))
			    {
				nRead = ProgInfo.SerialNumber ;
				unpack (ThisFile, pBuffer, min(remain, ProgInfo.DefaultRAM),
					 &nRead, type) ;
				diff = verify (EmbedFile, pBuffer, nRead) ;
			    }
			CloseHandle (EmbedFile) ;
			if (diff)
				EmbedFile = INVALID_HANDLE_VALUE ;
		    }

		// If the file doesn't exist OR is different from the existing one, create it:
		if (EmbedFile == INVALID_HANDLE_VALUE)
		    {
			CloseHandle (CreateFile (szEmptyFile, GENERIC_WRITE, 0,
						 NULL, CREATE_ALWAYS, 0, NULL)) ;
			
			shfo.hwnd = (HWND) 1 ; // Any non-zero value!
			shfo.wFunc = FO_MOVE ;
			shfo.pFrom = szEmptyFile ;
			shfo.pTo   = szFileName ;
			shfo.fFlags = FOF_SILENT | FOF_NOCONFIRMATION | FOF_NOCONFIRMMKDIR ;
			*(szFileName + strlen(szFileName) + 1) = '\0' ;
			*(szEmptyFile + strlen(szEmptyFile) + 1) = '\0' ;
			SHFileOperation (&shfo) ; // Create directory if necessary

			EmbedFile = CreateFile (szFileName, GENERIC_WRITE, 0,
					   NULL, CREATE_ALWAYS, 0, NULL) ;

			if (EmbedFile == INVALID_HANDLE_VALUE)
			    {
				MessageBox(NULL, szFileName, "SDLRUN: Cannot create file", 0);
				return 3 ;
			    }

			SetFilePointer (ThisFile, embedptr, NULL, FILE_BEGIN) ;

			while ((remain = embedptr + embedsize -
				SetFilePointer (ThisFile, 0, NULL, FILE_CURRENT)) > 0)
			    {
				nRead = ProgInfo.SerialNumber ;
				unpack (ThisFile, pBuffer, min(remain, ProgInfo.DefaultRAM),
					&nRead, type) ;
				WriteFile (EmbedFile, pBuffer, nRead, &nRead, NULL) ;
			    }

			CloseHandle (EmbedFile) ;
		    }
		embedptr += embedsize ;
	    }

	free (pBuffer) ;
	ReadFile (ThisFile, szAppName, _MAX_PATH, &nRead, NULL) ;
	CloseHandle (ThisFile) ;

	// Get path to program .bbc file and hide it:
	if (anyresources)
		strcpy (szFileName, szLoadDir) ;
	else
		strcpy (szFileName, szBinaries) ;
	strcat (szFileName, szAppName) ;
	strcat (szFileName, ".bbc") ;
	SetFileAttributes (szFileName, FILE_ATTRIBUTE_HIDDEN) ;

	// Enclose in quotes in case embedded space(s):
	strcpy (szEmptyFile, "\042") ;
	strcat (szEmptyFile, szFileName) ;
	strcat (szEmptyFile, "\042 ") ;
	strcat (szEmptyFile, szCmdLine) ;

	// Run BBCSDL:
	strcpy (szLibrary, szBinaries) ;
	strcat (szLibrary, "bbcsdl.exe") ;

	/// ShellExecute ((HWND) 0, "open", szLibrary, szEmptyFile, szLoadDir, ProgInfo.CmdShow) ;

	sei.cbSize = sizeof(sei) ;
        sei.fMask = SEE_MASK_NOCLOSEPROCESS ;
        sei.hwnd = NULL ;
	sei.lpVerb = "open" ;
        sei.lpFile = szLibrary ;
        sei.lpParameters = szEmptyFile ;
        sei.lpDirectory = szLoadDir ;
        sei.nShow = ProgInfo.CmdShow ;
        ShellExecuteEx (&sei) ;

	// Wait for process to finish:
        if (sei.hProcess)
	    {
		DWORD res ;
		do res = WaitForSingleObject (sei.hProcess, 1000) ;
		while (res == WAIT_TIMEOUT) ;
		CloseHandle (sei.hProcess) ;
	    }

	// Delete the binaries directory and all the files it contains:
	*(szBinaries + strlen(szBinaries) + 1) = '\0' ;
	shfo.hwnd = (HWND) 1 ; // Any non-zero value!
	shfo.pFrom = szBinaries ;
	shfo.wFunc = FO_DELETE ;
	shfo.fFlags = FOF_SILENT | FOF_NOCONFIRMATION | FOF_NOCONFIRMMKDIR ;
	SHFileOperation (&shfo) ; 

	return 0 ;
    }


================================================
FILE: bin/win64/unpack64.nas
================================================
;/*****************************************************************\
;*	BBC BASIC for SDL 2.0 (Windows edition)			   *
;*	Copyright (c) R. T. Russell, 2024			   *
;*	aPLib courtesy of Joergen Ibsen, www.ibsensoftware.com	   *
;*								   *
;*	UNPACK.NAS Compressed file unpacker (64-bit version)	   *
;\*****************************************************************/
;
	GLOBAL  unpack,verify
	EXTERN  ReadFile,SetFilePointer
;
	SEGMENT .text
;
BUFSIZ  EQU	512
;
; Parameters: rcx = hFile
;	      rdx = lpBuffer
;	      r8  = nNumberOfBytesToVerify
;     Result: eax = non-zero if different
;  Preserved: rbx, rbp, rdi, rsi, r12, r13, r14, r15
;
verify:
	push	rbp
	push	rsi
	push	rdi
	mov	rbp,rsp		; copy stack pointer
	xchg	rcx,r8		; rcx = nBytes, r8 = hFile
	mov	rdi,rdx		; lpBuffer

	mov	edx,BUFSIZ
	neg	rdx
	and	rsp,rdx		; align stack pointer
	neg	edx
	sub	rsp,rdx		; make space on stack
	mov	rsi,rsp

vloop:	mov	eax,ecx
	cmp	eax,edx		; remaining >- BUFSIZ ?
	jbe	vloop1
	mov	eax,edx		; If so, use BUFSIZ
	
vloop1:	push	r8
	push	rax		; Bytes to read
	push	rcx		; Bytes remaining
	push	rdx		; BUFSIZ

	mov	rcx,r8		; hFile
	mov	rdx,rsi		; lpBuffer
	mov	r8,rax		; nNumberOfBytesToRead
	xor	r9d,r9d		; lpNumberOfBytesRead
	push	byte 0		; lpOverlapped

	sub	rsp,32		; Shadow space
	call	ReadFile
	add	rsp,40

	pop	rdx
	pop	rax		; rax = bytes remaining
	pop	rcx		; rcx = bytes just read
	pop	r8

	sub	eax,ecx		; Adjust bytes remaining
	jrcxz	vloop2
	push	rsi
	repz	cmpsb		; Compare file with memory
	pop	rsi

vloop2:	xchg	eax,ecx		; ecx <- remaining, eax <- result
	jnz	vloopx		; Different, so bailout
	or	ecx,ecx		; Anything remaining?
	jnz	vloop		; Continue comparing

vloopx:	mov	rsp,rbp		; Restore stack pointer
	pop	rdi
	pop	rsi
	pop	rbp
	ret
;
; Parameters: rcx = hFile
;	      rdx = lpBuffer
;	      r8 = nNumberOfBytesToRead
;	      r9 = lpNumberOfBytesRead
;	[rsp+40] = lpOverlapped
;  Preserved: rbx, rbp, rdi, rsi, r12, r13, r14, r15
;
unpack:
	and	qword [rsp+40],byte 1	; Test bit 0, zero remainder
	jz	near ReadFile	; n.b. lpOverlapped = NULL

	push	rbp
	mov	rbp,rsp		; copy stack pointer
	mov	r10,rcx		; hFile

	mov	eax,BUFSIZ
	neg	rax
	and	rsp,rax		; align stack pointer
	mov	rcx,rsp
	neg	rax
	sub	rsp,rax		; make space on stack

	push	rbx
	push	rsi
	push	rdi

	push	rdx

	mov	rsi,rcx
	mov	rdi,rdx

	cld
	mov	dl,80h
	xor	ebx,ebx

literal:
	call	getbyte
	stosb
	mov	bl,2
nexttag:
	call	getbit
	jnc	literal

	xor	ecx,ecx
	call	getbit
	jnc	codepair
	xor	eax,eax
	call	getbit
	jnc	shortmatch
	mov	bl,2
	inc	ecx
	mov	al,10h
getmorebits:
	call	getbit
	adc	al,al
	jnc	getmorebits
	jnz	domatch
	stosb
	jmp	short nexttag
;
codepair:
	call	getgamma_no_ecx
	sub	ecx,ebx
	jnz	normalcodepair
	call	getgamma
	jmp	short domatch_lastpos
;
shortmatch:
	call	getbyte
	shr	eax,1
	jz	donedepacking
	adc	ecx,ecx
	jmp	short domatch_with_2inc
;
normalcodepair:
	xchg	eax,ecx
	dec	eax
	shl	eax,8
	call	getbyte
	call	getgamma

	cmp	eax,32000
	jae	short domatch_with_2inc
	cmp	ah,5
	jae	short domatch_with_inc
	cmp	eax,7fh
	ja	short domatch_new_lastpos

domatch_with_2inc:
	inc	ecx

domatch_with_inc:
	inc	ecx

domatch_new_lastpos:
	xchg	eax,r8d
domatch_lastpos:
	mov	eax,r8d

	mov	bl,1

domatch:
	push	rsi
	mov	rsi,rdi
	sub	rsi,rax
	rep	movsb
	pop	rsi
	jmp	nexttag
;
getbit:
	add	dl,dl
	jnz	stillbitsleft
        xchg    al,dl
        pushf
        call    getbyte
        popf
        xchg    al,dl
	adc	dl,dl
stillbitsleft:
	ret
;
getgamma:
	xor	ecx,ecx
getgamma_no_ecx:
	inc	ecx
getgammaloop:
	call	getbit
	adc	ecx,ecx
	call	getbit
	jc	getgammaloop
	ret
;
donedepacking:
	pop	rdx
	sub	rdi,rdx

	xchg	rdi,[r9]	; [r9] = nRead, last block size = [r9]
	and	esi,BUFSIZ-1	; Get offset into buffer
	jz	noptradj
	sub	rsi,rdi		; How much to adjust pointer (negative)

	push	rcx
	push	rdx
	push	r8
	push	r9		; lpNumberOfBytesRead
	push	r10

	mov	rcx,r10		; hFile	
	mov	rdx,rsi		; DistanceToMove (negative)
	xor	r8d,r8d		; lpDistanceToMoveHigh
	mov	r9d,1		; dwMoveMethod = FILE_CURRENT

	sub	rsp,32		; Shadow space
        call    SetFilePointer
	add	rsp,32

	pop	r10
	pop	r9
	pop	r8
	pop	rdx
	pop	rcx

noptradj:
	pop	rdi
	pop	rsi
	pop	rbx

	mov	rsp,rbp
	pop	rbp
	ret
;
; In:  r10 = hFile (to refill buffer)
;      r9 = lpNumberOfBytesRead
;      rsi = buffer pointer (on stack)
; Out: [r9] = nRead (if buffer refilled)
;      al = byte read
;      
getbyte:
	test	rsi,BUFSIZ-1	; Buffer empty ?
	jnz	getbyt1

	push	rax
	push	rcx
	push	rdx
	push	r8
	push	r9		; lpNumberOfBytesRead
	push	r10

	mov	eax,BUFSIZ
	sub	rsi,rax

	mov	rcx,r10		; hFile
	mov	rdx,rsi		; lpBuffer
	mov	r8,rax		; nNumberOfBytesToRead
	push	byte 0		; lpOverlapped

	sub	rsp,32		; Shadow space
	call	ReadFile
	add	rsp,40

	pop	r10
	pop	r9
	pop	r8
	pop	rdx
	pop	rcx
	pop	rax
getbyt1:
	lodsb
	ret


================================================
FILE: console/linux/makefile
================================================
VPATH = ../../src ../../include ../../../BBCSDL/src ../../../BBCSDL/include
CXX = gcc -Wall -I ../../include -I ../../../BBCSDL/include

OBJ = bbmain.o bbexec.o bbeval.o bbasmb.o bbdata.o bbccos.o bbccon.o

all: bbcbasic

bbmain.o: bbmain.c BBC.h
	$(CXX) -c -O2 -ffast-math -fno-finite-math-only $< -o $@

bbexec.o: bbexec.c BBC.h
	$(CXX) -c -O2 -ffast-math -fno-finite-math-only $< -o $@

bbeval.o: bbeval.c BBC.h
	$(CXX) -Wno-array-bounds -c -O2 -ffast-math -fmath-errno -fno-finite-math-only $< -o $@

bbasmb.o: bbasmb_x86_64.c BBC.h
	$(CXX) -c -Os $< -o $@

bbccos.o: bbccos.c bbccon.h
	$(CXX) -Wno-array-bounds -Wno-unused-result -c -Os $< -o $@

bbccon.o: bbccon.c bbccon.h
	$(CXX) -Wno-array-bounds -Wno-unused-result -c -Os $< -o $@

bbdata.o: ../../../BBCSDL/src/bbdata_x86_64.nas
	nasm -f elf64 -s ../../../BBCSDL/src/bbdata_x86_64.nas -o bbdata.o

bbcbasic: $(OBJ)
	$(CXX) $(OBJ) -L . -L/usr/include -ldl -lm -lrt -pthread \
	-o bbcbasic -Wl,-s -Wl,-R,'$$ORIGIN'
	cp bbcbasic ../../


================================================
FILE: console/macm1/makefile
================================================
VPATH = ../../src ../../include ../../../BBCSDL/src ../../../BBCSDL/include
CXX = gcc -Wall -I ../../include -I ../../../BBCSDL/include

OBJ = bbmain.o bbexec.o bbeval.o bbasmb.o bbdata.o bbccos.o bbccon.o

all: bbcbasic

bbmain.o: bbmain.c BBC.h
	$(CXX) -c -O2 -ffast-math -fno-finite-math-only $< -o $@

bbexec.o: bbexec.c BBC.h
	$(CXX) -c -O2 -ffast-math -fno-finite-math-only $< -o $@

bbeval.o: bbeval.c BBC.h
	$(CXX) -Wno-array-bounds -c -O2 -ffast-math -fmath-errno -fno-finite-math-only $< -o $@

bbasmb.o: bbasmb_arm_64.c BBC.h
	$(CXX) -c -Os $< -o $@

bbccos.o: bbccos.c bbccon.h
	$(CXX) -Wno-array-bounds -Wno-unused-result -c -Os $< -o $@

bbccon.o: bbccon.c bbccon.h
	$(CXX) -Wno-array-bounds -Wno-unused-result -c -Os $< -o $@

bbdata.o: ../../../BBCSDL/src/bbdata_arm_64.s
	as ../../../BBCSDL/src/bbdata_arm_64.s -o bbdata.o

bbcbasic: $(OBJ)
	$(CXX) $(OBJ) -F/Library/Frameworks -L . \
	-framework Foundation \
	-o bbcbasic -L/usr/include -ldl -lm
	cp bbcbasic ../../


================================================
FILE: console/macos/makefile
================================================
VPATH = ../../src ../../include ../../../BBCSDL/src ../../../BBCSDL/include
CXX = gcc -Wall -mmacosx-version-min=10.6 -I ../../include -I ../../../BBCSDL/include

OBJ = bbmain.o bbexec.o bbeval.o bbasmb.o bbdata.o bbccos.o bbccon.o

all: bbcbasic

bbmain.o: bbmain.c BBC.h
	$(CXX) -c -O2 -ffast-math -fno-finite-math-only $< -o $@

bbexec.o: bbexec.c BBC.h
	$(CXX) -c -O2 -ffast-math -fno-finite-math-only $< -o $@

bbeval.o: bbeval.c BBC.h
	$(CXX) -Wno-array-bounds -c -O2 -ffast-math -fmath-errno -fno-finite-math-only $< -o $@

bbasmb.o: bbasmb_x86_64.c BBC.h
	$(CXX) -c -Os $< -o $@

bbccos.o: bbccos.c bbccon.h
	$(CXX) -Wno-array-bounds -Wno-unused-result -c -Os $< -o $@

bbccon.o: bbccon.c bbccon.h
	$(CXX) -Wno-array-bounds -Wno-unused-result -c -Os $< -o $@

bbdata.o: ../../../BBCSDL/src/bbdata_x86_64.nas
	nasm --prefix _ -f macho64 -s ../../../BBCSDL/src/bbdata_x86_64.nas -o bbdata.o

bbcbasic: $(OBJ)
	$(CXX) $(OBJ) -F/Library/Frameworks -L . \
	-framework Foundation \
	-o bbcbasic -L/usr/include -ldl -lm
	cp bbcbasic ../../


================================================
FILE: console/raspi/makefile
================================================
VPATH = ../../src ../../include ../../../BBCSDL/src ../../../BBCSDL/include
CXX = gcc -Wall -I ../../include -I ../../../BBCSDL/include
CXXFLAGS = -march=armv7-a -mthumb -munaligned-access -mfloat-abi=hard -c

OBJ = bbmain.o bbexec.o bbeval.o bbasmb.o bbdata.o bbccos.o bbccon.o

all: bbcbasic

bbmain.o: bbmain.c BBC.h
	$(CXX) -Wno-attributes $(CXXFLAGS) -O2 -ffast-math -fno-finite-math-only $< -o $@

bbexec.o: bbexec.c BBC.h
	$(CXX) $(CXXFLAGS) -DARMHF -O2 -ffast-math -fno-finite-math-only $< -o $@

bbeval.o: bbeval.c BBC.h
	$(CXX) -Wno-array-bounds $(CXXFLAGS) -O2 -ffast-math -fmath-errno -fno-finite-math-only $< -o $@

bbasmb.o: bbasmb_arm_32.c BBC.h
	$(CXX) $(CXXFLAGS) -Os $< -o $@

bbccos.o: bbccos.c bbccon.h
	$(CXX) -Wno-array-bounds -Wno-unused-result $(CXXFLAGS) -Os $< -o $@

bbccon.o: bbccon.c bbccon.h
	$(CXX) -Wno-array-bounds -Wno-unused-result $(CXXFLAGS) -O2 $< -o $@

bbdata.o: ../../../BBCSDL/src/bbdata_arm_32.s
	as ../../../BBCSDL/src/bbdata_arm_32.s -o bbdata.o

bbcbasic: $(OBJ)
	$(CXX) $(OBJ) -L . -L/usr/lib/ -ldl -lm -lrt -pthread \
	-o bbcbasic -Wl,-s -Wl,-R,'$$ORIGIN'
	cp bbcbasic ../../


================================================
FILE: console/rpi64/makefile
================================================
VPATH = ../../src ../../include ../../../BBCSDL/src ../../../BBCSDL/include
CXX = gcc -Wall -I ../../include -I ../../../BBCSDL/include

OBJ = bbmain.o bbexec.o bbeval.o bbasmb.o bbdata.o bbccos.o bbccon.o

all: bbcbasic

bbmain.o: bbmain.c BBC.h
	$(CXX) -Wno-attributes -c -O2 -ffast-math -fno-finite-math-only $< -o $@

bbexec.o: bbexec.c BBC.h
	$(CXX) -c -O2 -ffast-math -fno-finite-math-only $< -o $@

bbeval.o: bbeval.c BBC.h
	$(CXX) -Wno-array-bounds -c -O2 -ffast-math -fmath-errno -fno-finite-math-only $< -o $@

bbasmb.o: bbasmb_arm_64.c BBC.h
	$(CXX) -c -Os $< -o $@

bbccos.o: bbccos.c bbccon.h
	$(CXX) -Wno-array-bounds -Wno-unused-result -c -Os $< -o $@

bbccon.o: bbccon.c bbccon.h
	$(CXX) -Wno-array-bounds -Wno-unused-result -c -O2 $< -o $@

bbdata.o: ../../../BBCSDL/src/bbdata_arm_64.s
	sed 's/_\([a-z]*\)/\1/g' <../../../BBCSDL/src/bbdata_arm_64.s >bbdata.s
	as bbdata.s -o bbdata.o

bbcbasic: $(OBJ)
	$(CXX) $(OBJ) -L . -L/usr/lib/ -ldl -lm -lrt -pthread \
	-o bbcbasic -Wl,-s -Wl,-R,'$$ORIGIN'
	cp bbcbasic ../../


================================================
FILE: console/win64/makefile
================================================
# Update these paths as necessary to match your installation
VPATH = ../../src ../../include ../../../BBCSDL/src ../../../BBCSDL/include
CXX = gcc -Wall -I ../../include -I ../../../BBCSDL/include

OBJ = bbmain.o bbexec.o bbeval.o bbasmb.o bbdata.o bbccos.o bbccon.o

all: bbcbasic.exe

bbmain.o: bbmain.c BBC.h
	$(CXX) -c -O2 -freg-struct-return -ffast-math -fno-finite-math-only $< -o $@

bbexec.o: bbexec.c BBC.h
	$(CXX) -c -O2 -freg-struct-return -ffast-math -fno-finite-math-only $< -o $@

bbeval.o: bbeval.c BBC.h
	$(CXX) -Wno-array-bounds -c -O2 -freg-struct-return -ffast-math -fmath-errno -fno-finite-math-only $< -o $@

bbasmb.o: bbasmb_x86_64.c BBC.h
	$(CXX) -c -Os $< -o $@

bbccos.o: bbccos.c bbccon.h
	$(CXX) -Wno-array-bounds -c -Os $< -o $@

bbccon.o: bbccon.c bbccon.h
	$(CXX) -Wno-array-bounds -Wno-unused-value -c -Os $< -o $@

bbdata.o: ../../../BBCSDL/src/bbdata_x86_64.nas
	nasm -f win64 -s ../../../BBCSDL/src/bbdata_x86_64.nas -o bbdata.o

bbcbasic.exe: $(OBJ)
	$(CXX) $(OBJ) \
	-o bbcbasic.exe -lmingw32 -lwinmm -Wl,-s -Wl,--export-all-symbols
	copy bbcbasic.exe ..\..\


================================================
FILE: examples/games/.Tables/CrnrSlic.ptb
================================================
xYwxxxh˼˼˼˘Wxwhyghixyx͛viwwxxxxihyyy͊hyyixvhxwxxwvhxhyʬ˼ʼʉzxʫhxxxyvhwwxyyy˻˺ʺʻixxxy˼˼˚yyʬ˼ʬʚʬʼʼ˼˼˼wXwhi˼˼˼ʬ˼ʼʺ˼˼˼gV'wvvufVfWT˫˺fF7guevVVfGT˼˼˼˩˼̼˼˩wV6vfvvgUwWcˬ˼ʬwU7wvvfgFwVT˺˻ˬWwfwwgXvvgVyyyͺ˼˼˼XvgvvvXg