home *** CD-ROM | disk | FTP | other *** search
/ Il CD di internet / CD.iso / SOURCE / EXTRA-ST / CPM-80-E / CPM-0.2 / CPM-0 / cpm-0.2 / z80-sources / mlb / bdoscall.mlb next >
Encoding:
Text File  |  1994-06-06  |  1.8 KB  |  65 lines
  1. ;************************************************************************
  2. ;*                                    *
  3. ;*        BDOS function,argument                    *
  4. ;*        ruft BDOS-Funktion auf.                    *
  5. ;*        Ist argument nicht angegeben,                *
  6. ;*        wird DE gelassen.                    *
  7. ;*                                    *
  8. ;************************************************************************
  9.  
  10.         .z80            ;
  11. bdos        macro callnr,arg    ;
  12. system_reset      equ 000h        ;
  13. console_in      equ 001h        ;
  14. console_out      equ 002h        ;
  15. reader_in      equ 003h        ;
  16. punch_out      equ 004h        ;
  17. list_out      equ 005h        ;
  18. direct_conio      equ 006h        ;
  19. get_iobyte      equ 007h        ;
  20. set_iobyte      equ 008h        ;
  21. print_string      equ 109h        ; 2 Byte Argument
  22. inline          equ 10ah        ;    "
  23. get_con_status      equ 00bh        ;
  24. return_version      equ 00ch        ;
  25. disk_reset      equ 00dh        ;
  26. select_disk      equ 00eh        ;
  27. open_file      equ 10fh        ; 2 Byte Argument
  28. close_file      equ 110h        ;
  29. srch_for_first      equ 111h        ;
  30. srch_for_next      equ 012h        ;
  31. delete_file      equ 113h        ;
  32. read_seq      equ 114h        ;
  33. write_seq      equ 115h        ;
  34. make_file      equ 116h        ;
  35. rename_file      equ 117h        ;
  36. get_login_vec      equ 018h        ;
  37. get_cur_disk      equ 019h        ;
  38. set_dma_addr      equ 11ah        ;
  39. get_alloc_addr      equ 01bh        ;
  40. set_ro_disk      equ 01ch        ;
  41. get_ro_vector      equ 01dh        ;
  42. set_file_attr      equ 11eh        ;
  43. get_dpb_addr      equ 01fh        ;
  44. set_get_user      equ 020h        ;
  45. read_random      equ 121h        ;
  46. write_random      equ 122h        ;
  47. comp_file_size      equ 123h        ;
  48. set_rand_rec      equ 124h        ;
  49. reset_drive      equ 125h        ;
  50. wr_rand_with_0      equ 128h        ;
  51.  
  52.           ifnb <arg>        ;
  53.             if callnr gt 0ffh    ; must be defined
  54.               ld de,arg        ; 2 Byte argument
  55.             else        ;
  56.               ld e,arg        ; 1 Byte argument
  57.             endif        ;
  58.           endif            ;
  59.  
  60.           ifnb <callnr>        ;
  61.             ld c,callnr AND 0ffh;
  62.           endif            ;
  63.           call 5        ;
  64.         endm            ;
  65.