MUL

00000000: 01 08 41 08 0A 00 8F 20  20 2A 2A 2A 20 20 4D 4F  |..A....  ***  MO|
00000010: 56 45 20 4D 45 4D 53 49  5A 20 44 4F 57 4E 20 46  |VE MEMSIZ DOWN F|
00000020: 4F 52 20 4D 4C 20 41 4E  44 20 53 43 52 45 45 4E  |OR ML AND SCREEN|
00000030: 20 53 54 4F 52 41 47 45  20 2A 2A 2A 27 42 51 56  | STORAGE ***'BQV|
00000040: 49 00 4B 08 0F 00 3A 27  41 42 43 00 72 08 14 00  |I.K...:'ABC.r...|
00000050: 97 35 31 2C 30 3A 97 35  32 2C 31 34 38 3A 97 35  |.51,0:.52,148:.5|
00000060: 35 2C 30 3A 97 35 36 2C  31 34 38 3A 9C 27 46 59  |5,0:.56,148:.'FY|
00000070: 44 46 00 7D 08 19 00 3A  27 41 42 48 44 00 A4 08  |DF.}...:'ABHD...|
00000080: 1E 00 8F 20 20 2A 2A 2A  20 53 59 53 20 4E 55 4D  |...  *** SYS NUM|
00000090: 42 45 52 53 20 46 4F 52  20 4D 4C 20 2A 2A 2A 27  |BERS FOR ML ***'|
000000A0: 42 56 4D 46 00 AF 08 23  00 3A 27 41 42 48 45 00  |BVMF...#.:'ABHE.|
000000B0: E1 08 28 00 53 31 B2 38  32 38 3A 52 31 B2 38 38  |..(.S1.828:R1.88|
000000C0: 39 3A 57 4C B2 33 37 38  38 38 3A 57 32 B2 33 38  |9:WL.37888:W2.38|
000000D0: 30 38 33 3A 57 33 B2 33  38 32 37 38 27 46 4B 4F  |083:W3.38278'FKO|
000000E0: 4C 00 EC 08 2D 00 3A 27  41 42 48 46 00 28 09 32  |L...-.:'ABHF.(.2|
000000F0: 00 8F 20 20 20 20 20 2A  2A 2A 20 53 45 54 20 55  |..     *** SET U|
00000100: 50 20 4D 4C 20 53 55 42  52 4F 55 54 49 4E 45 53  |P ML SUBROUTINES|
00000110: 20 41 4E 44 20 49 4E 49  54 49 41 4C 49 5A 45 20  | AND INITIALIZE |
00000120: 2A 2A 2A 27 42 4D 55 4C  00 33 09 37 00 3A 27 41  |***'BMUL.3.7.:'A|
00000130: 42 48 47 00 63 09 3C 00  99 20 C7 28 31 34 37 29  |BHG.c.<.. .(147)|
00000140: 3A 97 32 31 34 2C 39 3A  99 3A 97 32 31 31 2C 31  |:.214,9:.:.211,1|
00000150: 36 3A 99 22 50 4F 4B 49  4E 47 2E 2E 2E 22 27 47  |6:."POKING..."'G|
00000160: 55 54 4D 00 91 09 41 00  8D 31 30 30 30 3A 8D 31  |UTM...A..1000:.1|
00000170: 30 32 32 3A 8D 31 30 34  32 3A 8D 31 30 36 32 3A  |022:.1042:.1062:|
00000180: 8D 32 30 36 30 3A 8D 33  30 36 30 3A 27 47 45 5A  |.2060:.3060:'GEZ|
00000190: 51 00 AD 09 46 00 5A 41  B2 32 33 3A 5A 42 B2 31  |Q...F.ZA.23:ZB.1|
000001A0: 39 3A 5A 43 B2 32 34 3A  5A 44 B2 33 39 00 D8 09  |9:ZC.24:ZD.39...|
000001B0: 4B 00 97 35 33 32 38 30  2C 36 3A 97 35 33 32 38  |K..53280,6:.5328|
000001C0: 31 2C 36 3A 97 36 34 36  2C 31 3A 99 20 C7 28 31  |1,6:.646,1:. .(1|
000001D0: 34 37 29 27 46 43 49 51  00 E3 09 63 00 3A 27 41  |47)'FCIQ...c.:'A|
000001E0: 42 48 56 00 09 0A 64 00  8F 20 2A 2A 2A 20 53 45  |BHV...d.. *** SE|
000001F0: 54 20 55 50 20 44 45 4D  4F 20 53 43 52 45 45 4E  |T UP DEMO SCREEN|
00000200: 20 2A 2A 2A 27 42 56 42  42 00 14 0A 65 00 3A 27  | ***'BVBB...e.:'|
00000210: 41 42 48 56 00 4A 0A 69  00 99 22 28 53 50 41 43  |ABHV.J.i.."(SPAC|
00000220: 45 33 29 54 48 49 53 20  49 53 20 41 20 44 45 4D  |E3)THIS IS A DEM|
00000230: 4F 4E 53 54 52 41 54 49  4F 4E 20 4F 46 20 48 4F  |ONSTRATION OF HO|
00000240: 57 20 54 4F 22 27 42 41  55 4A 00 75 0A 6E 00 99  |W TO"'BAUJ.u.n..|
00000250: 22 55 53 45 20 54 48 45  20 27 4D 55 4C 54 49 57  |"USE THE 'MULTIW|
00000260: 49 4E 44 4F 57 53 27 50  52 4F 47 52 41 4D 2E 22  |INDOWS'PROGRAM."|
00000270: 27 42 41 54 46 00 A4 0A  73 00 99 22 57 45 20 41  |'BATF...s.."WE A|
00000280: 52 45 20 46 49 4C 4C 49  4E 47 20 55 50 20 54 48  |RE FILLING UP TH|
00000290: 45 20 53 43 52 45 45 4E  20 57 49 54 48 20 22 27  |E SCREEN WITH "'|
000002A0: 42 41 4B 4B 00 D7 0A 78  00 99 22 44 49 46 46 45  |BAKK...x.."DIFFE|
000002B0: 52 45 4E 54 20 54 48 49  4E 47 53 2C 20 4A 55 53  |RENT THINGS, JUS|
000002C0: 54 20 54 4F 20 53 48 4F  57 20 59 4F 55 20 48 4F  |T TO SHOW YOU HO|
000002D0: 57 22 27 42 41 45 49 00  04 0B 7D 00 99 22 59 4F  |W"'BAEI...}.."YO|
000002E0: 55 20 43 41 4E 20 45 4D  55 4C 41 54 45 20 53 4F  |U CAN EMULATE SO|
000002F0: 4D 45 20 4F 46 20 54 48  45 20 4D 4F 52 45 22 27  |ME OF THE MORE"'|
00000300: 42 41 53 4C 00 38 0B 82  00 99 22 53 4F 50 48 49  |BASL.8...."SOPHI|
00000310: 53 54 49 43 41 54 45 44  20 53 4F 46 54 57 41 52  |STICATED SOFTWAR|
00000320: 45 20 4F 4E 20 54 48 45  20 4D 41 52 4B 45 54 20  |E ON THE MARKET |
00000330: 42 59 22 27 42 41 53 4A  00 6C 0B 87 00 99 22 4F  |BY"'BASJ.l...."O|
00000340: 56 45 52 4C 41 59 49 4E  47 20 4D 45 4E 55 20 57  |VERLAYING MENU W|
00000350: 49 4E 44 4F 57 53 20 4F  4E 54 4F 20 54 48 45 20  |INDOWS ONTO THE |
00000360: 53 43 52 45 45 4E 22 27  42 41 46 4F 00 9D 0B 8C  |SCREEN"'BAFO....|
00000370: 00 99 22 41 4E 44 20 54  48 45 4E 20 52 45 53 54  |.."AND THEN REST|
00000380: 4F 52 49 4E 47 20 54 48  41 54 20 53 43 52 45 45  |ORING THAT SCREE|
00000390: 4E 20 41 46 54 45 52 22  27 42 41 56 4A 00 DA 0B  |N AFTER"'BAVJ...|
000003A0: 96 00 99 22 28 52 56 53  29 27 50 52 49 4E 54 27  |..."(RVS)'PRINT'|
000003B0: 28 52 56 4F 46 46 29 53  54 41 54 45 4D 45 4E 54  |(RVOFF)STATEMENT|
000003C0: 20 43 4F 55 4C 44 20 44  4F 20 41 4C 4D 4F 53 54  | COULD DO ALMOST|
000003D0: 20 54 48 45 22 27 42 41  57 4C 00 0C 0C 9B 00 99  | THE"'BAWL......|
000003E0: 22 53 41 4D 45 2C 20 55  4E 4C 45 53 53 20 59 4F  |"SAME, UNLESS YO|
000003F0: 55 20 41 4C 53 4F 20 48  41 56 45 20 55 53 45 52  |U ALSO HAVE USER|
00000400: 20 49 4E 50 55 54 22 27  42 41 54 50 00 47 0C A0  | INPUT"'BATP.G..|
00000410: 00 99 22 4F 4E 20 54 48  45 20 53 43 52 45 45 4E  |.."ON THE SCREEN|
00000420: 2E 20 46 4F 52 20 41 4E  20 45 58 41 4D 50 4C 45  |. FOR AN EXAMPLE|
00000430: 20 2E 20 2E 20 2E 22 3A  99 3A 99 3A 97 36 34 36  | . . .":.:.:.646|
00000440: 2C 35 27 45 49 4E 4E 00  78 0C A5 00 99 22 57 48  |,5'EINN.x...."WH|
00000450: 41 54 27 53 20 59 4F 55  52 20 43 49 54 59 2E 2E  |AT'S YOUR CITY..|
00000460: 2E 22 3B 3A 97 36 34 36  2C 37 3A 85 20 4E 4D 24  |.";:.646,7:. NM$|
00000470: 3A 99 3A 99 27 A5 55 51  00 BE 0C AA 00 97 36 34  |:.:.'.UQ......64|
00000480: 36 2C 31 3A 99 22 49 4E  20 41 20 4E 4F 52 4D 41  |6,1:."IN A NORMA|
00000490: 4C 20 28 52 56 53 29 27  50 52 49 4E 54 27 28 52  |L (RVS)'PRINT'(R|
000004A0: 56 4F 46 46 29 53 54 41  54 45 4D 45 4E 54 2C 20  |VOFF)STATEMENT, |
000004B0: 54 48 45 20 55 53 45 52  22 27 43 47 46 50 00 ED  |THE USER"'CGFP..|
000004C0: 0C AF 00 99 22 4E 41 4D  45 20 57 4F 55 4C 44 20  |...."NAME WOULD |
000004D0: 4E 4F 54 20 42 45 20 52  45 53 54 4F 52 45 44 20  |NOT BE RESTORED |
000004E0: 54 4F 20 59 4F 55 52 22  27 42 41 52 51 00 20 0D  |TO YOUR"'BARQ. .|
000004F0: B4 00 99 22 53 43 52 45  45 4E 20 42 55 54 20 27  |..."SCREEN BUT '|
00000500: 4D 55 4C 54 49 57 49 4E  44 4F 57 53 20 44 4F 45  |MULTIWINDOWS DOE|
00000510: 53 20 49 54 20 41 4C 4C  21 22 3B 27 42 42 59 4F  |S IT ALL!";'BBYO|
00000520: 00 43 0D B9 00 99 22 28  53 50 41 43 45 29 34 2C  |.C...."(SPACE)4,|
00000530: 43 4D 44 52 20 54 31 32  29 22 3A 99 3A 99 27 44  |CMDR T12)":.:.'D|
00000540: 43 59 54 00 78 0D BE 00  99 22 28 53 50 41 43 45  |CYT.x...."(SPACE|
00000550: 34 29 50 52 45 53 53 20  41 4E 59 20 4B 45 59 20  |4)PRESS ANY KEY |
00000560: 54 4F 20 53 54 41 52 54  20 54 48 45 20 44 45 4D  |TO START THE DEM|
00000570: 4F 22 3B 27 42 42 53 4E  00 88 0D C3 00 8D 3A 9E  |O";'BBSN......:.|
00000580: 20 53 31 27 43 47 41 4C  00 93 0D C7 00 3A 27 41  | S1'CGAL.....:'A|
00000590: 42 48 4E 00 BA 0D C8 00  8F 20 20 2A 2A 2A 20 46  |BHN......  *** F|
000005A0: 49 52 53 54 20 4D 45 4E  55 20 4F 56 45 52 4C 41  |IRST MENU OVERLA|
000005B0: 59 20 2A 2A 2A 27 42 57  46 43 00 C5 0D C9 00 3A  |Y ***'BWFC.....:|
000005C0: 27 41 42 48 57 00 ED 0D  CD 00 9E 20 57 31 3A 8F  |'ABHW...... W1:.|
000005D0: 20 20 2A 2A 2A 20 43 52  45 41 54 45 20 4F 56 45  |  *** CREATE OVE|
000005E0: 52 4C 41 59 20 2A 2A 2A  27 43 57 52 48 00 15 0E  |RLAY ***'CWRH...|
000005F0: D2 00 97 32 31 34 2C 31  3A 99 3A 97 36 34 36 2C  |...214,1:.:.646,|
00000600: 30 3A 50 31 24 B2 22 28  52 49 47 48 54 34 29 22  |0:P1$."(RIGHT4)"|
00000610: 27 45 51 57 44 00 41 0E  D7 00 99 20 50 31 24 22  |'EQWD.A.... P1$"|
00000620: 28 52 56 53 29 59 4F 55  20 43 41 4E 20 50 55 54  |(RVS)YOU CAN PUT|
00000630: 20 41 4E 59 20 4B 49 4E  44 22 3A 99 27 43 45 4C  | ANY KIND":.'CEL|
00000640: 4A 00 6C 0E DC 00 99 20  50 31 24 22 28 52 56 53  |J.l.... P1$"(RVS|
00000650: 29 4F 46 20 49 4E 46 4F  52 4D 41 54 49 4F 4E 20  |)OF INFORMATION |
00000660: 4F 56 45 52 22 3A 99 27  43 45 4E 46 00 97 0E E1  |OVER":.'CENF....|
00000670: 00 99 20 50 31 24 22 28  52 56 53 29 54 48 45 53  |.. P1$"(RVS)THES|
00000680: 45 20 50 41 47 45 53 20  54 48 41 54 20 59 4F 55  |E PAGES THAT YOU|
00000690: 22 99 27 43 45 55 4B 00  C1 0E E6 00 99 20 50 31  |".'CEUK...... P1|
000006A0: 24 22 28 52 56 53 29 4E  45 45 44 20 46 4F 52 20  |$"(RVS)NEED FOR |
000006B0: 59 4F 55 52 20 50 52 4F  47 52 41 22 27 42 44 53  |YOUR PROGRA"'BDS|
000006C0: 47 00 0E 0F EB 00 97 32  31 34 2C 31 30 3A 99 3A  |G......214,10:.:|
000006D0: 99 20 50 31 24 22 28 57  48 49 54 45 29 4E 28 52  |. P1$"(WHITE)N(R|
000006E0: 56 53 2C 42 4C 41 43 4B  29 45 58 54 20 4F 52 20  |VS,BLACK)EXT OR |
000006F0: 28 52 56 4F 46 46 2C 57  48 49 54 45 29 4C 28 42  |(RVOFF,WHITE)L(B|
00000700: 4C 41 43 4B 2C 52 56 53  29 41 53 54 3F 22 00 1C  |LACK,RVS)AST?"..|
00000710: 0F F0 00 8D 35 30 30 27  42 44 49 42 00 39 0F F5  |....500'BDIB.9..|
00000720: 00 8B 20 41 24 B2 22 4E  22 A7 20 9E 20 53 32 3A  |.. A$."N". . S2:|
00000730: 89 33 30 30 27 46 49 52  4B 00 56 0F FA 00 8B 20  |.300'FIRK.V.... |
00000740: 41 24 B2 22 4C 22 A7 20  9E 20 52 31 3A 89 31 39  |A$."L". . R1:.19|
00000750: 35 27 46 49 5A 47 00 64  0F FF 00 89 32 34 30 27  |5'FIZG.d....240'|
00000760: 42 44 46 48 00 6F 0F 2B  01 3A 27 41 42 48 4F 00  |BDFH.o.+.:'ABHO.|
00000770: 97 0F 2C 01 8F 20 20 2A  2A 2A 20 53 45 43 4F 4E  |..,..  *** SECON|
00000780: 44 20 4D 45 4E 55 20 4F  56 45 52 4C 41 59 20 2A  |D MENU OVERLAY *|
00000790: 2A 2A 27 42 58 48 44 00  A2 0F 2D 01 3A 27 41 42  |**'BXHD...-.:'AB|
000007A0: 48 58 00 CA 0F 31 01 9E  20 57 32 3A 8F 20 20 2A  |HX...1.. W2:.  *|
000007B0: 2A 2A 20 43 52 45 41 54  45 20 4F 56 45 52 4C 41  |** CREATE OVERLA|
000007C0: 59 20 2A 2A 2A 27 43 57  53 49 00 F8 0F 36 01 97  |Y ***'CWSI...6..|
000007D0: 32 31 34 2C 35 3A 99 3A  97 36 34 36 2C 31 33 3A  |214,5:.:.646,13:|
000007E0: 50 32 24 B2 22 28 52 49  47 48 54 31 37 2C 52 56  |P2$."(RIGHT17,RV|
000007F0: 53 29 22 27 45 52 53 46  00 24 10 3B 01 99 20 50  |S)"'ERSF.$.;.. P|
00000800: 32 24 28 52 56 53 29 4F  46 20 43 4F 55 52 53 45  |2$(RVS)OF COURSE|
00000810: 2C 20 59 4F 55 20 53 48  4F 55 4C 44 22 3A 3F 27  |, YOU SHOULD":?'|
00000820: 43 45 53 4B 00 50 10 40  01 99 20 50 32 24 22 28  |CESK.P.@.. P2$"(|
00000830: 52 56 53 29 55 53 45 20  27 47 45 54 27 20 53 54  |RVS)USE 'GET' ST|
00000840: 41 54 45 4D 45 4E 54 53  22 3A 99 27 43 45 43 47  |ATEMENTS":.'CECG|
00000850: 00 7B 10 45 01 99 20 50  32 24 22 28 52 56 53 29  |.{.E.. P2$"(RVS)|
00000860: 54 4F 20 43 48 45 43 4B  20 46 4F 52 20 49 4E 50  |TO CHECK FOR INP|
00000870: 55 54 2E 22 3A 99 27 43  45 48 4C 00 A9 10 4A 01  |UT.":.'CEHL...J.|
00000880: 99 20 50 32 24 22 28 52  56 53 29 4E 45 58 54 20  |. P2$"(RVS)NEXT |
00000890: 57 49 4E 44 4F 57 20 46  4F 52 20 53 41 4D 50 4C  |WINDOW FOR SAMPL|
000008A0: 45 22 3A 99 27 43 45 4C  49 00 D2 10 4F 01 99 20  |E":.'CELI...O.. |
000008B0: 50 32 24 22 28 52 56 53  29 4F 46 20 41 20 55 53  |P2$"(RVS)OF A US|
000008C0: 45 52 27 53 20 4D 45 4E  55 2E 22 3A 99 27 43 45  |ER'S MENU.":.'CE|
000008D0: 47 4C 00 14 11 54 01 99  20 50 32 24 22 28 52 56  |GL...T.. P2$"(RV|
000008E0: 53 2C 57 48 49 54 45 29  4E 28 4C 2E 47 52 45 45  |S,WHITE)N(L.GREE|
000008F0: 4E 29 45 58 54 20 4F 52  20 28 57 48 49 54 45 29  |N)EXT OR (WHITE)|
00000900: 4C 28 4C 2E 47 52 45 45  4E 29 41 53 54 3F 22 27  |L(L.GREEN)AST?"'|
00000910: 42 44 42 48 00 22 11 59  01 8D 35 30 30 27 42 44  |BDBH.".Y..500'BD|
00000920: 49 48 00 3F 11 5E 01 8B  20 41 24 B2 22 4E 22 A7  |IH.?.^.. A$."N".|
00000930: 20 9E 20 53 33 3A 89 34  30 30 27 46 49 54 48 00  | . S3:.400'FITH.|
00000940: 5C 11 63 01 8B 20 41 24  B2 22 4C 22 A7 20 9E 20  |\.c.. A$."L". . |
00000950: 52 32 3A 89 32 34 30 27  46 49 52 4D 00 6A 11 68  |R2:.240'FIRM.j.h|
00000960: 01 89 33 34 35 27 42 44  4C 45 00 75 11 8F 01 3A  |..345'BDLE.u...:|
00000970: 27 41 42 48 50 00 9C 11  90 01 8F 20 20 2A 2A 2A  |'ABHP......  ***|
00000980: 20 54 48 49 52 44 20 4D  45 4E 55 20 4F 56 45 52  | THIRD MENU OVER|
00000990: 4C 41 59 20 2A 2A 2A 27  42 57 52 45 00 A7 11 91  |LAY ***'BWRE....|
000009A0: 01 3A 27 41 42 48 59 00  CF 11 95 01 9E 20 57 33  |.:'ABHY...... W3|
000009B0: 3A 8F 20 20 2A 2A 2A 20  43 52 45 41 54 45 20 4F  |:.  *** CREATE O|
000009C0: 56 45 52 4C 41 59 20 2A  2A 2A 27 43 57 54 4A 00  |VERLAY ***'CWTJ.|
000009D0: FA 11 9A 01 97 32 31 34  2C 31 30 3A 97 36 34 36  |.....214,10:.646|
000009E0: 2C 31 32 3A 99 3A 50 33  24 B2 22 28 52 49 47 48  |,12:.:P3$."(RIGH|
000009F0: 54 31 32 29 22 27 45 53  59 47 00 23 12 9F 01 99  |T12)"'ESYG.#....|
00000A00: 20 50 33 24 22 28 52 56  53 29 31 2E 44 49 53 4B  | P3$"(RVS)1.DISK|
00000A10: 28 53 50 41 43 45 34 29  35 2E 41 44 44 22 27 42  |(SPACE4)5.ADD"'B|
00000A20: 44 4B 49 00 4D 12 A4 01  99 20 50 33 24 22 28 52  |DKI.M.... P3$"(R|
00000A30: 56 53 29 32 2E 54 41 50  45 28 53 50 41 43 45 34  |VS)2.TAPE(SPACE4|
00000A40: 29 36 2E 53 55 42 2E 22  27 42 44 4B 46 00 78 12  |)6.SUB."'BDKF.x.|
00000A50: A9 01 99 20 50 33 24 22  28 52 56 53 29 33 2E 50  |... P3$"(RVS)3.P|
00000A60: 52 49 4E 54 28 53 50 41  43 45 33 29 37 2E 53 41  |RINT(SPACE3)7.SA|
00000A70: 56 45 22 27 42 44 44 4B  00 A3 12 AE 01 99 20 50  |VE"'BDDK...... P|
00000A80: 33 24 22 28 52 56 53 29  34 2E 49 4E 50 55 54 28  |3$"(RVS)4.INPUT(|
00000A90: 53 50 41 43 45 33 29 37  2E 4C 4F 41 44 22 27 42  |SPACE3)7.LOAD"'B|
00000AA0: 44 52 47 00 D2 12 B3 01  99 3A 99 3A 99 20 50 33  |DRG......:.:. P3|
00000AB0: 24 22 28 52 56 53 29 4D  41 4B 45 20 59 4F 55 52  |$"(RVS)MAKE YOUR|
00000AC0: 20 53 45 4C 45 43 54 49  4F 4E 22 3A 99 27 45 47  | SELECTION":.'EG|
00000AD0: 56 50 00 1A 13 B8 01 99  3A 99 20 50 33 24 22 28  |VP......:. P3$"(|
00000AE0: 52 56 53 2C 57 48 49 54  45 29 4C 28 43 52 41 59  |RVS,WHITE)L(CRAY|
00000AF0: 32 29 41 53 54 20 4F 52  20 28 57 48 49 54 45 29  |2)AST OR (WHITE)|
00000B00: 45 28 47 52 41 59 32 29  58 49 54 20 50 52 4F 47  |E(GRAY2)XIT PROG|
00000B10: 52 41 4D 3F 22 27 43 45  47 4C 00 28 13 BD 01 8D  |RAM?"'CEGL.(....|
00000B20: 35 30 30 27 42 44 49 49  00 45 13 C2 01 8B 20 41  |500'BDII.E.... A|
00000B30: 24 B2 22 4C 22 A7 20 9E  20 52 33 3A 89 33 34 35  |$."L". . R3:.345|
00000B40: 27 46 49 59 49 00 6E 13  C7 01 8B 20 41 24 B2 22  |'FIYI.n.... A$."|
00000B50: 45 22 A7 20 36 30 30 3A  8F 20 20 2A 2A 2A 20 45  |E". 600:.  *** E|
00000B60: 4E 44 49 4E 47 20 2A 2A  2A 27 45 53 49 4F 00 7C  |NDING ***'ESIO.||
00000B70: 13 CC 01 89 34 34 35 27  42 44 4D 46 00 87 13 F3  |....445'BDMF....|
00000B80: 01 3A 27 41 42 48 51 00  AD 13 F4 01 8F 20 20 2A  |.:'ABHQ......  *|
00000B90: 2A 2A 20 57 41 49 54 20  46 4F 52 20 4B 45 59 50  |** WAIT FOR KEYP|
00000BA0: 52 45 53 53 20 2A 2A 2A  27 42 56 44 46 00 B8 13  |RESS ***'BVDF...|
00000BB0: F5 01 3A 27 41 42 48 41  00 D3 13 F9 01 A1 20 41  |..:'ABHA...... A|
00000BC0: 24 3A 8B 20 41 24 B2 22  22 A7 20 35 30 30 27 45  |$:. A$."". 500'E|
00000BD0: 49 45 49 00 00 00                                 |IEI...          |

..A....  ***  MOVE MEMSIZ DOWN FOR ML AN
D SCREEN STORAGE ***'BQVI.K...:'ABC.R...
.51,0:.52,148:.55,0:.56,148:.'FYDF.}...:
'ABHD......  *** SYS NUMBERS FOR ML ***'
BVMF...#.:'ABHE...(.S1.828:R1.889:WL.378
88:W2.38083:W3.38278'FKOL...-.:'ABHF.(.2
..     *** SET UP ML SUBROUTINES AND INI
TIALIZE ***'BMUL.3.7.:'ABHG.C.<.. G(147)
:.214,9:.:.211,16:."POKING..."'GUTM...A.
.1000:.1022:.1042:.1062:.2060:.3060:'GEZ
Q...F.ZA.23:ZB.19:ZC.24:ZD.39.X.K..53280
,6:.53281,6:.646,1:. G(147)'FCIQ...C.:'A
BHV...D.. *** SET UP DEMO SCREEN ***'BVB
B...E.:'ABHV.J.I.."(SPACE3)THIS IS A DEM
ONSTRATION OF HOW TO"'BAUJ.U.N.."USE THE
 'MULTIWINDOWS'PROGRAM."'BATF...S.."WE A
RE FILLING UP THE SCREEN WITH "'BAKK.W.X
.."DIFFERENT THINGS, JUST TO SHOW YOU HO
W"'BAEI...}.."YOU CAN EMULATE SOME OF TH
E MORE"'BASL.8...."SOPHISTICATED SOFTWAR
E ON THE MARKET BY"'BASJ.L...."OVERLAYIN
G MENU WINDOWS ONTO THE SCREEN"'BAFO....
.."AND THEN RESTORING THAT SCREEN AFTER"
'BAVJ.Z...."(RVS)'PRINT'(RVOFF)STATEMENT
 COULD DO ALMOST THE"'BAWL......"SAME, U
NLESS YOU ALSO HAVE USER INPUT"'BATP.G. 
.."ON THE SCREEN. FOR AN EXAMPLE . . .":
.:.:.646,5'EINN.X...."WHAT'S YOUR CITY..
.";:.646,7:. NM$:.:.'.UQ......646,1:."IN
 A NORMAL (RVS)'PRINT'(RVOFF)STATEMENT, 
THE USER"'CGFP......"NAME WOULD NOT BE R
ESTORED TO YOUR"'BARQ. ...."SCREEN BUT '
MULTIWINDOWS DOES IT ALL!";'BBYO.C...."(
SPACE)4,CMDR T12)":.:.'DCYT.X...."(SPACE
4)PRESS ANY KEY TO START THE DEMO";'BBSN
...C..:. S1'CGAL...G.:'ABHN...H..  *** F
IRST MENU OVERLAY ***'BWFC.E.I.:'ABHW...
M.. W1:.  *** CREATE OVERLAY ***'CWRH...
R..214,1:.:.646,0:P1$."(RIGHT4)"'EQWD.A.
W.. P1$"(RVS)YOU CAN PUT ANY KIND":.'CEL
J.L.... P1$"(RVS)OF INFORMATION OVER":.'
CENF...... P1$"(RVS)THESE PAGES THAT YOU
".'CEUK.A.... P1$"(RVS)NEED FOR YOUR PRO
GRA"'BDSG......214,10:.:. P1$"(WHITE)N(R
VS,BLACK)EXT OR (RVOFF,WHITE)L(BLACK,RVS
)AST?"......500'BDIB.9.... A$."N". . S2:
.300'FIRK.V.... A$."L". . R1:.195'FIZG.D
....240'BDFH.O.+.:'ABHO...,..  *** SECON
D MENU OVERLAY ***'BXHD...-.:'ABHX.J.1..
 W2:.  *** CREATE OVERLAY ***'CWSI...6..
214,5:.:.646,13:P2$."(RIGHT17,RVS)"'ERSF
.$.;.. P2$(RVS)OF COURSE, YOU SHOULD":?'
CESK.P.@.. P2$"(RVS)USE 'GET' STATEMENTS
":.'CECG.{.E.. P2$"(RVS)TO CHECK FOR INP
UT.":.'CEHL...J.. P2$"(RVS)NEXT WINDOW F
OR SAMPLE":.'CELI.R.O.. P2$"(RVS)OF A US
ER'S MENU.":.'CEGL...T.. P2$"(RVS,WHITE)
N(L.GREEN)EXT OR (WHITE)L(L.GREEN)AST?"'
BDBH.".Y..500'BDIH.?.^.. A$."N". . S3:.4
00'FITH.\.C.. A$."L". . R2:.240'FIRM.J.H
..345'BDLE.U...:'ABHP......  *** THIRD M
ENU OVERLAY ***'BWRE.....:'ABHY.O.... W3
:.  *** CREATE OVERLAY ***'CWTJ......214
,10:.646,12:.:P3$."(RIGHT12)"'ESYG.#....
 P3$"(RVS)1.DISK(SPACE4)5.ADD"'BDKI.M...
. P3$"(RVS)2.TAPE(SPACE4)6.SUB."'BDKF.X.
... P3$"(RVS)3.PRINT(SPACE3)7.SAVE"'BDDK
...... P3$"(RVS)4.INPUT(SPACE3)7.LOAD"'B
DRG.R....:.:. P3$"(RVS)MAKE YOUR SELECTI
ON":.'EGVP......:. P3$"(RVS,WHITE)L(CRAY
2)AST OR (WHITE)E(GRAY2)XIT PROGRAM?"'CE
GL.(....500'BDII.E.B.. A$."L". . R3:.345
'FIYI.N.G.. A$."E". 600:.  *** ENDING **
*'ESIO.|.L..445'BDMF.....:'ABHQ......  *
** WAIT FOR KEYPRESS ***'BVDF.....:'ABHA
.S.... A$:. A$."". 500'EIEI...

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL