R╭
FILE INFORMATION
FILENAME(S): R╭
FILE TYPE(S): USR
FILE SIZE: 3.6K
FIRST SEEN: 2025-10-20 14:31:15
APPEARS ON: 1 disk(s)
FILE HASH
52300953cbed091ba8cdbddd26bca6a5d6a16e5fdad179f535d0ccbd7a15e89c
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C | R╭ | USR | Treasure Chest - Klaus Der Suhler | 16 | 13 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 3B 00 3B 20 4E 4F 54 45 3A 00 3B 20 20 54 68 65 |;.; NOTE:.; The| 00000010: 20 6D 6F 72 65 20 6C 61 62 65 6C 73 20 79 6F 75 | more labels you| 00000020: 20 68 61 76 65 20 74 68 65 20 73 6C 6F 77 65 72 | have the slower| 00000030: 20 74 68 65 20 41 73 73 65 6D 62 6C 65 72 00 3B | the Assembler.;| 00000040: 20 20 77 69 6C 6C 20 72 75 6E 2E 20 20 50 6C 61 | will run. Pla| 00000050: 63 65 20 61 20 73 65 6D 69 2D 63 6F 6C 6F 6E 20 |ce a semi-colon | 00000060: 69 6E 20 66 72 6F 6E 74 20 6F 66 20 74 68 65 20 |in front of the | 00000070: 72 6F 75 74 69 6E 65 73 00 3B 20 20 79 6F 75 20 |routines.; you | 00000080: 77 69 6C 6C 20 6E 6F 74 20 62 65 20 75 73 69 6E |will not be usin| 00000090: 67 2E 00 3B 00 3B 4D 49 53 43 00 20 42 6F 6F 74 |g..;.;MISC. Boot| 000000A0: 47 45 4F 53 20 20 20 20 20 3D 20 20 24 43 30 30 |GEOS = $C00| 000000B0: 30 00 20 52 65 73 65 74 48 61 6E 64 6C 65 20 20 |0. ResetHandle | 000000C0: 20 3D 20 20 24 43 30 30 33 00 20 49 6E 74 65 72 | = $C003. Inter| 000000D0: 72 75 70 74 4D 61 69 6E 20 20 3D 20 20 24 43 31 |ruptMain = $C1| 000000E0: 30 30 00 3B 00 3B 20 50 52 4F 43 45 53 53 45 53 |00.;.; PROCESSES| 000000F0: 00 3B 00 20 49 6E 69 74 50 72 6F 63 65 73 73 65 |.;. InitProcesse| 00000100: 73 20 20 20 3D 20 20 24 43 31 30 33 00 20 52 65 |s = $C103. Re| 00000110: 73 74 61 72 74 50 72 6F 63 65 73 73 20 3D 20 20 |startProcess = | 00000120: 24 43 31 30 36 00 20 45 6E 61 62 6C 65 50 72 6F |$C106. EnablePro| 00000130: 63 65 73 73 20 20 3D 20 20 24 43 31 30 39 00 20 |cess = $C109. | 00000140: 42 6C 6F 63 6B 50 72 6F 63 65 73 73 20 20 20 3D |BlockProcess =| 00000150: 20 20 24 43 31 30 43 00 20 55 6E 62 6C 6F 63 6B | $C10C. Unblock| 00000160: 50 72 6F 63 65 73 73 20 3D 20 20 24 43 31 30 46 |Process = $C10F| 00000170: 00 20 46 72 65 65 7A 65 50 72 6F 63 65 73 73 20 |. FreezeProcess | 00000180: 20 3D 20 20 24 43 31 31 32 00 20 55 6E 66 72 65 | = $C112. Unfre| 00000190: 65 7A 65 50 72 6F 63 65 73 73 20 3D 20 24 43 31 |ezeProcess = $C1| 000001A0: 31 35 00 3B 00 3B 20 47 52 41 50 48 49 43 53 00 |15.;.; GRAPHICS.| 000001B0: 3B 00 20 48 6F 72 69 7A 6F 6E 74 61 6C 4C 69 6E |;. HorizontalLin| 000001C0: 65 20 20 20 3D 20 20 24 43 31 31 38 00 20 49 6E |e = $C118. In| 000001D0: 76 65 72 74 4C 69 6E 65 20 20 20 20 20 20 20 3D |vertLine =| 000001E0: 20 20 24 43 31 31 42 00 20 52 65 63 6F 76 65 72 | $C11B. Recover| 000001F0: 4C 69 6E 65 20 20 20 20 3D 20 24 43 31 31 45 00 |Line = $C11E.| 00000200: 20 56 65 72 74 69 63 61 6C 4C 69 6E 65 20 20 20 | VerticalLine | 00000210: 20 20 3D 20 24 43 31 32 31 00 20 52 65 63 74 61 | = $C121. Recta| 00000220: 6E 67 6C 65 20 20 20 20 20 20 3D 20 24 43 31 32 |ngle = $C12| 00000230: 34 00 20 46 72 61 6D 65 52 65 63 74 61 6E 67 6C |4. FrameRectangl| 00000240: 65 20 3D 20 24 43 31 32 37 00 20 49 6E 76 65 72 |e = $C127. Inver| 00000250: 74 52 65 63 74 61 6E 67 6C 65 20 3D 20 24 43 31 |tRectangle = $C1| 00000260: 32 41 00 20 52 65 63 6F 76 65 72 52 65 63 74 61 |2A. RecoverRecta| 00000270: 6E 67 6C 65 20 3D 20 24 43 31 32 44 00 20 44 72 |ngle = $C12D. Dr| 00000280: 61 77 4C 69 6E 65 20 20 3D 20 24 43 31 33 30 00 |awLine = $C130.| 00000290: 20 44 72 61 77 50 6F 69 6E 74 20 3D 20 24 43 31 | DrawPoint = $C1| 000002A0: 33 33 00 20 47 72 61 70 68 69 63 73 53 74 72 69 |33. GraphicsStri| 000002B0: 6E 67 20 3D 20 24 43 31 33 36 00 20 53 65 74 50 |ng = $C136. SetP| 000002C0: 61 74 74 65 72 6E 20 3D 24 43 31 33 39 00 20 47 |attern =$C139. G| 000002D0: 65 74 53 63 61 6E 4C 69 6E 65 20 3D 20 24 43 31 |etScanLine = $C1| 000002E0: 33 43 00 20 54 65 73 74 50 6F 69 6E 74 20 3D 20 |3C. TestPoint = | 000002F0: 24 43 31 33 46 00 3B 00 3B 20 42 41 43 4B 47 52 |$C13F.;.; BACKGR| 00000300: 4F 55 4E 44 20 47 45 4E 45 52 41 54 49 4F 4E 00 |OUND GENERATION.| 00000310: 3B 00 20 42 69 74 6D 61 70 55 70 20 3D 20 24 43 |;. BitmapUp = $C| 00000320: 31 34 32 00 3B 00 3B 20 20 43 48 41 52 41 43 54 |142.;.; CHARACT| 00000330: 45 52 20 4D 41 4E 49 50 55 4C 41 54 49 4F 4E 00 |ER MANIPULATION.| 00000340: 3B 00 20 50 75 74 43 68 61 72 20 3D 20 24 43 31 |;. PutChar = $C1| 00000350: 34 35 00 20 50 75 74 53 74 72 69 6E 67 20 3D 20 |45. PutString = | 00000360: 24 43 31 34 38 00 20 55 73 65 53 79 73 74 65 6D |$C148. UseSystem| 00000370: 46 6F 6E 74 20 3D 20 24 43 31 34 42 00 3B 00 3B |Font = $C14B.;.;| 00000380: 20 4D 4F 55 53 45 20 26 20 4D 45 4E 55 53 00 3B | MOUSE & MENUS.;| 00000390: 00 20 53 74 61 72 74 4D 6F 75 73 65 4D 6F 64 65 |. StartMouseMode| 000003A0: 20 3D 20 24 43 31 34 45 00 20 44 6F 4D 65 6E 75 | = $C14E. DoMenu| 000003B0: 20 3D 20 24 43 31 35 31 00 20 52 65 63 6F 76 65 | = $C151. Recove| 000003C0: 72 4D 65 6E 75 20 3D 20 24 43 31 35 34 00 20 52 |rMenu = $C154. R| 000003D0: 65 63 6F 76 65 72 41 6C 6C 4D 65 6E 75 73 20 3D |ecoverAllMenus =| 000003E0: 20 24 43 31 35 37 00 20 44 6F 49 63 6F 6E 73 20 | $C157. DoIcons | 000003F0: 3D 20 24 43 31 35 41 00 3B 00 3B 20 55 54 49 4C |= $C15A.;.; UTIL| 00000400: 49 54 49 45 53 00 3B 00 20 44 53 68 69 66 74 4C |ITIES.;. DShiftL| 00000410: 65 66 74 20 3D 20 24 43 31 35 44 00 20 42 42 4D |eft = $C15D. BBM| 00000420: 75 6C 74 20 3D 20 24 43 31 36 30 00 20 42 4D 75 |ult = $C160. BMu| 00000430: 6C 74 20 3D 20 24 43 31 36 33 00 20 44 4D 75 6C |lt = $C163. DMul| 00000440: 74 20 3D 20 24 43 31 36 36 00 20 44 64 69 76 20 |t = $C166. Ddiv | 00000450: 3D 20 24 43 31 36 39 00 20 44 53 64 69 76 20 3D |= $C169. DSdiv =| 00000460: 20 24 43 31 36 43 00 20 44 61 62 73 20 3D 20 24 | $C16C. Dabs = $| 00000470: 43 31 36 46 00 20 44 6E 65 67 61 74 65 20 3D 20 |C16F. Dnegate = | 00000480: 24 43 31 37 32 00 20 44 64 65 63 20 3D 20 24 43 |$C172. Ddec = $C| 00000490: 31 37 35 00 20 43 6C 65 61 72 52 61 6D 20 3D 20 |175. ClearRam = | 000004A0: 24 43 31 37 38 00 20 46 69 6C 6C 52 61 6D 20 3D |$C178. FillRam =| 000004B0: 20 24 43 31 37 42 00 20 4D 6F 76 65 44 61 74 61 | $C17B. MoveData| 000004C0: 20 3D 20 24 43 31 37 45 00 20 49 6E 69 74 52 61 | = $C17E. InitRa| 000004D0: 6D 20 3D 20 24 43 31 38 31 00 20 50 75 74 44 65 |m = $C181. PutDe| 000004E0: 63 69 6D 61 6C 20 3D 20 24 43 31 38 34 00 20 47 |cimal = $C184. G| 000004F0: 65 74 52 61 6E 64 6F 6D 20 3D 20 24 43 31 38 37 |etRandom = $C187| 00000500: 00 3B 00 3B 20 4D 49 53 43 20 4D 4F 55 53 45 2C |.;.; MISC MOUSE,| 00000510: 20 4D 45 4E 55 2C 20 47 52 41 50 48 49 43 53 2C | MENU, GRAPHICS,| 00000520: 20 53 4C 45 45 50 00 3B 00 20 4D 6F 75 73 65 55 | SLEEP.;. MouseU| 00000530: 70 20 3D 20 24 43 31 38 41 00 20 4D 6F 75 73 65 |p = $C18A. Mouse| 00000540: 4F 66 66 20 3D 20 24 43 31 38 44 00 20 44 6F 50 |Off = $C18D. DoP| 00000550: 72 65 76 69 6F 75 73 4D 65 6E 75 20 3D 20 24 43 |reviousMenu = $C| 00000560: 31 39 30 00 20 52 65 44 6F 4D 65 6E 75 20 3D 20 |190. ReDoMenu = | 00000570: 24 43 31 39 33 00 20 47 65 74 53 65 72 69 61 6C |$C193. GetSerial| 00000580: 4E 75 6D 62 65 72 20 3D 20 24 43 31 39 36 00 20 |Number = $C196. | 00000590: 53 6C 65 65 70 20 3D 20 24 43 31 39 39 00 20 43 |Sleep = $C199. C| 000005A0: 6C 65 61 72 4D 6F 75 73 65 4D 6F 64 65 20 3D 20 |learMouseMode = | 000005B0: 24 43 31 39 43 00 20 69 5F 52 65 63 74 61 6E 67 |$C19C. i_Rectang| 000005C0: 6C 65 20 3D 20 24 43 31 39 46 00 20 69 5F 46 72 |le = $C19F. i_Fr| 000005D0: 61 6D 65 52 65 63 74 61 6E 67 6C 65 20 3D 20 24 |ameRectangle = $| 000005E0: 43 31 41 32 00 20 69 5F 52 65 63 6F 76 65 72 52 |C1A2. i_RecoverR| 000005F0: 65 63 74 61 6E 67 6C 65 20 3D 20 24 43 31 41 35 |ectangle = $C1A5| 00000600: 00 20 69 5F 47 72 61 70 68 69 63 73 53 74 72 69 |. i_GraphicsStri| 00000610: 6E 67 20 3D 20 24 43 31 41 38 00 3B 00 3B 20 20 |ng = $C1A8.;.; | 00000620: 42 41 43 4B 47 52 4F 55 4E 44 20 47 45 4E 45 52 |BACKGROUND GENER| 00000630: 41 54 49 4F 4E 00 3B 00 20 69 5F 42 69 74 6D 61 |ATION.;. i_Bitma| 00000640: 70 55 70 20 3D 20 24 43 31 41 42 00 3B 00 3B 20 |pUp = $C1AB.;.; | 00000650: 43 48 41 52 41 43 54 45 52 20 4D 41 4E 49 50 55 |CHARACTER MANIPU| 00000660: 4C 41 54 49 49 4F 4E 00 3B 00 20 69 5F 50 75 74 |LATIION.;. i_Put| 00000670: 53 74 72 69 6E 67 20 3D 20 24 43 31 41 45 00 20 |String = $C1AE. | 00000680: 47 65 74 52 65 61 6C 53 69 7A 65 20 3D 20 24 43 |GetRealSize = $C| 00000690: 31 42 31 00 3B 20 20 20 20 20 20 4D 4F 55 53 45 |1B1.; MOUSE| 000006A0: 20 26 20 4D 45 4E 55 53 00 3B 00 3B 20 20 20 20 | & MENUS.;.; | 000006B0: 20 20 55 54 49 4C 49 54 49 45 53 00 20 69 5F 46 | UTILITIES. i_F| 000006C0: 69 6C 6C 52 61 6D 20 3D 20 24 43 31 42 34 00 20 |illRam = $C1B4. | 000006D0: 69 5F 4D 6F 76 65 44 61 74 61 20 3D 20 24 43 31 |i_MoveData = $C1| 000006E0: 42 37 00 3B 00 3B 20 52 4F 55 54 49 4E 45 53 20 |B7.;.; ROUTINES | 000006F0: 41 44 44 45 44 20 4C 41 54 45 52 00 20 47 65 74 |ADDED LATER. Get| 00000700: 53 74 72 69 6E 67 20 3D 20 24 43 31 42 41 00 20 |String = $C1BA. | 00000710: 47 6F 74 6F 46 69 72 73 74 4D 65 6E 75 20 3D 20 |GotoFirstMenu = | 00000720: 24 43 31 42 44 00 20 49 6E 69 74 54 65 78 74 50 |$C1BD. InitTextP| 00000730: 72 6F 6D 70 74 20 3D 20 24 43 31 43 30 00 20 4D |rompt = $C1C0. M| 00000740: 61 69 6E 4C 6F 6F 70 20 3D 20 24 43 31 43 33 00 |ainLoop = $C1C3.| 00000750: 20 44 72 61 77 53 70 72 69 74 65 20 3D 20 24 43 | DrawSprite = $C| 00000760: 31 43 36 00 20 47 65 74 43 68 61 72 57 69 64 74 |1C6. GetCharWidt| 00000770: 68 20 3D 20 24 43 31 43 39 00 20 4C 6F 61 64 43 |h = $C1C9. LoadC| 00000780: 68 61 72 53 65 74 20 3D 20 24 43 31 43 43 00 20 |harSet = $C1CC. | 00000790: 50 6F 73 53 70 72 69 74 65 20 3D 20 24 43 31 43 |PosSprite = $C1C| 000007A0: 46 00 20 45 6E 61 62 6C 53 70 72 69 74 65 20 3D |F. EnablSprite =| 000007B0: 20 24 43 31 44 32 00 20 44 69 73 61 62 6C 53 70 | $C1D2. DisablSp| 000007C0: 72 69 74 65 20 3D 20 24 43 31 44 35 00 20 43 61 |rite = $C1D5. Ca| 000007D0: 6C 6C 52 6F 75 74 69 6E 65 20 3D 20 24 43 31 44 |llRoutine = $C1D| 000007E0: 38 00 20 43 61 6C 63 42 6C 6B 73 46 72 65 65 20 |8. CalcBlksFree | 000007F0: 3D 20 24 43 31 44 42 00 20 43 68 6B 44 6B 47 45 |= $C1DB. ChkDkGE| 00000800: 4F 53 20 3D 20 24 43 31 44 45 00 20 4E 65 77 44 |OS = $C1DE. NewD| 00000810: 69 73 6B 20 3D 20 24 43 31 45 31 00 20 47 65 74 |isk = $C1E1. Get| 00000820: 42 6C 6F 63 6B 20 3D 20 24 43 31 45 34 00 20 50 |Block = $C1E4. P| 00000830: 75 74 42 6C 6F 63 6B 20 3D 20 24 43 31 45 37 00 |utBlock = $C1E7.| 00000840: 20 53 65 74 47 45 4F 53 44 69 73 6B 20 3D 20 24 | SetGEOSDisk = $| 00000850: 43 31 45 41 00 20 53 61 76 65 46 69 6C 65 20 3D |C1EA. SaveFile =| 00000860: 20 24 43 31 45 44 00 20 53 65 74 47 44 69 72 45 | $C1ED. SetGDirE| 00000870: 6E 74 72 79 20 3D 20 24 43 31 46 30 00 20 42 6C |ntry = $C1F0. Bl| 00000880: 64 47 44 69 72 45 6E 74 72 79 20 3D 20 24 43 31 |dGDirEntry = $C1| 00000890: 46 33 00 20 47 65 74 46 72 65 65 44 69 72 42 6C |F3. GetFreeDirBl| 000008A0: 6B 20 3D 20 24 43 31 46 36 00 20 57 72 69 74 65 |k = $C1F6. Write| 000008B0: 46 69 6C 65 20 3D 20 24 43 31 46 39 00 20 42 6C |File = $C1F9. Bl| 000008C0: 6B 41 6C 6C 6F 63 20 3D 20 24 43 31 46 43 00 20 |kAlloc = $C1FC. | 000008D0: 52 65 61 64 46 69 6C 65 20 3D 20 24 43 31 46 46 |ReadFile = $C1FF| 000008E0: 00 20 53 6D 61 6C 6C 50 75 74 43 68 61 72 20 3D |. SmallPutChar =| 000008F0: 20 24 43 32 30 32 00 20 46 6F 6C 6C 6F 77 43 68 | $C202. FollowCh| 00000900: 61 69 6E 20 3D 20 24 43 32 30 35 00 20 47 65 74 |ain = $C205. Get| 00000910: 46 69 6C 65 20 3D 20 24 43 32 30 38 00 20 46 69 |File = $C208. Fi| 00000920: 6E 64 46 69 6C 65 20 3D 20 24 43 32 30 42 00 20 |ndFile = $C20B. | 00000930: 43 52 43 20 3D 20 24 43 32 30 45 00 20 4C 64 46 |CRC = $C20E. LdF| 00000940: 69 6C 65 20 3D 20 24 43 32 31 31 00 20 45 6E 74 |ile = $C211. Ent| 00000950: 65 72 54 75 72 62 6F 20 3D 20 24 43 32 31 34 00 |erTurbo = $C214.| 00000960: 20 4C 64 44 65 73 6B 41 63 63 20 3D 20 24 43 32 | LdDeskAcc = $C2| 00000970: 31 37 00 20 52 65 61 64 42 6C 6F 63 6B 20 3D 20 |17. ReadBlock = | 00000980: 24 43 32 31 41 00 20 4C 64 41 70 70 6C 69 63 20 |$C21A. LdApplic | 00000990: 3D 20 24 43 32 31 44 00 20 57 72 69 74 65 42 6C |= $C21D. WriteBl| 000009A0: 6F 63 6B 20 3D 20 24 43 32 32 30 00 20 56 65 72 |ock = $C220. Ver| 000009B0: 57 72 69 74 65 42 6C 6F 63 6B 20 3D 20 24 43 32 |WriteBlock = $C2| 000009C0: 32 33 00 20 46 72 65 65 46 69 6C 65 20 3D 20 24 |23. FreeFile = $| 000009D0: 43 32 32 36 00 20 47 65 74 46 48 64 72 49 6E 66 |C226. GetFHdrInf| 000009E0: 6F 20 3D 20 24 43 32 32 39 00 20 45 6E 74 65 72 |o = $C229. Enter| 000009F0: 44 65 73 6B 54 6F 70 20 3D 20 24 43 32 32 43 00 |DeskTop = $C22C.| 00000A00: 20 53 74 61 72 74 41 70 70 6C 20 3D 20 24 43 32 | StartAppl = $C2| 00000A10: 32 46 00 20 45 78 69 74 54 75 72 62 6F 20 3D 20 |2F. ExitTurbo = | 00000A20: 24 43 32 33 32 00 20 50 75 72 67 65 54 75 72 62 |$C232. PurgeTurb| 00000A30: 6F 20 3D 20 24 43 32 33 35 00 20 44 65 6C 65 74 |o = $C235. Delet| 00000A40: 65 46 69 6C 65 20 3D 20 24 43 32 33 38 00 20 46 |eFile = $C238. F| 00000A50: 69 6E 64 46 54 79 70 65 73 20 3D 20 24 43 32 33 |indFTypes = $C23| 00000A60: 42 00 20 52 73 74 72 41 70 70 6C 20 3D 20 24 43 |B. RstrAppl = $C| 00000A70: 32 33 45 00 20 54 6F 42 61 73 69 63 20 3D 20 24 |23E. ToBasic = $| 00000A80: 43 32 34 31 00 20 46 61 73 74 44 65 6C 46 69 6C |C241. FastDelFil| 00000A90: 65 20 3D 20 43 32 34 34 00 20 47 65 74 44 69 72 |e = C244. GetDir| 00000AA0: 48 65 61 64 20 3D 20 24 43 32 34 37 00 20 50 75 |Head = $C247. Pu| 00000AB0: 74 44 69 72 68 65 61 64 20 3D 20 24 43 32 34 41 |tDirhead = $C24A| 00000AC0: 00 20 4E 78 74 42 6C 6B 41 6C 6C 6F 63 20 3D 20 |. NxtBlkAlloc = | 00000AD0: 24 43 32 34 44 00 20 49 6D 70 72 69 6E 74 52 65 |$C24D. ImprintRe| 00000AE0: 63 74 61 6E 67 6C 65 20 3D 20 24 43 32 35 30 00 |ctangle = $C250.| 00000AF0: 20 69 5F 49 6D 70 72 69 6E 74 52 65 63 74 61 6E | i_ImprintRectan| 00000B00: 67 6C 65 20 3D 20 24 43 32 35 33 00 20 44 6F 44 |gle = $C253. DoD| 00000B10: 6C 67 42 6F 78 20 3D 20 24 43 32 35 36 00 20 52 |lgBox = $C256. R| 00000B20: 65 6E 61 6D 65 46 69 6C 65 20 3D 20 24 43 32 35 |enameFile = $C25| 00000B30: 39 00 20 49 6E 69 74 46 6F 72 49 4F 20 3D 20 24 |9. InitForIO = $| 00000B40: 43 32 35 43 00 20 44 6F 6E 65 57 69 74 68 49 4F |C25C. DoneWithIO| 00000B50: 20 3D 20 24 43 32 35 46 00 20 44 53 68 69 66 74 | = $C25F. DShift| 00000B60: 52 69 67 68 74 20 3D 20 24 43 32 36 32 00 20 43 |Right = $C262. C| 00000B70: 6F 70 79 53 74 72 69 6E 67 20 3D 20 24 43 32 36 |opyString = $C26| 00000B80: 35 00 20 43 6F 70 79 46 53 74 72 69 6E 67 20 3D |5. CopyFString =| 00000B90: 20 24 43 32 36 38 00 20 43 6D 70 53 74 72 69 6E | $C268. CmpStrin| 00000BA0: 67 20 3D 20 24 43 32 36 42 00 20 43 6D 70 46 53 |g = $C26B. CmpFS| 00000BB0: 74 72 69 6E 67 20 3D 20 24 43 32 36 45 00 20 46 |tring = $C26E. F| 00000BC0: 69 72 73 74 49 6E 69 74 20 3D 20 24 43 32 37 31 |irstInit = $C271| 00000BD0: 00 20 4F 70 65 6E 52 65 63 6F 72 64 46 69 6C 65 |. OpenRecordFile| 00000BE0: 20 3D 20 24 43 32 37 34 00 20 43 6C 6F 73 65 52 | = $C274. CloseR| 00000BF0: 65 63 6F 72 64 46 69 6C 65 20 3D 20 24 43 32 37 |ecordFile = $C27| 00000C00: 37 00 20 4E 65 78 74 52 65 63 6F 72 64 20 3D 20 |7. NextRecord = | 00000C10: 24 43 32 37 41 00 20 50 72 65 76 69 6F 75 73 52 |$C27A. PreviousR| 00000C20: 65 63 6F 72 64 20 3D 20 24 43 32 37 44 00 20 50 |ecord = $C27D. P| 00000C30: 6F 69 6E 74 52 65 63 6F 72 64 20 3D 20 24 43 32 |ointRecord = $C2| 00000C40: 38 30 00 20 44 65 6C 65 74 65 52 65 63 6F 72 64 |80. DeleteRecord| 00000C50: 20 3D 20 24 43 32 38 33 00 20 49 6E 73 65 72 74 | = $C283. Insert| 00000C60: 52 65 63 6F 72 64 20 3D 20 24 43 32 38 36 00 20 |Record = $C286. | 00000C70: 41 70 70 65 6E 64 52 65 63 6F 72 64 20 3D 20 24 |AppendRecord = $| 00000C80: 43 32 38 39 00 20 52 65 61 64 52 65 63 6F 72 64 |C289. ReadRecord| 00000C90: 20 3D 20 24 43 32 38 43 00 20 57 72 69 74 65 52 | = $C28C. WriteR| 00000CA0: 65 63 6F 72 64 20 3D 20 24 43 32 38 46 00 20 53 |ecord = $C28F. S| 00000CB0: 65 74 4E 65 78 74 46 72 65 65 20 3D 20 24 43 32 |etNextFree = $C2| 00000CC0: 39 32 00 20 55 70 64 61 74 65 52 65 63 6F 72 64 |92. UpdateRecord| 00000CD0: 46 69 6C 65 20 3D 20 24 43 32 39 35 00 20 47 65 |File = $C295. Ge| 00000CE0: 74 50 74 72 43 75 72 44 6B 4E 6D 20 3D 20 24 43 |tPtrCurDkNm = $C| 00000CF0: 32 39 38 00 20 50 72 6F 6D 70 74 4F 6E 20 3D 20 |298. PromptOn = | 00000D00: 24 43 32 39 42 00 20 50 72 6F 6D 70 74 4F 66 66 |$C29B. PromptOff| 00000D10: 20 3D 20 24 43 32 39 45 00 20 4F 70 65 6E 44 69 | = $C29E. OpenDi| 00000D20: 73 6B 20 3D 20 24 43 32 41 31 00 20 44 6F 49 6E |sk = $C2A1. DoIn| 00000D30: 6C 69 6E 65 52 65 74 75 72 6E 20 3D 20 24 43 32 |lineReturn = $C2| 00000D40: 41 34 00 20 47 65 74 4E 65 78 74 43 68 61 72 20 |A4. GetNextChar | 00000D50: 3D 20 24 43 32 41 37 00 20 42 69 74 6D 61 70 43 |= $C2A7. BitmapC| 00000D60: 6C 69 70 20 3D 20 24 43 32 41 41 00 20 46 69 6E |lip = $C2AA. Fin| 00000D70: 64 42 41 4D 42 69 74 20 3D 20 24 43 32 41 44 00 |dBAMBit = $C2AD.| 00000D80: 20 53 65 74 44 65 76 69 63 65 20 3D 20 24 43 32 | SetDevice = $C2| 00000D90: 42 30 00 20 49 73 4D 73 65 49 6E 52 65 67 69 6F |B0. IsMseInRegio| 00000DA0: 6E 20 3D 20 24 43 32 42 33 00 20 52 65 61 64 42 |n = $C2B3. ReadB| 00000DB0: 79 74 65 20 3D 20 24 43 32 42 36 00 20 46 72 65 |yte = $C2B6. Fre| 00000DC0: 65 42 6C 6F 63 6B 20 3D 20 24 43 32 42 39 00 20 |eBlock = $C2B9. | 00000DD0: 43 68 61 6E 67 65 44 69 73 6B 44 65 76 69 63 65 |ChangeDiskDevice| 00000DE0: 20 3D 20 24 43 32 42 43 00 20 52 73 74 72 46 72 | = $C2BC. RstrFr| 00000DF0: 6D 44 69 61 6C 6F 67 20 3D 20 24 43 32 42 46 00 |mDialog = $C2BF.| 00000E00: 20 50 61 6E 69 63 20 3D 20 24 43 32 43 32 00 20 | Panic = $C2C2. | 00000E10: 42 69 74 4F 74 68 65 72 43 6C 69 70 20 3D 20 24 |BitOtherClip = $| 00000E20: 43 32 43 35 00 20 53 74 61 73 68 52 41 4D 20 3D |C2C5. StashRAM =| 00000E30: 20 24 43 32 43 38 00 20 46 65 74 63 68 52 41 4D | $C2C8. FetchRAM| 00000E40: 20 3D 20 24 43 32 43 42 00 20 53 77 61 70 52 41 | = $C2CB. SwapRA| 00000E50: 4D 20 3D 20 24 43 32 43 45 00 20 56 65 72 69 66 |M = $C2CE. Verif| 00000E60: 79 52 41 4D 20 3D 20 24 43 32 44 31 00 20 44 6F |yRAM = $C2D1. Do| 00000E70: 52 41 4D 4F 70 20 3D 20 24 43 32 44 34 00 00 |RAMOp = $C2D4.. |
;.; NOTE:.; THE MORE LABELS YOU HAVE TH E SLOWER THE ASSEMBLER.; WILL RUN. PLA CE A SEMI-COLON IN FRONT OF THE ROUTINES .; YOU WILL NOT BE USING..;.;MISC. BOOT GEOS = $C000. RESETHANDLE = $C00 3. INTERRUPTMAIN = $C100.;.; PROCESSES .;. INITPROCESSES = $C103. RESTARTPRO CESS = $C106. ENABLEPROCESS = $C109. BLOCKPROCESS = $C10C. UNBLOCKPROCESS = $C10F. FREEZEPROCESS = $C112. UNFRE EZEPROCESS = $C115.;.; GRAPHICS.;. HORIZ ONTALLINE = $C118. INVERTLINE = $C11B. RECOVERLINE = $C11E. VERTICA LLINE = $C121. RECTANGLE = $C12 4. FRAMERECTANGLE = $C127. INVERTRECTANG LE = $C12A. RECOVERRECTANGLE = $C12D. DR AWLINE = $C130. DRAWPOINT = $C133. GRAP HICSSTRING = $C136. SETPATTERN =$C139. G ETSCANLINE = $C13C. TESTPOINT = $C13F.;. ; BACKGROUND GENERATION.;. BITMAPUP = $C 142.;.; CHARACTER MANIPULATION.;. PUTCH AR = $C145. PUTSTRING = $C148. USESYSTEM FONT = $C14B.;.; MOUSE & MENUS.;. STARTM OUSEMODE = $C14E. DOMENU = $C151. RECOVE RMENU = $C154. RECOVERALLMENUS = $C157. DOICONS = $C15A.;.; UTILITIES.;. DSHIFTL EFT = $C15D. BBMULT = $C160. BMULT = $C1 63. DMULT = $C166. DDIV = $C169. DSDIV = $C16C. DABS = $C16F. DNEGATE = $C172. D DEC = $C175. CLEARRAM = $C178. FILLRAM = $C17B. MOVEDATA = $C17E. INITRAM = $C18 1. PUTDECIMAL = $C184. GETRANDOM = $C187 .;.; MISC MOUSE, MENU, GRAPHICS, SLEEP.; . MOUSEUP = $C18A. MOUSEOFF = $C18D. DOP REVIOUSMENU = $C190. REDOMENU = $C193. G ETSERIALNUMBER = $C196. SLEEP = $C199. C LEARMOUSEMODE = $C19C. I_RECTANGLE = $C1 9F. I_FRAMERECTANGLE = $C1A2. I_RECOVERR ECTANGLE = $C1A5. I_GRAPHICSSTRING = $C1 A8.;.; BACKGROUND GENERATION.;. I_BITMA PUP = $C1AB.;.; CHARACTER MANIPULATIION. ;. I_PUTSTRING = $C1AE. GETREALSIZE = $C 1B1.; MOUSE & MENUS.;.; UTILIT IES. I_FILLRAM = $C1B4. I_MOVEDATA = $C1 B7.;.; ROUTINES ADDED LATER. GETSTRING = $C1BA. GOTOFIRSTMENU = $C1BD. INITTEXTP ROMPT = $C1C0. MAINLOOP = $C1C3. DRAWSPR ITE = $C1C6. GETCHARWIDTH = $C1C9. LOADC HARSET = $C1CC. POSSPRITE = $C1CF. ENABL SPRITE = $C1D2. DISABLSPRITE = $C1D5. CA LLROUTINE = $C1D8. CALCBLKSFREE = $C1DB. CHKDKGEOS = $C1DE. NEWDISK = $C1E1. GET BLOCK = $C1E4. PUTBLOCK = $C1E7. SETGEOS DISK = $C1EA. SAVEFILE = $C1ED. SETGDIRE NTRY = $C1F0. BLDGDIRENTRY = $C1F3. GETF REEDIRBLK = $C1F6. WRITEFILE = $C1F9. BL KALLOC = $C1FC. READFILE = $C1FF. SMALLP UTCHAR = $C202. FOLLOWCHAIN = $C205. GET FILE = $C208. FINDFILE = $C20B. CRC = $C 20E. LDFILE = $C211. ENTERTURBO = $C214. LDDESKACC = $C217. READBLOCK = $C21A. L DAPPLIC = $C21D. WRITEBLOCK = $C220. VER WRITEBLOCK = $C223. FREEFILE = $C226. GE TFHDRINFO = $C229. ENTERDESKTOP = $C22C. STARTAPPL = $C22F. EXITTURBO = $C232. P URGETURBO = $C235. DELETEFILE = $C238. F INDFTYPES = $C23B. RSTRAPPL = $C23E. TOB ASIC = $C241. FASTDELFILE = C244. GETDIR HEAD = $C247. PUTDIRHEAD = $C24A. NXTBLK ALLOC = $C24D. IMPRINTRECTANGLE = $C250. I_IMPRINTRECTANGLE = $C253. DODLGBOX = $C256. RENAMEFILE = $C259. INITFORIO = $ C25C. DONEWITHIO = $C25F. DSHIFTRIGHT = $C262. COPYSTRING = $C265. COPYFSTRING = $C268. CMPSTRING = $C26B. CMPFSTRING = $C26E. FIRSTINIT = $C271. OPENRECORDFILE = $C274. CLOSERECORDFILE = $C277. NEXTR ECORD = $C27A. PREVIOUSRECORD = $C27D. P OINTRECORD = $C280. DELETERECORD = $C283 . INSERTRECORD = $C286. APPENDRECORD = $ C289. READRECORD = $C28C. WRITERECORD = $C28F. SETNEXTFREE = $C292. UPDATERECORD FILE = $C295. GETPTRCURDKNM = $C298. PRO MPTON = $C29B. PROMPTOFF = $C29E. OPENDI SK = $C2A1. DOINLINERETURN = $C2A4. GETN EXTCHAR = $C2A7. BITMAPCLIP = $C2AA. FIN DBAMBIT = $C2AD. SETDEVICE = $C2B0. ISMS EINREGION = $C2B3. READBYTE = $C2B6. FRE EBLOCK = $C2B9. CHANGEDISKDEVICE = $C2BC . RSTRFRMDIALOG = $C2BF. PANIC = $C2C2. BITOTHERCLIP = $C2C5. STASHRAM = $C2C8. FETCHRAM = $C2CB. SWAPRAM = $C2CE. VERIF YRAM = $C2D1. DORAMOP = $C2D4..
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL