home *** CD-ROM | disk | FTP | other *** search
/ Commodore Disk User Volume 4 #2 / Commodore_Disk_User_Vol.4_2_1990_-.d64 / commonv1.1.asm < prev    next >
Encoding:
Assembly Source File  |  1990-01-01  |  3.1 KB  |  97 lines
  1. E
  2. _*********************************************************
  3. _*                                                       *
  4. _*       MODULE NAME : common.asm                        *
  5. _*                                                       *
  6. _*                mAINTENANCE LOG                        *
  7. _*                ---------------                        *
  8. _*                                                       *
  9. _*   DATE      TIME                     ACTION           *
  10. _*   ----      ----                     ------           *
  11. _* 28/03/89    17:00                INITIAL CODING       *
  12. _*                                                       *
  13. _*********************************************************
  14.  
  15.  
  16. _*********************************************************
  17. _*                                                       *
  18. _*       ROUTINE : convram - CONVERT RAM NUMBER TO A     *
  19. _*                 CONFIGURATION                         *
  20. _*                                                       *
  21. _*   ENTRY                                               *
  22. _*   -----                                               *
  23. _*   a - ram CONFIGURATION NUMBER                        *
  24. _*.......................................................*
  25. _*   USED                                                *
  26. _*   ----                                                *
  27. _*   a,x                                                 *
  28. _*.......................................................*
  29. _*   EXIT                                                *
  30. _*   ----                                                *
  31. _*********************************************************
  32.  
  33. CONVRAMEQU *
  34. {CBM-R}
  35.  CONVTAB,X
  36. {CBM-N}
  37.  
  38. CONVTABDB $3E,$7E
  39.  
  40.  
  41. _*********************************************************
  42. _*                                                       *
  43. _*       ROUTINE : readname - READ NAME FROM THE CMD     *
  44. _*                 BUFFER                                *
  45. _*                                                       *
  46. _*   ENTRY                                               *
  47. _*   -----                                               *
  48. _*   charbuff - COMMAND BUFFER                           *
  49. _*   y        - CURRENT POSITION IN THE BUFFER           *
  50. _*.......................................................*
  51. _*   USED                                                *
  52. _*   ----                                                *
  53. _*   a,x,y                                               *
  54. _*.......................................................*
  55. _*   EXIT                                                *
  56. _*   ----                                                *
  57. _*   prgname - PROGRAM NAME ENTERED                      *
  58. _*   namelen - LENGTH OF THE NAME                        *
  59. _*   C = 0, NO ERROR.   C = 1, NAME TOO LONG             *
  60. _*********************************************************
  61.  
  62.  
  63. READNAME  EQU *
  64.  #0
  65. READLOP1EQU *
  66. _ POINT TO NEXT CHARACTER
  67.  CHARBUFF,Y
  68.  #SPACE
  69.  READLOP1
  70. READLOP2EQU *
  71.  #CR
  72.  READEND
  73.  
  74. _ FIRST NON BLANK FOUND, SO PULL INFO OFF
  75.  
  76. {CBM-P} PRGNAME,X
  77.  
  78.  #17
  79.  TOOLONG
  80.  
  81.  CHARBUFF,Y
  82.  READLOP2
  83.  
  84. READENDEQU *
  85.  
  86. {CBM-A} NAMELEN
  87.  
  88.           {CBM-N}
  89.  
  90. TOOLONGEQU *
  91.           {CBM-D}
  92. {CBM-N}
  93.  
  94. iend
  95.  
  96.  
  97.