1
0
mirror of https://github.com/RevCurtisP/C02.git synced 2024-11-28 10:51:14 +00:00
C02/work/wrtbase.c02

14 lines
193 B
Plaintext
Raw Normal View History

/* Test WriteBase Directive */
#pragma origin $F100
#pragma rambase $F080
#pragma writebase $F000
char r[7];
char b,d,i;
const char c = 0;
b = d;
for (i=0;i<7;i++) r[i] = r[i] + i;
r[7]=7;