Hardware > Hardware (Classic 16-/32-Bit)

ATW800/2 User thread

<< < (19/20) > >>

Idek:
This is an automated message from Idek's AI: Idek is enjoying his motorcycle and will address this issue IF he ever wants to return from his trip.  8)
--- Zitat von: Count am Mo 09.06.2025, 19:23:18 ---@Idek: Ich habe einen Fehler in der VT52-Emulation von XVDI gefunden. Die Sequenz "Delete line" (<ESC>M) funktioniert nicht richtig. Scheinbar entfernt sie die Zeile nicht vollständig, sondern löscht nur den Inhalt. Hier ein Beispielprogramm, das in der ersten Zeile eine Überschrift darstellt, darunter sollen Zahlen scrollen. Das Programm prüft, ob sich der Cursor in der letzten Zeile befindet und entfernt dann die Zeile unter der Überschrift, so dass diese immer sichtbar bleibt. Das Programm kann mit Tastendruck beendet werden.

--- Code: ---#include <mint/linea.h>
#include <osbind.h>
#include <vt52.h>
#include <string.h>


static void outs(const char* s)
{
    while (*s != '\0') {
        Bconout(_CON, *s);
        ++s;
    }
}

static void gotoxy(int x, int y)
{
    char buf[5];

    buf[0] = '\033';
    buf[1] = 'Y';
    buf[2] = ' ' + y;
    buf[3] = ' ' + x;
    buf[4] = '\0';

    outs(buf);
}

int main()
{
    int zahl = 0;

    linea0();

    outs(CLEAR_HOME); /* <ESC>E */
    outs(REV_ON "vv Scroll-Bereich vv" DEL_EOL REV_OFF "\r\n" C_SAVE); /* <ESC>p...<ESC>K<ESC>q...<ESC>j */

    do {
        char str[200];
        char* strptr = str;
        int temp;

        temp = ++zahl;
        do {
            *strptr++ = '0' + (temp % 10);
            temp /= 10;
        } while (temp > 0);

        *strptr = '\0';
        strrev(str);

        if (V_CUR_CY == V_CEL_MY) {
            /**
             * Letzte Zeile erreicht:
             * Cursorposition sichern, in die zweite Zeile springen,
             * diese Zeile löschen, Cursorposition wiederherstellen
             * und eine Zeile nach oben gehen
             */
            outs(C_SAVE); /* <ESC>j */
            gotoxy(0, 1);
            outs(DEL_LINE C_RESTORE C_UP);   /* <ESC>M<ESC>k<ESC>A */
        }

        outs(str);
        outs("\r\n");
    } while (!Bconstat(_CON));

    while (Bconstat(_CON)) Bconin(_CON);

    return 0;
}
--- Ende Code ---

--- Ende Zitat ---

Lukas Frank:
ATW800/2 VME in einem Atari Mega STE mit MagnumSTE (Ram total 10MB) mit Lightning VME USB Erweiterung und original Emagic Logic 2.5 ...

... Cubase Score

dbsys:

--- Zitat von: Lukas Frank am Do 12.06.2025, 19:53:27 ---ATW800/2 VME in einem Atari Mega STE mit MagnumSTE (Ram total 10MB) mit Lightning VME USB Erweiterung und original Emagic Logic 2.5 ...

... Cubase Score

--- Ende Zitat ---

In welcher Auflösung?

Lukas Frank:
1920x1080  / 256 Farben

dbsys:

--- Zitat von: Lukas Frank am Do 12.06.2025, 21:08:00 ---1920x1080  / 256 Farben

--- Ende Zitat ---

Tolle Sache!

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete