title usermd.mac version 1.0 ; this routine will set the cp/m user number ; user number is passed as an integeri setuser equ 32 bdos equ 5 public usermd ; ; hl points to parameter ; usermd: mov e,m mvi c,setuser call bdos ret end