home *** CD-ROM | disk | FTP | other *** search
/ Tiger Disk 13 / Tiger_Disk_013_19xx_Tiger-Crew-Disk_de_Side_A.d64 / get2byt.seq < prev    next >
Text File  |  2023-02-26  |  622b  |  25 lines
  1.          *= $1000
  2.  
  3. ;***************************************
  4. ;*  get2byt-routine (w) 1994 by madrom *
  5. ;***************************************
  6. ;* routine wird mit -jsr get2byt - aufg*
  7. ;* gerufen. die 16bit zahl ist dann als*
  8. ;* als low-high-byte wert in y-reg     *
  9. ;* und akku gespeichert . die zahl wird*
  10. ;* aus dem basic-text geholt, vorher   *
  11. ;* aber wird geprueft, ob sich ein     *
  12. ;* komma vor der zahl befindet. soll   *
  13. ;* kein komma test erfolgen, starte    *
  14. ;* die routine mit - jsr get2byt+3 -   *
  15. ;***************************************
  16.  
  17. get2byt
  18.          jsr $aefd
  19.          jsr $ad8a
  20.          jmp $b7f7
  21.  
  22.  
  23.  
  24.  
  25.