FLAGS IN THE WIN
FILE INFORMATION
FILENAME(S): FLAGS IN THE WIN
FILE TYPE(S): PRG
FILE SIZE: 3.1K
FIRST SEEN: 2025-11-30 18:12:16
APPEARS ON: 1 disk(s)
FILE HASH
6f7c6dd7de6550a18e97a1d38214402dd428ddf64f9bf2cfa0cbaa8c32fe6e37
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LOADSTAR 36 S 1 | FLAGS IN THE WIN | PRG | Sailor, Ganheden | 25 | 8 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 12 08 00 00 8F 20 46 4C 41 47 53 20 51 55 |....... FLAGS QU|
00000010: 49 5A 00 34 08 0A 00 8B 58 B2 30 A7 58 B2 31 3A |IZ.4....X.0.X.1:|
00000020: 93 22 48 49 2D 52 45 53 20 54 45 58 54 2E 4F 22 |."HI-RES TEXT.O"|
00000030: 2C 38 2C 31 00 51 08 14 00 8B 58 B2 31 A7 58 B2 |,8,1.Q....X.1.X.|
00000040: 32 3A 93 22 55 4E 50 41 43 4B 45 52 22 2C 38 2C |2:."UNPACKER",8,|
00000050: 31 00 6F 08 1E 00 8B 58 B2 32 A7 58 B2 33 3A 93 |1.o....X.2.X.3:.|
00000060: 22 46 4C 41 47 53 2E 4C 4E 4B 22 2C 38 2C 31 00 |"FLAGS.LNK",8,1.|
00000070: 7C 08 23 00 97 35 36 2C 36 33 3A 9C 00 82 08 28 ||.#..56,63:....(|
00000080: 00 3A 00 9C 08 32 00 4E 51 B2 31 37 3A 86 20 41 |.:...2.NQ.17:. A|
00000090: 24 28 4E 51 29 2C 53 4E 28 4E 51 29 00 B4 08 37 |$(NQ),SN(NQ)...7|
000000A0: 00 54 45 B2 35 30 37 35 39 3A 58 50 B2 32 3A 59 |.TE.50759:XP.2:Y|
000000B0: 50 B2 31 38 00 D1 08 3C 00 81 58 B2 31 A4 4E 51 |P.18...<..X.1.NQ|
000000C0: 3A 87 41 24 28 58 29 3A 53 4E 28 58 29 B2 58 3A |:.A$(X):SN(X).X:|
000000D0: 82 00 12 09 3E 00 83 20 49 4F 57 41 2C 4E 45 57 |....>.. IOWA,NEW|
000000E0: 20 4D 45 58 49 43 4F 2C 4D 41 52 59 4C 41 4E 44 | MEXICO,MARYLAND|
000000F0: 2C 41 4C 41 53 4B 41 2C 52 48 4F 44 45 20 49 53 |,ALASKA,RHODE IS|
00000100: 4C 41 4E 44 2C 54 45 58 41 53 2C 41 4C 41 42 41 |LAND,TEXAS,ALABA|
00000110: 4D 41 00 55 09 40 00 83 20 4E 4F 52 54 48 20 43 |MA.U.@.. NORTH C|
00000120: 41 52 4F 4C 49 4E 41 2C 53 4F 55 54 48 20 43 41 |AROLINA,SOUTH CA|
00000130: 52 4F 4C 49 4E 41 2C 57 59 4F 4D 49 4E 47 2C 4F |ROLINA,WYOMING,O|
00000140: 52 45 47 4F 4E 2C 4E 45 56 41 44 41 2C 43 4F 4C |REGON,NEVADA,COL|
00000150: 4F 52 41 44 4F 00 91 09 42 00 83 20 44 49 53 54 |ORADO...B.. DIST|
00000160: 52 49 43 54 20 4F 46 20 43 4F 4C 55 4D 42 49 41 |RICT OF COLUMBIA|
00000170: 2C 43 41 4C 49 46 4F 52 4E 49 41 2C 49 4E 44 49 |,CALIFORNIA,INDI|
00000180: 41 4E 41 2C 4D 41 53 53 41 43 48 55 53 45 54 54 |ANA,MASSACHUSETT|
00000190: 53 00 97 09 46 00 3A 00 A9 09 4B 00 8D 20 31 30 |S...F.:...K.. 10|
000001A0: 30 30 3A 9E 35 31 34 35 39 00 AF 09 4D 00 3A 00 |00:.51459...M.:.|
000001B0: E1 09 50 00 43 B2 30 3A 57 B2 30 3A 81 58 B2 31 |..P.C.0:W.0:.X.1|
000001C0: A4 4E 51 3A 41 B2 B5 28 BB 28 31 29 AC 4E 51 29 |.NQ:A..(.(1).NQ)|
000001D0: AA 31 3A 42 B2 B5 28 BB 28 31 29 AC 4E 51 29 AA |.1:B..(.(1).NQ).|
000001E0: 31 00 03 0A 52 00 54 24 B2 41 24 28 41 29 3A 41 |1...R.T$.A$(A):A|
000001F0: 24 28 41 29 B2 41 24 28 42 29 3A 41 24 28 42 29 |$(A).A$(B):A$(B)|
00000200: B2 54 24 00 23 0A 53 00 54 B2 53 4E 28 41 29 3A |.T$.#.S.T.SN(A):|
00000210: 53 4E 28 41 29 B2 53 4E 28 42 29 3A 53 4E 28 42 |SN(A).SN(B):SN(B|
00000220: 29 B2 54 00 2A 0A 54 00 82 58 00 30 0A 5A 00 3A |).T.*.T..X.0.Z.:|
00000230: 00 3C 0A 64 00 81 58 B2 31 A4 4E 51 00 58 0A 6E |.<.d..X.1.NQ.X.n|
00000240: 00 8D 20 31 30 30 30 20 3A 20 8F 20 42 4C 41 4E |.. 1000 : . BLAN|
00000250: 4B 20 53 43 52 45 45 4E 00 76 0A 78 00 8D 20 32 |K SCREEN.v.x.. 2|
00000260: 30 30 30 20 3A 20 8F 20 50 4C 4F 54 20 53 48 50 |000 : . PLOT SHP|
00000270: 23 53 4E 28 58 29 00 92 0A 82 00 8D 20 33 30 30 |#SN(X)...... 300|
00000280: 30 20 3A 20 8F 20 41 53 4B 20 51 55 45 53 54 49 |0 : . ASK QUESTI|
00000290: 4F 4E 00 9B 0A 84 00 46 4C B2 30 00 BB 0A 8C 00 |ON.....FL.0.....|
000002A0: 8D 20 34 30 30 30 20 3A 20 8F 20 47 45 54 2F 43 |. 4000 : . GET/C|
000002B0: 48 45 43 4B 20 41 4E 53 57 45 52 00 D9 0A 96 00 |HECK ANSWER.....|
000002C0: 8B 46 4C B2 31 A7 8D 35 30 30 30 3A 89 31 31 30 |.FL.1..5000:.110|
000002D0: 3A 20 8F 20 51 55 49 54 3F 00 E1 0A A0 00 82 20 |: . QUIT?...... |
000002E0: 58 00 FC 0A AA 00 89 20 36 30 30 30 20 20 3A 20 |X...... 6000 : |
000002F0: 8F 20 45 56 41 4C 55 41 54 49 4F 4E 00 02 0B B4 |. EVALUATION....|
00000300: 00 3A 00 13 0B E8 03 8F 20 50 4C 4F 54 20 42 4C |.:...... PLOT BL|
00000310: 41 4E 4B 00 2C 0B F2 03 8D 20 31 30 30 30 30 3A |ANK.,.... 10000:|
00000320: 20 8F 20 53 45 54 20 53 54 55 46 46 00 45 0B FC | . SET STUFF.E..|
00000330: 03 97 32 35 35 2C 30 3A 9E 35 31 34 36 32 3A 41 |..255,0:.51462:A|
00000340: 47 B2 33 2E 33 00 4B 0B 06 04 8E 00 51 0B 10 04 |G.3.3.K.....Q...|
00000350: 3A 00 62 0B D0 07 8F 20 50 4C 4F 54 20 53 48 50 |:.b.... PLOT SHP|
00000360: 23 58 00 7B 0B DA 07 8D 20 31 30 30 30 30 3A 20 |#X.{.... 10000: |
00000370: 8F 20 53 45 54 20 53 54 55 46 46 00 A7 0B E4 07 |. SET STUFF.....|
00000380: 97 32 35 35 2C 53 4E 28 58 29 3A 97 32 35 33 2C |.255,SN(X):.253,|
00000390: 31 30 3A 97 32 35 34 2C 32 3A 9E 35 31 34 36 32 |10:.254,2:.51462|
000003A0: 3A 41 47 B2 33 2E 33 00 AD 0B EE 07 8E 00 B3 0B |:AG.3.3.........|
000003B0: F8 07 3A 00 C6 0B B8 0B 8F 20 41 53 4B 20 51 55 |..:...... ASK QU|
000003C0: 45 53 54 49 4F 4E 00 FB 0B C2 0B 9E 54 45 2C 22 |ESTION......TE,"|
000003D0: 54 48 49 53 20 49 53 20 54 48 45 20 46 4C 41 47 |THIS IS THE FLAG|
000003E0: 20 4F 46 20 57 48 49 43 48 20 53 54 41 54 45 3F | OF WHICH STATE?|
000003F0: 22 2C 58 50 AC 38 2C 59 50 AC 38 00 26 0C CC 0B |",XP.8,YP.8.&...|
00000400: 9E 54 45 2C 22 50 52 45 53 53 20 5B 46 31 5D 20 |.TE,"PRESS [F1] |
00000410: 54 4F 20 45 58 49 54 22 2C 58 50 AC 38 2C 28 59 |TO EXIT",XP.8,(Y|
00000420: 50 AA 31 29 AC 38 00 2C 0C D6 0B 8E 00 32 0C E0 |P.1).8.,.....2..|
00000430: 0B 3A 00 49 0C A0 0F 8F 20 47 45 54 2F 43 48 45 |.:.I.... GET/CHE|
00000440: 43 4B 20 41 4E 53 57 45 52 00 66 0C AA 0F 8D 20 |CK ANSWER.f.... |
00000450: 31 31 30 30 30 20 3A 20 8F 20 48 49 2D 52 45 53 |11000 : . HI-RES|
00000460: 20 49 4E 50 55 54 00 AE 0C AB 0F 81 41 B2 33 A4 | INPUT......A.3.|
00000470: 35 3A 9E 54 45 2C 22 20 20 20 20 20 20 20 20 20 |5:.TE," |
00000480: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000490: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
000004A0: 2C 58 50 AC 38 2C 28 59 50 AA 41 29 AC 38 00 B4 |,XP.8,(YP.A).8..|
000004B0: 0C AC 0F 82 00 C3 0C AF 0F 8B 46 4C B2 31 A7 34 |..........FL.1.4|
000004C0: 31 30 30 00 DB 0C B4 0F 8B 20 49 4E 24 B3 B1 41 |100...... IN$..A|
000004D0: 24 28 58 29 20 A7 20 34 30 35 30 00 25 0D BE 0F |$(X) . 4050.%...|
000004E0: 9E 54 45 2C 22 20 20 20 20 20 20 20 20 20 20 20 |.TE," |
000004F0: 20 20 43 4F 52 52 45 43 54 21 20 20 20 20 20 20 | CORRECT! |
00000500: 20 20 20 20 20 20 20 20 20 20 22 2C 58 50 AC 38 | ",XP.8|
00000510: 2C 28 59 50 AA 33 29 AC 38 3A 43 B2 43 AA 31 3A |,(YP.3).8:C.C.1:|
00000520: 89 34 31 30 30 00 6B 0D D2 0F 9E 54 45 2C 22 49 |.4100.k....TE,"I|
00000530: 4E 43 4F 52 52 45 43 54 21 20 20 54 48 45 20 43 |NCORRECT! THE C|
00000540: 4F 52 52 45 43 54 20 53 54 41 54 45 20 49 53 3A |ORRECT STATE IS:|
00000550: 20 20 20 20 20 20 22 2C 58 50 AC 38 2C 28 59 50 | ",XP.8,(YP|
00000560: AA 33 29 AC 38 3A 57 B2 57 AA 31 00 82 0D D3 0F |.3).8:W.W.1.....|
00000570: 4D 4D B2 32 30 AB C3 28 41 24 28 58 29 29 AD 32 |MM.20..(A$(X)).2|
00000580: AB 34 00 AA 0D D4 0F 9E 54 45 2C 41 24 28 58 29 |.4......TE,A$(X)|
00000590: 2C 28 58 50 AA 4D 4D 29 AC 38 2C 28 59 50 AA 34 |,(XP.MM).8,(YP.4|
000005A0: 29 AC 38 3A 97 31 39 38 2C 2E 00 F6 0D D5 0F 8F |).8:.198,.......|
000005B0: 20 20 20 20 20 53 59 53 54 45 2C 22 54 48 45 20 | SYSTE,"THE |
000005C0: 43 4F 52 52 45 43 54 20 53 54 41 54 45 20 49 53 |CORRECT STATE IS|
000005D0: 3A 20 22 2B 41 24 28 58 29 2C 28 58 50 2B 4D 4D |: "+A$(X),(XP+MM|
000005E0: 29 2A 38 2C 28 59 50 2B 34 29 2A 38 3A 50 4F 4B |)*8,(YP+4)*8:POK|
000005F0: 45 31 39 38 2C 2E 00 2F 0E 04 10 9E 54 45 2C 22 |E198,../....TE,"|
00000600: 50 52 45 53 53 20 41 4E 59 20 4B 45 59 20 54 4F |PRESS ANY KEY TO|
00000610: 20 43 4F 4E 54 49 4E 55 45 2E 2E 2E 22 2C 28 58 | CONTINUE...",(X|
00000620: 50 AA 33 29 AC 38 2C 28 59 50 AA 35 29 AC 38 00 |P.3).8,(YP.5).8.|
00000630: 43 0E 09 10 A1 41 24 3A 8B 41 24 B2 22 22 A7 34 |C....A$:.A$."".4|
00000640: 31 30 35 00 49 0E 0E 10 8E 00 55 0E 88 13 8F 20 |105.I.....U.... |
00000650: 51 55 49 54 3F 00 60 0E 92 13 8D 20 31 30 30 30 |QUIT?.`.... 1000|
00000660: 00 98 0E 9C 13 9E 54 45 2C 22 41 52 45 20 59 4F |......TE,"ARE YO|
00000670: 55 20 53 55 52 45 20 59 4F 55 20 57 41 4E 54 20 |U SURE YOU WANT |
00000680: 54 4F 20 51 55 49 54 20 5B 59 2F 4E 5D 22 2C 58 |TO QUIT [Y/N]",X|
00000690: 50 AC 38 2C 59 50 AC 38 00 AE 0E A6 13 97 31 39 |P.8,YP.8......19|
000006A0: 38 2C 30 3A 92 31 39 38 2C 31 3A A1 41 24 00 D8 |8,0:.198,1:.A$..|
000006B0: 0E B0 13 8B 41 24 B3 B1 22 59 22 AF 41 24 B3 B1 |....A$.."Y".A$..|
000006C0: 22 4E 22 AF 41 24 B3 B1 22 D9 22 AF 41 24 B3 B1 |"N".A$..".".A$..|
000006D0: 22 CE 22 A7 35 30 33 30 00 F2 0E BA 13 8B 41 24 |".".5030......A$|
000006E0: B2 22 59 22 B0 41 24 B2 22 D9 22 A7 20 36 30 30 |."Y".A$.".". 600|
000006F0: 30 30 00 F8 0E C4 13 8E 00 FE 0E CE 13 3A 00 0F |00...........:..|
00000700: 0F 70 17 8F 20 45 56 41 4C 55 41 54 49 4F 4E 00 |.p.. EVALUATION.|
00000710: 1A 0F 7A 17 8D 20 31 30 30 30 00 53 0F 84 17 53 |..z.. 1000.S...S|
00000720: 24 B2 22 4F 55 54 20 4F 46 22 AA C4 28 4E 51 29 |$."OUT OF"..(NQ)|
00000730: AA 22 20 41 53 4B 45 44 2C 20 59 4F 55 20 47 4F |." ASKED, YOU GO|
00000740: 54 22 AA C4 28 43 29 AA 22 20 43 4F 52 52 45 43 |T"..(C)." CORREC|
00000750: 54 2E 22 00 6C 0F 86 17 9E 54 45 2C 53 24 2C 58 |T.".l....TE,S$,X|
00000760: 50 AC 38 2C 28 59 50 AB 39 29 AC 38 00 81 0F 8E |P.8,(YP.9).8....|
00000770: 17 50 43 B2 B5 28 28 43 AD 4E 51 29 AC 31 30 30 |.PC..((C.NQ).100|
00000780: 29 00 B2 0F 98 17 53 24 B2 22 54 48 49 53 20 41 |).....S$."THIS A|
00000790: 56 45 52 41 47 45 53 20 4F 55 54 20 54 4F 22 AA |VERAGES OUT TO".|
000007A0: C4 28 50 43 29 AA 22 25 20 43 4F 52 52 45 43 54 |.(PC)."% CORRECT|
000007B0: 2E 22 00 CB 0F 9A 17 9E 54 45 2C 53 24 2C 58 50 |."......TE,S$,XP|
000007C0: AC 38 2C 28 59 50 AB 38 29 AC 38 00 FF 0F A2 17 |.8,(YP.8).8.....|
000007D0: 8B 50 43 B1 B2 39 30 20 A7 53 24 B2 22 54 48 49 |.PC..90 .S$."THI|
000007E0: 53 20 49 53 20 41 4E 20 45 58 43 45 4C 4C 45 4E |S IS AN EXCELLEN|
000007F0: 54 20 53 43 4F 52 45 2E 22 3A 89 36 31 30 30 00 |T SCORE.":.6100.|
00000800: 37 10 AC 17 8B 50 43 B1 B2 38 30 20 A7 53 24 B2 |7....PC..80 .S$.|
00000810: 22 54 48 49 53 20 49 53 20 41 4E 20 41 42 4F 56 |"THIS IS AN ABOV|
00000820: 45 20 41 56 45 52 41 47 45 20 53 43 4F 52 45 2E |E AVERAGE SCORE.|
00000830: 22 3A 89 36 31 30 30 00 69 10 B6 17 8B 50 43 B1 |":.6100.i....PC.|
00000840: B2 37 30 20 A7 53 24 B2 22 54 48 49 53 20 49 53 |.70 .S$."THIS IS|
00000850: 20 41 4E 20 41 56 45 52 41 47 45 20 53 43 4F 52 | AN AVERAGE SCOR|
00000860: 45 2E 22 3A 89 36 31 30 30 00 A0 10 C0 17 8B 50 |E.":.6100......P|
00000870: 43 B1 B2 36 30 20 A7 53 24 B2 22 54 48 49 53 20 |C..60 .S$."THIS |
00000880: 49 53 20 41 20 42 45 4C 4F 57 20 41 56 45 52 41 |IS A BELOW AVERA|
00000890: 47 45 20 53 43 4F 52 45 2E 22 3A 89 36 31 30 30 |GE SCORE.":.6100|
000008A0: 00 C4 10 CA 17 53 24 B2 22 54 48 49 53 20 49 53 |.....S$."THIS IS|
000008B0: 20 41 20 56 45 52 59 20 50 4F 4F 52 20 53 43 4F | A VERY POOR SCO|
000008C0: 52 45 2E 22 00 DD 10 D4 17 9E 54 45 2C 53 24 2C |RE."......TE,S$,|
000008D0: 58 50 AC 38 2C 28 59 50 AB 37 29 AC 38 00 04 11 |XP.8,(YP.7).8...|
000008E0: D9 17 9E 54 45 2C 22 50 52 45 53 53 20 41 4E 59 |...TE,"PRESS ANY|
000008F0: 20 4B 45 59 22 2C 28 58 50 AA 31 30 29 AC 38 2C | KEY",(XP.10).8,|
00000900: 59 50 AC 38 00 1D 11 DB 17 97 31 39 38 2C 30 3A |YP.8......198,0:|
00000910: 92 31 39 38 2C 31 3A 97 31 39 38 2C 30 00 23 11 |.198,1:.198,0.#.|
00000920: DE 17 3A 00 34 11 58 1B 8F 20 50 4C 41 59 20 41 |..:.4.X.. PLAY A|
00000930: 47 41 49 4E 00 3F 11 62 1B 8D 20 31 30 30 30 00 |GAIN.?.b.. 1000.|
00000940: 7C 11 6C 1B 9E 54 45 2C 22 50 52 45 53 53 20 5B ||.l..TE,"PRESS [|
00000950: 52 45 54 55 52 4E 5D 20 54 4F 20 52 45 54 55 52 |RETURN] TO RETUR|
00000960: 4E 20 54 4F 20 4C 4F 41 44 53 54 41 52 22 2C 58 |N TO LOADSTAR",X|
00000970: 50 AC 38 2C 28 59 50 AB 35 29 AC 38 00 B4 11 6E |P.8,(YP.5).8...n|
00000980: 1B 9E 54 45 2C 22 41 4E 59 20 4F 54 48 45 52 20 |..TE,"ANY OTHER |
00000990: 4B 45 59 20 54 4F 20 50 4C 41 59 20 41 47 41 49 |KEY TO PLAY AGAI|
000009A0: 4E 22 2C 28 58 50 AA 35 29 AC 38 2C 28 59 50 AB |N",(XP.5).8,(YP.|
000009B0: 34 29 AC 38 00 CB 11 76 1B 97 31 39 38 2C 30 3A |4).8...v..198,0:|
000009C0: 92 31 39 38 2C 31 3A A1 41 47 24 00 E0 11 80 1B |.198,1:.AG$.....|
000009D0: 8B 41 47 24 B2 C7 28 31 33 29 A7 36 30 30 30 30 |.AG$..(13).60000|
000009E0: 00 E8 11 85 1B 89 38 30 00 EE 11 8A 1B 3A 00 FE |......80.....:..|
000009F0: 11 10 27 8F 20 53 45 54 20 53 54 55 46 46 00 14 |..'. SET STUFF..|
00000A00: 12 1A 27 97 32 34 39 2C 32 32 34 3A 97 32 35 30 |..'.249,224:.250|
00000A10: 2C 32 30 34 00 27 12 24 27 97 32 35 31 2C 30 3A |,204.'.$'.251,0:|
00000A20: 97 32 35 32 2C 36 34 00 39 12 2E 27 97 32 35 33 |.252,64.9..'.253|
00000A30: 2C 30 3A 97 32 35 34 2C 30 00 3F 12 38 27 8E 00 |,0:.254,0.?.8'..|
00000A40: 45 12 42 27 3A 00 58 12 F8 2A 8F 20 48 49 2D 52 |E.B':.X..*. HI-R|
00000A50: 45 53 20 49 4E 50 55 54 00 62 12 02 2B 41 24 B2 |ES INPUT.b..+A$.|
00000A60: 22 22 00 71 12 0C 2B 58 49 B2 32 3A 59 49 B2 32 |"".q..+XI.2:YI.2|
00000A70: 33 00 87 12 16 2B A1 4B 24 3A 8B 4B 24 B3 B1 22 |3....+.K$:.K$.."|
00000A80: 22 A7 31 31 30 37 30 00 A3 12 20 2B 8B 43 52 24 |".11070... +.CR$|
00000A90: B2 22 5B 22 A7 43 52 24 B2 22 5D 22 3A 89 31 31 |."[".CR$."]":.11|
00000AA0: 30 36 30 00 AF 12 2A 2B 43 52 24 B2 22 5B 22 00 |060...*+CR$."[".|
00000AB0: CF 12 34 2B 9E 35 30 37 35 39 2C 43 52 24 2C 58 |..4+.50759,CR$,X|
00000AC0: 49 AC 38 2C 59 49 AC 38 3A 89 31 31 30 33 30 00 |I.8,YI.8:.11030.|
00000AD0: E3 12 3E 2B 8B 4B 24 B2 C7 28 31 33 29 A7 31 31 |..>+.K$..(13).11|
00000AE0: 31 35 30 00 FB 12 40 2B 8B 4B 24 B2 22 85 22 A7 |150...@+.K$.".".|
00000AF0: 46 4C B2 31 3A 89 31 31 31 35 30 00 18 13 48 2B |FL.1:.11150...H+|
00000B00: 8B 4B 24 B3 B1 22 9D 22 AF 4B 24 B3 B1 C7 28 32 |.K$..".".K$...(2|
00000B10: 30 29 A7 31 31 31 30 30 00 58 13 52 2B 8B 58 49 |0).11100.X.R+.XI|
00000B20: B1 32 A7 58 49 B2 58 49 AB 31 3A 9E 35 30 37 35 |.2.XI.XI.1:.5075|
00000B30: 39 2C 22 20 20 22 2C 58 49 AC 38 2C 59 49 AC 38 |9," ",XI.8,YI.8|
00000B40: 3A 41 24 B2 C8 28 41 24 2C C3 28 41 24 29 AB 31 |:A$..(A$,.(A$).1|
00000B50: 29 3A 89 31 31 30 33 30 00 7D 13 5C 2B 8B 4B 24 |):.11030.}.\+.K$|
00000B60: B1 B2 22 C1 22 AF 4B 24 B3 B2 22 DA 22 A7 4B 24 |..".".K$..".".K$|
00000B70: B2 C7 28 C6 28 4B 24 29 AB 31 32 38 29 00 A8 13 |..(.(K$).128)...|
00000B80: 61 2B 8B 28 4B 24 B1 22 5A 22 B0 4B 24 B3 22 41 |a+.(K$."Z".K$."A|
00000B90: 22 29 AF 4B 24 B3 B1 22 20 22 AF 4B 24 B3 B1 22 |").K$.." ".K$.."|
00000BA0: 2E 22 A7 31 31 30 33 30 00 B9 13 66 2B 8B 58 49 |.".11030...f+.XI|
00000BB0: B2 33 38 A7 31 31 30 33 30 00 D9 13 70 2B 9E 35 |.38.11030...p+.5|
00000BC0: 30 37 35 39 2C 4B 24 2C 58 49 AC 38 2C 59 49 AC |0759,K$,XI.8,YI.|
00000BD0: 38 3A 58 49 B2 58 49 AA 31 00 E6 13 7A 2B 41 24 |8:XI.XI.1...z+A$|
00000BE0: B2 41 24 AA 4B 24 00 F1 13 84 2B 89 31 31 30 33 |.A$.K$....+.1103|
00000BF0: 30 00 FE 13 8E 2B 49 4E 24 B2 41 24 3A 8E 00 09 |0....+IN$.A$:...|
00000C00: 14 60 EA 8F 20 51 55 49 54 00 1A 14 6A EA 9E 35 |.`.. QUIT...j..5|
00000C10: 31 34 35 39 3A 99 22 93 0E 22 00 53 14 74 EA 9F |1459:."..".S.t..|
00000C20: 31 35 2C 38 2C 31 35 2C 22 52 30 3A 48 45 4C 4C |15,8,15,"R0:HELL|
00000C30: 4F 20 43 4F 4E 4E 45 43 54 3D 48 45 4C 4C 4F 20 |O CONNECT=HELLO |
00000C40: 43 4F 4E 4E 45 43 54 22 3A 84 31 35 2C 45 52 3A |CONNECT":.15,ER:|
00000C50: A0 31 35 00 6B 14 7E EA 8B 45 52 B3 B1 36 33 A7 |.15.k.~..ER..63.|
00000C60: 97 35 36 2C 31 36 30 3A 9C 3A 80 00 8C 14 88 EA |.56,160:.:......|
00000C70: 97 35 36 2C 31 36 30 3A 9C 3A 93 22 48 45 4C 4C |.56,160:.:."HELL|
00000C80: 4F 20 43 4F 4E 4E 45 43 54 22 2C 38 00 92 14 92 |O CONNECT",8....|
00000C90: EA 80 00 00 00 |..... |
....... FLAGS QUIZ.4....X.0.X.1:."HI-RES
TEXT.O",8,1.Q....X.1.X.2:."UNPACKER",8,
1.O....X.2.X.3:."FLAGS.LNK",8,1.|.#..56,
63:....(.:...2.NQ.17:. A$(NQ),SN(NQ)...7
.TE.50759:XP.2:YP.18.Q.<..X.1.NQ:.A$(X):
SN(X).X:....>.. IOWA,NEW MEXICO,MARYLAND
,ALASKA,RHODE ISLAND,TEXAS,ALABAMA.U.@..
NORTH CAROLINA,SOUTH CAROLINA,WYOMING,O
REGON,NEVADA,COLORADO...B.. DISTRICT OF
COLUMBIA,CALIFORNIA,INDIANA,MASSACHUSETT
S...F.:...K.. 1000:.51459...M.:...P.C.0:
W.0:.X.1.NQ:A..(.(1).NQ).1:B..(.(1).NQ).
1...R.T$.A$(A):A$(A).A$(B):A$(B).T$.#.S.
T.SN(A):SN(A).SN(B):SN(B).T.*.T..X.0.Z.:
.<.D..X.1.NQ.X.N.. 1000 : . BLANK SCREEN
.V.X.. 2000 : . PLOT SHP#SN(X)...... 300
0 : . ASK QUESTION.....FL.0...... 4000 :
. GET/CHECK ANSWER.Y....FL.1..5000:.110
: . QUIT?... .. X...... 6000 : . EVALUA
TION.....:...... PLOT BLANK.,.... 10000:
. SET STUFF.E....255,0:.51462:AG.3.3.K.
....Q...:.B.P.. PLOT SHP#X.{.Z.. 10000:
. SET STUFF......255,SN(X):.253,10:.254,
2:.51462:AG.3.3...........:.F.... ASK QU
ESTION...B..TE,"THIS IS THE FLAG OF WHIC
H STATE?",XP.8,YP.8.&.L..TE,"PRESS [F1]
TO EXIT",XP.8,(YP.1).8.,.V...2...:.I. ..
GET/CHECK ANSWER.F.... 11000 : . HI-RES
INPUT......A.3.5:.TE,"
",XP.8,(YP.A).8..
.....C....FL.1.4100...... IN$..A$(X) . 4
050.%....TE," CORRECT!
",XP.8,(YP.3).8:C.C.1:.4100.K.
R..TE,"INCORRECT! THE CORRECT STATE IS:
",XP.8,(YP.3).8:W.W.1...S.MM.20.C(
A$(X)).2.4...T..TE,A$(X),(XP.MM).8,(YP.4
).8:.198,....U.. SYSTE,"THE CORRECT
STATE IS: "+A$(X),(XP+MM)*8,(YP+4)*8:POK
E198,../....TE,"PRESS ANY KEY TO CONTINU
E...",(XP.3).8,(YP.5).8.C....A$:.A$."".4
105.I.....U.... QUIT?.`.... 1000......TE
,"ARE YOU SURE YOU WANT TO QUIT [Y/N]",X
P.8,YP.8......198,0:.198,1:.A$.X....A$..
"Y".A$.."N".A$.."Y".A$.."N".5030......A$
."Y".A$."Y". 60000...D.....N.:...P.. EVA
LUATION...Z.. 1000.S...S$."OUT OF".D(NQ)
." ASKED, YOU GOT".D(C)." CORRECT.".L...
.TE,S$,XP.8,(YP.9).8.....PC..((C.NQ).100
).....S$."THIS AVERAGES OUT TO".D(PC)."%
CORRECT.".K....TE,S$,XP.8,(YP.8).8.....
.PC..90 .S$."THIS IS AN EXCELLENT SCORE.
":.6100.7....PC..80 .S$."THIS IS AN ABOV
E AVERAGE SCORE.":.6100.I....PC..70 .S$.
"THIS IS AN AVERAGE SCORE.":.6100. ....P
C..60 .S$."THIS IS A BELOW AVERAGE SCORE
.":.6100.D.J.S$."THIS IS A VERY POOR SCO
RE."...T..TE,S$,XP.8,(YP.7).8...Y..TE,"P
RESS ANY KEY",(XP.10).8,YP.8......198,0:
.198,1:.198,0.#...:.4.X.. PLAY AGAIN.?.B
.. 1000.|.L..TE,"PRESS [RETURN] TO RETUR
N TO LOADSTAR",XP.8,(YP.5).8...N..TE,"AN
Y OTHER KEY TO PLAY AGAIN",(XP.5).8,(YP.
4).8.K.V..198,0:.198,1:.AG$......AG$.G(1
3).60000......80.....:....'. SET STUFF..
..'.249,224:.250,204.'.$'.251,0:.252,64.
9..'.253,0:.254,0.?.8'..E.B':.X..*. HI-R
ES INPUT.B..+A$."".Q..+XI.2:YI.23....+.K
$:.K$.."".11070... +.CR$."[".CR$."]":.11
060...*+CR$."[".O.4+.50759,CR$,XI.8,YI.8
:.11030...>+.K$.G(13).11150...@+.K$.".".
FL.1:.11150...H+.K$..".".K$..G(20).11100
.X.R+.XI.2.XI.XI.1:.50759," ",XI.8,YI.8
:A$.H(A$,C(A$).1):.11030.}.\+.K$.."A".K$
.."Z".K$.G(F(K$).128)...A+.(K$."Z".K$."A
").K$.." ".K$..".".11030...F+.XI.38.1103
0.Y.P+.50759,K$,XI.8,YI.8:XI.XI.1...Z+A$
.A$.K$....+.11030....+IN$.A$:....`.. QUI
T...J..51459:."..".S.T..15,8,15,"R0:HELL
O CONNECT=HELLO CONNECT":.15,ER: 15.K.~.
.ER..63..56,160:.:.......56,160:.:."HELL
O CONNECT",8.........
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL