43 lines
938 B
C
43 lines
938 B
C
#include <c64/vic.h>
|
|
#include <c64/rasterirq.h>
|
|
#include <string.h>
|
|
|
|
const char * Text =
|
|
S"LABORUM RERUM QUO. QUASI IN, SEQUI, TENETUR VOLUPTATEM RERUM "
|
|
S"PORRO NON ET MAIORES ALIAS ODIO EST EOS. MAGNAM APERIAM CUM ET "
|
|
S"ESSE TEMPORE ITAQUE TEMPORA VOLUPTAS ET IPSAM IPSAM EARUM. ID "
|
|
S"SUSCIPIT QUIA RERUM REPREHENDERIT ERROR ET UT. DOLOR ID "
|
|
S"CORPORIS, EOS? UNDE VERO ISTE QUIA? EAQUE EAQUE. IN. AUT ID "
|
|
S"EXPEDITA ILLUM MOLESTIAS, ";
|
|
|
|
RIRQCode scroll, bottom;
|
|
|
|
int main(void)
|
|
{
|
|
rirq_init(true);
|
|
|
|
rirq_build(&scroll, 1);
|
|
rirq_write(&scroll, 0, &vic.ctrl2, 0);
|
|
rirq_set(0, 50 + 24 * 8, &scroll);
|
|
|
|
rirq_build(&bottom, 1);
|
|
rirq_write(&bottom, 0, &vic.ctrl2, VIC_CTRL2_CSEL);
|
|
rirq_set(1, 250, &bottom);
|
|
|
|
rirq_sort();
|
|
|
|
rirq_start();
|
|
|
|
int x = 0;
|
|
for(;;)
|
|
{
|
|
rirq_wait();
|
|
rirq_data(&scroll, 0, 7 - (x & 7));
|
|
if ((x & 7) == 0)
|
|
memcpy((char *)0x0400 + 40 * 24, Text + ((x >> 3) & 255), 40);
|
|
x++;
|
|
}
|
|
|
|
return 0;
|
|
}
|