Mercurial > hg > Members > kono > nitros9-code

view lib/kreiderclib/mod.as @ 3136:820bc08befa5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add new sysgo variant from Bob Devries with sysgo.cfg support Add the text file "level2/sys/sysgo.cfg" to faciliate the new "sysgo_bd".
author Bill Pierce <merlinious999@gmail.com>
date Sat, 04 Feb 2017 02:10:35 +0100
parents 1647f1874cdf
children
line wrap: on
line source

* Disassembly by Os9disasm of mod.r

 section code

* OS-9 system function equates

F$Link equ $00 
F$Load equ $01 
F$UnLink equ $02 

modlink: pshs  y,u 
 ldx   6,s 
 lda   9,s 
 asla   
 asla   
 asla   
 asla   
 ora   11,s 
 os9 F$Link 
L000f tfr   u,d 
 puls  y,u 
 lblo  _os9err 
 rts    
modload: pshs  y,u 
 ldx   6,s 
 lda   9,s 
 asla   
 asla   
 asla   
 asla   
 ora   11,s 
 os9 F$Load 
 bra   L000f 
munlink: pshs  u 
 ldu   4,s 
 os9 F$UnLink 
 puls  u 
 lbra  _sysret 

 endsect