This example shows how to copy data from / to an expansion bank.
source
compile
sandbox
issues?
back to examples
PROCEDURE example ON COCO3, C64REU IF BANK COUNT = 0 THEN PRINT "Sorry, this target " PRINT " does not have any memory bank" ELSE CLS VAR x AS WORD = 12345 VAR y AS WORD = 54321 PRINT "x = ";x;" y = ";y BANK WRITE ( BANK COUNT - 1 ) FROM VARPTR(x) TO $0100 SIZE 2 BANK WRITE ( BANK COUNT - 1 ) FROM VARPTR(y) TO $0200 SIZE 2 BANK READ ( BANK COUNT - 1 ) FROM $0200 TO VARPTR(x) SIZE 2 BANK READ ( BANK COUNT - 1 ) FROM $0100 TO VARPTR(y) SIZE 2 PRINT "x = ";x;" y = ";y ENDIF END PROCEDURE example[] ON COCO3, C64REU
The instructions here refer to compiling the example from the command line. For Microsoft Windows
users we suggest using UGBASIC-IDE, which allows
you to download and compile each single example with just one click.
Are instructions for your specific home computer / console missing? First of all, check if your computer
is supported by clicking here. If so, since ugBASIC is a language which does not provide abstractions, it is possible
that this example will not work on your target. If you think this is an issue, please click here.
In order to compile the example, type this command on the command line:
Linux
ugbc.c64reu -O d64 -o expansion_bank_03.d64 expansion_bank_03.bas
Windows
ugbc.c64reu.exe -O d64 -o expansion_bank_03.d64 expansion_bank_03.bas
For Microsoft Windows users we suggest using UGBASIC-IDE, which allows
you to download and compile this example with just one click.
In order to compile the example, type this command on the command line:
Linux
ugbc.coco3 -O bin -o expansion_bank_03.bin expansion_bank_03.bas
Windows
ugbc.coco3.exe -O bin -o expansion_bank_03.bin expansion_bank_03.bas
For Microsoft Windows users we suggest using UGBASIC-IDE, which allows
you to download and compile this example with just one click.
If you have found a problem trying to run this example, if you think there is a bug or, more
simply, you would like it to be improved, open an issue for this example on GitHub.
Thank you!
open an issue
BACK TO EXAMPLES