5 LET H=1
10 LET M=8
20 GO TO 40 
30 LET H=9
40 PRINT M
50 PRINT H
60 END
<(-/8$>PI.I.[AH!X	L!H,> +Z%78H=P-/8DA-[B\[C2B%=-,I4X$H$%08 KB9XKA?\!\8!KC> +XL"A+KB\!P$+GL	-*L"9F8F8FA)I(/\FYA)<(-	X*H*I&X"H*I%X!H*I$X(L!/$&Y/S-T P&D&E&F&G&H&I&J&KY&	?2IL6J*< *NL7J+< *NL8J,< : 2A\0Q&T0, $RR-, Y&	?2IL68!Z*L78!Z+L82A8!Z,$QP?>EQ&, 03,7
 INVALID PASSWORD
 FILE NAME--T-K>\)\.0!+AL0?(+OH9\:$]IA<(KS8!\//=L-?+K/=B;&YMMC QCQM+W I	</TX?H?9J8J8J*H?*/ < K;=HK:K9$!/*\	W%\*W%T0T<B A? MM<ACD1?H8\:$]IA\G, <8H^,AORJJJJ>P<E<JKNLULLIBA LUL/PJF"B=PG	FAA FFEX?OFOMOW<C<9<:<;<<<=<><?<7=D;???ABCF9JARA?BGBJBMB
!**?6??!?=?%==>+<?60!)!0&:- AAQ	>, WHAT?

C
IS$!IR$!-0L+>()<I?X!: !0-6L3YCNX>RIC9!H>>P*U2IL><(*R]CP>QC*K]C2A.H>X<2IL<>(*]P<*XICH<81H4H>>P*(2A$RC),"H>8!ICH<YCH<8 H>X>L<]C: H<X<: ICYCP>*12A.YBYAIB9HL:YL2IML2A<X+L8J8J8JIY<(X=I[9INYL<P.=IA9D=X+%8DIA=X+%8DIL<X+%YAQB+:$RI!,"
NO ROOM IN FILE
NEW:A\+, X JA2I$
$U$P?.X2I\32A\0$RC2"N, $RG3\0"N.MT+YJ$RR6"1K?	>?=K=Z1K<YL;&YMMLAX9D< 8H^1MLK;< K:N1^1QLR1QM*\O=>(*P.N$[: H=X=K9YMK:$QM*8.1"1K8	>?:, YLDD0I+LYEHV0N/BQL+DHXXSQ&IE>(,YYE0Y+U,"X?H=K7?H+!$RI*/6H=9HH6YL2I<X+0H?9F8F8F]L2AP=/XMLAXH?+,/[HYJA8H=F?4 ? =C=OIC=BT,HWX!
RM]0ZYD2A$[H6Z9$]IB>(,^II9!IA>XIJH3Z9IAYI$]IA9!II>(+E<P*3""*X2IN9<(*3AXIU>(*.N9IYR9> *$2A."2ATIM8!J9$VH6[Q2IOQ^9R9SQQM*=2A*FJ9YK""J9[QIKZ9H=8A9HIK$VT*:J9I^YJH=<(*F918HYM/T;XL,\,, 2I\32A, !6!02IL82AK?>(/	$R=C/	OLDK>XS0LQHQEH"X^Y&,"EB180&\,^Q^P2I\32AT1*K$RH
L2> $T\1, =B=AI/O ERROR$RA+,"K?
>$U-)QD*!$
H9\:$]IAYH3\:$]I9!IA>X*0$\*(L:Z;ID>(*8K=X!0V:A2I$R, 0Q*>0V:.=XJH5XIOCYLSC2ILI2A\JQL+J/C!6$P^?7AH:A$R^YK<
;
:$Q^??AH, LINE NO. TOO BIG

LINE TOO LONG
 DELETED
K\MI?^(^T	H=?%<X=2I\8\92A$SX;H;AP<(*FK?< *SIH> *F*8A< 8A< K>< * IH> *A$RI2*AK=< **: H==H:X=I/+FIO< *8I.$I	A&> !0: H=>(*A.H9<(*FI]9H>P+EH;< $+GIQX;I	A&>(*FH;$!*FYEKS2L[W2AONYLSN<B0ZML8J8J8J+ML+QL0Y+Y0\I\> +X!0YE2A/N<(+(IY< +7!0IE> + /+=HK<IT$!/+A><A">AL2ZF
I$PD?(I."98!\2L2ZR2I$QD?(I.I9IVYG\*IZZ3IGSM<H840Y*	YG0ZHV0\.UT**]R3*]YGIH>(*YHZX^YH, 66:61*6.3K?XL2ILL> *=2AHLI)8F8F8FA..9"98A9HM, I
S\=+NK>YMK\K=$!IM$!!0[\/M
READY
S&/!%	HH??[(A/!$]!AF+5K,$&K.[./*%,SAVE ERRORZ]B/B:C?$&$(IF2J$$D=O*K$	, $RO,$	,"0Z0Y*P0Z>DZZJZZ5$P ?>>Q*90Y*]0^J8<(+8A<(*6K?<(*8K><(+CK=<(*SK<> *>$Q ?>>Q, <<C;<Q=AJXYCMC*]>D]C*>IC9A*92J$$HHVX$/FH$?H/M2J$$IIXX$/MK
> /W2J$$A/S:/:K
YFK X%/WNO ROOM
FILE NOT FOUND
BAD FILE
K[<4C??;?<?>?7J\XILI<(/?2IL6>(*M2APIPI*BL72AAXLI> *KLI9HYL
>L08D> -L/?P\04<HQ1;)HA-+2G52?(B319R"30,G)+,	G+,?*(-;-,A37-QA1?3HI<?,*O,=.OG*2-\=?,%=+?0O+7;?I:3;2ZQ;;>N>:=8CQ/+2P=114LA/?-$./.7$A>4,\^,,?%;=	;P5?G!
 >
VJXC%HV/IQFP7N<"-O AJHWY&	?2IL6J*< *NL7J+< *NL8J,< : 2A\0Q&T0, $RR-, Y&	?2IL68!Z*L78!Z+L82A8!Z,$QP?>EQ&, 03,7
 INVALID PASSWORD
 FILE NAME--T-K>\)\.0!+AL0?(+OH9\:$]IA<(KS8!\//=L-?+K/=B;&YMMC QCQM+W I	</TX?H?9J8J8J*H?*/ < K;=HK:K9$!/*\	W%\*W%T0T<B A? MM<ACD1	?8A9HZW$&$(JVZOJW9F8FIF2J$$C+DIF2J$$D=O<BJOZ(K>JW9F8F8A8F8D8AZ&$	$%D/=, $&$(JVZ3IF2J$$B=O/<9J4K;>P+J3Z(J49!*]$RO4$	,"$RO	+B!6
(:A[N$%BH/=K:XI2ILI>(++HIYCPIPILIYO:9!HIXIIK9> ++LI<(+,9!Y	8<HPIT6+SL82A< +J, /(>S4/4]%STLPDNNK<4PL9	?K>[
K=[ [!

S
K 

S
	<*&<(*^

O
8!K!>(*^O
[!S
K K;[ K 

S
K^*"	:*&K9>(*K* 	?K
8!K>9X
8
7	:/6[^K^	5*7	</6	4	3:*<	:/6[^K^	2K^K1<(*9K0<(//K.<(/-K,<(*,K+<(YK*>(	)	:/6[^K^	2K^K9+IO7> /Y*,%%)$*IHZY8 Z[Q?5C?(]QBXW? Z^\YJX	YE[
Y?!ZJ\.AZ [G?38MPIPSV?7ABSLDRSV?;CONV30SV?=INFORMPA?=EDU30PA?8EDITORPA?DPASS1PA?APASS2PA?XPASS3PA>3BATCHPA?LEDU30SV?>EDITORSV?7:"*,AJ0J*	C^2$*C^2T*AJ2\* A/0LJ
A/<CJ^K-G!<9J^J
B(AC*^C^2L*[JZ8H*[F<8DIHGG&=O)C^0Q) A/0T)\J?0VIVGC<?)SC^0R)QL\"9C.)QDH D%(>JZ<D(;JZ8(.K%&<C-(UI%(IC3(UIP8G"NAHY<8GLK*GC<:&=J?>D&*C^0Y&)J?0\&)AJ0^F]GC<<&ZA/0Z%?*? %?)P(% /BP%\K$0E\J.HY=%\HF0A%\C^0B%SOG*)(%SH *)(AH *)(AH *)(A*)(A*)(A(A*)(A*)(A(A*)(A*)(A(A*)
A*)(A?XD$OT??LIBSETSVX9?;LIB8RLWI?"MAGICSVWI?:LIFESVWI?;HEADERSVWI?;LABELSVWI?=MUSICSV?8ATEPOSV?7?>ERASEWI??BOLTWI?9SYMBOLWI?9WIZARDWI?:PARABWI?=STARWI?<DUNESWI?3OMSIWI?:?>TICTACSV?<?<SNOOPYYQ?5TESTFC\I?9LESQPOFC\9?=HEXPANSV?5LTTTSV?:HUDSON>B?;POROOTFC\9?
FORTSV!???COFUNCFC\9?>VARRANFC\9?=TTESTFC\9?>FTESTFC\9?=VARIANFC\9?=HANGFC\9?<CHISQFC\9?3FOCALTM??MUSIC?8>7;V;V;V;V;V;V;V;V;V;V;V;V;V;V;V;V;V;V;V;V;V;V;V;V;V;V;V;V;V;V;V;V;V;V;VH3X^H2XHI,XILH\IP^*F0!*J-T>G	.H[<BK:9HK92A+;2B/=FORTSV-8?	SABRSV-8?(LOADERSV-8
5CONVRTSV-8?9SNOBOLSV-8?4LISTRSN-8?<CONV10SV-8?5LIB8RL-8?COPYSV-8?0MAPSV-8?;HEADERSV-8?5DATESV-8?>POLYSV-8?>?9PALPAGSV-8?2OFOCALSV-8?	PFOCALSV.H?"SCHEDAS-8?=FOCALZSV-8?!FOCALBN.H?/4WDMODBN.H??FOCADDPA.H?=FOCOVRPA.H?-FOCINTPA.H?9FOCCRSPA.H?7FOCFILPA.H?9?>I
ITALIM.H?8FOCLIBPA.H?TMTM.0?0LSHOLDFD.8;?*/0Z*/0Z*/0Z*/0Z*/0Z*/0Z*/0Z*/0Z*/0Z*/0Z*/0Z*/0Z*/0Z*/0Z*/0Z*/0Z*/0Z*/0Z*/0Z*/0Z*/0Z*/0Z*/0Z*/"G([<B2K*7 [;&[(2LK[[YNG[)RG: NG[*RGK
767<;$[-K)8J8J8&8D>K^<PK]747;*=H*\718F8F>XK\K>8 NGNGK	K	8 > * <X*!K*[-K)7<K)9DB^[?8D8A9V8F74J^[,7;+F9P?H+QK?J^<(+T[?+CS(*T<HRGRGK^748H2B.G2BBDBDH+
6Q*
R"?=!=?>?-?-	.<B+:"GA<
<B2C0"/=HB>G:IDX(%,SYSTEM ERRORJQ>RA8N ?C,JBBC>G+:2CH)IXDBIPH2KHXXYHYF>">D:>N
PPH8FFCB$BJBMC^C\2A08?Y=?>EDC?H18DE\>8C8B8AIHE[BG?/?4?2[?1?0?.?=?%K:?$OJHJMXSVH8<HC5IF]>GI%F< ICPB>K$M?KE8A? B.D??:?&<??6?>=RB = Y

Note: Lines longer than 256 characters were wrapped