M1351.128.SRC
FILE INFORMATION
FILENAME(S): M1351.128.SRC
FILE TYPE(S): SEQ
FILE SIZE: 1.2K
FIRST SEEN: 2025-12-02 23:48:08
APPEARS ON: 1 disk(s)
FILE HASH
0655e98b7b3b4590b2d6196d1d6d9dba3b9063b9d4ef784cff544d2dcfa48917
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 1351 MOUSE DEMOS | M1351.128.SRC | SEQ | swasti, flohmarkt | 20 | 5 |
⚠ CORRUPT DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 3B 09 31 33 35 31 20 50 52 4F 50 4F 52 54 49 4F |;.1351 PROPORTIO| 00000010: 4E 41 4C 20 4D 4F 55 53 45 20 44 52 49 56 45 52 |NAL MOUSE DRIVER| 00000020: 20 46 4F 52 20 54 48 45 20 43 31 32 38 0D 3B 0D | FOR THE C128.;.| 00000030: 3B 09 43 4F 4D 4D 4F 44 4F 52 45 20 42 55 53 49 |;.COMMODORE BUSI| 00000040: 4E 45 53 53 20 4D 41 43 48 49 4E 45 53 2C 20 49 |NESS MACHINES, I| 00000050: 4E 43 2E 20 20 20 32 37 4F 43 54 38 36 0D 3B 09 |NC. 27OCT86.;.| 00000060: 09 42 59 20 48 45 44 4C 45 59 20 44 41 56 49 53 |.BY HEDLEY DAVIS| 00000070: 20 41 4E 44 20 46 52 45 44 20 42 4F 57 45 4E 0D | AND FRED BOWEN.| 00000080: 0D 49 49 52 51 09 3D 20 24 30 33 31 34 0D 56 49 |.IIRQ.= $0314.VI| 00000090: 43 09 3D 20 24 44 30 30 30 0D 53 49 44 09 3D 20 |C.= $D000.SID.= | 000000A0: 24 44 34 30 30 0D 43 49 41 09 3D 20 24 44 43 30 |$D400.CIA.= $DC0| 000000B0: 30 0D 43 49 41 2E 44 44 52 09 3D 20 24 44 43 30 |0.CIA.DDR.= $DC0| 000000C0: 32 0D 50 4F 54 58 09 3D 20 53 49 44 2B 24 31 39 |2.POTX.= SID+$19| 000000D0: 0D 50 4F 54 59 09 3D 20 53 49 44 2B 24 31 41 0D |.POTY.= SID+$1A.| 000000E0: 0D 41 43 54 49 56 45 09 3D 20 24 31 31 37 45 09 |.ACTIVE.= $117E.| 000000F0: 09 3B 42 41 53 49 43 37 2E 30 20 41 43 54 49 56 |.;BASIC7.0 ACTIV| 00000100: 45 20 53 50 52 49 54 45 20 46 4C 41 47 20 28 30 |E SPRITE FLAG (0| 00000110: 3D 49 4E 41 43 54 49 56 45 29 0D 0D 56 49 43 44 |=INACTIVE)..VICD| 00000120: 41 54 41 09 3D 20 24 31 31 44 36 09 09 3B 42 41 |ATA.= $11D6..;BA| 00000130: 53 49 43 37 2E 30 20 43 4F 50 59 20 4F 46 20 56 |SIC7.0 COPY OF V| 00000140: 49 43 20 52 45 47 49 53 54 45 52 20 49 4D 41 47 |IC REGISTER IMAG| 00000150: 45 0D 58 50 4F 53 09 3D 20 56 49 43 44 41 54 41 |E.XPOS.= VICDATA| 00000160: 2B 24 30 30 09 3B 58 20 50 4F 53 49 54 49 4F 4E |+$00.;X POSITION| 00000170: 20 28 4C 53 42 29 0D 59 50 4F 53 09 3D 20 56 49 | (LSB).YPOS.= VI| 00000180: 43 44 41 54 41 2B 24 30 31 09 3B 59 20 50 4F 53 |CDATA+$01.;Y POS| 00000190: 49 54 49 4F 4E 0D 58 50 4F 53 4D 53 42 09 3D 20 |ITION.XPOSMSB.= | 000001A0: 56 49 43 44 41 54 41 2B 24 31 30 09 3B 58 20 50 |VICDATA+$10.;X P| 000001B0: 4F 53 49 54 49 4F 4E 20 28 4D 53 42 29 0D 0D 09 |OSITION (MSB)...| 000001C0: 2A 3D 24 31 38 46 30 0D 0D 49 49 52 51 32 09 09 |*=$18F0..IIRQ2..| 000001D0: 2A 3D 2A 2B 32 0D 4F 50 4F 54 58 09 09 2A 3D 2A |*=*+2.OPOTX..*=*| 000001E0: 2B 31 0D 4F 50 4F 54 59 09 09 2A 3D 2A 2B 31 0D |+1.OPOTY..*=*+1.| 000001F0: 4E 45 57 56 41 4C 55 45 09 2A 3D 2A 2B 31 0D 4F |NEWVALUE.*=*+1.O| 00000200: 4C 44 56 41 4C 55 45 09 2A 3D 2A 2B 31 0D 43 49 |LDVALUE.*=*+1.CI| 00000210: 41 53 41 56 45 09 09 2A 3D 2A 2B 31 0D 0D 0D 09 |ASAVE..*=*+1....| 00000220: 2A 20 3D 20 24 31 38 30 30 0D 0D 09 4A 4D 50 20 |* = $1800...JMP | 00000230: 49 4E 53 54 41 4C 4C 2E 31 09 3B 49 4E 53 54 41 |INSTALL.1.;INSTA| 00000240: 4C 4C 20 4D 4F 55 53 45 20 49 4E 20 50 4F 52 54 |LL MOUSE IN PORT| 00000250: 20 31 0D 09 4A 4D 50 20 49 4E 53 54 41 4C 4C 2E | 1..JMP INSTALL.| 00000260: 32 09 3B 49 4E 53 54 41 4C 4C 20 4D 4F 55 53 45 |2.;INSTALL MOUSE| 00000270: 20 49 4E 20 50 4F 52 54 20 32 0D 09 4A 4D 50 20 | IN PORT 2..JMP | 00000280: 52 45 4D 4F 56 45 09 3B 52 45 4D 4F 56 45 20 4D |REMOVE.;REMOVE M| 00000290: 4F 55 53 45 20 57 45 44 47 45 0D 0D 0D 49 4E 53 |OUSE WEDGE...INS| 000002A0: 54 41 4C 4C 2E 31 09 4C 44 58 20 23 30 09 09 3B |TALL.1.LDX #0..;| 000002B0: 50 4F 52 54 20 31 20 4D 4F 55 53 45 0D 09 09 2E |PORT 1 MOUSE....| 000002C0: 42 59 54 45 20 24 32 43 0D 0D 49 4E 53 54 41 4C |BYTE $2C..INSTAL| 000002D0: 4C 2E 32 09 4C 44 58 20 23 32 09 09 3B 50 4F 52 |L.2.LDX #2..;POR| 000002E0: 54 20 32 20 4D 4F 55 53 45 0D 0D 09 4C 44 41 20 |T 2 MOUSE...LDA | 000002F0: 49 49 52 51 2B 31 09 3B 49 4E E2 EE EE 7E E1 8E |IIRQ+1.;IN...~..| 00000300: EE 3E 20 E8 8E E8 E9 EA D9 E1 F1 EA CB FD 08 00 |.> .............| 00000310: 45 9B FB EE 8D 41 AC C1 F1 EA 89 DD 48 05 EC 08 |E....A......H...| 00000320: 91 E1 E5 41 A1 A1 9A 8E 89 CB 9A C9 E8 8B EA A8 |...A............| 00000330: 89 C9 FE 89 D9 C9 9E E8 8B EB 9E CD 99 C9 F9 F9 |................| 00000340: D9 A8 C1 F1 ED 89 ED 81 F1 EE C9 DB E1 F1 F1 E9 |................| 00000350: F9 99 48 8B EB EE 8D C1 E5 CE C9 CE 99 E8 8A CD |..H.............| 00000360: DE 8E 89 DB 9D A8 8B EE 8D 48 8B EB 99 9B EE 89 |.........H......| 00000370: DA CD A8 8A 9A FE 08 8A FD DE 08 89 DD EB ED 91 |................| 00000380: F1 EE CD 99 48 8B EB EE 8D 44 81 F1 E9 F9 99 48 |....H....D.....H| 00000390: 8B EB EE 8D 41 4C C1 F1 EE CD 99 48 8B EB EE 8D |....AL.....H....| 000003A0: 44 01 4C C1 F1 F1 E9 F9 99 48 8D 8A FE 8D A8 FD |D.L......H......| 000003B0: E1 E5 CD 8A FB EB 9D A8 8B EE 8D 48 8B EB 99 9B |...........H....| 000003C0: EE 89 DA CD A8 8D 9A 68 8B FA FD DE C9 E8 89 9E |.......h........| 000003D0: 8B EE 99 DE 81 F1 EE CD 99 48 8B EB EE 8D C1 F1 |.........H......| 000003E0: E9 F9 99 48 8D 8A FE 8D A1 4C 48 FD E1 F1 EE CD |...H.....LH.....| 000003F0: 99 48 8B EB EE 8D 41 4C 01 01 01 01 01 01 01 01 |.H....AL........| 00000400: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 00000410: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 00000420: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 00000430: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 00000440: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 00000450: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 00000460: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 00000470: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 00000480: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 00000490: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 000004A0: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 000004B0: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 000004C0: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 000004D0: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 000004E0: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 000004F0: 01 01 01 01 01 01 |...... |
;.1351 PROPORTIONAL MOUSE DRIVER FOR THE C128.;.;.COMMODORE BUSINESS MACHINES, I NC. 27OCT86.;..BY HEDLEY DAVIS AND FRE D BOWEN..IIRQ.= $0314.VIC.= $D000.SID.= $D400.CIA.= $DC00.CIA.DDR.= $DC02.POTX.= SID+$19.POTY.= SID+$1A..ACTIVE.= $117E. .;BASIC7.0 ACTIVE SPRITE FLAG (0=INACTIV E)..VICDATA.= $11D6..;BASIC7.0 COPY OF V IC REGISTER IMAGE.XPOS.= VICDATA+$00.;X POSITION (LSB).YPOS.= VICDATA+$01.;Y POS ITION.XPOSMSB.= VICDATA+$10.;X POSITION (MSB)...*=$18F0..IIRQ2..*=*+2.OPOTX..*=* +1.OPOTY..*=*+1.NEWVALUE.*=*+1.OLDVALUE. *=*+1.CIASAVE..*=*+1....* = $1800...JMP INSTALL.1.;INSTALL MOUSE IN PORT 1..JMP INSTALL.2.;INSTALL MOUSE IN PORT 2..JMP REMOVE.;REMOVE MOUSE WEDGE...INSTALL.1.L DX #0..;PORT 1 MOUSE....BYTE $2C..INSTAL L.2.LDX #2..;PORT 2 MOUSE...LDA IIRQ+1.; IN...~...> .....Y...K...E....A.A....H... ...A.....K.I.....I..YI.....M.I..Y.A..... ..I.......H....A.NIN...M.........H...... ZM................M.H....D.....H....ALA. .M.H....D.LA.....H........M........H.... ..ZM...H....I..........M.H....A....H.... .LH....M.H....AL........................ ........................................ ........................................ ........................................ ........................................ ........................................ ..............................
> CLICK IMAGE PREVIEW FOR FULL MODAL