WHAT'S MY JOB
FILE INFORMATION
FILENAME(S): WHAT'S MY JOB
FILE TYPE(S): PRG
FILE SIZE: 2.5K
FIRST SEEN: 2025-11-30 21:23:20
APPEARS ON: 1 disk(s)
FILE HASH
6787fdfdfb5a136473b8f7ee916e063c357fe8fc4612b0d3c32fd844b155527c
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 SPEL 18 1 | WHAT'S MY JOB | PRG | DuncanTwain | 1 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1F 08 0A 00 97 35 33 32 38 30 2C 31 31 3A |.......53280,11:| 00000010: 97 35 33 32 38 31 2C 30 3A 99 C7 28 31 34 29 00 |.53281,0:..(14).| 00000020: 49 08 14 00 99 22 93 11 11 11 11 11 22 3B A3 31 |I...."......";.1| 00000030: 32 29 3B 22 11 9B 12 20 57 48 41 54 27 53 20 4D |2);"... WHAT'S M| 00000040: 59 20 4A 4F 42 3F 20 92 22 00 6E 08 1E 00 99 A6 |Y JOB? .".n.....| 00000050: 39 29 3B 22 11 11 9A 41 20 50 52 4F 47 52 41 4D |9);"...A PROGRAM| 00000060: 20 46 4F 52 20 54 48 45 20 43 2D 36 34 22 00 8B | FOR THE C-64"..| 00000070: 08 28 00 99 A6 31 33 29 3B 22 11 11 42 59 20 42 |.(...13);"..BY B| 00000080: 2E 57 2E 42 45 48 4C 49 4E 47 22 00 9C 08 32 00 |.W.BEHLING"...2.| 00000090: 81 49 B2 30 A4 33 30 30 30 3A 82 49 00 BB 08 3C |.I.0.3000:.I...<| 000000A0: 00 86 41 24 28 32 30 30 30 29 3A 81 49 B2 30 A4 |..A$(2000):.I.0.| 000000B0: 33 3A 87 41 24 28 49 29 3A 82 49 00 F1 08 46 00 |3:.A$(I):.I...F.| 000000C0: 99 22 93 11 11 11 11 11 11 20 44 4F 20 59 4F 55 |."....... DO YOU| 000000D0: 20 57 41 4E 54 20 41 4C 4C 20 50 52 45 56 49 4F | WANT ALL PREVIO| 000000E0: 55 53 20 4A 4F 42 53 20 45 4E 54 45 52 45 44 3F |US JOBS ENTERED?| 000000F0: 22 00 03 09 4B 00 A1 4B 24 3A 8B 4B 24 B2 22 22 |"...K..K$:.K$.""| 00000100: A7 37 35 00 14 09 50 00 8B 4B 24 B3 B1 22 59 22 |.75...P..K$.."Y"| 00000110: A7 31 30 30 00 46 09 55 00 99 A6 33 29 22 11 11 |.100.F.U...3)"..| 00000120: 11 11 11 11 48 49 54 20 5B 2A 5D 20 57 48 45 4E |....HIT [*] WHEN| 00000130: 20 4A 4F 42 53 27 20 44 49 53 4B 20 49 53 20 52 | JOBS' DISK IS R| 00000140: 45 41 44 59 2E 22 00 58 09 5A 00 A1 4B 24 3A 8B |EADY.".X.Z..K$:.| 00000150: 4B 24 B2 22 22 A7 39 30 00 6A 09 5F 00 8B 4B 24 |K$."".90.j._..K$| 00000160: B2 22 2A 22 A7 8D 32 30 30 30 00 8D 09 64 00 99 |."*"..2000...d..| 00000170: 22 93 22 A3 31 32 29 22 11 9B 12 20 57 48 41 54 |".".12)"... WHAT| 00000180: 27 53 20 4D 59 20 4A 4F 42 3F 20 92 22 00 BE 09 |'S MY JOB? ."...| 00000190: 6E 00 99 22 11 11 99 20 59 4F 55 20 54 48 49 4E |n.."... YOU THIN| 000001A0: 4B 20 4F 46 20 41 20 50 45 52 53 4F 4E 20 41 4E |K OF A PERSON AN| 000001B0: 44 20 49 27 4C 4C 20 54 52 59 20 54 4F 22 00 E7 |D I'LL TRY TO"..| 000001C0: 09 78 00 99 22 20 47 55 45 53 53 20 57 48 41 54 |.x.." GUESS WHAT| 000001D0: 20 4B 49 4E 44 20 4F 46 20 57 4F 52 4B 20 54 48 | KIND OF WORK TH| 000001E0: 45 59 20 44 4F 2E 22 00 17 0A 7A 00 99 22 11 20 |EY DO."...z..". | 000001F0: 49 46 20 54 48 45 20 41 4E 53 57 45 52 20 54 4F |IF THE ANSWER TO| 00000200: 20 41 20 51 55 45 53 54 49 4F 4E 20 49 53 20 4E | A QUESTION IS N| 00000210: 4F 54 20 59 45 53 22 00 44 0A 7C 00 99 22 20 4D |OT YES".D.|.." M| 00000220: 4F 52 45 20 54 48 41 4E 20 35 30 25 20 4F 46 20 |ORE THAN 50% OF | 00000230: 54 48 45 20 54 49 4D 45 20 41 4E 53 57 45 52 20 |THE TIME ANSWER | 00000240: 4E 4F 2E 22 00 6B 0A 7E 00 99 A6 37 29 22 11 11 |NO.".k.~...7)"..| 00000250: 81 48 49 54 20 5B 4C 5D 20 54 4F 20 4C 49 53 54 |.HIT [L] TO LIST| 00000260: 20 41 4C 4C 20 4A 4F 42 53 2E 22 00 85 0A 82 00 | ALL JOBS.".....| 00000270: 99 22 11 11 99 20 41 52 45 20 59 4F 55 20 52 45 |."... ARE YOU RE| 00000280: 41 44 59 3F 22 00 98 0A 87 00 A1 41 24 3A 8B 41 |ADY?"......A$:.A| 00000290: 24 B2 22 22 A7 31 33 35 00 AF 0A 8C 00 8B 41 24 |$."".135......A$| 000002A0: B2 22 4C 22 B0 41 24 B2 22 4C 22 A7 36 30 30 00 |."L".A$."L".600.| 000002B0: C6 0A 96 00 8B 41 24 B2 22 4E 22 B0 41 24 B2 22 |.....A$."N".A$."| 000002C0: 4E 22 A7 37 30 30 00 CE 0A A0 00 4B B2 31 00 D7 |N".700.....K.1..| 000002D0: 0A AA 00 8D 33 39 30 00 EB 0A B4 00 8B C3 28 41 |....390.......(A| 000002E0: 24 28 4B 29 29 B2 30 A7 37 30 30 00 04 0B BE 00 |$(K)).0.700.....| 000002F0: 8B C8 28 41 24 28 4B 29 2C 32 29 B2 22 2F 51 22 |..(A$(K),2)."/Q"| 00000300: A7 31 37 30 00 2D 0B C8 00 99 22 12 11 41 52 45 |.170.-...."..ARE| 00000310: 20 59 4F 55 20 41 20 22 3B C9 28 41 24 28 4B 29 | YOU A ";.(A$(K)| 00000320: 2C C3 28 41 24 28 4B 29 29 AB 32 29 3B 00 35 0B |,.(A$(K)).2);.5.| 00000330: D2 00 85 41 24 00 44 0B DC 00 41 24 B2 C8 28 41 |...A$.D...A$..(A| 00000340: 24 2C 31 29 00 55 0B E1 00 8B 41 24 B3 B1 22 59 |$,1).U....A$.."Y| 00000350: 22 A7 32 34 30 00 8A 0B E6 00 99 22 93 11 11 11 |".240......"....| 00000360: 11 11 11 11 11 11 99 20 20 20 20 20 20 12 20 54 |....... . T| 00000370: 52 59 20 41 4E 4F 54 48 45 52 20 50 45 52 53 4F |RY ANOTHER PERSO| 00000380: 4E 20 5B 59 2F 4E 5D 3F 20 22 00 9D 0B EA 00 A1 |N [Y/N]? "......| 00000390: 4B 24 3A 8B 4B 24 B2 22 22 A7 32 33 34 00 B4 0B |K$:.K$."".234...| 000003A0: EC 00 8B 4B 24 B2 22 59 22 B0 4B 24 B2 22 59 22 |...K$."Y".K$."Y"| 000003B0: A7 31 30 30 00 BD 0B EE 00 89 37 30 30 00 E5 0B |.100......700...| 000003C0: F0 00 99 22 11 99 49 20 47 49 56 45 20 55 50 21 |..."..I GIVE UP!| 000003D0: 21 20 20 57 48 41 54 20 49 53 20 59 4F 55 52 20 |! WHAT IS YOUR | 000003E0: 4A 4F 42 3F 22 00 0E 0C F2 00 99 22 11 81 20 5B |JOB?"......".. [| 000003F0: 4C 49 4D 49 54 A0 31 39 A0 4C 45 54 54 45 52 53 |LIMIT.19.LETTERS| 00000400: 20 41 4E 44 A0 53 50 41 43 45 53 9E 11 22 00 16 | AND.SPACES.."..| 00000410: 0C F4 00 85 56 24 00 48 0C F6 00 8B C3 28 56 24 |....V$.H.....(V$| 00000420: 29 B1 31 39 A7 99 A6 34 29 22 11 9A 20 45 52 52 |).19...4)".. ERR| 00000430: 4F 52 21 A0 4A 4F 42 A0 54 4F 4F A0 4C 4F 4E 47 |OR!.JOB.TOO.LONG| 00000440: 21 21 22 3A 89 32 34 32 00 82 0C FA 00 99 22 11 |!!":.242......".| 00000450: 99 20 50 4C 45 41 53 45 20 47 49 56 45 20 4D 45 |. PLEASE GIVE ME| 00000460: 20 41 20 59 45 53 20 4F 52 20 4E 4F 20 51 55 45 | A YES OR NO QUE| 00000470: 53 54 49 4F 4E 20 54 4F 20 54 45 4C 4C 20 41 20 |STION TO TELL A | 00000480: 22 3B 00 AE 0C 04 01 99 56 24 3B 22 20 46 52 4F |";......V$;" FRO| 00000490: 4D 20 41 20 22 3B C9 28 41 24 28 4B 29 2C C3 28 |M A ";.(A$(K),.(| 000004A0: 41 24 28 4B 29 29 AB 32 29 3B 22 3F 11 22 00 D5 |A$(K)).2);"?."..| 000004B0: 0C 09 01 99 22 81 20 5B 4C 49 4D 49 54 A0 33 38 |....". [LIMIT.38| 000004C0: A0 4C 45 54 54 45 52 53 20 41 4E 44 A0 53 50 41 |.LETTERS AND.SPA| 000004D0: 43 45 53 5D 22 00 E2 0C 0E 01 85 22 11 9E 22 3B |CES]"......"..";| 000004E0: 58 24 00 1A 0D 13 01 8B C3 28 58 24 29 B1 33 38 |X$.......(X$).38| 000004F0: A7 99 A6 33 29 3B 22 11 9A 45 52 52 4F 52 21 A0 |...3);"..ERROR!.| 00000500: 51 55 45 53 54 49 4F 4E A0 54 4F 4F A0 4C 4F 4E |QUESTION.TOO.LON| 00000510: 47 21 21 11 22 3A 89 32 36 35 00 42 0D 18 01 99 |G!!.":.265.B....| 00000520: 22 99 46 4F 52 20 41 20 22 56 24 22 20 54 48 45 |".FOR A "V$" THE| 00000530: 20 41 4E 53 57 45 52 20 57 4F 55 4C 44 20 42 45 | ANSWER WOULD BE| 00000540: 3F 22 00 4E 0D 22 01 85 22 9B 22 3B 41 24 00 72 |?".N."..".";A$.r| 00000550: 0D 2C 01 41 24 B2 C8 28 41 24 2C 31 29 3A 8B 41 |.,.A$..(A$,1):.A| 00000560: 24 B3 B1 22 59 22 AF 41 24 B3 B1 22 4E 22 A7 32 |$.."Y".A$.."N".2| 00000570: 38 30 00 85 0D 36 01 8B 41 24 B2 22 59 22 A7 42 |80...6..A$."Y".B| 00000580: 24 B2 22 4E 22 00 98 0D 40 01 8B 41 24 B2 22 4E |$."N"...@..A$."N| 00000590: 22 A7 42 24 B2 22 59 22 00 D4 0D 4A 01 5A 31 B2 |".B$."Y"...J.Z1.| 000005A0: C5 28 41 24 28 30 29 29 3A 41 24 28 30 29 B2 C4 |.(A$(0)):A$(0)..| 000005B0: 28 5A 31 AA 32 29 3A 41 24 28 5A 31 29 B2 41 24 |(Z1.2):A$(Z1).A$| 000005C0: 28 4B 29 3A 41 24 28 5A 31 AA 31 29 B2 22 2F 41 |(K):A$(Z1.1)."/A| 000005D0: 22 AA 56 24 00 06 0E 72 01 41 24 28 4B 29 B2 22 |".V$...r.A$(K)."| 000005E0: 2F 51 22 AA 58 24 AA 22 2F 22 AA 41 24 AA C4 28 |/Q".X$."/".A$..(| 000005F0: 5A 31 AA 31 29 AA 22 2F 22 AA 42 24 AA C4 28 5A |Z1.1)."/".B$..(Z| 00000600: 31 29 AA 22 2F 22 00 0F 0E 7C 01 89 31 30 30 00 |1)."/"...|..100.| 00000610: 15 0E 86 01 8F 00 22 0E 90 01 51 24 B2 41 24 28 |......"...Q$.A$(| 00000620: 4B 29 00 31 0E 9A 01 81 5A B2 33 A4 C3 28 51 24 |K).1....Z.3..(Q$| 00000630: 29 00 54 0E 9F 01 8B CA 28 51 24 2C 5A 2C 31 29 |).T.....(Q$,Z,1)| 00000640: B3 B1 22 2F 22 A7 99 CA 28 51 24 2C 5A 2C 31 29 |.."/"...(Q$,Z,1)| 00000650: 3B 3A 82 5A 00 5C 0E A4 01 85 43 24 00 6B 0E AE |;:.Z.\....C$.k..| 00000660: 01 43 24 B2 C8 28 43 24 2C 31 29 00 84 0E B8 01 |.C$..(C$,1).....| 00000670: 8B 43 24 B3 B1 22 59 22 AF 43 24 B3 B1 22 4E 22 |.C$.."Y".C$.."N"| 00000680: A7 34 31 30 00 92 0E C2 01 47 24 B2 22 2F 22 AA |.410.....G$."/".| 00000690: 43 24 00 A3 0E C7 01 81 58 B2 33 A4 C3 28 51 24 |C$......X.3..(Q$| 000006A0: 29 AB 31 00 B9 0E CC 01 8B CA 28 51 24 2C 58 2C |).1.......(Q$,X,| 000006B0: 32 29 B2 47 24 A7 34 38 30 00 C0 0E D6 01 82 58 |2).G$.480......X| 000006C0: 00 D1 0E E0 01 81 59 B2 58 AA 31 A4 C3 28 51 24 |......Y.X.1..(Q$| 000006D0: 29 00 E8 0E EA 01 8B CA 28 51 24 2C 59 2C 31 29 |).......(Q$,Y,1)| 000006E0: B2 22 2F 22 A7 35 31 30 00 EF 0E F4 01 82 59 00 |."/".510......Y.| 000006F0: 08 0F FE 01 4B B2 C5 28 CA 28 51 24 2C 58 AA 32 |....K..(.(Q$,X.2| 00000700: 2C 59 AB 58 AB 32 29 29 00 0E 0F 08 02 8E 00 5A |,Y.X.2)).......Z| 00000710: 0F 12 02 83 22 34 22 2C 22 2F 51 44 4F 20 59 4F |...."4","/QDO YO| 00000720: 55 20 57 4F 52 4B 20 4D 4F 53 54 4C 59 20 4F 55 |U WORK MOSTLY OU| 00000730: 54 44 4F 4F 52 53 2F 59 32 2F 4E 33 22 2C 22 2F |TDOORS/Y2/N3","/| 00000740: 41 54 52 55 43 4B A0 44 52 49 56 45 52 22 2C 22 |ATRUCK.DRIVER","| 00000750: 2F 41 54 45 41 43 48 45 52 22 00 7F 0F 58 02 99 |/ATEACHER"...X..| 00000760: 22 11 11 99 4A 4F 42 53 20 49 20 41 4C 52 45 41 |"...JOBS I ALREA| 00000770: 44 59 20 4B 4E 4F 57 20 41 52 45 3A 11 9E 22 00 |DY KNOW ARE:..".| 00000780: 87 0F 5D 02 58 B2 30 00 99 0F 62 02 81 49 B2 31 |..].X.0...b..I.1| 00000790: A4 C5 28 41 24 28 30 29 29 00 B3 0F 6C 02 8B C8 |..(A$(0))...l...| 000007A0: 28 41 24 28 49 29 2C 32 29 B3 B1 22 2F 41 22 A7 |(A$(I),2).."/A".| 000007B0: 36 36 30 00 C3 0F 6E 02 8B 58 B2 31 A7 99 A3 32 |660...n..X.1...2| 000007C0: 30 29 3B 00 CE 0F 70 02 8B 58 B2 30 A7 99 00 E0 |0);...p..X.0....| 000007D0: 0F 76 02 81 5A B2 33 A4 C3 28 41 24 28 49 29 29 |.v..Z.3..(A$(I))| 000007E0: 00 09 10 80 02 8B CA 28 41 24 28 49 29 2C 5A 2C |.......(A$(I),Z,| 000007F0: 31 29 B3 B1 22 2F 22 A7 99 CA 28 41 24 28 49 29 |1).."/"...(A$(I)| 00000800: 2C 5A 2C 31 29 3B 3A 82 5A 00 1C 10 8A 02 58 B2 |,Z,1);:.Z.....X.| 00000810: 58 AA 31 3A 8B 58 B1 31 A7 58 B2 30 00 23 10 94 |X.1:.X.1.X.0.#..| 00000820: 02 82 49 00 4B 10 96 02 99 3A 99 A6 38 29 3B 22 |..I.K....:..8);"| 00000830: 11 11 48 49 54 20 41 4E 59 20 4B 45 59 20 54 4F |..HIT ANY KEY TO| 00000840: 20 43 4F 4E 54 49 4E 55 45 2E 22 00 5E 10 98 02 | CONTINUE.".^...| 00000850: A1 4B 24 3A 8B 4B 24 B2 22 22 A7 36 36 34 00 67 |.K$:.K$."".664.g| 00000860: 10 9E 02 89 31 30 30 00 9C 10 BC 02 99 22 93 11 |....100......"..| 00000870: 11 11 11 11 11 20 20 44 4F 20 59 4F 55 20 57 41 |..... DO YOU WA| 00000880: 4E 54 20 54 4F 20 53 41 56 45 20 54 48 45 20 4A |NT TO SAVE THE J| 00000890: 4F 42 53 20 49 20 4B 4E 4F 57 3F 22 00 AF 10 C6 |OBS I KNOW?"....| 000008A0: 02 A1 4B 24 3A 8B 4B 24 B2 22 22 A7 37 31 30 00 |..K$:.K$."".710.| 000008B0: C0 10 D0 02 8B 4B 24 B3 B1 22 59 22 A7 38 30 30 |.....K$.."Y".800| 000008C0: 00 F3 10 D5 02 99 A6 33 29 22 11 11 11 11 11 11 |.......3)"......| 000008D0: 48 49 54 20 5B 2A 5D 20 57 48 45 4E 20 27 4A 4F |HIT [*] WHEN 'JO| 000008E0: 42 53 27 20 44 49 53 4B 20 49 53 20 52 45 41 44 |BS' DISK IS READ| 000008F0: 59 2E 22 00 06 11 DA 02 A1 4B 24 3A 8B 4B 24 B2 |Y."......K$:.K$.| 00000900: 22 22 A7 37 33 30 00 18 11 DF 02 8B 4B 24 B2 22 |"".730......K$."| 00000910: 2A 22 A7 8D 31 30 30 30 00 48 11 20 03 99 22 93 |*"..1000.H. ..".| 00000920: 11 11 11 11 11 11 11 11 11 11 99 22 A6 31 36 29 |...........".16)| 00000930: 3B 22 47 4F 4F 44 42 59 45 21 22 3A 81 49 B2 30 |;"GOODBYE!":.I.0| 00000940: A4 31 30 30 30 3A 82 49 00 53 11 2A 03 99 22 93 |.1000:.I.S.*..".| 00000950: 22 3A 80 00 6F 11 E8 03 9F 31 2C 38 2C 32 2C 22 |":..o....1,8,2,"| 00000960: 40 30 3A 4A 4F 42 53 20 41 24 2C 53 2C 57 22 00 |@0:JOBS A$,S,W".| 00000970: 7C 11 ED 03 52 24 B2 C7 28 31 33 29 00 9C 11 F2 ||...R$..(13)....| 00000980: 03 81 49 B2 30 A4 C5 28 41 24 28 30 29 29 3A 98 |..I.0..(A$(0)):.| 00000990: 31 2C 41 24 28 49 29 52 24 3A 82 49 00 A5 11 F7 |1,A$(I)R$:.I....| 000009A0: 03 A0 31 3A 8E 00 BA 11 D0 07 9F 31 2C 38 2C 32 |..1:.......1,8,2| 000009B0: 2C 22 4A 4F 42 53 20 41 24 22 00 C8 11 D5 07 81 |,"JOBS A$"......| 000009C0: 49 B2 30 A4 32 30 30 30 00 DD 11 DA 07 8B 49 B2 |I.0.2000......I.| 000009D0: C5 28 41 24 28 30 29 29 A7 32 30 32 35 00 EA 11 |.(A$(0)).2025...| 000009E0: DF 07 84 31 2C 41 24 28 49 29 00 F1 11 E4 07 82 |...1,A$(I)......| 000009F0: 49 00 FA 11 E9 07 A0 31 3A 8E 00 00 00 |I......1:.... |
.......53280,11:.53281,0:.G(14).I....".. ....";.12);"... WHAT'S MY JOB? .".N..... 9);"...A PROGRAM FOR THE C-64"...(...13) ;"..BY B.W.BEHLING"...2..I.0.3000:.I...< ..A$(2000):.I.0.3:.A$(I):.I...F.."...... . DO YOU WANT ALL PREVIOUS JOBS ENTERED? "...K..K$:.K$."".75...P..K$.."Y".100.F.U ...3)"......HIT [*] WHEN JOBS' DISK IS R EADY.".X.Z..K$:.K$."".90.J._..K$."*"..20 00...D..".".12)"... WHAT'S MY JOB? ."... N.."... YOU THINK OF A PERSON AND I'LL T RY TO"...X.." GUESS WHAT KIND OF WORK TH EY DO."...Z..". IF THE ANSWER TO A QUEST ION IS NOT YES".D.|.." MORE THAN 50% OF THE TIME ANSWER NO.".K.~...7)"...HIT [L] TO LIST ALL JOBS."......"... ARE YOU RE ADY?"......A$:.A$."".135......A$."L".A$. "L".600.F....A$."N".A$."N".700.N. .K.1.W ....390......C(A$(K)).0.700......H(A$(K) ,2)."/Q".170.-.H.."..ARE YOU A ";I(A$(K) ,C(A$(K)).2);.5.R..A$.D...A$.H(A$,1).U.. ..A$.."Y".240......"........... . T RY ANOTHER PERSON [Y/N]? "......K$:.K$." ".234......K$."Y".K$."Y".100......700... ..."..I GIVE UP!! WHAT IS YOUR JOB?"... ...".. [LIMIT 19 LETTERS AND SPACES..".. ....V$.H....C(V$).19...4)".. ERROR! JOB TOO LONG!!":.242......".. PLEASE GIVE ME A YES OR NO QUESTION TO TELL A ";...... V$;" FROM A ";I(A$(K),C(A$(K)).2);"?.".U ....". [LIMIT 38 LETTERS AND SPACES]"... ..."..";X$......C(X$).38...3);"..ERROR! QUESTION TOO LONG!!.":.265.B....".FOR A "V$" THE ANSWER WOULD BE?".N."..".";A$.R .,.A$.H(A$,1):.A$.."Y".A$.."N".280...6.. A$."Y".B$."N"...@..A$."N".B$."Y".T.J.Z1. E(A$(0)):A$(0).D(Z1.2):A$(Z1).A$(K):A$(Z 1.1)."/A".V$...R.A$(K)."/Q".X$."/".A$.D( Z1.1)."/".B$.D(Z1)."/"...|..100.......". ..Q$.A$(K).1....Z.3.C(Q$).T....J(Q$,Z,1) .."/"..J(Q$,Z,1);:.Z.\....C$.K...C$.H(C$ ,1)......C$.."Y".C$.."N".410...B.G$."/". C$...G..X.3.C(Q$).1...L..J(Q$,X,2).G$.48 0...V..X.Q....Y.X.1.C(Q$)......J(Q$,Y,1) ."/".510......Y.....K.E(J(Q$,X.2,Y.X.2)) .......Z...."4","/QDO YOU WORK MOSTLY OU TDOORS/Y2/N3","/ATRUCK DRIVER","/ATEACHE R"..X.."...JOBS I ALREADY KNOW ARE:..". ..].X.0...B..I.1.E(A$(0))...L..H(A$(I),2 ).."/A".660.C.N..X.1...20);.N.P..X.0.... .V..Z.3.C(A$(I))......J(A$(I),Z,1).."/". .J(A$(I),Z,1);:.Z.....X.X.1:.X.1.X.0.#.. ..I.K....:..8);"..HIT ANY KEY TO CONTINU E.".^....K$:.K$."".664.G....100......".. ..... DO YOU WANT TO SAVE THE JOBS I KN OW?"...F..K$:.K$."".710...P..K$.."Y".800 ...U...3)"......HIT [*] WHEN 'JOBS' DISK IS READY."...Z..K$:.K$."".730......K$." *"..1000.H. .."............".16);"GOODBY E!":.I.0.1000:.I.S.*..".":..O....1,8,2," @0:JOBS A$,S,W".|...R$.G(13)......I.0.E( A$(0)):.1,A$(I)R$:.I..... 1:....P..1,8,2 ,"JOBS A$".H.U..I.0.2000...Z..I.E(A$(0)) .2025......1,A$(I)......I..... 1:....
> CLICK IMAGE PREVIEW FOR FULL MODAL