1 0000: 1 0000: - - - - .list - - - - #include ti83plus.inc 2 0000: 0 0000: - - - - 0 0000: - - - - 0 0000: - - - - 1 0000: - - - - 1 0000: - - - - 1 0000: - - - - 1 0000: - - - - 1 0000: - - - - 1 0000: - - - - 1 0000: - - - - 2 0000: - - - - 3 0000: - - - - #define bcall(xxxx) rst 28h \ .dw xxxx 4 0000: - - - - 5 0000: - - - - #define bcallz(xxxx) jr nz,$+5 \ rst 28h \ .dw xxxx 6 0000: - - - - #define bcallnz(xxxx) jr z,$+5 \ rst 28h \ .dw xxxx 7 0000: - - - - #define bcallc(xxxx) jr nc,$+5 \ rst 28h \ .dw xxxx 8 0000: - - - - #define bcallnc(xxxx) jr c,$+5 \ rst 28h \ .dw xxxx 9 0000: - - - - #define bjump(xxxx) call 50h \ .dw xxxx 10 0000: - - - - .addinstr B_CALL * EF 3 NOP 1 11 0000: - - - - 11 0000: - - - - 12 0000: - - - - libstart =$0004 13 0000: - - - - cmdshad =$966E 14 0000: - - - - progstart =$9D95 14 0000: - - - - saferam1 =$86EC 14 0000: - - - - saferam2 =$8A3A 14 0000: - - - - saferam3 =$8508 14 0000: - - - - saferam4 =$8478 14 0000: - - - - saferam5 =$84D3 14 0000: - - - - saferamp =$9872 14 0000: - - - - saferamp2 =$8251 15 0000: - - - - gbuf =$9340 16 0000: - - - - grbuf =$9340 17 0000: - - - - graph_mem =$9340 18 0000: - - - - _copygbuf =$486A 19 0000: - - - - _cleargbuf =$4BD0 20 0000: - - - - _clrlcdf =$4540 21 0000: - - - - _clrscrf =$4546 22 0000: - - - - _chksysvar =$42F1 23 0000: - - - - sram =saferam1 24 0000: - - - - apd_buf =saferam1 25 0000: - - - - apdbuf =saferam1 26 0000: - - - - apdram =saferam1 27 0000: - - - - statram =saferam2 28 0000: - - - - statvar =saferam2 29 0000: - - - - text_mem =saferam3 30 0000: - - - - textmem =saferam3 30 0000: - - - - 31 0000: - - - - lVectors =cmdshad+80 32 0000: - - - - ionVersion =lVectors 33 0000: - - - - ionRandom =lVectors+3 34 0000: - - - - ionPutSprite =lVectors+6 35 0000: - - - - ionLargeSprite =lVectors+9 36 0000: - - - - ionGetPixel =lVectors+12 37 0000: - - - - ionFastCopy =lVectors+15 38 0000: - - - - ionDetect =lVectors+18 39 0000: - - - - ionDecompress =lVectors+21 40 0000: - - - - 41 0000: - - - - fastcopy =ionFastCopy 42 0000: - - - - 43 0000: - - - - 44 0000: - - - - 45 0000: - - - - - - - - #include ion.inc 3 0000: - - - - .org progstart-2 4 9d93: BB 6D - - .db $BB,$6D 5 9d95: AF - - - xor A 6 9d96: 30 0E - - jr NC,START 7 9d98: 66 61 73 74 6D 61 70 00 .db "fastmap",0 8 9da0: - - - - player_xc: 9 9da0: 00 - - - .db 0 10 9da1: - - - - player_yc: 11 9da1: 20 - - - .db 32 12 9da2: - - - - player_flip_ctr: 13 9da2: 0A - - - .db 10 14 9da3: - - - - player_current_image: 15 9da3: 00 - - - .db 0 16 9da4: - - - - gen_state: 17 9da4: 00 - - - .db 0 18 9da5: - - - - jumping: 19 9da5: 00 - - - .db 0 20 9da6: - - - - start: 21 9da6: - - - - 22 9da6: - - - - 23 9da6: - - - - loop: 24 9da6: EF D0 4B - bcall(_grbufclr) 26 9da9: CD 27 9E - call DRAW 27 9dac: - - - - 28 9dac: 06 05 - - ld B,5 29 9dae: 76 - - - _ halt 32 9daf: 10 FD - - djnz -_ 33 9db1: - - - - 34 9db1: - - - - 35 9db1: 3E FF - - ld A,$FF 36 9db3: D3 01 - - out (1),A 37 9db5: 3E FE - - ld A,$FE 38 9db7: D3 01 - - out (1),A 39 9db9: DB 01 - - in A,(1) 40 9dbb: CB 47 4F - bit 1,A 41 9dbd: CC 0B 9E - call Z,LEFT 42 9dc0: DB 01 - - in A,(1) 43 9dc2: CB 47 57 - bit 2,A 44 9dc4: CC 15 9E - call Z,RIGHT 45 9dc7: DB 01 - - in A,(1) 46 9dc9: 3C - - - inc A 47 9dca: 20 09 - - jr NZ,_ 48 9dcc: - - - - 49 9dcc: 3E 02 - - ld A,2 50 9dce: 32 A2 9D - ld (PLAYER_FLIP_CTR),A 51 9dd1: AF - - - xor A 52 9dd2: 32 A3 9D - ld (PLAYER_CURRENT_IMAGE),A 53 9dd5: - - - - 54 9dd5: - - - - _: 56 9dd5: - - - - 57 9dd5: - - - - 58 9dd5: 3E FF - - ld A,$FF 59 9dd7: D3 01 - - out (1),A 60 9dd9: 3E BF - - ld A,$BF 61 9ddb: D3 01 - - out (1),A 61 9ddd: 00 - - - nop 62 9dde: 00 - - - nop 63 9ddf: DB 01 - - in A,(1) 64 9de1: CB 47 6F - bit 5,A 65 9de3: CC 1E 9E - call Z,JUMP 66 9de6: DB 01 - - in A,(1) 67 9de8: 3C - - - inc A 68 9de9: 20 0E - - jr NZ,NOT_PRESSED 69 9deb: - - - - 70 9deb: 3A A5 9D - ld A,(JUMPING) 71 9dee: B7 - - - or A 72 9def: 28 08 - - jr Z,NOT_PRESSED 73 9df1: - - - - 74 9df1: 3D - - - dec A 75 9df2: 32 A5 9D - ld (JUMPING),A 76 9df5: - - - - 77 9df5: 21 A1 9D - ld HL,PLAYER_YC 78 9df8: 34 - - - inc (HL) 79 9df9: - - - - 80 9df9: - - - - not_pressed: 81 9df9: - - - - 82 9df9: 3E FF - - ld A,$FF 83 9dfb: D3 01 - - out (1),A 84 9dfd: 3E FD - - ld A,$FD 85 9dff: D3 01 - - out (1),A 86 9e01: 00 - - - nop 87 9e02: 00 - - - nop 88 9e03: DB 01 - - in A,(1) 89 9e05: CB 47 77 - bit 6,A 90 9e07: C2 A6 9D - jp NZ,LOOP 91 9e0a: - - - - 92 9e0a: - - - - 93 9e0a: C9 - - - ret 94 9e0b: - - - - 95 9e0b: - - - - left: 96 9e0b: 3E 01 - - ld A,1 97 9e0d: 32 A4 9D - ld (GEN_STATE),A 98 9e10: 21 A0 9D - ld HL,PLAYER_XC 99 9e13: 35 - - - dec (HL) 100 9e14: C9 - - - ret 101 9e15: - - - - right: 102 9e15: AF - - - xor A 103 9e16: 32 A4 9D - ld (GEN_STATE),A 104 9e19: 21 A0 9D - ld HL,PLAYER_XC 105 9e1c: 34 - - - inc (HL) 106 9e1d: C9 - - - ret 107 9e1e: - - - - jump: 108 9e1e: 21 A5 9D - ld HL,JUMPING 109 9e21: 34 - - - inc (HL) 110 9e22: 21 A1 9D - ld HL,PLAYER_YC 111 9e25: 35 - - - dec (HL) 112 9e26: C9 - - - ret 113 9e27: - - - - 114 9e27: - - - - draw: 115 9e27: 21 A2 9D - ld HL,PLAYER_FLIP_CTR 116 9e2a: 7E - - - ld A,(HL) 117 9e2b: 3D - - - dec A 118 9e2c: 20 09 - - jr NZ,+_ 119 9e2e: 3A A3 9D - ld A,(PLAYER_CURRENT_IMAGE) 120 9e31: 2F - - - cpl 121 9e32: 32 A3 9D - ld (PLAYER_CURRENT_IMAGE),A 122 9e35: 3E 0A - - ld A,10 123 9e37: 77 - - - _ ld (hl),a 126 9e38: - - - - 127 9e38: - - - - 128 9e38: 3A A3 9D - ld A,(PLAYER_CURRENT_IMAGE) 129 9e3b: B7 - - - or A 130 9e3c: 20 06 - - jr NZ,+_ 131 9e3e: DD 21 71 9E ld IX,MARIO_IMAGE 132 9e42: 18 04 - - jr ++_ 133 9e44: DD 21 89 9E _ ld ix,mario_image+(12*2) 136 9e48: - - - - _: 138 9e48: 3A A5 9D - ld A,(JUMPING) 139 9e4b: B7 - - - or A 140 9e4c: 20 04 - - jr NZ,_ 141 9e4e: DD 21 A1 9E ld IX,MARIO_IMAGE+(12*4) 142 9e52: - - - - _: 144 9e52: - - - - 145 9e52: 3A A4 9D - ld A,(GEN_STATE) 146 9e55: B7 - - - or A 147 9e56: 20 05 - - jr NZ,_ 148 9e58: 11 00 00 - ld DE,0 149 9e5b: 18 03 - - jr ++_ 150 9e5d: 11 48 00 - _ ld de,12*2*3 153 9e60: DD 19 - - _ add ix,de 156 9e62: - - - - 157 9e62: - - - - 158 9e62: - - - - 159 9e62: - - - - 160 9e62: 3A A1 9D - ld A,(PLAYER_YC) 161 9e65: 6F - - - ld L,A 162 9e66: 3A A0 9D - ld A,(PLAYER_XC) 163 9e69: 06 0C - - ld B,12 164 9e6b: CD C4 96 - call IONPUTSPRITE 165 9e6e: - - - - 166 9e6e: C3 CD 96 - jp IONFASTCOPY 167 9e71: - - - - 168 9e71: - - - - 169 9e71: - - - - mario_image: 170 9e71: Bitmap file included successfully. - - - - #include "mario.bmp 171 9f01: - - - - 172 9f01: - - - - 173 9f01: - - - - 174 9f01: - - - - 175 9f01: - - - - 176 9f01: - - - - 177 9f01: - - - - 178 9f01: - - - - 179 9f01: - - - - 180 9f01: - - - - 181 9f01: - - - - 182 9f01: - - - - 183 9f01: - - - - 184 9f01: - - - - 185 9f01: - - - - 186 9f01: - - - - 187 9f01: - - - - 188 9f01: - - - - 189 9f01: - - - - 190 9f01: - - - -