T.POKELESS
FILE INFORMATION
FILENAME(S): T.POKELESS
FILE TYPE(S): PRG
FILE SIZE: 2.8K
FIRST SEEN: 2025-11-30 18:12:07
APPEARS ON: 1 disk(s)
FILE HASH
54fd7b8e864d2979e65aabb5ef65e70e6971b130f48538ee240fae92fbb34e3d
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LOADSTAR 55 S 2 | T.POKELESS | PRG | Sailor, Ganheden | 14 | 5 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 00 80 5E 55 3A 43 42 4D 0D 20 20 20 D0 20 CF 20 |..^U:CBM. . . | 00000010: CB 20 C5 20 CC 20 C5 20 D3 20 D3 20 20 20 20 D3 |. . . . . . .| 00000020: 20 D0 20 D2 20 C9 20 D4 20 C5 20 D3 0D 0D 20 20 | . . . . . ... | 00000030: 20 20 20 20 20 20 20 20 20 42 59 20 CA 41 52 45 | BY .ARE| 00000040: 44 20 C7 52 4F 54 48 0D 0D 46 52 4F 4D 20 C3 4F |D .ROTH..FROM .O| 00000050: 4D 4D 4F 44 4F 52 45 20 CD 41 47 41 5A 49 4E 45 |MMODORE .AGAZINE| 00000060: 20 C4 45 43 45 4D 42 45 52 20 31 39 38 38 0D 0D | .ECEMBER 1988..| 00000070: 20 20 20 20 D7 48 59 20 49 53 20 49 54 20 54 48 | .HY IS IT TH| 00000080: 41 54 20 54 48 45 20 4B 45 59 57 4F 52 44 53 20 |AT THE KEYWORDS | 00000090: D0 CF CB C5 0D 41 4E 44 20 D0 C5 C5 CB 20 53 45 |.....AND .... SE| 000000A0: 45 4D 20 54 4F 20 53 54 52 49 4B 45 20 46 45 41 |EM TO STRIKE FEA| 000000B0: 52 20 49 4E 54 4F 20 54 48 45 0D 48 45 41 52 54 |R INTO THE.HEART| 000000C0: 53 20 4F 46 20 C2 C1 D3 C9 C3 20 50 52 4F 47 52 |S OF ..... PROGR| 000000D0: 41 4D 4D 45 52 53 20 2D 2D 20 45 56 45 4E 0D 47 |AMMERS -- EVEN.G| 000000E0: 4F 4F 44 20 4F 4E 45 53 3F 20 20 CD 41 59 42 45 |OOD ONES? .AYBE| 000000F0: 20 49 54 27 53 20 42 45 43 41 55 53 45 20 D0 CF | IT'S BECAUSE ..| 00000100: CB C5 0D 41 4E 44 20 D0 C5 C5 CB 20 41 52 45 20 |...AND .... ARE | 00000110: 54 57 4F 20 4B 45 59 57 4F 52 44 53 20 54 48 41 |TWO KEYWORDS THA| 00000120: 54 20 44 4F 4E 27 54 0D 54 52 41 4E 53 4C 41 54 |T DON'T.TRANSLAT| 00000130: 45 20 46 52 4F 4D 20 4F 4E 45 20 4D 41 43 48 49 |E FROM ONE MACHI| 00000140: 4E 45 20 54 4F 0D 41 4E 4F 54 48 45 52 2E 20 20 |NE TO.ANOTHER. | 00000150: D7 49 54 48 20 54 48 45 53 45 20 50 52 4F 47 52 |.ITH THESE PROGR| 00000160: 41 4D 4D 45 52 53 20 49 4E 0D 4D 49 4E 44 2C 20 |AMMERS IN.MIND, | 00000170: CA 41 52 45 44 20 C7 52 4F 54 48 20 48 41 53 20 |.ARED .ROTH HAS | 00000180: 57 52 49 54 54 45 4E 20 41 0D 53 4D 41 4C 4C 20 |WRITTEN A.SMALL | 00000190: CD CC 20 52 4F 55 54 49 4E 45 20 54 48 41 54 20 |.. ROUTINE THAT | 000001A0: 53 54 41 59 53 20 48 49 44 44 45 4E 20 49 4E 0D |STAYS HIDDEN IN.| 000001B0: 48 49 47 48 20 4D 45 4D 4F 52 59 20 41 4E 44 20 |HIGH MEMORY AND | 000001C0: 41 4C 4C 4F 57 53 20 59 4F 55 20 54 4F 20 50 52 |ALLOWS YOU TO PR| 000001D0: 4F 47 52 41 4D 0D 53 50 52 49 54 45 53 20 55 53 |OGRAM.SPRITES US| 000001E0: 49 4E 47 20 56 41 52 49 41 42 4C 45 53 20 49 4E |ING VARIABLES IN| 000001F0: 53 54 45 41 44 20 4F 46 0D D0 CF CB C5 D3 2E 0D |STEAD OF........| 00000200: 0D 20 20 20 20 C9 46 20 59 4F 55 20 48 41 56 45 |. .F YOU HAVE| 00000210: 20 44 4F 4E 45 20 41 4E 59 20 50 52 4F 47 52 41 | DONE ANY PROGRA| 00000220: 4D 4D 49 4E 47 0D 4F 4E 20 54 48 45 20 C3 36 34 |MMING.ON THE .64| 00000230: 20 59 4F 55 20 4B 4E 4F 57 20 41 42 4F 55 54 20 | YOU KNOW ABOUT | 00000240: 52 45 53 45 52 56 45 44 0D 56 41 52 49 41 42 4C |RESERVED.VARIABL| 00000250: 45 53 20 4C 49 4B 45 20 D3 D4 2C 20 D4 C9 20 41 |ES LIKE .., .. A| 00000260: 4E 44 20 C6 CE 2E 20 20 D7 49 54 48 0D D0 CF CB |ND ... .ITH....| 00000270: C5 CC C5 D3 D3 20 D3 D0 D2 C9 D4 C5 D3 20 41 43 |..... ....... AC| 00000280: 54 49 56 41 54 45 44 20 54 48 45 52 45 20 41 52 |TIVATED THERE AR| 00000290: 45 0D 53 45 56 45 52 41 4C 20 4D 4F 52 45 2E 20 |E.SEVERAL MORE. | 000002A0: 20 D4 48 45 53 45 20 56 41 52 49 41 42 4C 45 53 | .HESE VARIABLES| 000002B0: 2C 20 57 48 49 43 48 0D 41 52 45 20 53 55 42 53 |, WHICH.ARE SUBS| 000002C0: 43 52 49 50 54 45 44 20 57 49 54 48 20 54 48 45 |CRIPTED WITH THE| 000002D0: 20 4E 55 4D 42 45 52 20 4F 46 0D 54 48 45 20 53 | NUMBER OF.THE S| 000002E0: 50 52 49 54 45 20 59 4F 55 20 41 52 45 20 44 45 |PRITE YOU ARE DE| 000002F0: 41 4C 49 4E 47 20 57 49 54 48 2C 20 43 4F 4D 45 |ALING WITH, COME| 00000300: 0D 49 4E 20 54 57 4F 20 27 43 4C 41 53 53 45 53 |.IN TWO 'CLASSES| 00000310: 27 2E 0D 0D 20 20 20 20 C3 4C 41 53 53 20 4F 4E |'... .LASS ON| 00000320: 45 20 56 41 52 49 41 42 4C 45 53 20 44 45 41 4C |E VARIABLES DEAL| 00000330: 20 57 49 54 48 0D 43 4F 4C 4F 52 20 41 4E 44 20 | WITH.COLOR AND | 00000340: 50 4F 53 49 54 49 4F 4E 2E 20 20 C9 4E 53 54 45 |POSITION. .NSTE| 00000350: 41 44 20 4F 46 0D 53 45 54 54 49 4E 47 20 54 48 |AD OF.SETTING TH| 00000360: 45 20 53 50 52 49 54 45 20 50 4F 49 4E 54 45 52 |E SPRITE POINTER| 00000370: 20 46 4F 52 20 53 50 52 49 54 45 0D 30 20 57 49 | FOR SPRITE.0 WI| 00000380: 54 48 20 41 20 D0 CF CB C5 32 30 34 30 2C 58 58 |TH A ....2040,XX| 00000390: 58 20 43 4F 4D 4D 41 4E 44 20 59 4F 55 20 55 53 |X COMMAND YOU US| 000003A0: 45 0D 54 48 49 53 2C 20 D0 25 28 30 29 3D 58 58 |E.THIS, .%(0)=XX| 000003B0: 58 2E 20 20 D4 4F 20 4D 41 4B 45 20 53 50 52 49 |X. .O MAKE SPRI| 000003C0: 54 45 20 30 27 53 0D 43 4F 4C 4F 52 20 50 55 52 |TE 0'S.COLOR PUR| 000003D0: 50 4C 45 2C 20 55 53 45 20 54 48 49 53 20 43 4F |PLE, USE THIS CO| 000003E0: 4D 4D 41 4E 44 2C 0D C3 25 28 30 29 3D 34 2E 20 |MMAND,..%(0)=4. | 000003F0: 20 CF 54 48 45 52 20 43 4C 41 53 53 20 4F 4E 45 | .THER CLASS ONE| 00000400: 20 56 41 52 49 41 42 4C 45 53 0D 41 52 45 20 D8 | VARIABLES.ARE .| 00000410: 25 28 58 29 20 41 4E 44 20 D9 25 28 58 29 2C 20 |%(X) AND .%(X), | 00000420: 46 4F 52 20 50 4F 53 49 54 49 4F 4E 2C 0D 41 4E |FOR POSITION,.AN| 00000430: 44 20 CD 31 25 28 58 29 20 41 4E 44 20 CD 32 25 |D .1%(X) AND .2%| 00000440: 28 58 29 20 46 4F 52 20 4D 55 4C 54 49 43 4F 4C |(X) FOR MULTICOL| 00000450: 4F 52 0D 4F 4E 45 20 41 4E 44 20 54 57 4F 2E 0D |OR.ONE AND TWO..| 00000460: 0D 20 20 20 20 C3 4C 41 53 53 20 54 57 4F 20 56 |. .LASS TWO V| 00000470: 41 52 49 41 42 4C 45 53 20 41 52 45 20 54 48 4F |ARIABLES ARE THO| 00000480: 53 45 0D 52 45 53 45 52 56 45 44 20 56 41 52 49 |SE.RESERVED VARI| 00000490: 41 42 4C 45 53 20 54 48 41 54 20 43 41 4E 20 4F |ABLES THAT CAN O| 000004A0: 4E 4C 59 20 48 41 56 45 0D 56 41 4C 55 45 53 20 |NLY HAVE.VALUES | 000004B0: 4F 46 20 30 20 4F 52 20 31 2E 20 20 C5 25 28 33 |OF 0 OR 1. .%(3| 000004C0: 29 3D 31 20 57 49 4C 4C 20 54 55 52 4E 0D 53 50 |)=1 WILL TURN.SP| 000004D0: 52 49 54 45 20 33 20 4F 4E 2E 20 20 C5 25 28 33 |RITE 3 ON. .%(3| 000004E0: 29 3D 30 20 57 49 4C 4C 20 54 55 52 4E 20 49 54 |)=0 WILL TURN IT| 000004F0: 0D 4F 46 46 2E 20 20 C8 25 28 58 29 20 43 4F 4E |.OFF. .%(X) CON| 00000500: 54 52 4F 4C 53 20 48 4F 52 49 5A 4F 4E 54 41 4C |TROLS HORIZONTAL| 00000510: 0D 45 58 50 41 4E 53 49 4F 4E 20 41 4E 44 20 D6 |.EXPANSION AND .| 00000520: 25 28 58 29 20 43 4F 4E 54 52 4F 4C 53 20 56 45 |%(X) CONTROLS VE| 00000530: 52 54 49 43 41 4C 0D 45 58 50 41 4E 53 49 4F 4E |RTICAL.EXPANSION| 00000540: 2E 20 20 CD 25 28 58 29 20 54 55 52 4E 53 20 4D |. .%(X) TURNS M| 00000550: 55 4C 54 49 43 4F 4C 4F 52 0D 4D 4F 44 45 20 4F |ULTICOLOR.MODE O| 00000560: 4E 20 41 4E 44 20 4F 46 46 20 41 4E 44 20 C2 25 |N AND OFF AND .%| 00000570: 28 58 29 20 53 45 54 53 20 53 50 52 49 54 45 0D |(X) SETS SPRITE.| 00000580: 58 27 53 20 50 52 49 4F 52 49 54 59 20 4F 56 45 |X'S PRIORITY OVE| 00000590: 52 20 54 48 45 20 42 41 43 4B 47 52 4F 55 4E 44 |R THE BACKGROUND| 000005A0: 2E 0D 0D 20 20 20 20 D4 48 45 52 45 20 49 53 20 |... .HERE IS | 000005B0: 4E 4F 20 45 52 52 4F 52 2D 54 52 41 50 50 49 4E |NO ERROR-TRAPPIN| 000005C0: 47 20 54 4F 0D 43 48 45 43 4B 20 49 46 20 54 48 |G TO.CHECK IF TH| 000005D0: 45 20 56 41 4C 55 45 53 20 59 4F 55 20 47 49 56 |E VALUES YOU GIV| 000005E0: 45 20 54 4F 20 54 48 45 0D 52 45 53 45 52 56 45 |E TO THE.RESERVE| 000005F0: 44 20 56 41 52 49 41 42 4C 45 53 20 41 52 45 20 |D VARIABLES ARE | 00000600: 4F 55 54 20 4F 46 20 52 41 4E 47 45 2E 0D C9 46 |OUT OF RANGE...F| 00000610: 20 59 4F 55 20 4D 4F 56 45 20 53 43 52 45 45 4E | YOU MOVE SCREEN| 00000620: 20 4D 45 4D 4F 52 59 2C 20 59 4F 55 20 43 41 4E | MEMORY, YOU CAN| 00000630: 0D 53 54 49 4C 4C 20 55 53 45 20 D0 CF CB C5 CC |.STILL USE .....| 00000640: C5 D3 D3 20 D3 D0 D2 C9 D4 C5 D3 20 49 46 20 59 |... ....... IF Y| 00000650: 4F 55 0D D0 CF CB C5 35 33 32 30 37 2C 4C 4F 57 |OU.....53207,LOW| 00000660: 3A D0 CF CB C5 35 33 32 30 38 2C 48 49 47 48 20 |:....53208,HIGH | 00000670: 57 48 45 52 45 0D 4C 4F 57 20 41 4E 44 20 48 49 |WHERE.LOW AND HI| 00000680: 47 48 20 41 52 45 20 54 48 45 20 4E 45 57 20 41 |GH ARE THE NEW A| 00000690: 44 44 52 45 53 53 20 4F 46 0D 54 48 45 20 50 4F |DDRESS OF.THE PO| 000006A0: 49 4E 54 45 52 20 46 4F 52 20 53 50 52 49 54 45 |INTER FOR SPRITE| 000006B0: 20 30 2E 0D 0D 20 20 20 20 C8 45 52 45 20 41 52 | 0... .ERE AR| 000006C0: 45 20 54 48 45 20 52 45 53 45 52 56 45 44 20 56 |E THE RESERVED V| 000006D0: 41 52 49 41 42 4C 45 53 0D 41 47 41 49 4E 20 57 |ARIABLES.AGAIN W| 000006E0: 49 54 48 20 54 48 45 49 52 20 52 41 4E 47 45 20 |ITH THEIR RANGE | 000006F0: 41 4E 44 20 50 55 52 50 4F 53 45 2E 0D 0D CE 41 |AND PURPOSE....A| 00000700: 4D 45 20 20 20 D2 41 4E 47 45 20 20 D0 55 52 50 |ME .ANGE .URP| 00000710: 4F 53 45 0D 0D D0 25 28 58 29 20 20 30 2D 32 35 |OSE...%(X) 0-25| 00000720: 35 20 20 D3 45 54 53 20 50 4F 49 4E 54 45 52 20 |5 .ETS POINTER | 00000730: 56 41 4C 55 45 0D C3 25 28 58 29 20 20 30 2D 32 |VALUE..%(X) 0-2| 00000740: 35 35 20 20 D3 45 54 53 20 43 4F 4C 4F 52 20 56 |55 .ETS COLOR V| 00000750: 41 4C 55 45 0D D8 25 28 58 29 20 20 30 2D 35 31 |ALUE..%(X) 0-51| 00000760: 31 20 20 D3 45 54 53 20 D8 20 43 4F 4F 52 44 49 |1 .ETS . COORDI| 00000770: 4E 41 54 45 0D D9 25 28 58 29 20 20 30 2D 32 35 |NATE..%(X) 0-25| 00000780: 35 20 20 D3 45 54 53 20 D9 20 43 4F 4F 52 44 49 |5 .ETS . COORDI| 00000790: 4E 41 54 45 0D CD 31 25 28 58 29 20 30 2D 32 35 |NATE..1%(X) 0-25| 000007A0: 35 20 20 D3 45 54 53 20 4D 55 4C 54 49 43 4F 4C |5 .ETS MULTICOL| 000007B0: 4F 52 20 31 20 56 41 4C 55 45 0D CD 32 25 28 58 |OR 1 VALUE..2%(X| 000007C0: 29 20 30 2D 32 35 35 20 20 D3 45 54 53 20 4D 55 |) 0-255 .ETS MU| 000007D0: 4C 54 49 43 4F 4C 4F 52 20 32 20 56 41 4C 55 45 |LTICOLOR 2 VALUE| 000007E0: 0D C5 25 28 58 29 20 20 30 2D 31 20 20 20 20 D4 |..%(X) 0-1 .| 000007F0: 55 52 4E 53 20 53 50 52 49 54 49 45 53 20 4F 4E |URNS SPRITIES ON| 00000800: 2F 4F 46 46 0D C8 25 28 58 29 20 20 30 2D 31 20 |/OFF..%(X) 0-1 | 00000810: 20 20 20 C8 4F 52 49 5A 4F 4E 54 41 4C 20 45 58 | .ORIZONTAL EX| 00000820: 50 41 4E 53 49 4F 4E 0D D6 25 28 58 29 20 20 30 |PANSION..%(X) 0| 00000830: 2D 31 20 20 20 20 D6 45 52 54 49 43 41 4C 20 45 |-1 .ERTICAL E| 00000840: 58 50 41 4E 53 49 4F 4E 0D CD 25 28 58 29 20 20 |XPANSION..%(X) | 00000850: 30 2D 31 20 20 20 20 CD 55 4C 54 49 43 4F 4C 4F |0-1 .ULTICOLO| 00000860: 52 20 4D 4F 44 45 20 4F 4E 2F 4F 46 46 0D C2 25 |R MODE ON/OFF..%| 00000870: 28 58 29 20 20 30 2D 31 20 20 20 20 D3 45 54 53 |(X) 0-1 .ETS| 00000880: 20 42 41 43 4B 47 52 4F 55 4E 44 20 50 52 49 4F | BACKGROUND PRIO| 00000890: 52 49 54 59 0D 0D 0D 20 20 20 20 D0 CF CB C5 CC |RITY... .....| 000008A0: C5 D3 D3 20 D3 D0 D2 C9 D4 C5 D3 20 57 4F 52 4B |... ....... WORK| 000008B0: 53 20 42 59 0D 4D 4F 44 49 46 59 49 4E 47 20 C2 |S BY.MODIFYING .| 000008C0: C1 D3 C9 C3 20 54 48 52 4F 55 47 48 20 41 20 42 |.... THROUGH A B| 000008D0: 41 4E 4B 2D 0D 53 57 49 54 43 48 49 4E 47 20 54 |ANK-.SWITCHING T| 000008E0: 45 43 48 4E 49 51 55 45 2E 20 20 C6 4F 52 20 4D |ECHNIQUE. .OR M| 000008F0: 4F 52 45 20 41 42 4F 55 54 0D 54 48 49 53 20 54 |ORE ABOUT.THIS T| 00000900: 45 43 48 4E 49 51 55 45 20 53 45 45 20 54 48 49 |ECHNIQUE SEE THI| 00000910: 53 20 4D 4F 4E 54 48 27 53 20 C2 D9 D4 C5 D3 0D |S MONTH'S ......| 00000920: 41 52 54 49 43 4C 45 2E 20 20 D4 48 45 20 D2 CF |ARTICLE. .HE ..| 00000930: CD 20 54 48 41 54 20 43 4F 4E 54 41 49 4E 53 20 |. THAT CONTAINS | 00000940: 41 4C 4C 0D 4F 46 20 54 48 45 20 C2 C1 D3 C9 C3 |ALL.OF THE .....| 00000950: 20 4B 45 59 57 4F 52 44 53 20 49 53 20 57 52 49 | KEYWORDS IS WRI| 00000960: 54 54 45 4E 20 54 4F 0D D2 C1 CD 20 57 48 45 52 |TTEN TO.... WHER| 00000970: 45 20 49 54 20 49 53 20 4D 4F 44 49 46 49 45 44 |E IT IS MODIFIED| 00000980: 20 54 4F 20 41 43 43 45 50 54 0D 54 48 45 20 4E | TO ACCEPT.THE N| 00000990: 45 57 20 56 41 52 49 41 42 4C 45 53 20 54 48 41 |EW VARIABLES THA| 000009A0: 54 20 41 52 45 20 55 53 45 44 20 42 59 0D D0 CF |T ARE USED BY...| 000009B0: CB C5 CC C5 D3 D3 20 D3 D0 D2 C9 D4 C5 D3 2E 20 |...... ........ | 000009C0: 20 C4 4F 4E 27 54 20 54 52 59 20 54 4F 20 55 53 | .ON'T TRY TO US| 000009D0: 45 0D 54 48 45 20 D2 C1 CD 20 55 4E 44 45 52 20 |E.THE ... UNDER | 000009E0: D2 CF CD 20 57 48 49 4C 45 20 59 4F 55 20 41 52 |... WHILE YOU AR| 000009F0: 45 20 55 53 49 4E 47 0D 54 48 49 53 20 52 4F 55 |E USING.THIS ROU| 00000A00: 54 49 4E 45 21 0D 0D 20 20 20 20 D2 4F 55 54 49 |TINE!.. .OUTI| 00000A10: 4E 45 53 20 4C 49 4B 45 20 54 48 49 53 20 41 52 |NES LIKE THIS AR| 00000A20: 45 20 54 45 52 52 49 46 49 43 0D 46 4F 52 20 57 |E TERRIFIC.FOR W| 00000A30: 52 49 54 49 4E 47 20 50 52 4F 47 52 41 4D 53 20 |RITING PROGRAMS | 00000A40: 46 4F 52 20 59 4F 55 52 20 4F 57 4E 0D 55 53 45 |FOR YOUR OWN.USE| 00000A50: 2E 20 20 C9 46 20 59 4F 55 20 41 52 45 20 57 52 |. .F YOU ARE WR| 00000A60: 49 54 49 4E 47 20 46 4F 52 20 50 55 42 4C 49 43 |ITING FOR PUBLIC| 00000A70: 0D 43 4F 4E 53 55 4D 50 54 49 4F 4E 20 C9 20 52 |.CONSUMPTION . R| 00000A80: 45 43 4F 4D 4D 45 4E 44 20 4B 45 45 50 49 4E 47 |ECOMMEND KEEPING| 00000A90: 0D 54 48 49 4E 47 53 20 41 53 20 53 54 52 41 49 |.THINGS AS STRAI| 00000AA0: 47 48 54 46 4F 52 57 41 52 44 20 41 53 20 50 4F |GHTFORWARD AS PO| 00000AB0: 53 53 49 42 4C 45 2C 0D 42 55 54 20 54 48 45 4E |SSIBLE,.BUT THEN| 00000AC0: 20 4D 41 59 42 45 20 54 48 41 54 27 53 20 4A 55 | MAYBE THAT'S JU| 00000AD0: 53 54 20 54 48 45 20 45 44 49 54 4F 52 0D 49 4E |ST THE EDITOR.IN| 00000AE0: 20 4D 45 20 54 41 4C 4B 49 4E 47 2E 0D 0D 0D C4 | ME TALKING.....| 00000AF0: C9 D3 CB 20 C6 C9 CC C5 D3 20 D4 C8 C9 D3 20 D0 |... ..... .... .| 00000B00: D2 CF C7 D2 C1 CD 20 D5 D3 C5 D3 0D 0D D0 CF CB |...... .........| 00000B10: C5 CC C5 D3 D3 20 20 20 20 20 20 20 20 20 20 20 |..... | 00000B20: D0 CF CB C5 CC C5 D3 D3 2E CF 0D D4 2E D0 CF CB |................| 00000B30: C5 CC C5 D3 D3 0D 0D 20 20 20 20 20 20 20 20 2A |....... *| 00000B40: 2A 2A 2A 20 C5 4E 44 20 4F 46 20 D4 45 58 54 20 |*** .ND OF .EXT | 00000B50: 2A 2A 2A 2A 0D |****. |
..^U:CBM. P O K E L E S S S P R I T
E S.. BY JARED GROTH..FROM CO
MMODORE MAGAZINE DECEMBER 1988.. WHY
IS IT THAT THE KEYWORDS POKE.AND PEEK SE
EM TO STRIKE FEAR INTO THE.HEARTS OF BAS
IC PROGRAMMERS -- EVEN.GOOD ONES? MAYBE
IT'S BECAUSE POKE.AND PEEK ARE TWO KEYW
ORDS THAT DON'T.TRANSLATE FROM ONE MACHI
NE TO.ANOTHER. WITH THESE PROGRAMMERS I
N.MIND, JARED GROTH HAS WRITTEN A.SMALL
ML ROUTINE THAT STAYS HIDDEN IN.HIGH MEM
ORY AND ALLOWS YOU TO PROGRAM.SPRITES US
ING VARIABLES INSTEAD OF.POKES... IF
YOU HAVE DONE ANY PROGRAMMING.ON THE C64
YOU KNOW ABOUT RESERVED.VARIABLES LIKE
ST, TI AND FN. WITH.POKELESS SPRITES AC
TIVATED THERE ARE.SEVERAL MORE. THESE V
ARIABLES, WHICH.ARE SUBSCRIPTED WITH THE
NUMBER OF.THE SPRITE YOU ARE DEALING WI
TH, COME.IN TWO 'CLASSES'... CLASS ON
E VARIABLES DEAL WITH.COLOR AND POSITION
. INSTEAD OF.SETTING THE SPRITE POINTER
FOR SPRITE.0 WITH A POKE2040,XXX COMMAN
D YOU USE.THIS, P%(0)=XXX. TO MAKE SPRI
TE 0'S.COLOR PURPLE, USE THIS COMMAND,.C
%(0)=4. OTHER CLASS ONE VARIABLES.ARE X
%(X) AND Y%(X), FOR POSITION,.AND M1%(X)
AND M2%(X) FOR MULTICOLOR.ONE AND TWO..
. CLASS TWO VARIABLES ARE THOSE.RESER
VED VARIABLES THAT CAN ONLY HAVE.VALUES
OF 0 OR 1. E%(3)=1 WILL TURN.SPRITE 3 O
N. E%(3)=0 WILL TURN IT.OFF. H%(X) CON
TROLS HORIZONTAL.EXPANSION AND V%(X) CON
TROLS VERTICAL.EXPANSION. M%(X) TURNS M
ULTICOLOR.MODE ON AND OFF AND B%(X) SETS
SPRITE.X'S PRIORITY OVER THE BACKGROUND
... THERE IS NO ERROR-TRAPPING TO.CHE
CK IF THE VALUES YOU GIVE TO THE.RESERVE
D VARIABLES ARE OUT OF RANGE..IF YOU MOV
E SCREEN MEMORY, YOU CAN.STILL USE POKEL
ESS SPRITES IF YOU.POKE53207,LOW:POKE532
08,HIGH WHERE.LOW AND HIGH ARE THE NEW A
DDRESS OF.THE POINTER FOR SPRITE 0...
HERE ARE THE RESERVED VARIABLES.AGAIN W
ITH THEIR RANGE AND PURPOSE...NAME RAN
GE PURPOSE..P%(X) 0-255 SETS POINTER
VALUE.C%(X) 0-255 SETS COLOR VALUE.X%(
X) 0-511 SETS X COORDINATE.Y%(X) 0-25
5 SETS Y COORDINATE.M1%(X) 0-255 SETS
MULTICOLOR 1 VALUE.M2%(X) 0-255 SETS MU
LTICOLOR 2 VALUE.E%(X) 0-1 TURNS SPR
ITIES ON/OFF.H%(X) 0-1 HORIZONTAL EX
PANSION.V%(X) 0-1 VERTICAL EXPANSION
.M%(X) 0-1 MULTICOLOR MODE ON/OFF.B%
(X) 0-1 SETS BACKGROUND PRIORITY...
POKELESS SPRITES WORKS BY.MODIFYING B
ASIC THROUGH A BANK-.SWITCHING TECHNIQUE
. FOR MORE ABOUT.THIS TECHNIQUE SEE THI
S MONTH'S BYTES.ARTICLE. THE ROM THAT C
ONTAINS ALL.OF THE BASIC KEYWORDS IS WRI
TTEN TO.RAM WHERE IT IS MODIFIED TO ACCE
PT.THE NEW VARIABLES THAT ARE USED BY.PO
KELESS SPRITES. DON'T TRY TO USE.THE RA
M UNDER ROM WHILE YOU ARE USING.THIS ROU
TINE!.. ROUTINES LIKE THIS ARE TERRIF
IC.FOR WRITING PROGRAMS FOR YOUR OWN.USE
. IF YOU ARE WRITING FOR PUBLIC.CONSUMP
TION I RECOMMEND KEEPING.THINGS AS STRAI
GHTFORWARD AS POSSIBLE,.BUT THEN MAYBE T
HAT'S JUST THE EDITOR.IN ME TALKING....D
ISK FILES THIS PROGRAM USES..POKELESS
POKELESS.O.T.POKELESS.. *
*** END OF TEXT ****.
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL