COMAL 80
FILE INFORMATION
FILENAME(S): COMAL 80
FILE TYPE(S): PRG
FILE SIZE: 1.7K
FIRST SEEN: 2025-12-01 01:10:20
APPEARS ON: 1 disk(s)
FILE HASH
d17501fa3f22d8d621165f59b201b193662424ef1133993d46e17f7bc09b1235
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LEON OLSEN | COMAL 80 | PRG | hedning, Martin L0fgren | 26 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0D 08 0A 00 9E 28 32 30 36 33 29 00 00 00 |.......(2063)...| 00000010: 4C 76 2E 00 B0 03 41 42 53 03 41 4E 44 03 41 54 |Lv....ABS.AND.AT| 00000020: 4E 04 41 55 54 4F 05 42 41 53 49 43 04 43 41 53 |N.AUTO.BASIC.CAS| 00000030: 45 05 43 48 41 49 4E 03 43 48 52 05 43 4C 4F 53 |E.CHAIN.CHR.CLOS| 00000040: 45 06 43 4C 4F 53 45 44 03 43 4F 4E 03 43 4F 53 |E.CLOSED.CON.COS| 00000050: 04 44 41 54 41 05 44 45 42 55 47 03 44 45 4C 03 |.DATA.DEBUG.DEL.| 00000060: 44 49 4D 03 44 49 56 02 44 4F 04 45 4C 49 46 04 |DIM.DIV.DO.ELIF.| 00000070: 45 4C 53 45 03 45 4E 44 07 45 4E 44 43 41 53 45 |ELSE.END.ENDCASE| 00000080: 05 45 4E 44 49 46 07 45 4E 44 50 52 4F 43 08 45 |.ENDIF.ENDPROC.E| 00000090: 4E 44 57 48 49 4C 45 05 45 4E 54 45 52 03 45 4F |NDWHILE.ENTER.EO| 000000A0: 44 03 45 4F 46 03 45 53 43 04 45 58 45 43 03 45 |D.EOF.ESC.EXEC.E| 000000B0: 58 50 05 46 41 4C 53 45 03 46 4F 52 04 47 4F 54 |XP.FALSE.FOR.GOT| 000000C0: 4F 02 49 46 02 49 4E 05 49 4E 50 55 54 03 49 4E |O.IF.IN.INPUT.IN| 000000D0: 54 05 4C 41 42 45 4C 03 4C 45 4E 03 4C 45 54 04 |T.LABEL.LEN.LET.| 000000E0: 4C 49 53 54 04 4C 4F 41 44 03 4C 4F 47 03 4D 4F |LIST.LOAD.LOG.MO| 000000F0: 44 03 4E 45 57 06 45 4E 44 46 4F 52 03 4E 4F 54 |D.NEW.ENDFOR.NOT| 00000100: 02 4F 46 04 4F 50 45 4E 02 4F 52 03 4F 52 44 09 |.OF.OPEN.OR.ORD.| 00000110: 4F 54 48 45 52 57 49 53 45 06 4F 55 54 50 55 54 |OTHERWISE.OUTPUT| 00000120: 05 50 52 49 4E 54 04 50 52 4F 43 04 52 45 41 44 |.PRINT.PROC.READ| 00000130: 03 52 45 46 03 52 45 4D 05 52 45 4E 55 4D 06 52 |.REF.REM.RENUM.R| 00000140: 45 50 45 41 54 07 52 45 53 54 4F 52 45 03 52 4E |EPEAT.RESTORE.RN| 00000150: 44 03 52 55 4E 04 53 41 56 45 06 53 45 4C 45 43 |D.RUN.SAVE.SELEC| 00000160: 54 03 53 47 4E 03 53 49 4E 04 53 49 5A 45 03 53 |T.SGN.SIN.SIZE.S| 00000170: 50 43 03 53 51 52 06 53 54 41 54 55 53 04 53 54 |PC.SQR.STATUS.ST| 00000180: 45 50 04 53 54 4F 50 03 54 41 42 03 54 41 4E 04 |EP.STOP.TAB.TAN.| 00000190: 54 48 45 4E 04 54 49 4D 45 02 54 4F 04 54 52 41 |THEN.TIME.TO.TRA| 000001A0: 50 04 54 52 55 45 05 55 4E 54 49 4C 05 55 53 49 |P.TRUE.UNTIL.USI| 000001B0: 4E 47 04 57 48 45 4E 05 57 48 49 4C 45 05 57 52 |NG.WHEN.WHILE.WR| 000001C0: 49 54 45 04 5A 4F 4E 45 04 45 44 49 54 03 43 41 |ITE.ZONE.EDIT.CA| 000001D0: 54 06 41 50 50 45 4E 44 06 52 41 4E 44 4F 4D 04 |T.APPEND.RANDOM.| 000001E0: 55 4E 49 54 04 46 49 4C 45 04 50 4F 4B 45 04 50 |UNIT.FILE.POKE.P| 000001F0: 45 45 4B 01 00 01 00 01 00 01 00 01 00 01 00 02 |EEK.............| 00000200: 2F 2F 01 21 02 3A 3D 02 3A 2B 02 3A 2D 01 3A 01 |//.!.:=.:+.:-.:.| 00000210: 3B 01 2B 01 2B 01 2D 01 2D 01 26 01 2E 01 28 01 |;.+.+.-.-.&...(.| 00000220: 29 01 2C 01 2A 01 2F 01 5E 01 3C 02 3C 3D 02 3C |).,.*./.^.<.<=.<| 00000230: 3E 01 3D 01 3E 02 3E 3D 01 23 01 0D 03 53 59 53 |>.=.>.>=.#...SYS| 00000240: 07 53 45 54 45 58 45 43 06 53 45 54 4D 53 47 06 |.SETEXEC.SETMSG.| 00000250: 52 45 54 55 52 4E 04 46 55 4E 43 07 45 4E 44 46 |RETURN.FUNC.ENDF| 00000260: 55 4E 43 04 4E 55 4C 4C 04 50 41 53 53 06 44 45 |UNC.NULL.PASS.DE| 00000270: 4C 45 54 45 0A 53 45 54 47 52 41 50 48 49 43 07 |LETE.SETGRAPHIC.| 00000280: 53 45 54 54 45 58 54 05 46 52 41 4D 45 05 41 50 |SETTEXT.FRAME.AP| 00000290: 4C 4F 54 08 50 45 4E 43 4F 4C 4F 52 0A 42 41 43 |LOT.PENCOLOR.BAC| 000002A0: 4B 47 52 4F 55 4E 44 08 50 4C 4F 54 54 45 58 54 |KGROUND.PLOTTEXT| 000002B0: 05 43 4C 45 41 52 06 44 45 46 49 4E 45 08 49 44 |.CLEAR.DEFINE.ID| 000002C0: 45 4E 54 49 46 59 0B 53 50 52 49 54 45 43 4F 4C |ENTIFY.SPRITECOL| 000002D0: 4F 52 09 53 50 52 49 54 45 50 4F 53 0A 53 50 52 |OR.SPRITEPOS.SPR| 000002E0: 49 54 45 53 49 5A 45 0F 53 50 52 49 54 45 43 4F |ITESIZE.SPRITECO| 000002F0: 4C 4C 49 53 49 4F 4E 0D 44 41 54 41 43 4F 4C 4C |LLISION.DATACOLL| 00000300: 49 53 49 4F 4E 0A 48 49 44 45 53 50 52 49 54 45 |ISION.HIDESPRITE| 00000310: 03 4B 45 59 0A 53 50 52 49 54 45 42 41 43 4B 06 |.KEY.SPRITEBACK.| 00000320: 4D 4F 56 45 54 4F 06 44 52 41 57 54 4F 08 47 45 |MOVETO.DRAWTO.GE| 00000330: 54 43 4F 4C 4F 52 04 46 49 4C 4C 07 46 4F 52 57 |TCOLOR.FILL.FORW| 00000340: 41 52 44 08 50 4F 53 49 54 49 4F 4E 04 4C 45 46 |ARD.POSITION.LEF| 00000350: 54 0A 53 45 54 48 45 41 44 49 4E 47 08 50 52 49 |T.SETHEADING.PRI| 00000360: 4F 52 49 54 59 05 50 45 4E 55 50 07 50 45 4E 44 |ORITY.PENUP.PEND| 00000370: 4F 57 4E 06 42 4F 52 44 45 52 05 52 49 47 48 54 |OWN.BORDER.RIGHT| 00000380: 04 42 41 43 4B 0A 53 43 52 45 45 4E 45 43 43 4F |.BACK.SCREENECCO| 00000390: 0B 54 55 52 54 4C 45 53 54 41 54 45 0A 54 55 52 |.TURTLESTATE.TUR| 000003A0: 54 4C 45 53 49 5A 45 04 4E 45 58 54 08 4C 49 4E |TLESIZE.NEXT.LIN| 000003B0: 45 46 45 45 44 00 00 3B 13 3B 0C 0C 0C 0C 3B 0C |EFEED..;.;....;.| 000003C0: 0C 0C 3B 0C 0C 0C 0C 13 0C 0C 0C 0C 0C 0C 0C 0C |..;.............| 000003D0: 0C 3B 3B 3B 0C 3B 3B 0C 0C 0C 13 0C 3B 0C 3B 0C |.;;;.;;.....;.;.| 000003E0: 0C 0C 3B 13 0C 0C 25 0C 0C 13 3B 0C 0C 0C 0C 0C |..;...%...;.....| 000003F0: 0C 0C 0C 0C 0C 3B 0C 0C 0C 3B 3B 0C 3B 3B 3B 0C |.....;...;;.;;;.| 00000400: 0C 3B 3B 0C 3B 0C 0C 3B 0C 0C 0C 0C 0C 3B 0C 0C |.;;.;..;.....;..| 00000410: 0C 0C 0C 0C 0C 3B 02 02 02 01 01 01 0C 0C 0C 0C |.....;..........| 00000420: 0C 09 0C 14 24 14 24 14 0C 06 07 08 13 13 13 13 |....$.$.........| 00000430: 13 13 1A 13 13 0C 0C 0C 0C 0C 0C 0C 0C 0C 0C 0C |................| 00000440: 0C 0C 0C 0C 0C 0C 0C 0C 0C 0C 0C 0C 0C 3B 3B 0C |.............;;.| 00000450: 3B 0C 0C 0C 3B 0C 0C 0C 0C 0C 0C 0C 0C 0C 0C 0C |;...;...........| 00000460: 0C 0C 0C 0C 0C 00 01 11 01 00 00 00 00 05 00 00 |................| 00000470: 00 01 00 00 00 00 51 00 00 00 00 00 00 00 00 00 |......Q.........| 00000480: 00 01 00 00 01 00 00 00 00 32 00 01 00 04 00 00 |.........2......| 00000490: 00 01 51 00 00 24 00 00 01 03 00 00 00 00 00 00 |..Q..$..........| 000004A0: 00 00 00 00 02 00 00 00 01 01 00 05 01 06 00 00 |................| 000004B0: 00 01 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................| 000004C0: 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 |................| 000004D0: 00 00 43 44 41 44 43 00 00 00 00 51 51 61 30 30 |..CDADC....QQa00| 000004E0: 30 30 30 30 00 00 00 00 00 00 00 00 00 00 00 00 |0000............| 000004F0: 00 00 00 00 00 00 00 00 00 00 00 00 07 07 00 08 |................| 00000500: 00 00 00 07 00 00 00 00 00 00 00 00 00 00 00 00 |................| 00000510: 00 00 00 00 00 48 38 4A 00 00 00 00 4B 00 00 00 |.....H8J....K...| 00000520: 4C 00 00 00 00 25 00 00 00 00 00 00 00 00 00 5C |L....%.........\| 00000530: 5D 4D 00 4E 44 00 00 00 36 00 4F 00 50 00 00 00 |]M.ND...6.O.P...| 00000540: 52 26 00 00 37 00 00 39 49 00 00 00 00 00 00 00 |R&..7..9I.......| 00000550: 00 00 00 53 00 00 00 56 57 00 58 59 5E 00 00 45 |...S...VW.XY^..E| 00000560: 5A 00 5B 00 00 43 00 00 00 00 00 45 00 00 00 00 |Z.[..C.....E....| 00000570: 00 00 00 D8 00 00 00 00 00 00 00 00 00 00 00 00 |................| 00000580: 00 27 20 29 21 27 00 00 00 00 24 23 22 2A 2E 32 |.' )!'....$#"*.2| 00000590: 2C 30 34 00 00 00 00 00 00 00 00 00 00 00 00 00 |,04.............| 000005A0: 00 00 00 00 00 00 00 00 00 00 00 F7 F8 00 F9 00 |................| 000005B0: 00 00 FA 00 00 00 00 00 00 00 00 00 00 00 00 00 |................| 000005C0: 00 00 00 08 00 00 00 00 00 00 08 00 0A 00 08 00 |................| 000005D0: 02 02 03 06 06 06 03 08 00 0A 00 0D 0D 07 03 00 |................| 000005E0: 00 00 00 00 00 00 0A 00 07 00 08 04 04 00 00 00 |................| 000005F0: 00 08 00 0A 00 08 00 00 00 00 00 00 00 00 00 00 |................| 00000600: 0A 00 00 00 09 00 00 00 00 00 00 00 00 0A 00 09 |................| 00000610: 00 00 00 00 00 00 00 00 00 00 0A 00 00 00 09 00 |................| 00000620: 00 00 00 00 00 00 00 0A 00 09 00 00 00 00 05 00 |................| 00000630: 00 00 00 00 0A 00 00 00 00 00 00 05 00 00 00 00 |................| 00000640: 00 0A 00 00 00 01 00 00 04 00 00 00 00 00 0A 00 |................| 00000650: 0C 00 0A 00 00 00 00 00 00 00 00 0B 0A 0A 00 00 |................| 00000660: 00 00 00 00 00 00 08 00 0A 00 00 00 00 00 00 00 |................| 00000670: 00 00 00 00 00 0A 00 00 00 00 00 00 00 00 00 00 |................| 00000680: 00 00 00 00 00 00 0B 09 09 02 02 09 0A 0B 11 0F |................| 00000690: 10 0B 09 03 03 05 08 08 08 05 0B 11 0F 10 03 03 |................| 000006A0: 01 04 02 02 02 02 0A 0C 11 0F 10 01 09 0B 06 06 |................| 000006B0: 02 02 02 0A 0B 11 0F 10 0B 09 02 02 02 02 02 02 |................| 000006C0: 0A 0E 11 0F 10 02 09 0B 09 09 02 02 09 0A 0D 11 |................| 000006D0: 0F 10 0B 09 11 09 09 02 02 09 0A 0C 11 0F 10 11 |................| 000006E0: 09 0B 09 09 02 02 09 0A 0C 11 0F 10 0B 09 11 09 |................| 000006F0: 09 01 |.. |
.......(2063)...LV....ABS.AND.ATN.AUTO.B ASIC.CASE.CHAIN.CHR.CLOSE.CLOSED.CON.COS .DATA.DEBUG.DEL.DIM.DIV.DO.ELIF.ELSE.END .ENDCASE.ENDIF.ENDPROC.ENDWHILE.ENTER.EO D.EOF.ESC.EXEC.EXP.FALSE.FOR.GOTO.IF.IN. INPUT.INT.LABEL.LEN.LET.LIST.LOAD.LOG.MO D.NEW.ENDFOR.NOT.OF.OPEN.OR.ORD.OTHERWIS E.OUTPUT.PRINT.PROC.READ.REF.REM.RENUM.R EPEAT.RESTORE.RND.RUN.SAVE.SELECT.SGN.SI N.SIZE.SPC.SQR.STATUS.STEP.STOP.TAB.TAN. THEN.TIME.TO.TRAP.TRUE.UNTIL.USING.WHEN. WHILE.WRITE.ZONE.EDIT.CAT.APPEND.RANDOM. UNIT.FILE.POKE.PEEK.............//.!.:=. :+.:-.:.;.+.+.-.-.&...(.).,.*./.^.<.<=.< >.=.>.>=.#...SYS.SETEXEC.SETMSG.RETURN.F UNC.ENDFUNC.NULL.PASS.DELETE.SETGRAPHIC. SETTEXT.FRAME.APLOT.PENCOLOR.BACKGROUND. PLOTTEXT.CLEAR.DEFINE.IDENTIFY.SPRITECOL OR.SPRITEPOS.SPRITESIZE.SPRITECOLLISION. DATACOLLISION.HIDESPRITE.KEY.SPRITEBACK. MOVETO.DRAWTO.GETCOLOR.FILL.FORWARD.POSI TION.LEFT.SETHEADING.PRIORITY.PENUP.PEND OWN.BORDER.RIGHT.BACK.SCREENECCO.TURTLES TATE.TURTLESIZE.NEXT.LINEFEED..;.;....;. ..;..............;;;.;;.....;.;...;...%. ..;..........;...;;.;;;..;;.;..;.....;.. .....;..............$.$................. .....................;;.;...;........... ......................Q................. .2........Q..$.......................... ..................................CDADC. ...QQA000000............................ .....................H8J....K...L....%.. .......\]M.ND...6.O.P...R&..7..9I....... ...S...VW.XY^..EZ.[..C.....E.......X.... .........' )!'....$#"*.2,04............. ........................................ ........................................ ........................................ ........................................ ........................................ ........................................ ........................................ ........................................ ..................
> CLICK IMAGE PREVIEW FOR FULL MODAL