home *** CD-ROM | disk | FTP | other *** search
/ Syzygy Magazine 5 / Syzygy_Magazine_5_Expanded_1998___pl_Disk_1_of_2_Side_A.atr / mae11.arc / MACROS < prev    next >
Text File  |  1988-09-01  |  2KB  |  1 lines

  1. ;Example macro file.This can be¢;included in your assemblies using¢;.INMACROS¢;¢.MG¢!!!IND.MD;16 BIT INCREMENT¢INC:1;USAGE:¢BNE...I1; IND LOC¢INC1+:1¢...I1.ME¢;¢!!!MVI.MD;16 BIT MOVE¢LDA#>:1; IMMEDIATE¢STA1+:2;USAGE:¢LDA#<:1; MVI MYDLI $200¢STA:2¢.ME¢;¢!!!MVD.MD;16 BIT MOVE ABS¢LDA:1;USAGE:¢STA:2; MVD LOC1 LOC2¢LDA1+:1¢STA1+:2¢.ME¢;¢!!!LDI.MD;LOAD 16 BIT IMM¢LDA#<:1; VAL INTO A & X¢LDX#>:1;USAGE:¢.ME; LDI LOC¢;;LOADS ADR OF LOC¢;¢!!!LDD.MD;LD 16 BITS FROM¢LDA:1; LOC, INTO A & X¢LDX1+:1;USAGE:¢.ME; LDD LOC¢;¢!!!STD.MD;STORE 16 BITS¢STA:1; INTO LOC¢STX1+:1;USAGE:¢.ME; STD LOC¢;¢!!!ADD.MD;ADD 8 BIT VAL IN¢ADC:1; ACCUMULATOR TO¢STA:1; 16 BIT LOC¢.IF:0=1¢BCC...A1;USAGE:¢INC1+:1; ADD LOC¢.EL¢BCC:2;OPTIONAL MODE¢INC1+:1; ADD LOC ADR¢BCS:2¢***¢...A1.ME¢;¢!!!SBD.MD;SUBTR 8 BIT VAL¢LDA:1; FROM 16 BIT LOC¢SBC:2;USAGE:¢STA:1; SBD #40 LOC¢.IF:0=2¢BCS...A1¢DEC1+:1¢.EL¢BCS:3;OPTIONAL MODE¢DEC1+:1; SBD #40 LOC ADR¢BCS:3¢***¢...A1.ME¢;¢!!!JEQ.MD;FULL SET OF¢BNE...J1;CONDITIONAL JMPs¢JMP:1¢...J1.ME¢!!!JNE.MD¢BEQ...J1¢JMP:1¢...J1.ME¢!!!JPL.MD¢BMI...J1¢JMP:1¢...J1.ME¢!!!JMI.MD¢BPL...J1¢JMP:1¢...J1.ME¢!!!JCC.MD¢BCS...J1¢JMP:1¢...J1.ME¢!!!JCS.MD¢BCC...J1¢JMP:1¢...J1.ME¢!!!JVC.MD¢BVS...J1¢JMPLOC¢...J1.ME¢!!!JVS.MD¢BVC...J1¢JMPLOC¢...J1.ME¢!!!ASSERT .MD¢       .IF DEBUG¢PHP¢PHA¢LDA:1¢CMP:3¢B:2...OK¢JSRPRINT¢.BY"Assert Failed: "¢.BY"":1 :2 :3"" $9B 0¢...OK  PLA¢       PLP¢       ***¢.ME¢;¢; 65816-ONLY macros¢;¢!!!NAT.MD;Switch to Native¢STZ$D40E¢SEI¢CLC¢XCE¢.ME¢!!!EMU.MD;To Emulation¢SEC¢XCE¢.AB¢.IB¢LDA#$C0;CHG TO 40 IF YOU¢STA$D40E; DONT NEED DLIS¢CLI¢.ME¢!!!R16.MD;16-bit Regs¢REP#$30¢.AW¢.IW¢.ME¢!!!R8.MD;8-bit Regs¢.AB¢.IB¢SEP#$30¢.ME¢!!!A16.MD;16-bit Acc¢REP#$20¢.AW¢.ME¢!!!A8.MD;8-bit Acc¢.AB¢SEP#$20¢.ME¢!!!I16.MD;16-bit Index¢REP#$10¢.IW¢.ME¢!!!I8.MD;8-bit Index¢.IB¢SEP#$10¢.ME¢!!!BSR.MD;Branch to¢PER*+5; subroutine¢BRA:1¢.ME¢!!!BSL.MD;Branch Long to¢PER*+5; subroutine¢BRL:1¢.ME¢