:LASTBALLMAC.OMENU DAT02MENU MWB10CHREADME aK !~G/O>@q~(2(!Xx= ~ +>!0+| > 1!~/# x > ! ""}!U"{!Y!>( >( >2&>2&$$!P'>(> >;2d2>>2]2 S>2>2>2!v%! %!!J,!$!*!8C:!r!$!:&̰!|+ !!K!s (r#(q#rz(rrr@r@rrrr!(~  q#(s#q> ? !'4 w y ~U ! f !!>!C(>" C(># C(>2*+"S!:12z !/=:<'2Ɨ2!:Ɨ2:>>!l< <( !@>6<(!>6< (!<6!p> !o6>2$>2%/ @8 w(<<=/~ Ī ͍ ~ ( ~RR( ͍ ~ Ă͍ ~ ͍ :%(6 :[ x({(>w=>ww=>w2% 6/6 >2%  ~ ( (666B6/ w6 >2% >2% x( (  >>~( ,{(| }@0>2x p| t~  (MÖ{  ((( (((>2$& >2$>2%& {(& & ,@& ~ &  ,6 6/>:[ >2% ,{(y@(@(x {(~ʹ ,ù | }@0>2x( ,@ |($~ 6  ,68:[ ú ~ʖ~6 68 ~R ~( (0(TͶ]:(( >@>_> w#w#wͶ̈́:((>@>͆> w#w++wͶͮ:(Z>@>ͰW> w+w+w:& 0ͼ| }8}?88 8S:!'2:#'2! ):<2L>gg g#g g g::>2:<2Ɨ2::& &!2>2>>< - $| ͤ6  6:& !.YP> > >< , :=2Ɨ2: x :(6 ͂!.K!`0)!?a!j !!0)!:80! 8#!"8!8 !"& x %| *: ::2:2!G-!t!:&̰! >-<[( 4.(!7 1 O}y(+ > wA8w#8 x >4( >1(x(> w#:$ BBBBͤ>0 (_(W(/>.(>,(!>{('>!p{(!6!pK x N~#Vͼ#B> >C OG> x > x > > > ( /w> y:'2'?=8!6 :(>@!_(wk@Q7 H/<~~<<~~<??@@8@@@@>~@@@x@@@@B<<~~<,n}}}}}}}}o ;__,n}}@@_{{A}//}<~~<<~~<~<~<PPP``U`U`U`U````U``U`````U`U`UဪhhhhA Written by D.S. Long 1984By manipulating the paddle with "<" and ">",rebound the ball to knock out bricks.ӤŤROW 1:1 ROW 2:2 ROW 3:3 ROW 4:4 ROW 5:5 ROW 6:10Press any key to continue.OBVIOUSLY A NOVICE!STILL MUCH ROOM FOR IMPROVEMENT!KEEP TRYING, YOU`RE GETTING THERE!CONGRATULATIONS! YOU`RE A MASTER!YOUR SCORE WASYOU ARE GETTING QUITE EXPERT!THE HIGH SCORE IS, SET BYCONGRATULATIONS! YOU HAVE THE NEW HIGH SCORE!ENTER YOUR NAME :SELECT SPEED (1 = FAST, 3 = SLOW)FRAMEDO YOU WANT SOUND (Y/N)?ȤĤ̤Τ٤DO YOU WANT TO USE PREMIUM ARROW KEYS ?MICROBEE. U:(>@!/$>.u>,ʋ>0  x                Hw74#6 _Gw#;!T"7O<2 XP̊wwO!9 N#F 2[: ʚ2[AC( r>-: " *=>2 * ͅ A*=>j+^+V\"?ALASTBALL.MAC, 2304  -3H  >F >~ ^ - : MENU.MWB : Darrin Smart Sept. 1986 , : M/L routine from "The Catcher" Apr 86 0 : "Menu Creating Program" by Perer Lazarus. (2 : - - - - - - - - - - - - - - - - - - - - 24 : This program is on all of my games disks. It <2 : sets up a menu of all .MWB programs and all F8 : .MAC programs on the A: drive and allows the user P9 : to run either with two keypresses (a number 10-49) Z7 : or : Load it by holding the SHIFT key and typing d : the numbers n# : Exchange disks using X. x/ : Exit to BASIC or CP/M using B or S. 6 : The program can handle up to 256 filenames and 5 : it also displays a title page (if TITLE.GRF is 7 : present) and a high score list after no response 5 : after a period of time. The high score list is  : HISCORES.DAT. 3 : - - - - - - - - - - - - - - - - - - - - 0 : PERMISSION GIVEN TO COPY PROGRAM PROVIDED 4 : MY AUTHORSHIP IS ACKNOWLEDGED AND THE FIRST 3 - : LINES OF THE PROGRAM REMAIN UNCHANGED. 2 : - - - - - - - - - - - - - - - - - - - -   6,7: 257,1::0::(8192) 0 A1$="aaaaaaaabbb": * Do not change this line  A=0 150: 15100+A,0: A & F0(256): A=1 256:F0$(A)="": A 1 A=93 103: A,63: A: : Set up *.* F-NAME.  1570 " A=1056 1140: B: A,B: A ,# A=(1056,17): * Get first name 63 A=-1 156, 1: "No files on disk.":156, 2: @ B=0 J8 X0$=A1$(;9,11): X0$="MWB"X0$="MAC":B=B+1:F0$(B)=A1$ T! A=(1056,18): * Get next name ^ A=-1 370 h B<256 330 r3 : Now we have an array of .MWB and .MAC files. |0 : The next part of the program displays the  : Menu etc.  P=0: * P = Page number. % : 770: DISPLAY (UP TO) 44 FILES < M0$="SMART MENU - By Darrin Smart September 1986 " 8 N=1:M0$=M0$+" There are more files on this disk! " - N=1:M0$=M0$+" Press `N' to see them, or" ? P>0:M0$=M0$+" Press `P' to see the previous page of files" 6 M0$=M0$+" Type the number next to the program that" F M1$=" you wish to run. Hold down the SHIFT key at the same time to" D M1$=M1$+" load it, Or press `B' to return to BASIC, `S' to exit" 6 M1$=M1$+" to CP/M, `X' to exchange disks, and `C' " 6 M1$=M1$+" to load from tape. "  740: * Display message  A0$=: A0$="B" :  A0$="S"  A0$="C" 1310 & A0$="X" 1340 0 A0$="N" N=1:P=P+1: 410 : A0$="P" P>0:P=P-1: 410 D2 A4$="!"+(34)+"#$%": * Possible shifted chars. N@ D=(A4$,A0$): D>0:R=0:156, 2: 25,15: "Loading..."D;: 620 X$ D=((A0$)): D=0 510 25,15 b 156, 2: "Running..."D:R=1 l( * Second digit, command or B/Space. q A4$=A4$+"&'()0" v A0$=: 740: A0$="B" :  A0$="S"  A0$="C" 1310  A0$="X" 1340  A0$="N" N=1:P=P+1: 410  A0$="P" P>0:P=P-1: 410 3 (A0$)=8 (A0$)=127: 3,15: [A50 32];: 510  A0$="0":E=0: 720  E=(A4$,A0$): E<>0 720  E=((A0$)): E=0 630  156, 2: 35,15: D*10+E  1360: * RUN PROGRAM R 156, 5: 4,14: M0$(;1,57):M2$=M0$(;1,1):M0$=M0$(;2)+M1$(;1,1):M1$=M1$(;2)+M2$  G0=($):  760  O=P*44   N=0:Z=B-O: Z>44:Z=44:N=1  L0=(Z)/4   (L0)>0:L0=L0+1 * L=(L0):156, 2 4 A=1 L > X0$=F0$(O+A) H X1$=F0$(O+2*L-A+1) R X2$=F0$(2*L+A) \ X3$=F0$(O+4*L-A+1) f 8,A+1: X0$(;1,8) p 23,2+L-A: X1$(;1,8) z 38,A+1: X2$(;1,8)  53,2+L-A: X3$(;1,8)  A  : * Now draw borders.  10: 1170: * Set up PCG. 0 156, 11: 1:"g": A=2 15: 2,A: "a";: A  961: "h";[A59 ("b")];"f"; $ A=15 2 -1: 62,A: "a";: A  61: "e"  A=60 2 -1: A: "b";: A  16: "i":31:"i":46:"i" ' A=2 13: 32,A: "a": 17,A: "a"  47,A: "a": A  2,13: "c": 62,13: "d"  17,13: "j": 32,13: "j"  47,13: "j" + A=1 7: 2+A,13: "b": 62-A,13:"b"; $" 17+A,13: "b": 17-A,13: "b" ." 32+A,13: "b": 32-A,13: "b" 8& 47+A,13: "b": 47-A,13: "b": A B :156, 7: A=1 L L 3,A+1: [I3 A+9]":" V 18,A+1: [I3 A+L+9]":" ` 33,A+1: [I3 A+2*L+9]":" j* 48,A+1: A+3*L<=Z [I3 A+3*L+9]":" t A ~ 0   1200:A=65040:156, 11  I=0 63: C: A+I,C: I , DATA FOR: V. BAR, H.BAR, R.PLUS, L.PLUS D 231,231,231,231,231,231,231,231,231,231,231,231,231,231,231,231 , 0,0,0,0,0,255,255,0,0,255,255,0,0,0,0,0 D 231,231,231,231,231,231,231,224,224,231,231,231,231,231,231,231 @ 231,231,231,231,231,231,231,7,7,231,231,231,231,231,231,231 * A=A+64: D=1 3: I=0 15: C: A+I,C  A+31-I,C: I:A=A+32: D  0 DATA FOR: T/B R. CON, T/B L. CON, T.B. PLUS 6 0,0,0,0,0,255,255,7,7,231,231,231,231,231,231,231  : 0,0,0,0,0,255,255,224,224,231,231,231,231,231,231,231 6 0,0,0,0,0,255,255,0,0,231,231,231,231,231,231,231 F 156, 7: 3,14: [A13 32]"Press PLAY on your tape recorder"[A13 32] (& 156, 6: 25,15: "Loading ..... "; 2 1330 <2 156, 3: 20,15: "Swap disks and press RETURN" F ()<>13 1350 P X=(P*44)+(D*10+E)-9 Z X0$=F0$(X) d X1$=X0$(;1,8): * NAME n X2$=X0$(;9): * Extention x% Y=(X1$," "): Y>0:X1$=X1$(;1,Y-1) $ X2$="MWB" R=1 156, 2: X1$ & X2$="MWB" R=0 :156, 2: X1$  * Machine code programs.  "I",6,"MENU.DAT"  #6:#0:#0  (6):#0:#0: 6: 1490 , F2$,M: F2$=X1$+".MAC" #0:#0: 1540  1460  156, 2: 3,14: [A60 32] 9 156, 1: 10,14: "Start address of ";X1$" not found." , 156, 6: 15,15: "Enter start address "M  "A",6,"MENU.DAT":#6  X1$+".MAC,";M: 6:#0  R=1:M X1$+".MAC" M  M X1$+".MAC" M: Q * Below is the data for the M/L sub. used to get filenames. "8 245,213,229,197,197,17,104,0,213,225,19,1,22,0,54,0 ,5 237,176,17,116,4,14,26,205,5,0,193,24,2,14,17,17 65 92,0,205,5,0,183,242,79,4,193,1,255,255,24,33,33 @- 116,4,7,7,7,7,7,79,6,0,9,17,0,127,62,229 J5 190,40,218,35,6,11,126,18,35,27,16,250,193,1,0,0 T 225,209,241,201,0,0 MELASTBALL is the same game as BRIKBALL, except it's in colour. In this library, you will find four files: LASTBALL.MAC (the game itself) MENU.MWB (runs with MBASIC) MENU.DAT (locates LASTBALL) README (this file) LASTBALL has been written for use with Microworld Basic and can only be run by typing "BASIC MENU" (or "MBASIC MENU", depending on how you've named Microworld Basic on your disk). Typing MBASIC MENU will give you a menu of one file, LASTBALL (if you have other MWB games on your disk, they will show up too). By the way, there is no way out of LASTBALL. Even RESET doesn't work! You have to turn your machine off to get rid of it once you're finished playing (it's a good game though).