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

ANROPA ABS-RUTINER

5 posts in thread

John Stagg <5741> · Text 805 · w6 · inlagg

1985-06-29 21:54

Ärende: ANROPA ABS-RUTINER

Det har dykt upp i Monitorn ett antal små program för att anropa ABS-rutiner ifrån Basic. Jag minns att jag försökte anropa LIB mm med en rutin i mitt 802 Basic-prom, men det gick inte så bra. Vad är principen bakom dessa program? Jag är kanske lite lat, det går säkert att luska ut det, men jag har mer brådskande ärenden i trädgården ! Mvh John
- Bo Kullmar SYSOP <1789> · Text 806 · w6 · kommentar
  
  1985-06-29 23:40
  
  Ärende: ANROPA ABS-RUTINER
  
  Man lägger upp en sträng, dvs filnamnet och sedan anropas en subrutin i DOS:et. Dessa subrutiner framgår av Bit för Bit sid 80-81. Det finns ett LIB.BAS i ABC800/SYSTEMPR som klarar att anropa LIB.ABS.
  - Benny Löfgren SYSOP <2615> · Text 808 · w6 · kommentar
    
    1985-06-30 00:07
    
    Ärende: ANROPA ABS-RUTINER
    
    Man får tänka på att en ABS-fil laddas på en absolut adress i minnet (jfr namnet, .ABS(olute)) och därför inte tar hänsyn till ifall det ligger ett BASIC-program e dyl där.
    - Patric Ljung <5455> · Text 851 · w6 · kommentar
      
      1985-07-06 10:19
      
      Ärende: ANROPA ABS-RUTINER
      
      Precis! Hur skall man då göra för att kunna ladda en ABS-fil oh samtidigt ha COMMON-variabler, och dessutom höja botten då alltså. Är det någon som har någon erfarenhet, det finns en hel del man kan trilla i diket med? Jag vill ha ett program som först höjer botten, nästa behöver common, och detta lägger Laddar ABS-filen. Nästa program är huvudprogram. muh/ Patric
      - Benny Löfgren SYSOP <2615> · Text 863 · w6 · kommentar
        
        1985-07-08 06:35
        
        Ärende: ANROPA ABS-RUTINER
        
        Jag tror nog att du hittat lösningen på dina problem lite längre fram i inläggen om du fortsatte läsa, men här är i alla fall en gång för alla lösningen på problemet: Program 1 ("START"-programmet) 10 Newbase=RND ! Ny adress till BASIC-arean av minnet. 20 POKE 65292,Newbase,SWAP%(Newbase) ! Y.BASE+Y.BOTM (Dvs bottom-pekaren) 30 POKE 65328,Newbase,SWAP%(Newbase) ! Y.BASE+Y.COMTOP (COMMON-slut-pekare) 40 CHAIN "PROG2" ! Nu drar vi in programmet med COMMON och .ABS-laddning Program 2 ("INIT"-programmet) 10 COMMON Kalle,Pelle,Qwerty¤=4711 ! Allocate COMMONs used 20 Z=FNAbsload("ASM.ABS") ! Load .ABS-code used 30 CHAIN "MAIN" ! Load main program.