Blinking CPC cursor

[Devilmarkus]

Let your cursor blink:

Code Select Expand

10 PRINT CHR$(28);CHR$(2);CHR$(1);CHR$(1);CHR$(28);CHR$(3);CHR$(1);CHR$(24);CHR$(14);CHR$(2)

[Gryzor]

Hey, really nice! A bit fast, but nice looking. I've wondered in the past whether something like this (or an underscore cursor) could be implemented in, say, FW3 or something...

[Devilmarkus]

You can change it's blinking speed by changing SPEED INK 20,20 for example...

[Gryzor]

Let's wait for FW3.15 to incorporate this?

[SyX]

Let's wait for FW3.15 to incorporate this?

It's not so simple that it could look (Markus code is INK 2,1,1:INK 3,1,24:PAPER 2), because the firmware is not drawing a char.

In reality the cursor is made by XORing $FF over the data in screen and using a ram variable for toggle between draw/undraw cursor and you need to consider how this change affect to the rest of CPC text editor code.

[Gryzor]

Oh yes, I wasn't meaning it's as simple as incorporating a few BASIC commands into it...