home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / genie-commodore-file-library / C64-128Toolkit / CASSM.SFX / assm.d2 < prev    next >
Encoding:
Text File  |  1992-11-27  |  3.3 KB  |  106 lines

  1. /*
  2.  * 6502 ┴SSEMBLER - ┼XTERNAL ─EFINITIONS
  3.  * ╞ILENAME: ASSM.D2
  4.  *
  5.  */
  6. #IFDEF ╒╬╔╪
  7. TYPEDEF ╞╔╠┼ *╞╔╠┼╘┘╨┼;
  8. #ELSE
  9. TYPEDEF INT ╞╔╠┼╘┘╨┼;
  10. #ENDIF
  11.  
  12. EXTERN  ╞╔╠┼╘┘╨┼ OPTR;
  13. EXTERN  ╞╔╠┼╘┘╨┼ IPTR;
  14.  
  15. EXTERN  CHAR     FILENAME[];     /* CURRENT FILENAME */
  16. EXTERN  INT      CH;             /* CURRENT CHARACTER */
  17. EXTERN  CHAR     CPOS;           /* CURRENT CHARACTER POSITION */
  18. EXTERN  CHAR     DFLAG;          /* DEBUG FLAG */
  19. EXTERN  CHAR     LISTED;         /* SOURCE LINE HAS BEEN LISTED */
  20. EXTERN  UNSIGNED ERRCNT;         /* ERROR COUNTER */
  21. EXTERN  UNSIGNED EXPRMC;         /* EXPRESSION MODIFICATION CODE */
  22. EXTERN  STRUCT SYMTYPE *EXPRSYM; /* EXPRESSION EXTERNAL REFERENCE SYMBOL */
  23. EXTERN  CHAR     EXPRTYP;        /* EXPRESSION RELOCATION TYPE FLAG */
  24. EXTERN  CHAR     HEX[];          /* HEXADECIMAL CHARACTER BUFFER */
  25. EXTERN  CHAR     IFLAG;          /* IGNORE .NLST FLAG */
  26. EXTERN  INT      LFLAG;          /* DISABLE LISTING FLAG */
  27. EXTERN  CHAR     CFLAG;          /* LIST EXCLUDED COND ASSMBLY */
  28. EXTERN  UNSIGNED LOCCNT;         /* LOCATION COUNTER     */
  29. EXTERN  CHAR     FFLAG;          /* FORMATTED LISTING SWITCH */
  30. EXTERN  CHAR     OFLAG;          /* OBJECT OUTPUT FLAG */
  31. EXTERN  UNSIGNED OPFLG;          /* OPERATION CODE FLAGS */
  32. EXTERN  CHAR     OPVAL;          /* OPERATION CODE VALUE */
  33. EXTERN  CHAR     PASS;           /* PASS COUNTER         */
  34. EXTERN  CHAR     PRLNBUF[];      /* PRINT LINE BUFFER    */
  35. EXTERN  CHAR     SFLAG;          /* SYMBOL TABLE OUTPUT FLAG */
  36. EXTERN  UNSIGNED SLNUM;          /* SOURCE LINE NUMBER COUNTER */
  37. EXTERN  CHAR     SYMBOL[];       /* TEMPORARY SYMBOL STORAGE     */
  38. EXTERN  UNSIGNED VALUE;          /* OPERAND FIELD VALUE */
  39. EXTERN  UNSIGNED FULLVALUE;      /* OPERAND VALUE BEFORE 0-PG TRUNCATION */
  40. EXTERN  CHAR     ZPREF;          /* ZERO PAGE REFERENCE FLAG     */
  41. EXTERN  CHAR     UNDEF;          /* EXPRESSION CONTAINS UNDEF SYMBOL */
  42. EXTERN  CHAR     CASMFLG;        /* ZERO TO INHIBIT ASSEMBLY */
  43.  
  44. EXTERN  STRUCT SYMTYPE *LABLPTR; /* STATEMENT LABEL POINTER */
  45. EXTERN  STRUCT SYMTYPE *HASHñTBL[];/* POINTERS TO SYMBOL LISTS */
  46.  
  47.  
  48. #DEFINE ╓╧╔─ INT
  49.  
  50. EXTERN ╓╧╔─ INITIALIZE();
  51. #IFDEF ╒╬╔╪
  52. EXTERN ╞╔╠┼╘┘╨┼ FILEOPEN();
  53. #ENDIF
  54. /* C-POWER BUG: DON'T DECLARE FILEOPEN() */
  55. EXTERN ╓╧╔─ USAGE();
  56. EXTERN INT READLINE();
  57. EXTERN ╓╧╔─ INCLUDE();
  58. EXTERN ╓╧╔─ ERROR();
  59. EXTERN ╓╧╔─ WRAPUP();
  60. EXTERN ╓╧╔─ STPRNT();
  61. EXTERN CHAR NEXTCH();
  62. EXTERN CHAR GETCH();
  63. EXTERN CHAR SKIP();
  64. EXTERN CHAR CSKIP();
  65. EXTERN CHAR TOLOWER ();
  66. EXTERN ╓╧╔─ ASSEMBLE();
  67. EXTERN ╓╧╔─ PRINTLN();
  68. EXTERN UNSIGNED COLSYM();
  69. EXTERN UNSIGNED ISLSTRT ();
  70. EXTERN STRUCT SYMTYPE *STLOOK();
  71. EXTERN STRUCT SYMTYPE *STINSTAL();
  72. EXTERN INT OPLOOK();
  73. EXTERN ╓╧╔─ LOADLC();
  74. EXTERN ╓╧╔─ LOADV();
  75. EXTERN ╓╧╔─ HEXCON();
  76. EXTERN INT LABLDEF();
  77. EXTERN ╓╧╔─ CLASS1();
  78. EXTERN ╓╧╔─ CLASS2();
  79. EXTERN ╓╧╔─ CLASS3();
  80. EXTERN ╓╧╔─ PSEUDO();
  81. EXTERN ╓╧╔─ CASSM();
  82. EXTERN CHAR CAñOP();
  83. EXTERN CHAR NOASM();
  84. EXTERN ╓╧╔─ CLEARLN();
  85. EXTERN UNSIGNED EVALUATE();
  86. EXTERN UNSIGNED COLEXPR ();
  87. EXTERN UNSIGNED COLTERM ();
  88. EXTERN UNSIGNED COLNUM();
  89. EXTERN UNSIGNED ISABS ();
  90. EXTERN ╓╧╔─ ADDREC();
  91. EXTERN ╓╧╔─ ADDDEF();
  92. EXTERN ╓╧╔─ PUTOC();
  93. EXTERN ╓╧╔─ PUTRECS();
  94. EXTERN ╓╧╔─ PUTNAME();
  95. EXTERN CHAR *MAKEREC();
  96. EXTERN ╓╧╔─ RELCHK();
  97. EXTERN ╓╧╔─ PUT1R();
  98. EXTERN ╓╧╔─ PUT1();
  99. EXTERN ╓╧╔─ PUT2();
  100. EXTERN ╓╧╔─ PUT3();
  101. EXTERN ╓╧╔─ PUTN();
  102. EXTERN ╓╧╔─ PUTDSEG();
  103. EXTERN ╓╧╔─ HALFCHK ();
  104. EXTERN CHAR *INDEX();
  105. EXTERN ╓╧╔─ QUIT();
  106.