start tok64 d64-TTcykP 10 POKE53280,0:POKE53281,0 15 IFf1=1THEN35 16 IFf1=2THEN40 18 IFf1=3THEN45 19 IFf1=4THEN50 20 PRINT"{clear}":GOSUB800 30 f1=1:LOAD"star trek ml 1.d",8,1 35 f1=2:LOAD"star trek ml 2.d",8,1 40 f1=3:LOAD"star trek ml 3.d",8,1 45 f1=4:LOAD"star trek ml 4.d",8,1 50 PRINT"{home}{black}load"CHR$(34)"star trek v1.d"CHR$(34)",8" 60 POKE198,6 70 DATA19,13,82,85,78,13 80 FORi=1TO6:READx:POKE630+i,x:NEXT 100 POKE44,24:POKE24*256,0 200 NEW 800 PRINT"{white}";:FORy=0TO22:x%=RND(1)*38:PRINTTAB(x%)".":NEXT 900 PRINT"{home}{white}{reverse off}{down*3}{right*9}{cm @*3}{right*3}{cm @*5}{right*3}{cm @*3}{right*3}{cm @*4}" 995 PRINT"{right*8}N{space*2}NM{right}N{space*4}N{cm g}{right}N{space*2}NM{right}N{space*3}NM" 1000 PRINT"{red}{right*7}{reverse on}{sh pound}{space*3}{cm asterisk}{reverse off}{white}N{cm g}{red}{reverse on}{space*5}{reverse off}{white}N{red}{right}{reverse on}{sh pound}{space*3}{cm asterisk}{reverse off}{white}N{cm g}{red}{reverse on}{space*4}{cm asterisk}{reverse off}{white}N{cm g}{red} 1010 PRINT"{right*7}{reverse on} {reverse off}{white}{cm m}{red}{right*2}{reverse on} {reverse off}{white}N{red}{right*3}{reverse on} {reverse off}{white}{cm m}{red}{right*3}{reverse on} {reverse off}{white}{cm m}{red}{right*2}{reverse on} {reverse off} {white}{cm g}{red}{reverse on} {reverse off}{white}{cm m}{red}{right*2}{reverse on} {reverse off}{white} {cm g}{red} 1020 PRINT"{right*7}{reverse on} {reverse off}{white}N{cm t*2}NM{red}{right*3}{reverse on} {reverse off}{white}{cm m}{red}{right*3}{reverse on} {reverse off}{white}N{cm t*2}{red}{reverse on} {reverse off} {white}{cm g}{red}{reverse on} {reverse off}{white}N{cm t*2}{red}{reverse on} {reverse off}{white}N{red} 1030 PRINT"{right*7}{cm asterisk}{reverse on}{space*3}{cm asterisk}{reverse off}{white}N{cm g}{red}{right*2}{reverse on} {reverse off}{white}{cm m}{red}{right*3}{reverse on}{space*5}{reverse off} {white}{cm g}{red}{reverse on}{space*4}{reverse off}{sh pound}{white}{cm g}{red} 1040 PRINT" {right*6}{white}NN{cm g}{red}{right}{reverse on} {reverse off} {white}{cm g}{red}{right*2}{reverse on} {reverse off}{white}{cm m}{red}{right*3}{reverse on} {reverse off}{white}{cm m}{red}{right*2}{reverse on} {reverse off} {white}{cm g}{red}{reverse on} {reverse off}{white}{cm m}{red}{right}{reverse on} {reverse off} {white}{cm g}{red} 1050 PRINT"{right*7}{reverse on} {reverse off}{white}N{cm t*2}{red}{reverse on} {reverse off}{white}N{red}{right*3}{reverse on} {reverse off}{white}{cm m}{red}{right*3}{reverse on} {reverse off}{white}{cm m}{red}{right*2}{reverse on} {reverse off} {white}{cm g}{red}{reverse on} {reverse off}{white}{cm m}{red}{right}{reverse on} {reverse off}{white}NM{red} 1060 PRINT"{right*7}{cm asterisk}{reverse on}{space*3}{reverse off}{sh pound}{right*4}{reverse on} {reverse off}{white}N{red}{right*3}{reverse on} {reverse off}{white}N{red}{right*2}{reverse on} {reverse off}{white}N{red}{right}{reverse on} {reverse off}{white}N{red}{right}{reverse on} {cm asterisk}{reverse off}{white}N{red} 1065 PRINT"{down}{white}written & donated to tpug by david neale"; 1070 PRINT"{right*8}{white}{cm @*5}{right*2}{cm @*4}{right*3}{cm @*5}{right*2}{cm @}{right*3}{cm @} 1080 PRINT"{right*7}N{space*4}N{cm g}N{space*3}NM{right}N{space*4}N{cm g}NN{cm g}{right}NN{cm g}{red} 1100 PRINT"{right*7}{reverse on}{space*5}{reverse off}{white}N{red}{right}{reverse on}{space*4}{cm asterisk}{reverse off}{white}N{cm g}{red}{reverse on}{space*5}{reverse off}{white}N{red}{right}{reverse on} {reverse off} {white}{cm g}{red}{right}{reverse on} {reverse off}{white}N{red} 1110 PRINT"{right*9}{reverse on} {reverse off}{white}{cm m}{red}{right*3}{reverse on} {reverse off}{white}{cm m}{red}{right*2}{reverse on} {reverse off} {white}{cm g}{red}{reverse on} {reverse off}{white}{cm m}{cm @*2}{red}{right*3}{reverse on} {reverse off} {white}L{red}{reverse on}{sh pound}{reverse off}{sh pound} 1120 PRINT"{right*9}{reverse on} {reverse off}{white}{cm m}{red}{right*3}{reverse on} {reverse off}{white}N{cm t*2}{red}{reverse on} {reverse off}{white}N {red}{reverse on} {reverse off}{white}N N{cm g}{red}{right*2}{reverse on} {reverse off}{white}N{red}{reverse on}{sh pound}{reverse off}{sh pound}{white}{cm g}{red} 1130 PRINT"{right*9}{reverse on} {reverse off}{white}{cm m}{red}{right*3}{reverse on}{space*4}{reverse off}{sh pound}{white}{cm g}{red}{right}{reverse on}{space*3}{reverse off}{white}N{red}{right*3}{reverse on}{space*3}{reverse off}{white}NM{red} 1140 PRINT"{right*9}{reverse on} {reverse off}{white}{cm m}{red}{right*3}{reverse on} {reverse off}{white}{cm m}{red}{right}{reverse on} {reverse off} {white}{cm g}{red}{right}{reverse on} {reverse off}{white}{cm m}{cm @*4}{red}{right}{reverse on} {reverse off}{white}{cm m}{red}{cm asterisk}{reverse on}{cm asterisk}{reverse off} {white}M{red} 1150 PRINT"{right*9}{reverse on} {reverse off}{white}{cm m}{red}{right*3}{reverse on} {reverse off}{white}{cm m}{red}{right}{reverse on} {reverse off}{white}NM{red}{right}{reverse on} {reverse off}{white}N{space*3}N{cm g}{red}{reverse on} {reverse off}{white}{cm m}{red}{right}{cm asterisk}{reverse on}{cm asterisk}{reverse off}{white}N{cm g}{red} 1160 PRINT"{right*9}{reverse on} {reverse off}{white}N{red}{right*3}{reverse on} {reverse off}{white}N{red}{right}{reverse on} {cm asterisk}{reverse off}{white}N{red}{right}{reverse on}{space*5}{reverse off}{white}N{red}{right}{reverse on} {reverse off}{white}N{red}{right*2}{reverse on} {reverse off}{white}N 2000 RETURN stop tok64 (bastext 1.0)