Retro Preservation Workspace

Monitorn

Browse archived Monitorn möten and the ABC80 mailing list, with full-text and text-number search.

← Back to ABC Tools

Meetings · ABC800 · Thread

Snabbt terminal program i maskinkod!

25 posts in thread

Lazze Hermansson <5449> · Text 133 · w6 · inlagg

1985-01-13 01:40

Ärende: Snabbt terminal program i maskinkod!

Det program jag söker efter skall kunna senda och ta emot data på 2*1200 baud ,Basicen är för slöööö. Man kan inte utnytja hela 1200 baud med basicprogram. Jag skall ha programet mellan en terminal och datorn via telemodem. Överföring av textfiler och siffror kommer i huvudsak att vara aktuellt. Jag tackar på förhand för eventuella tips på program: m.v.h. /Lazze <5449>
- Lazze Hermansson <5449> · Text 134 · w6 · kommentar
  
  1985-01-13 01:48
  
  Ärende: Snabbt terminal program i maskinkod!
  
  Tilläggas kan att jag har en abc806:a och ska köra mot en abc802:a. Detta skall vara möjligt enligt uppgifter från någon. Slut på snabbt program... m.v.h. /Lazze
  - Bo Kullmar SYSOP <1789> · Text 137 · w6 · kommentar
    
    1985-01-13 09:41
    
    Ärende: Snabbt terminal program i maskinkod!
    
    Om man jobbar i BASIC mot bufferterna så kan man få det hela att funka i 1200 om man låter basicprogrammet hanter fler än ett tecken i stöten. En ny medlem Patric Ljung jobbar visst med ett terminalprogram. Han har inte börjat köra här än, för han har ett 1200/75 modem. Jag har inte hans telefonnr, men han har adress Stiglötsgatan 56, 582 40 Linköpning.
  - Gunnar Faith-Ell SYSOP <2733> · Text 140 · w6 · kommentar
    
    1985-01-13 20:55
    
    Ärende: Snabbt terminal program i maskinkod!
    
    VADÅÅÅ för slöö ???? Jag håller just nu på med ett terminalprogram som ligger och snurrar i BASIC och det går utmärkt i 1200/75 och bör därmed klara 1200/1200 oxo! Det plockar in ETT tecken i taget och hinner även med att testa om det är ett kontrolltecken eller ej i 1200 Baud! Just nu kan det bara emulera VC404,VC415 och ADM3A men när det blir klart så ska det klara lite mer. Det FEL du gör är att troligen att du tvingar datorn att visa cursorn mellan varje tecken i 1200/1200 och det tar MYCKET lång tid. För att öka farten så gör du så att du BARA visar cursorn när bufferten är tom: Test=PEEK2(65500)+6 (tror jag att det var) (Tilldelas för loopen för att spara tid) nn IF PEEK(Test) Noll=FNGet :GOTO nn ! (Hämta ett tecken från V24) nn+1 IF SYS(5)=128 Noll=FNTangentbord :GOTO nn ! tangentbord nn+2 IF PEEK2(Test) Noll=FNCursor nn+3 GOTO nn Och tänk på att man kan SPARA mycket tid på tex: nn+2 IF PEEK2(test) Noll=FNCursor:GOTO nn else nn och samtidigt så skippar man rad nn+3 (Radbyten och REM-satser tar onödig tid). Genom olika ändringar kan man säkert få ner tidsåtgången till hälften eller till och med till en fjärdedel! Att man "bara" visar cursorn när bufferten är tom märks inte när man kör i 1200 Baud för datorn hinner då normalt visa cursorn vid vart annat till vart fjärde tecken och när man kör i 300/300 så får datorn så mycket tid över att den ändå alltid visar cursorn. Mvh /Gunnar
    - Göran Sundqvist <1255> · Text 147 · w6 · kommentar
      
      1985-01-14 14:43
      
      Ärende: Snabbt terminal program i maskinkod!
      
      Skulle gärna vilja ta del av FNCursor, FNTangentbord och FNGet! finns det något enkelt sätt att visa markören när datorn inte väntar på inmatning?
      - Gunnar Faith-Ell SYSOP <2733> · Text 150 · w6 · kommentar
        
        1985-01-14 19:05
        
        Ärende: Snabbt terminal program i BASIC!
        
        Problemet med cursorn är att det tar lång tid att visa den (i alla fall med den metod som är beskriven i bruksanvisningen). Alltsammans står i manualen till Optionspromet (Jag tror inte att det funkar till ver. 7.1) och genom att ändra lite i det hela så kan man spara in en hel del tid och få det att funka i 1200 Baud. Funkar det inte så kan du få en kopia av det terminalprogram jag håller på och sätter ihop.
        
        Lazze Hermansson <5449> · Text 152 · w6 · kommentar
        
        1985-01-15 01:52
        
        Ärende: Snabbt terminal program i BASIC!
        
        ========================================================================= Hej Gunnar ! Det låter intresant, kan man få ta del av det här i monitorn eller? Det skulle vara bra med ett sådant. Kan jag som ägare till en abc806:a använda det program som finns i beskrivningen till optionspromet, isåfall vad ändrar man i det? Tackar på förhand... m.v.h. /Lazze
      - Patric Ljung <5455> · Text 214 · w6 · kommentar
        
        1985-01-22 21:51
        
        Ärende: FNCursor,FNTangentbord?,FNGet
        
        ------------------------------------------------- I tex ett terminalpgm vill man ju gärna ha cursorn synlig, alltid. Det räcker då med att skriva OUT 56,10,57,8+64+32, detta aktiverar cursorn med den vanliga hastigheten på blinket, halva hast. fås istället med OUT 56,10,57,8+64 (det kan vara tvärtom). Litet förklaringar: Det man gör är att man programmerar CRTC-kretsens register 10, som innehåller info. om cursorn, OUT 56,10. Informationen är bit 6=1+bit 5=1 1/32 field rate, bit 6=1 1/16 field rate, bit 5=1 Cursorn ej synlig, bit 6=0,bit 5=0 Cursorn fast, 8 anger i vilken tecken matris linje den skall börja. Men nu faller det sig som så att GET W¤ stänger av cursorn; bit 5=1,bit 6=0. Get görs istället som IF PEEK(65506) POKE 65506,0 ELSE ! till samma rad A¤=CHR¤(PEEK(65507)) : ! SLUT Hinner inte berätta mer nu. mvh Patric Ljung
        
        Patric Ljung <5455> · Text 215 · w6 · kommentar
        
        1985-01-23 19:02
        
        Ärende: FNCursor,FNTangentbord?,FNGet
        
        Öhh!
        
        Gunnar Faith-Ell SYSOP <2733> · Text 216 · w6 · kommentar
        
        1985-01-24 14:34
        
        Ärende: Cursorn i Terminalmod!
        
        Att inte LUXOR har med det i sin beskrivning av optionspromet, då skulle ju allt bli mycket lättare när man gör basicterminalrutiner! (Lämpligt till en artikel i ABC-bladet ?)
        
        Patric Ljung <5455> · Text 217 · w6 · kommentar
        
        1985-01-24 15:27
        
        Ärende: Cursorn i Terminalmod!
        
        Detta har jag hittat i en Servicemanual för 802, där en viss krets, CRTC finns beskriven. Det man måste tänka på är att GET W¤ stänger av cursorn. Men tack vare tb's-interuptet kan man ju göra en egen GET-rutin utan problem, IF PEEK(65506) W¤=CHR¤(PEEK(65507)) : POKE 65506,0 Det står NÄSTAN i Bit för Bit, men inte aldeles riktigt. Det kan tänkas vara nåt att sätta in i ABC-bladet. mvh T.M.G.
        
        Benny Löfgren SYSOP <2615> · Text 218 · w6 · kommentar
        
        1985-01-25 13:03
        
        Ärende: Cursorn i Terminalmod!
        
        Det är betydligt snyggare att göra så här: WHILE SYS(5)=0 ! Take care of terminal emulation here! WEND : GET A¤ ! Fetch operators input Och så vidare... Ursäkta de engelska kommentarerna, det är rutin på DIAB att kommentera på engelska. På det här sättet slipper man AB PEEK & POKE, det spelar ingen roll att man har en GET med, man måste ändå flytta cursorn manuellt.
        
        Patric Ljung <5455> · Text 219 · w6 · kommentar
        
        1985-01-25 18:39
        
        Ärende: Cursorn i Terminalmod!
        
        Det är väl närmast en smaksak. En litet snyggare variant kanske. Men vad är det för optionproms manual (ellervaddetnuhette)? Den nämns ju litet här o var. mvh T.M.G.
        
        Bo Kullmar SYSOP <1789> · Text 220 · w6 · kommentar
        
        1985-01-25 20:17
        
        Ärende: Optionsprom manual
        
        Det är ett tiotal sidor om terminal och printerrutinen i options- prommet som följer med varje ny maskin ur 800-serien. Där finns det också några programexempel.
        
        Patric Ljung <5455> · Text 221 · w6 · kommentar
        
        1985-01-26 10:58
        
        Ärende: Optionsprom manual...SETDOT (806)
        
        Jasså, den där med små futtiga pgmex. Är det någon som gjort SETDOT-rutin till 806 ? Det har jag gjort. Den blev faktiskt ganska snabb, för att vara i BASIC. Jag jämförde 80 med min genom att rita 10 st Sinuskurvor. På 80 tog 1min 20 sek, och i BASIC på 806 58 sek. Det tycker jag inte var dåligt. Men den rutinen fungerar bara i 80 teckens bredd. Jag har nästan lyckats med 40 tkns, men nästan. Någon som är intresserad ? mvh /T.M.G. Ps. Det kanske inte är riktigt att jämföra när Sinus finns inblandat, men det är ingen större tidsskillnad. Pps. Denna rutin skulle kunna översättas till m-kod, men då måste div med 3 förekomma. Och jag har inte den blekaste aning om hur man gör det. Skulle för övrigt vilja veta litet adresser till trevliga rutiner.
        
        Bo Kullmar SYSOP <1789> · Text 222 · w6 · kommentar
        
        1985-01-26 12:27
        
        Ärende: Optionsprom manual...SETDOT (806)
        
        Skicka gärna in programmet i inlådan, det är säkert någon som är intresserad.
        
        Benny Löfgren SYSOP <2615> · Text 225 · w6 · kommentar
        
        1985-01-28 07:37
        
        Ärende: Cursorn i Terminalmod!
        
        Det är inte bara en betydligt snyggare variant, den är garanterad att fungera på alla maskiner, vilket inte din "hacker-variant" med AB PEEK & POKE är (visserligen fungerar den på alla, men den är inte GARANTERAD att göra det i framtiden).
        
        Patric Ljung <5455> · Text 228 · w6 · kommentar
        
        1985-01-28 15:04
        
        Ärende: Cursorn i Terminalmod!
        
        Men jag älskar PEEK&POKE Då kan man ju ändra om interuptadressen för tangentbordet och få den att hoppa till en egen rutin, där man läser tb och skickar iväg tknet på V24 (eller om V24 är "upptagen" så kan buffra tknet och pilla litet med det vanliga interuptet (det som sker var 1/100 s) och mata ut första tknet i bufferten varje gång det går). Varianten utan buffert har jag på min termem. Det fungerar suveränt. Man behöver ju aldrig ägna en tanke åt TB, man behöver bry sig om vad som kommer in på V24. Bra va? mvh T.M.G. (AB PEEK & POKE)
        
        Benny Löfgren SYSOP <2615> · Text 239 · w6 · kommentar
        
        1985-02-04 12:16
        
        Ärende: Cursorn i Terminalmod!
        
        Det går alldeles utmärkt att göra en schysst terminalrutin med bara ett par P & P (för att polla V24-bufferten), man behöver inte fippla med interrupt alls (om man inte nödvändigtvis vill krångla till saker och ting förstås...).
  - Benny Löfgren SYSOP <2615> · Text 145 · w6 · kommentar
    
    1985-01-14 07:39
    
    Ärende: Snabbt terminal program i maskinkod!
    
    Vadå för slö??? Vad tror du monitorpaketet är skrivet i? Det finns inte en rad maskinkod som handhar kommunikationen och ändå sitter jag här och kör 1200/1200.
    - Lazze Hermansson <5449> · Text 149 · w6 · kommentar
      
      1985-01-14 15:38
      
      Ärende: Snabbt terminal program i maskinkod!
      
      DU tycks inte veta vad 1200/1200 betyder???? Är det HALV duplex du har ELLER???? Vad jag menar med SNABBT program är att sänder jag ett program så skall det vara med hastigheten 2*1200 baud FULL duplex. Jag är inte intreserad av koll på varje rad man sänder... Det är det som tar tiden... m.v.h. Lazze
      - Gunnar Faith-Ell SYSOP <2733> · Text 151 · w6 · kommentar
        
        1985-01-14 19:16
        
        Ärende: Snabbt terminal program i maskinkod!
        
        När du sänder ett program så emulerar du ingen terminal utan använder något överföringsprogram typ SAFT,FILTRANS eller KERMIT och då kan du inte göra något åt hastigheten, utan att byta till ett snabbare modem vilket är svårt. Det har INTE heller något med BASICen att göra och det går inte heller fortare att sända en fil med ett 1200/1200 modem än med ett 1200/75 modem i 1200 bauds riktningen.
        
        Lazze Hermansson <5449> · Text 153 · w6 · kommentar
        
        1985-01-15 01:59
        
        Ärende: Snabbt terminal program i maskinkod!
        
        ========================================================================= Hej en en gång Gunnar ! Det var synd för det går lika snabbt i 300 som i 1200 tycker jag. Kan inte du skriva en såkallad "brukanvisning" till SAFT och KERMIT som du sänder in till monitorn. Filtrans har jag redan det är det jag använder mig av nu. m.v.h. /Lazze =========================================================================
        
        Gunnar Faith-Ell SYSOP <2733> · Text 154 · w6 · kommentar
        
        1985-01-15 15:39
        
        Ärende: Snabbt terminal program i maskinkod!
        
        Bruksanvisningar till SAFT och KERMIT finns redan på QZ-Oden så det är onödigt att skriva nya.
      - Benny Löfgren SYSOP <2615> · Text 157 · w6 · kommentar
        
        1985-01-15 18:48
        
        Ärende: Snabbt terminal program i maskinkod!
        
        Givetvis kör jag full duplex, vad jag vet finns det ingen HDX-linje i 1200/1200 baud till monitorn. Jag har sett basicprogram som kör framgångs- rikt i 9600 baud, visserligen bara TTY-emulering men i alla fall.