cd ***** BASIC TAKES *****dn ***** TRS-80 MOD 4/4P *****dx ():'d "MENU": "____"Od "1 - LOOK HERE": "2 - '57 CHEVY"xd "3 - CANDELIGHT": "4 - EXCITMENT"d "5 - DANCER"::d "PICK A NUMBER";N:N(N)d N N : (): ()d N ,,,,e **** LOOK HERE ****eA$()5eZ()P(<)Le AT Z,"LOOK HERE"[e X  pe AT Z,();ze ,e AT Z,()e ,e": ():e, T d: T:e **** '57 CHEVY ****e ():e () fA$( )"o==o>"f X J'f AT X,A$;Df AT 160(),"beep!"Sf T 2_f T: Xnf ():f **** CANDLELIGHT ****fFO XD D Pf AT X,(,);:f AT 680,"VACATION PLANNER";g AT 840,"A candlelight production""g& AT 1000,"by Alice Burns";Ng0 AT 1320,"PRESS A KEY FOR MAIN MENU.";qg:X$: X$"" (): bgD G X PgN AT G,((?));gX G: :gb (): "PROGRAM BEGINS":g **** EXCITMENT.hZ$"EXCITMENT! FUN! THRILLS! CHILLS! READ BASIC TAKES! EXCITMENT!"FhX:A$():P\hA(#):B( ){hV$: V$"" ():h (): AT 995,(Z$,P, )hPP: P5 Ph AT XA(BP),A$;h  AT XA(BP),A$;h AT XA(BP),A$;i  AT XA(BP),A$;'i* T d: T1i4 Hi **** DANCER ****]i B:B():NiT$()B()()()()()BiM$()B()()()()()BiB$()B()()()()()BjT$()T$()1jM$()B()()()()()BUjB$()B()(,)()B_jLujNN: N Nj AT L,T$(N);j AT LP,M$(N);j AT L,B$(N);jV$: V$"" ():jR(): R LL : LL k T : T: k$ *** END *** AT L,B$(N);jV$: V