mirror of
https://github.com/irmen/prog8.git
synced 2024-12-25 23:29:55 +00:00
780 lines
34 KiB
ReStructuredText
780 lines
34 KiB
ReStructuredText
===============
|
|
Library modules
|
|
===============
|
|
|
|
The compiler provides several "built-in" library modules with useful subroutine and variables.
|
|
|
|
Some of these may be specific for a certain compilation target, or work slightly different,
|
|
but some effort is put into making them available across compilation targets.
|
|
|
|
This means that as long as your program is only using the subroutines from these
|
|
libraries and not using hardware- and/or system dependent code, and isn't hardcoding certain
|
|
assumptions like the screen size, the exact same source program can
|
|
be compiled for multiple different target platforms. Many of the example programs that come
|
|
with Prog8 are written like this.
|
|
|
|
You can ``%import`` and use these modules explicitly, but the compiler may also import one or more
|
|
of these library modules automatically as required.
|
|
|
|
.. note::
|
|
For full details on what is available in the libraries, please study their source code here:
|
|
https://github.com/irmen/prog8/tree/master/compiler/res/prog8lib
|
|
|
|
.. caution::
|
|
The resulting compiled binary program *only works on the target machine it was compiled for*.
|
|
You must recompile the program for every target you want to run it on.
|
|
|
|
.. note::
|
|
Several algorithms and math routines in Prog8's assembly library files are adapted from
|
|
code publicly available on https://www.codebase64.org/
|
|
|
|
|
|
Low-fi variable and subroutine definitions in all available library modules
|
|
---------------------------------------------------------------------------
|
|
|
|
These are auto generated and contain no documentation, but provide a view into what's available.
|
|
Grouped per compilation target.
|
|
|
|
* `atari <_static/symboldumps/skeletons-atari.txt>`_
|
|
* `c64 <_static/symboldumps/skeletons-c64.txt>`_
|
|
* `c128 <_static/symboldumps/skeletons-c128.txt>`_
|
|
* `cx16 <_static/symboldumps/skeletons-cx16.txt>`_
|
|
* `pet32 <_static/symboldumps/skeletons-pet32.txt>`_
|
|
* `virtual <_static/symboldumps/skeletons-virtual.txt>`_
|
|
|
|
|
|
syslib
|
|
------
|
|
The "system library" for your target machine. It contains many system-specific definitions such
|
|
as ROM/Kernal subroutine definitions, memory location constants, and utility subroutines.
|
|
|
|
|
|
Many of these definitions overlap for the C64 and Commander X16 targets so it is still possible
|
|
to write programs that work on both targets without modifications.
|
|
|
|
This module is usually imported automatically and can provide definitions in the ``sys``, ``cbm``, ``c64``, ``cx16``, ``c128``, ``atari`` blocks
|
|
depending on the chosen compilation target. Read the `sys lib source code <https://github.com/irmen/prog8/tree/master/compiler/res/prog8lib>`_ for the correct compilation target to see exactly what is there.
|
|
|
|
|
|
sys (part of syslib)
|
|
--------------------
|
|
``target``
|
|
A constant ubyte value designating the target machine that the program is compiled for.
|
|
Notice that this is a compile-time constant value and is not determined on the
|
|
system when the program is running.
|
|
The following return values are currently defined:
|
|
|
|
- 8 = Atari 8 bits
|
|
- 16 = Commander X16
|
|
- 64 = Commodore 64
|
|
- 128 = Commodore 128
|
|
- 255 = Virtual machine
|
|
|
|
|
|
``exit (returncode)``
|
|
Immediately stops the program and exits it, with the returncode in the A register.
|
|
Note: custom interrupt handlers remain active unless manually cleared first!
|
|
|
|
``exit2 (resultA, resultX, resultY)``
|
|
Immediately stops the program and exits it, with the result values in the A, X and Y registers.
|
|
Note: custom interrupt handlers remain active unless manually cleared first!
|
|
|
|
``exit3 (resultA, resultX, resultY, carry)``
|
|
Immediately stops the program and exits it, with the result values in the A, X and Y registers, and the carry flag in the status register.
|
|
Note: custom interrupt handlers remain active unless manually cleared first!
|
|
|
|
``memcopy (from, to, numbytes)``
|
|
Efficiently copy a number of bytes from a memory location to another.
|
|
*Warning:* can only copy *non-overlapping* memory areas correctly!
|
|
Because this function imposes some overhead to handle the parameters,
|
|
it is only faster if the number of bytes is larger than a certain threshold.
|
|
Compare the generated code to see if it was beneficial or not.
|
|
The most efficient will often be to write a specialized copy routine in assembly yourself!
|
|
|
|
``memset (address, numbytes, bytevalue)``
|
|
Efficiently set a part of memory to the given (u)byte value.
|
|
But the most efficient will always be to write a specialized fill routine in assembly yourself!
|
|
Note that for clearing the screen, very fast specialized subroutines are
|
|
available in the ``textio`` and ``graphics`` library modules.
|
|
|
|
``memsetw (address, numwords, wordvalue)``
|
|
Efficiently set a part of memory to the given (u)word value.
|
|
But the most efficient will always be to write a specialized fill routine in assembly yourself!
|
|
|
|
``read_flags () -> ubyte``
|
|
Returns the current value of the CPU status register.
|
|
|
|
``set_carry ()``
|
|
Sets the CPU status register Carry flag.
|
|
|
|
``clear_carry ()``
|
|
Clears the CPU status register Carry flag.
|
|
|
|
``set_irqd ()``
|
|
Sets the CPU status register Interrupt Disable flag.
|
|
|
|
``clear_irqd ()``
|
|
Clears the CPU status register Interrupt Disable flag.
|
|
|
|
``irqsafe_set_irqd ()``
|
|
Sets the CPU status register Interrupt Disable flag, in a way that is safe to be used inside a IRQ handler.
|
|
Pair with ``irqsafe_clear_irqd()``.
|
|
|
|
``irqsafe_clear_irqd ()``
|
|
Clears the CPU status register Interrupt Disable flag, in a way that is safe to be used inside a IRQ handler.
|
|
Pair with ``irqsafe_set_irqd()``. Inside an IRQ handler this makes sure it doesn't inadvertently
|
|
clear the irqd status bit, and it can still be used inside normal code as well (where it *does* clear
|
|
the irqd status bit if it was cleared before entering).
|
|
|
|
``progend ()``
|
|
Returns the last address of the program in memory + 1. This means: the memory address directly after all the program code and variables,
|
|
including the uninitialized ones ("BSS" variables) and the uninitialized memory blocks reserved by the `memory()` function.
|
|
Can be used to load dynamic data after the program, instead of hardcoding something.
|
|
|
|
``wait (uword jiffies)``
|
|
wait approximately the given number of jiffies (1/60th seconds)
|
|
Note: the regular system irq handler has run for this to work as it depends on the system jiffy clock.
|
|
If this is is not possible (for instance because your program is running its own irq handler logic *and* no longer calls
|
|
the kernal's handler routine), you'll have to write your own wait routine instead.
|
|
|
|
``waitvsync ()``
|
|
busy wait till the next vsync has occurred (approximately), without depending on custom irq handling.
|
|
can be used to avoid screen flicker/tearing when updating screen contents.
|
|
note: a more accurate way to wait for vsync is to set up a vsync irq handler instead.
|
|
note for cx16: the regular system irq handler has to run for this to work (this is not required on C64 and C128)
|
|
|
|
``waitrastborder ()`` (c64/c128 targets only)
|
|
busy wait till the raster position has reached the bottom screen border (approximately)
|
|
can be used to avoid screen flicker/tearing when updating screen contents.
|
|
note: a more accurate way to do this is by using a raster irq handler instead.
|
|
|
|
``reset_system ()``
|
|
Soft-reset the system back to initial power-on BASIC prompt.
|
|
(called automatically by Prog8 when the main subroutine returns and the program is not using basicsafe zeropage option)
|
|
|
|
``disable_caseswitch()`` and ``enable_caseswitch()``
|
|
Disable or enable the ability to switch character set case using a keyboard combination.
|
|
|
|
``save_prog8_internals()`` and ``restore_prog8_internals()``
|
|
Normally not used in user code, the compiler utilizes these for the internal interrupt logic.
|
|
It stores and restores the values of the internal prog8 variables.
|
|
This allows other code to run that might clobber these values temporarily.
|
|
|
|
``push (value)``
|
|
pushes a byte value on the CPU hardware stack. Low-level function that should normally not be used.
|
|
|
|
``pushw (value)``
|
|
pushes a 16-bit word value on the CPU hardware stack. Low-level function that should normally not be used.
|
|
|
|
``pop ()``
|
|
pops a byte value off the CPU hardware stack and returns it.
|
|
Low-level function that should normally not be used.
|
|
|
|
``popw ()``
|
|
pops a 16-bit word value off the CPU hardware stack and returns it.
|
|
Low-level function that should normally not be used.
|
|
|
|
|
|
conv
|
|
----
|
|
Routines to convert strings to numbers or vice versa.
|
|
|
|
- numbers to strings, in various formats (binary, hex, decimal)
|
|
- strings in decimal, hex and binary format into numbers (bytes, words)
|
|
|
|
Read the `conv source code <https://github.com/irmen/prog8/tree/master/compiler/res/prog8lib/conv.p8>`_
|
|
to see what's in there.
|
|
|
|
|
|
textio (txt.*)
|
|
--------------
|
|
This will probably be the most used library module. It contains a whole lot of routines
|
|
dealing with text-based input and output (to the screen). Such as
|
|
|
|
- printing strings, numbers and booleans
|
|
- reading text input from the user via the keyboard
|
|
- filling or clearing the screen and colors
|
|
- scrolling the text on the screen
|
|
- placing individual characters on the screen
|
|
- convert petscii to screencode characters
|
|
|
|
All routines work with Screencode character encoding, except `print`, `chrout` and `input_chars`,
|
|
these work with PETSCII encoding instead.
|
|
|
|
Read the `textio source code <https://github.com/irmen/prog8/tree/master/compiler/res/prog8lib/cx16/textio.p8>`_
|
|
to see what's in there. (Note: slight variations for different compiler targets)
|
|
|
|
|
|
diskio
|
|
------
|
|
Provides several routines that deal with disk drive I/O, such as:
|
|
|
|
- list files on disk, optionally filtering by a simple pattern with ? and *
|
|
- show disk directory as-is
|
|
- display disk drive status
|
|
- load and save data from and to the disk
|
|
- delete and rename files on the disk
|
|
- send arbitrary CbmDos command to disk drive
|
|
|
|
Commander X16 additions:
|
|
Headerless load and save routines are available (load_raw, save_raw).
|
|
On the Commander X16 it tries to use that machine's fast Kernal loading routines if possible.
|
|
Routines to directly load data into video ram are also present (vload and vload_raw).
|
|
Also contains a helper function to calculate the file size of a loaded file (although that is truncated
|
|
to 16 bits, 64Kb)
|
|
Als contains routines for operating on subdirectories (chdir, mkdir, rmdir), to relabel the disk,
|
|
and to seek in open files.
|
|
|
|
Read the `diskio source code <https://github.com/irmen/prog8/tree/master/compiler/res/prog8lib/cx16/diskio.p8>`_
|
|
to see what's in there. (Note: slight variations for different compiler targets)
|
|
|
|
.. note::
|
|
For simplicity sake, this library is designed to work on a *single* open file
|
|
for reading, and a *single* open file for writing at any time only.
|
|
If you need to load or save to more than one file at a time, you'll have
|
|
to write your own I/O routines (or supplement the ones found here)
|
|
|
|
.. note::
|
|
If you are using the X16 emulator with HostFS, and are experiencing weird behavior with these
|
|
routines, please first try again with an SD-card image instead of HostFs.
|
|
It is possible that there are still small differences between HostFS and actual CBM DOS in the X16 emulator.
|
|
|
|
.. note::
|
|
You can set the active disk drive number so it supports multiple drives,
|
|
but it does not support multiple open files at the same time.
|
|
|
|
.. attention::
|
|
Error handling is peculiar on CBM dos systems (C64, C128, cx16, PET). Read the
|
|
descriptions for the various methods in this library for details and tips.
|
|
|
|
|
|
string
|
|
------
|
|
Provides string manipulation routines.
|
|
|
|
``length (str) -> ubyte length``
|
|
Number of bytes in the string. This value is determined during runtime and counts upto
|
|
the first terminating 0 byte in the string, regardless of the size of the string during compilation time.
|
|
Don't confuse this with ``len`` and ``sizeof``!
|
|
|
|
``left (source, length, target)``
|
|
Copies the left side of the source string of the given length to target string.
|
|
It is assumed the target string buffer is large enough to contain the result.
|
|
Also, you have to make sure yourself that length is smaller or equal to the length of the source string.
|
|
Modifies in-place, doesn't return a value (so can't be used in an expression).
|
|
|
|
``right (source, length, target)``
|
|
Copies the right side of the source string of the given length to target string.
|
|
It is assumed the target string buffer is large enough to contain the result.
|
|
Also, you have to make sure yourself that length is smaller or equal to the length of the source string.
|
|
Modifies in-place, doesn't return a value (so can't be used in an expression).
|
|
|
|
``slice (source, start, length, target)``
|
|
Copies a segment from the source string, starting at the given index,
|
|
and of the given length to target string.
|
|
It is assumed the target string buffer is large enough to contain the result.
|
|
Also, you have to make sure yourself that start and length are within bounds of the strings.
|
|
Modifies in-place, doesn't return a value (so can't be used in an expression).
|
|
|
|
``find (string, char) -> ubyte index + carry bit``
|
|
Locates the first position of the given character in the string, returns carry bit set if found
|
|
and the index in the string. Or 0+carry bit clear if the character was not found.
|
|
You can consider this a safer way of checking if a character occurs
|
|
in a string than using an `in` containment check - because the find routine
|
|
properly stops at the first 0-byte string terminator it encounters.
|
|
Simply call this and only act on the carry status with ``if_cc`` for example.
|
|
Much like the difference between len(str) and length(str).
|
|
|
|
``contains (string, char) -> bool``
|
|
Just returns true if the character is in the given string, or false if it's not.
|
|
For string literals, you can use a containment check expression instead: ``char in "hello world"``.
|
|
|
|
``compare (string1, string2) -> ubyte result``
|
|
Returns -1, 0 or 1 depending on whether string1 sorts before, equal or after string2.
|
|
Note that you can also directly compare strings and string values with each other
|
|
using ``==``, ``<`` etcetera (it will use string.compare for you under water automatically).
|
|
This even works when dealing with uword (pointer) variables when comparing them to a string type.
|
|
|
|
``copy (from, to) -> ubyte length``
|
|
Copy a string to another, overwriting that one. Returns the length of the string that was copied.
|
|
Often you don't have to call this explicitly and can just write ``string1 = string2``
|
|
but this function is useful if you're dealing with addresses for instance.
|
|
|
|
``append (string, suffix) -> ubyte length``
|
|
Appends the suffix string to the other string (make sure the memory buffer is large enough!)
|
|
Returns the length of the combined string.
|
|
|
|
``lower (string)``
|
|
Lowercases the PETSCII-string in place.
|
|
|
|
``upper (string)``
|
|
Uppercases the PETSCII-string in place.
|
|
|
|
``lowerchar (char)``
|
|
Returns lowercased PETSCII character.
|
|
|
|
``upperchar (char)``
|
|
Returns uppercased PETSCII character.
|
|
|
|
``strip (string)``
|
|
Gets rid of whitespace and other non-visible characters at the edges of the string. (destructive)
|
|
|
|
``rstrip (string)``
|
|
Gets rid of whitespace and other non-visible characters at the end of the string. (destructive)
|
|
|
|
``lstrip (string)``
|
|
Gets rid of whitespace and other non-visible characters at the start of the string. (destructive)
|
|
|
|
``lstripped (string) -> str``
|
|
Returns pointer to first non-whitespace and non-visible character at the start of the string (non-destructive lstrip)
|
|
|
|
``trim (string)``
|
|
Gets rid of whitespace characters at the edges of the string. (destructive)
|
|
|
|
``rtrim (string)``
|
|
Gets rid of whitespace characters at the end of the string. (destructive)
|
|
|
|
``ltrim (string)``
|
|
Gets rid of whitespace characters at the start of the string. (destructive)
|
|
|
|
``ltrimmed (string) -> str``
|
|
Returns pointer to first non-whitespace character at the start of the string (non-destructive ltrim)
|
|
|
|
``isdigit (char)``
|
|
Returns boolean if the character is a numerical digit 0-9
|
|
|
|
``islower (char)``, ``isupper (char)``, ``isletter (char)``
|
|
Returns true if the character is a shifted-PETSCII lowercase letter, uppercase letter, or any letter, respectively.
|
|
|
|
``isspace (char)``
|
|
Returns true if the PETSCII character is a whitespace (tab, space, return, and shifted versions)
|
|
|
|
``isprint (char)``
|
|
Returns true if the PETSCII character is a "printable" character (space or any visible symbol)
|
|
|
|
``startswith (string, prefix) -> bool``
|
|
Returns true if string starts with prefix, otherwise false
|
|
|
|
``endswith (string, suffix) -> bool``
|
|
Returns true if string ends with suffix, otherwise false
|
|
|
|
``pattern_match (string, pattern) -> bool`` (not on Virtual target)
|
|
Returns true if the string matches the pattern, false if not.
|
|
'?' in the pattern matches any one character. '*' in the pattern matches any substring.
|
|
|
|
``hash (string) -> ubyte``
|
|
Returns a simple 8 bit hash value for the given string.
|
|
The formula is: hash(-1)=179; clear carry; hash(i) = ROL hash(i-1) XOR string[i]
|
|
(where ROL is the cpu ROL instruction)
|
|
On the English word list in /usr/share/dict/words it seems to have a pretty even distribution.
|
|
|
|
|
|
floats
|
|
------
|
|
|
|
.. note::
|
|
Floating point support is only available on c64, cx16 and virtual targets for now.
|
|
|
|
Provides definitions for the ROM/Kernal subroutines and utility routines dealing with floating
|
|
point variables. This includes ``print_f``, the routine used to print floating point numbers.
|
|
|
|
|
|
``π`` and ``PI``
|
|
float const for the number Pi, 3.141592653589793...
|
|
|
|
``TWOPI``
|
|
float const for the number 2 times Pi
|
|
|
|
``atan (x)``
|
|
Arctangent.
|
|
|
|
``atan2 (y, x)``
|
|
Two-argument arctangent that returns an angle in the correct quadrant
|
|
for the signs of x and y, normalized to the range [0, 2π]
|
|
|
|
``ceil (x)``
|
|
Rounds the floating point up to an integer towards positive infinity.
|
|
|
|
``cos (x)``
|
|
Cosine.
|
|
|
|
``cot (x)``
|
|
Cotangent: 1/tan(x)
|
|
|
|
``csc (x)``
|
|
Cosecant: 1/sin(x)
|
|
|
|
``deg (x)``
|
|
Radians to degrees.
|
|
|
|
``floor (x)``
|
|
Rounds the floating point down to an integer towards minus infinity.
|
|
|
|
``ln (x)``
|
|
Natural logarithm (base e).
|
|
|
|
``log2 (x)``
|
|
Base 2 logarithm.
|
|
|
|
``minf (x, y)``
|
|
returns the smallest of x and y.
|
|
|
|
``maxf (x, y)``
|
|
returns the largest of x and y.
|
|
|
|
``clampf (value, minimum, maximum)``
|
|
returns the value restricted to the given minimum and maximum.
|
|
|
|
``print (x)``
|
|
Prints the floating point number x as a string.
|
|
There's no leading whitespace (unlike cbm BASIC when printing a floating point number)
|
|
|
|
``tostr (x)``
|
|
Converts the floating point number x to a string (returns address of the string buffer)
|
|
There's no leading whitespace.
|
|
|
|
``rad (x)``
|
|
Degrees to radians.
|
|
|
|
``round (x)``
|
|
Rounds the floating point to the closest integer.
|
|
|
|
``sin (x)``
|
|
Sine.
|
|
|
|
``secant (x)``
|
|
Secant: 1/cos(x)
|
|
|
|
``tan (x)``
|
|
Tangent.
|
|
|
|
``rnd ()``
|
|
returns the next random float between 0.0 and 1.0 from the Pseudo RNG sequence.
|
|
|
|
``rndseed (seed)``
|
|
Sets a new seed for the float pseudo-RNG sequence. Use a negative non-zero number as seed value.
|
|
|
|
``parse (stringvalue)``
|
|
Parses the string value as floating point number.
|
|
Warning: this routine may stop working on the Commander X16 when a new ROM version is released,
|
|
because it uses an internal BASIC routine. Then it will require a fix.
|
|
|
|
|
|
graphics
|
|
--------
|
|
Bitmap graphics routines:
|
|
|
|
- clearing the screen
|
|
- drawing individual pixels
|
|
- drawing lines, rectangles, filled rectangles, circles, discs
|
|
|
|
This library is available both on the C64 and the cx16.
|
|
It uses the ROM based graphics routines on the latter, and it is a very small library because of that.
|
|
On the cx16 there's also the ``gfx2`` library if you want more features and different screen modes. See below for that one.
|
|
|
|
Read the `graphics source code <https://github.com/irmen/prog8/tree/master/compiler/res/prog8lib/c64/graphics.p8>`_
|
|
to see what's in there. (Note: slight variations for different compiler targets)
|
|
|
|
|
|
math
|
|
----
|
|
Low-level integer math routines (which you usually don't have to bother with directly, but they are used by the compiler internally).
|
|
Pseudo-Random number generators (byte and word).
|
|
Various 8-bit integer trig functions that use lookup tables to quickly calculate sine and cosines.
|
|
Usually a custom lookup table is the way to go if your application needs these,
|
|
but perhaps the provided ones can be of service too.
|
|
|
|
``log2 (ubyte v)``
|
|
Returns the 2-Log of the byte value v.
|
|
|
|
``log2w (uword v)``
|
|
Returns the 2-Log of the word value v.
|
|
|
|
``rnd ()``
|
|
Returns next random byte 0-255 from the pseudo-RNG sequence.
|
|
|
|
``rndw ()``
|
|
Returns next random word 0-65535 from the pseudo-RNG sequence.
|
|
|
|
``randrange (ubyte n) -> ubyte``
|
|
Returns random byte uniformly distributed from 0 to n-1 (compensates for divisibility bias)
|
|
|
|
``randrangew (uword n) -> uword``
|
|
Returns random word uniformly distributed from 0 to n-1 (compensates for divisibility bias)
|
|
|
|
``rndseed (uword seed1, uword seed2)``
|
|
Sets a new seed for the pseudo-RNG sequence (both rnd and rndw). The seed consists of two words.
|
|
Do not use zeros for the seed!
|
|
|
|
.. hint::
|
|
This is a graph showing the various ranges of values mentioned in the integer sine and cosine
|
|
routines that follow below. (Note that the x input value never corresponds to an exact *degree*
|
|
around the circle 0..359 as that exceeds a byte value. There's double-degrees though; 0...179)
|
|
Only the sine function is shown, but the cosine function follows the same pattern.
|
|
|
|
.. image:: sinegraph.svg
|
|
|
|
``sin8u (x)``
|
|
Fast 8-bit ubyte sine.
|
|
x = angle 0...2π scaled as 0...255. Result is unsigned, scaled as 0...255
|
|
|
|
``sin8 (x)``
|
|
Fast 8-bit byte sine.
|
|
x = angle 0...2π scaled as 0...255. Result is signed, scaled as -127...127
|
|
|
|
``sinr8u (x)``
|
|
Fast 8-bit ubyte sine.
|
|
x = angle 0...2π scaled as 0...179 (so each value increment is a 2° step). Result is unsigned, scaled as 0...255.
|
|
Input values 180...255 lie outside of the valid input interval and will yield a garbage result!
|
|
|
|
``sinr8 (x)``
|
|
Fast 8-bit byte sine.
|
|
x = angle 0...2π scaled as 0...179 (so each value increment is a 2° step). Result is signed, scaled as -127...127.
|
|
Input values 180...255 lie outside of the valid input interval and will yield a garbage result!
|
|
|
|
``cos8u (x)``
|
|
Fast 8-bit ubyte cosine.
|
|
x = angle 0...2π scaled as 0...255. Result is unsigned, scaled as 0...255
|
|
|
|
``cos8 (x)``
|
|
Fast 8-bit byte cosine.
|
|
x = angle 0...2π scaled as 0...255. Result is signed, scaled as -127...127
|
|
|
|
``cosr8u (x)``
|
|
Fast 8-bit ubyte cosine.
|
|
x = angle 0...2π scaled as 0...179 (so each value increment is a 2° step). Result is unsigned, scaled as 0...255.
|
|
Input values 180...255 lie outside of the valid input interval and will yield a garbage result!
|
|
|
|
``cosr8 (x)``
|
|
Fast 8-bit byte cosine.
|
|
x = of angle 0...2π scaled as 0...179 (so each value increment is a 2° step). Result is signed, scaled as -127...127.
|
|
Input values 180...255 lie outside of the valid input interval and will yield a garbage result!
|
|
|
|
``atan2 (ubyte x1, ubyte y1, ubyte x2, ubyte y2)``
|
|
Fast arctan routine that uses more memory because of large lookup tables.
|
|
Calculate the angle, in a 256-degree circle, between two points in the positive quadrant.
|
|
|
|
``direction (ubyte x1, ubyte y1, ubyte x2, ubyte y2)``
|
|
From a pair of positive coordinates, calculate discrete direction between 0 and 23.
|
|
This is a heavily optimized routine (small and fast).
|
|
|
|
``direction_sc (byte x1, byte y1, byte x2, byte y2)``
|
|
From a pair of signed coordinates around the origin, calculate discrete direction between 0 and 23.
|
|
This is a heavily optimized routine (small and fast).
|
|
|
|
``direction_qd (ubyte quadrant, ubyte xdelta, ubyte ydelta)``
|
|
If you already know the quadrant and x/y deltas, calculate discrete direction between 0 and 23.
|
|
This is a heavily optimized routine (small and fast).
|
|
|
|
``diff (ubyte b1, ubyte b2) -> ubyte``
|
|
Returns the absolute difference, or distance, between the two byte values.
|
|
(This routine is more efficient than doing a compare and a subtract separately, or using abs)
|
|
|
|
``diffw (uword w1, uword w2) -> uword``
|
|
Returns the absolute difference, or distance, between the two word values.
|
|
(This routine is more efficient than doing a compare and a subtract separately, or using abs)
|
|
|
|
``mul16_last_upper () -> uword``
|
|
Fetches the upper 16 bits of the previous 16*16 bit multiplication.
|
|
To avoid corrupting the result, it is best performed immediately after the multiplication.
|
|
Note: It is only for the regular 6502 cpu multiplication routine.
|
|
It does not work for the verafx multiplication routines on the Commander X16!
|
|
These have a different way to obtain the upper 16 bits of the result: just read cx16.r0.
|
|
|
|
``crc16 (uword data, uword length) -> uword``
|
|
Returns a CRC-16 (XMODEM) checksum over the given data buffer.
|
|
Note: on the Commander X16, there is a CRC-16 routine in the kernal: cx16.memory_crc().
|
|
That one is faster, but yields different results. It is unclear to me what flavour of crc it is calculating.
|
|
|
|
``crc16_start() / crc16_update(ubyte value) / crc16_end() -> uword``
|
|
"streaming" crc16 calculation routines, when the data doesn't fit in a single buffer.
|
|
Tracks the crc16 checksum in cx16.r15! If your code uses that, it must save/restore it before calling this routine!
|
|
Call the start() routine first, feed it bytes with the update() routine, finalize with calling the end() routine which returns the crc16 value.
|
|
|
|
``crc32 (uword data, uword length)``
|
|
Calculates a CRC-32 (POSIX) checksum over the given data buffer.
|
|
The 32 bits result is stored in cx16.r14 (low word) and cx16.r15 (high word).
|
|
|
|
``crc32_start() / crc32_update(ubyte value) / crc32_end()``
|
|
"streaming" crc32 calculation routines, when the data doesn't fit in a single buffer.
|
|
Tracks the crc32 checksum in cx16.r14 and cx16.r15! If your code uses these, it must save/restore them before calling this routine!
|
|
Call the start() routine first, feed it bytes with the update() routine, finalize with calling the end() routine.
|
|
The 32 bits result is stored in cx16.r14 (low word) and cx16.r15 (high word).
|
|
|
|
cx16logo
|
|
--------
|
|
Just a fun module that contains the Commander X16 logo in PETSCII graphics
|
|
and allows you to print it anywhere on the screen.
|
|
|
|
``logo ()``
|
|
prints the logo at the current cursor position
|
|
``logo_at (column, row)``
|
|
printss the logo at the given position
|
|
|
|
|
|
prog8_lib
|
|
---------
|
|
Low-level language support. You should not normally have to bother with this directly.
|
|
The compiler needs it for various built-in system routines.
|
|
|
|
|
|
cx16
|
|
----
|
|
This is available on *all targets*, it is always imported as part of syslib.
|
|
On the Commander X16 this module contains a *whole bunch* of things specific to that machine.
|
|
It's way too much to include here, you have to study the
|
|
`syslib source code <https://github.com/irmen/prog8/tree/master/compiler/res/prog8lib/cx16/syslib.p8>`_
|
|
to see what is there.
|
|
|
|
On the other targets, it only contains the definition of the 16 memory mapped virtual registers
|
|
(cx16.r0 - cx16.r15) and the following utility routines:
|
|
|
|
``save_virtual_registers()``
|
|
save the values of all 16 virtual registers r0 - r15 in a buffer. Might be useful in an IRQ handler to avoid clobbering them.
|
|
|
|
``restore_virtual_registers()``
|
|
restore the values of all 16 virtual registers r0 - r15 from the buffer. Might be useful in an IRQ handler to avoid clobbering them.
|
|
|
|
``cpu_is_65816()``
|
|
Returns true if the CPU in the computer is a 65816, false otherwise (6502 cpu).
|
|
Note that Prog8 itself has no support yet for this CPU other than detecting its presence.
|
|
|
|
``reset_system ()``
|
|
Soft-reset the system back to initial power-on BASIC prompt. (same as the routine in sys)
|
|
|
|
``poweroff_system ()``
|
|
Powers down the computer.
|
|
|
|
``set_led_brightness (ubyte brightness)``
|
|
Sets the brightness of the activity led on the computer.
|
|
|
|
|
|
bmx (cx16 only)
|
|
----------------
|
|
Routines to load and save "BMX" files, the CommanderX16 bitmap file format.
|
|
Specification available here: https://cx16forum.com/forum/viewtopic.php?t=6945
|
|
Only *uncompressed* bitmaps are supported in this library for now.
|
|
|
|
The routines are designed to be fast and bulk load/save the data directly into or from vram,
|
|
without the need to buffer something in main memory.
|
|
|
|
For details about what routines are available, have a look at
|
|
the `bmx source code <https://github.com/irmen/prog8/tree/master/compiler/res/prog8lib/cx16/bmx.p8>`_ .
|
|
There's also the "showbmx" example to look at.
|
|
|
|
|
|
emudbg (cx16 only)
|
|
-------------------
|
|
X16Emu Emulator debug routines, for Cx16 only.
|
|
Allows you to interface with the emulator's debug routines/registers.
|
|
There's stuff like ``is_emulator`` to detect if running in the emulator,
|
|
and ``console_write`` to write a (iso) string to the emulator's console (stdout) etc.
|
|
|
|
Read the `emudbg source code <https://github.com/irmen/prog8/tree/master/compiler/res/prog8lib/cx16/emudbg.p8>`_
|
|
to see what's in there.
|
|
Information about the exposed debug registers is in the `emulator's documentation <https://github.com/X16Community/x16-emulator#debug-io-registers>`_.
|
|
|
|
|
|
monogfx (cx16 and virtual)
|
|
---------------------------
|
|
Full-screen lores or hires monochrome bitmap graphics routines, available on the Cx16 machine only.
|
|
Same interface as gfx2, but is optimized for monochrome (1 bpp) screens.
|
|
|
|
- lores 320*240 or hires 640*480 bitmap mode, monochrome
|
|
- clearing screen, switching screen mode, also back to text mode
|
|
- drawing and reading individual pixels
|
|
- drawing lines, rectangles, filled rectangles, circles, discs
|
|
- flood fill
|
|
- drawing text inside the bitmap
|
|
- can draw using a stipple pattern (alternate black/white pixels) and in invert mode (toggle pixels)
|
|
|
|
Read the `monogfx source code <https://github.com/irmen/prog8/tree/master/compiler/res/prog8lib/cx16/monogfx.p8>`_
|
|
to see what's in there.
|
|
|
|
|
|
gfx2 (cx16 only)
|
|
-----------------
|
|
Full-screen multicolor bitmap graphics routines, available on the Cx16 machine only.
|
|
Same interface as monogfx, but for color screens. For 1 bpp monochrome screens, use monogfx.
|
|
|
|
- multiple full-screen bitmap color resolutions
|
|
- clearing screen, switching screen mode, also back to text mode
|
|
- drawing and reading individual pixels
|
|
- drawing lines, rectangles, filled rectangles, circles, discs
|
|
- flood fill
|
|
- drawing text inside the bitmap
|
|
|
|
Read the `gfx2 source code <https://github.com/irmen/prog8/tree/master/compiler/res/prog8lib/cx16/gfx2.p8>`_
|
|
to see what's in there.
|
|
|
|
|
|
palette (cx16 only)
|
|
--------------------
|
|
Available for the Cx16 target. Various routines to set the display color palette.
|
|
There are also a few better looking Commodore 64 color palettes available here,
|
|
because the Commander X16's default colors for this (the first 16 colors) are too saturated
|
|
and are quite different than how they looked on a VIC-II chip in a C64.
|
|
|
|
Read the `palette source code <https://github.com/irmen/prog8/tree/master/compiler/res/prog8lib/cx16/palette.p8>`_
|
|
to see what's in there.
|
|
|
|
|
|
psg (cx16 only)
|
|
----------------
|
|
Available for the Cx16 target.
|
|
Contains a simple abstraction for the Vera's PSG (programmable sound generator) to play simple waveforms.
|
|
It includes an interrupt routine to handle simple Attack/Release envelopes as well.
|
|
See the examples/cx16/bdmusic.p8 program for ideas how to use it.
|
|
|
|
Read the `psg source code <https://github.com/irmen/prog8/tree/master/compiler/res/prog8lib/cx16/psg.p8>`_
|
|
to see what's in there.
|
|
|
|
|
|
sprites (cx16 only)
|
|
--------------------
|
|
Available for the Cx16 target. Simple routines to manipulate sprites.
|
|
They're not written for high performance, but for simplicity.
|
|
That's why they control one sprite at a time. The exception is the ``pos_batch`` routine,
|
|
which is quite efficient to update sprite positions of multiple sprites in one go.
|
|
See the examples/cx16/sprites/dragon.p8 and dragons.p8 programs for ideas how to use it.
|
|
|
|
Read the `sprites source code <https://github.com/irmen/prog8/tree/master/compiler/res/prog8lib/cx16/sprites.p8>`_
|
|
to see what's in there.
|
|
|
|
|
|
verafx (cx16 only)
|
|
-------------------
|
|
Available for the Cx16 target.
|
|
Experimental routines that use the new Vera FX logic (hopefully coming in the Vera in new X16 boards,
|
|
the emulators already support it).
|
|
|
|
``available``
|
|
Returns true if Vera FX is available, false if not (that would be an older Vera chip)
|
|
|
|
``mult`` , ``muls``
|
|
The hardware 16*16 multiplier is exposed via ``mult`` and ``muls`` routines (unsigned and signed respectively).
|
|
They are about 4 to 5 times faster as the default 6502 cpu routine for word multiplication.
|
|
But they depend on some Vera manipulation and 4 bytes in vram just below the PSG registers for storage.
|
|
Note: there is a block level %option "verafxmuls" that automatically replaces all word multiplications in that block
|
|
by calls to verafx.muls/mult, but be careful with it because it may interfere with other Vera operations or IRQs.
|
|
|
|
Note: the lower 16 bits of the 32 bits result is returned as the normal subroutine's returnvalue,
|
|
but the upper 16 bits is returned in cx16.r0 so you can still access those separately.
|
|
|
|
``clear``
|
|
Very quickly clear a piece of vram to a given byte value (it writes 4 bytes at a time).
|
|
The routine is around 3 times faster as a regular unrolled loop to clear vram.
|
|
|
|
``copy``
|
|
Very quickly copy a portion of the video memory to somewhere else in vram (4 bytes at a time)
|
|
Sometimes this is also called "blitting".
|
|
This routine is about 50% faster as a regular byte-by-byte copy.
|
|
|
|
``transparency``
|
|
Set transparent write mode for VeraFX cached writes and also for normal writes to DATA0/DATA.
|
|
If enabled, pixels with value 0 do not modify VRAM when written (so they are "transparent")
|
|
|
|
Read the `verafx source code <https://github.com/irmen/prog8/tree/master/compiler/res/prog8lib/cx16/verafx.p8>`_
|
|
to see what's in there.
|
|
|