6502/kickc
1
0
Fork 0
mirror of https://gitlab.com/camelot/kickc.git synced 2025-02-09 03:30:40 +00:00
Code Issues Projects Releases Wiki Activity

Coding CHARGEN tester

Browse Source
This commit is contained in:
Jesper Gravgaard 2018-03-22 18:34:04 +01:00
parent cfd0e836ce
commit 981d925a4d
4 changed files with 90 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
src/main/java/dk/camelot64/kickc/fragment/asm/vbuaa=vbuaa_rol_3.asm Normal file
View File

@ -0,0 +1,3 @@
asl
asl
asl

5
src/test/java/dk/camelot64/kickc/test/TestPrograms.java
View File

@ -45,6 +45,11 @@ public class TestPrograms {
AsmFragmentTemplateUsages.logUsages(log, false, false, false, false, false, false);
}
@Test
public void testChargenAnalysis() throws IOException, URISyntaxException {
compileAndCompare("chargen-analysis");
}
@Test
public void testKeyboardSpace() throws IOException, URISyntaxException {
compileAndCompare("test-keyboard-space");

80
src/test/java/dk/camelot64/kickc/test/kc/chargen-analysis.kc Normal file
View File

@ -0,0 +1,80 @@
// Allows analysis of the CHARGEN ROM font
import "c64.kc"
import "multiply.kc"
import "keyboard.kc"
byte* SCREEN = $400;
void main() {
// Clear screen
for( byte* sc=SCREEN;sc<SCREEN+1000;sc++) *sc = ' ';
// Plot 4 initial analysis chars
print_str_at("f1@", SCREEN+1);
print_str_at("f3@", SCREEN+1+10);
print_str_at("f5@", SCREEN+1+20);
print_str_at("f7@", SCREEN+1+30);
for(byte i : 0..3 ) {
plot_chargen(i, $20);
}
byte cur_idx = 0;
do{
// Set current index based on F-keys pressed
if(keyboard_key_pressed(KEY_F1)!=0) {
cur_idx = 0;
}
if(keyboard_key_pressed(KEY_F3)!=0) {
cur_idx = 1;
}
if(keyboard_key_pressed(KEY_F5)!=0) {
cur_idx = 2;
}
if(keyboard_key_pressed(KEY_F7)!=0) {
cur_idx = 3;
}
// Check for key presses
for( byte ch : 0..$3f) {
byte pressed = 0;
byte key = keyboard_get_keycode(ch);
if(key!=$3f) {
pressed = keyboard_key_pressed(key);
}
if(pressed!=0) {
plot_chargen(cur_idx, ch);
}
}
} while(true);
}
// Print a string at a specific screen position
void print_str_at(byte* str, byte* at) {
while(*str!='@') {
*(at++) = *(str++);
}
}
// Plot 8x8
void plot_chargen(byte pos, byte ch) {
asm { sei }
byte* chargen = CHARGEN+(word)ch<<3;
*PROCPORT = $32;
byte* sc = SCREEN+40+1+mul8u(pos, 10);
for(byte y:0..7) {
byte bits = chargen[y];
for(byte x:0..7) {
byte c = '.';
if((bits & $80) != 0) {
c = '*';
}
*sc = c;
sc++;
bits = bits<<1;
}
sc = sc+32;
}
*PROCPORT = $37;
asm { cli }
}

4
src/test/java/dk/camelot64/kickc/test/kc/keyboard.kc
View File

@ -25,9 +25,9 @@ const byte KEY_DEL = $00;
const byte KEY_RETURN = $01;
const byte KEY_CRSR_RIGHT = $02;
const byte KEY_F7 = $03;
const byte KEY_F5 = $04;
const byte KEY_F1 = $04;
const byte KEY_F3 = $05;
const byte KEY_F1 = $06;
const byte KEY_F5 = $06;
const byte KEY_CRSR_DOWN = $07;
const byte KEY_3 = $08;
const byte KEY_W = $09;