WIDTH på en 806:a

9 posts in thread

• Stefan Frank <5452> · Text 3089 · w8 · inlagg

  1986-03-17 12:47

  Ärende: WIDTH på en 806:a

  Är det någon som vet, eller kan ta reda på, hur en assembler-rutin för WIDTH på en 806:a skulle se ut? Det fungerar tydligen inte med bara med LD (FF54H),Width, som det gör på 802:an.
  • Mikael Lidén <5651> · Text 3092 · w8 · kommentar

    1986-03-17 14:26

    Ärende: WIDTH på en 806:a

    Anta att du vill skriva ut info till en skrivare med bredd större än 80 tkn och samtidigt använder PRINT USING eller TAB() då måste du ändra WIDTH på 802/806 på den filen, men tyvärr finns inte WIDTH på ABC800, och vill man då köra samma program så funkar det inte, (på ABC800 behövs inte width, det funkar ändå) då får man låta bli att använda width men istället leta rätt på den öppnade filens filtabell och ändra filens radbredd där.
    • Stefan Frank <5452> · Text 3093 · w8 · kommentar

      1986-03-17 14:46

      Ärende: WIDTH på en 806:a

      Jag tänkte bara ändra radbredd på skärmen, inte på fil. Då funkar det inte bara att göra LD (FF54H),width. Frågan kvarstår alltså!
      • Mikael Lidén <5651> · Text 3094 · w8 · kommentar

        1986-03-17 15:36

        Ärende: WIDTH på en 806:a

        Här är en allmän Width funktion. 33350 ! * 33351 ! 33352 ! Istället för WIDTH 33353 ! 33354 DEF FNW(Fil,Bredd) LOCAL Filmapadr 33355 ON ERROR GOTO 33365 33356 Filmapadr=65344 33357 WHILE PEEK2(Filmapadr)<>0 33358 Filmapadr=PEEK2(Filmapadr) 33359 WHILE PEEK(Filmapadr+2)=Fil AND (PEEK(Filmapadr+3) AND 1)=1 33360 POKE Filmapadr+8,Bredd 33361 RETURN 0 33362 WEND 33363 WEND 33364 E9=32 : RETURN E9 33365 E9=ERRCODE : RETURN E9 33366 FNEND Hoppas den kan vara till någon hjälp. Den borde fungera på skärmen via fil Nr 0.
        • Stefan Frank <5452> · Text 3095 · w8 · kommentar

          1986-03-17 16:47

          Ärende: WIDTH på en 806:a

          Det programmet gör är ju att det lägger ner "width" på adress FF54H (för skärm alltså), och det fungerar tydligen INTE. Jag har ingen 806:a själv men det har påpekats att TED's skärmbredds-byte har fungerat lite tveksamt på 806:an. I TED gör jag alltså LD (FF54H),40/80, vilket INTE fungerar på 806 (men det funkar på 802, för där görs väl WIDTH med hjälp av hårdvaran).
          • Mikael Lidén <5651> · Text 3102 · w8 · kommentar

            1986-03-17 23:38

            Ärende: WIDTH på en 806:a

            Skärmbredds byte görs med hårdvara på både 802/806. Du skriver ut text via skärmens drivrutiner i TED dvs CALL 11, eller ?
            • Stefan Frank <5452> · Text 3104 · w8 · kommentar

              1986-03-18 09:57

              Ärende: WIDTH på en 806:a

              Jag använder både CALL 11 och direkt adresserat i bilminnet. Det är kanske det som spökar? Om man har 80-teckens mode ligger bilminnet på 30720-32639 (alla adresser kan användas), medan när 40-teckens mode används används samma adresser men bara varannan adress visas på skärmen. 80-teckens mode: POKE 30720,65,66,67 ! Skriver ABC högst upp till höger 40-teckens mode: POKE 30720,65,x,66,x,67 ! Skriver också ABC högts upp till höger (x visas aldrig på skärmen, och kan anta vilket värde som hälst) Funkar inte detta på 806:an. Det går fint på min 802:a i alla fall!
              • Mikael Lidén <5651> · Text 3106 · w8 · kommentar

                1986-03-18 11:08

                Ärende: WIDTH på en 806:a

                Om du använder egna drivrutiner, så använd de konsekvent, och skifta inställning med I/O kommandon, istället, hur man gör se Service manualerna för 800/802/806, vilka kan beställas från Luxor Motala.
              • Kristoffer Eriksson <5357> · Text 3114 · w8 · kommentar

                1986-03-18 22:39

                Ärende: WIDTH på en 806:a

                Valet av 40 eller 80 tecken på ABC806 görs inte alls med samma elektroniskt styrda "switch" som på 802:an. I stället finns det ett attributminne som för varje enskilt tecken styr om det ska visas med dubbel bredd eller inte, plus en massa annat. Tecknen lagras dock på varannan adress som i 802:an. Det är normalt CALL 11-rutinen som utifrån aktuell radbredd ser till att rätt attribut hamnar i attributminnet för de tecken som skrivs ut. Ändrar man radlängden så slår inte hela bildskärmen om omedel- bart som på 802, utan bara det som skrivs efter ändringen påverkas. Är det verkligen nödvändigt att skriva direkt i bildminnet? När man kopierar områden inom bildskärmen (scroll t ex) går det dock bra med LDIR o liknande, eftersom attributminne är så smart konstruerat att det kopierar sig självt samtidigt som man kopierar bildminnet. Attributminnet för ett tecken sätts genom att göra OUT 53,Attribut innan man POKE-ar in tecknet i bildminnet. För att få dubbel bredd ska förstatecknet ha attribut 255, och nästa tecken (ska vara samma tecken, inte vilket som helst) ska ha de allmäna attribut som ska visas på hela dubbelbreddstecknet, t ex 7 för vit text, svart bakgrund, inget blink och ingen understrykning. Attributet för ett tecken kan avläsas genom att PEEK-a tecknet och sedan göra Attribut=INP(53).