1
0
mirror of https://github.com/RevCurtisP/C02.git synced 2024-10-31 10:14:09 +00:00
C02/work/wrtbase.c02
2018-08-16 16:26:44 -04:00

14 lines
193 B
Plaintext

/* 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;