'ƒ 255,255,000,126,007,128,062,007Mƒ 192,030,007,224,030,007,224,030sƒ 007,224,030,007,224,030,007,192™ƒ 030,007,128,030,007,000,031,252¿ƒ 000,030,006,000,030,007,000,030åƒ 007,128,030,007,192,030,007,224 ƒ 030,007,226,030,003,226,063,0011 ƒ 226,127,126,232,255,224,112,002W ƒ 007,255,224,015,129,240,031,129} ƒ 248,063,129,252,127,129,254,127£ ƒ 129,254,127,129,254,127,129,254É ƒ 127,129,254,127,129,254,127,129ï ƒ 254,127,129,254,127,129,254,127 ƒ 129,254,127,129,254,127,129,254; ƒ 127,129,254,063,129,252,031,129a ƒ 248,015,129,240,007,255,224,126‡ ƒ 015,255,131,016,000,071,032,000­ ƒ 047,064,000,031,192,000,015,192Ó ƒ 000,007,252,000,003,255,192,001ù ƒ 255,252,000,127,255,192,063,255 ƒ 252,003,255,254,000,063,255,128E ƒ 003,255,192,000,063,224,000,003k ƒ 240,000,003,248,000,002,244,000‘ ƒ 004,226,000,008,193,255,240,004· ƒ 255,255,240,127,000,112,063,000Ý ƒ 048,031,000,016,031,000,000,031 ƒ 000,000,031,000,000,031,004,000) ƒ 031,012,000,031,252,000,031,252O ƒ 000,031,252,000,031,012,000,031u ƒ 004,000,031,000,000,031,000,000› ƒ 031,000,000,031,000,016,063,000Á ƒ 048,127,000,112,255,255,240,044é <—53281,0:—53280,0:™"":™"“":V²53248ö F—Vª21,15 OZ²20409 P—Z,254:—Zª1,253:—Zª2,252:—Zª3,251:—Zª4,250:—Zª5,249V Z�N²0¤63:‡D:—16256ªN,D:‚Ns \�N²0¤63:‡D:—16192ªN,D:‚N� ^�N²0¤63:‡D:—16128ªN,D:‚N­ `�N²0¤63:‡D:—16064ªN,D:‚N i� SPRITE HAREKETá n�R²0¤110:—Vª0,R:—Vª1,90:‚Rx�R²0¤140:—Vª2,R:—Vª3,90:‚R$‚�R²255¤170©«1:—Vª4,R:—Vª5,90:‚RHŒ�R²255¤200©«1:—Vª6,R:—Vª7,90:‚Ri �Y²90¤160:—Vª0,110:—Vª1,Y:‚YŠª�Y²90¤190:—Vª2,140:—Vª3,Y:‚Y«´�Y²90¤190:—Vª4,170:—Vª5,Y:‚Y̾�Y²90¤190:—Vª6,200:—Vª7,Y:‚YÍ™"FFFF"&Ι"SOFT"NÏ™"?????’"aþ¡A$:‹A$²""§510n—Vª21,0:w™"“"‚î:‰1629§Ü—53280,0:—53281,7:™Ç(142)Ç(147);­ß™Çâ™"œ-":�Z²1¤33:™"-":‚ïå™"- �COMMODORE�C64�PROGRAMS ":""è™"*":�Z²1¤30:™"*":‚ë™"’*":�Z²6î™"-1*SPC(30)*(1*SPC(30)*1"¬\ñ™"Â"¦12)"�DATABASE/ROSE"¦13)"Â";‹ô™"I"¬¦12)¬(CTRL«1)«««««««¬¦13)¬(CTRL«6)I"*Ô÷™"I"¬¦30)¬I"*SPC(10)*(CTRL-1)>- MANAGE BOOK LIST*SPC(10)*(CTRL-6)I"¬ú™"I"¦10)¬³CTRL«1±«ADDRESSES"SPC(17)*I"¬4ý™"I"¬¦10)¬(CTRL«1)«INVEN¤RIES¬¦15)¬(CTRL«6)I"*f™"I"¬¦10)¬(CTRL«1)«¯MAILING›S¬¦9)¬(CTRL«6)I"*ƒ™"I"¬¦30)¬I"*SPC(30)*I"¬ ™"I"¬¦30)¬I"*SPC(30)*I"¬½ ™"I"¬¦30)¬I"*SPC(30)*I"¬Õ ™"*":�Z²1¤30:™"-":‚ ™">":³CTRL«3±³RVS‘±":FOR Z=1 TO 30:PRINT "«":NEXT'™"*18� ’WAIT�  8"¬?™"*":�Z²1¤33:™"-":‚G™"ËY™"‘‘‘‘‘‘‘‘‘‘"i�I²1¤5000:‚v!—53280,1œ$—53281,1:™"�":�I²1¤5:L$(I)²"0":‚I®'™"“"£11)" "é*™£11)"DATABASE ROSE SOFT":™£11)" "-™£11)"BY UGURLU OZDEMIR"H.™"CONTRACT:3.CND. 20.00 KAK NO:13/B 06630 "h/™£35)"AKDERE":™£35)"ANKARA"v0�I²0¤5000|3‚§6™"“WOULD YOU LIKE AN OLD FILE?"¾9�1806:‹A$²"Y"§1869É<R$²" "?™"“ HOW MANY FIELDS (1-7)?":�1806:C²Å(A$):‹C³1°C±7§1596B�2022$E™"PLEASE WAIT"AH�I²0¤C:T$(I)²"À":‚I:Y²«1LK�J²0¤ChN™"“FIELDS NAMES":�1000†Q™"WHAT IS "Jª1"�'S NAME"”T…T$(J):‚J¯W™"THE NEW FILE NAME"·Z…R$¾] 4í`G²0:™"“"R$":E$=Y":™£15)" MENU ’":�1800 c™"F1’-SEARCH D’-DUMP"+f™"F7’-ENTRY H’-HARD COPY"@i™"N’-NEW FILE"Xl™"A’-ALPHABETIZE"xo™"L’-LOAD FROM TAPE/DISC"˜r™"S’- SAVE TO TAPE/DISC"¢u�1806³x‹A$²"ˆ"§1683Ä{‹A$²"D"§1877Õ~‹A$²"…"§1713æ�‹A$²"S"§1842÷„‹A$²"L"§1860‡‹A$²"A"§2121Š‹A$²"N"§1773*�‹A$²"H"§22294�‰1653M“™"“ MAKE AN ENTRY"w–‹Y²E§™"FILE FULL":�I²1¤1000:‚I:‰1629™K²0£œ�I²0¤Y:‹C$(0,I)²"À"§L²I:I²Y:K²1©Ÿ‚¼¢Y²Yª1:‹K²0§L²YÈ¥P%(Y)²LШL²YÛ«�I²0¤C®™T$(I):C$(I,P%(Y))²"À":…C$(I,P%(Y)):‚:�1815:‰1629#±™"“  SEARCH"C´�2031:�2508:‹Q³1°Q±Cª1§1629M·Q²Q«1‚º™"WHAT IS THE "T$(Q):…Q$:KK²0:‹É(Q$,1)²"*"§KK²1‘½‹G²1§�2265™ÀK²0ÐÙ"“ SEARCHING":‹KK²0§�L²0¤Y:‹C$(0,P%(L))²O$§1740Æ‹KK²1§�L²0¤Y:‹È(C$(0,P%(L)),Ã(O$)«1)ª"*"²O$§1740ɉ1761Ì�2514!ÏK²1,Ò�J²0¤C\Õ™C$(J,P%(L))",";:‚J:™Ç(20):‹G²0§�1815:‰1761sØ‹G²1§�2307:™:‰1761}Û�2403ƒÞ™Šá‚L´ä‹K²0§™"NO RECORD OF THE "T$(O)"."O$"¾ç�2490Ýê™"SCAN OVER":�1806:‰1629ðí™"“ NEW FILE"ð�1959:‹A$³±"Y"§1629ó�1800Hö™"THE SAME FILE SET UP":�1806:‹A$²"Y"§Y²«1:‰1629gù™"‘DIFFERENT FILE SET UP?"†ü�1806:‹A$²"Y"§œ:Y²«1:‰1596¥ÿ™"‘HOW ABOUT A NEW TITLE?"½�1806:‹A$²"Y"§‰1623lj1629Ò�I²0¤Cé ™"�"Iª1;T$(I):‚I:Žñ¡A$‹A$²""§1806Ž$™"PUSH E TO EDIT THIS".�1806W‹A$³±"E"§™"‘ ‘":Žv ™"‘PUSH K TO KILL ENTRY"�#�1806:‹A$²"K"§�2112:Ž›&�I²0¤Cì)™""T$(I):™" "C$(I,P%(L)):LN²Ã(C$(I,P%(L))):�N²0¤LNö,™"�";/‚M:™"‘":…C$(I,P%(L)):‚I:™:Ž62™"“ SAVE TO TAPE/DISK "N5�1959:‹A$³±"Y"§1629X8�1971j;‹A$³±"Y"§1590t>�1965’AZ²1:Ÿ1,1,1,R$:�1887:‰1629 D‹C³1§1530ÀG™"“ LOAD FROM TAPE/DISC "ØJ�1959:‹A$³±"Y"§1629ÞMœûPY²«1:�1971:‹A$³±"Y"§1902S�1905 VZ²1:Ÿ1,1,0:�1923:‰1629*Y�1944U\Z²2:Ÿ2,8,2,"@0:"ªR$ª",S,W":�1807:‰1629d_˜2,R$ª" 0"mb˜Z,C�e˜Z,Y:�I²0¤C:˜Z,T$(I):‚I:�I²0¤Y›h�J²0¤C¸k˜Z,C$(J,P%(I)):‚J,I: Z:ŽÂn�2037õq�1944:œ:Y²«1:Z²2:™"FILE NAME":…A$:‹A$²""§1860tŸ2,8,2,"@0:"ªA$ª",S,R"w„Z,R$Cz‹R$³±""§R$²È(R$,Ã(R$)«2):�1929:‰1629J} Z…€�1944:™""R$" NOT FOUND":™"PUSH ANY KEY":�1806:‰1860�ƒ„Z,R$¤†R$²È(R$,Ã(R$)«2)¶‰™"FOUND "R$¿Œ„Z,Cç�„Z,Y:C²Cª1:�1950:�I²0¤C:„Z,T$(I):‚Iò’�I²0¤Y•P%(I)²I:�J²0¤C:„Z,C$(J,P%(I)):‚J,I: Z:Ž1˜Ÿ15,8,15,"UI+";› 15:ŽEž�2022ƒ¡‹K±E§K²E:™"WARNING FILE FROM COMPUTER WITH MORE MEMORY":މ¤ŽŸ§™"ARE YOU SURE?"«ª�1806:ŽÉ­™"‘ * TAPE CONFIRMED *"ϰŽì³™"‘ARE YOU USING TAPE?"ø¶�1806:Ž ¹™"“ DUMP "¼�2508:‹G²1§�2265%¿™5ÂQ²0:K²0:L²0CÅ‹L±Y§2016NÈ�J²0¤CsË™C$(J,P%(L))",";:‚J:™Ç(20):�2514ˆÎ‹G²0§�1815:‰2010ŸÑ‹G²1§�2307:™:‰2010©Ô�2403¯×™¹ÚL²Lª1Ã݉1989Íà�2490ïã™"DUMP COMPLETE":�1806:‰1629ùæE²500 éC²C«1 ì†C$(C,E),T$(C),P%(E):Ž( ï�1800K ò™"WHICH FIELD":�1806:Q²Å(A$):Žh õ™"‘DISC FILE LISTING?"} ø�1806:‹A$³±"Y"§Ž• û™"“SCANNING DISC"¥ þŸ1,8,0,"$0"³ ¡#1,A$,B$Á ¡#1,A$,B$Ï ¡#1,A$,B$× C²0ë ‹A$³±""§C²Æ(A$)!‹B$³±""§C²CªÆ(B$)¬256!!D$²D$ª""ªÊ(Ä(C),2)ª"’",!¡#1,B$>!‹ST³±0§ 1:™:ŽR!‹B$³±Ç(34)§2070]!¡#1,B${!"‹B$³±Ç(34)§D$²D$ªB$:‰2079†!%¡#1,B$™!(‹B$²Ç(32)§2085£!+C$²""°!.C$²C$ªB$È!1¡#1,B$:‹B$³±""§2094â!4D$²D$ª" "ª""ªÈ(C$,3)"7‹É(D$,6)²"0 "ª""ª"SE0"§™D$"’�"":D$²"""=‰2052$"@Y²Y«1Z"C�I²0¤C:C$(I,P%(L))²"À":‚I:�I²L¤Y:P%(I)²P%(Iª1):‚If"FL²L«1:Ž|"I™"“ALPHABETIZE"—"L�I²0¤C:I%(I)²0:‚:�1800È"O™"PUSH RETURN IF YOU DON'T WANT ANYMORE"×"R�I²0¤C:K²0á"UA$²""#X™"ENTER THE"Iª1"IMPORTANT FIELD"1#[…" ���������";A$F#\‹A$²""§I²0:‰2169V#^I%(I)²Å(A$)^#aL²Iƒ#g‹I%(I)³1°I%(I)±Cª1§™"‘‘‘‘":‰2133•#jI%(I)²I%(I)«1·#mK²0:�J²0¤I:‹I%(J)²I%(I)§K²Kª1¾#p‚JÙ#s‹K²2§™"‘‘‘‘":K²0:‰2133ð#v™"“"£I¬3);I%(I)ª1÷#y‚I$|‹L²0§1629$�K²L¤0©«1$‚I²0$$…KL²06$ˆJ²0:‹I²Y§2223F$‹‹J²Y«1§2214r$Ž‹C$(I%(K),P%(J))²C$(I%(K),P%(Jª1))§2208Ÿ$‘‹C$(I%(K),P%(J))³C$(I%(K),P%(Jª1))§‰2202«$”U²P%(J)Ì$—P%(J)²P%(Jª1):P%(Jª1)²U:KL²1Ö$šJ²Jª1à$�‰2187ê$£‰2187ù$¦‹KL²0§2223%©I²Iª1 %¬—53200,µ(»(Y)¬3ª1):‰2191'%¯‚K1%²‰1629T%µ™"“USING P’APER OR L’ABELS?"v%¸�1806:‹A$²"L"§G²2:�2439:‰2241~%»G²1‘%¾™"USING PAPER"­%Á™"“MAKE A HARD COPY"Ï%Ä™"D - DUMP":™"F1’ - SEARCH"î%Ç™"R - RETURN TO THE MENU"ø%Ê�1806&Í‹A$²"R"§G²0:‰1629 &ЋA$²"D"§‰19771&Ó‹A$²"…"§1713;&Ö‰2250D&ÙŸ4,4p&ÜA$²"":�I²1¤µ((40«Ã(R$))­2):A$²A$ª" ":‚I‚&ߘ4,Ç(14)A$ªR$”&â˜4,Ç(15)Ç(10)³&åK²0:NL²7:�I²0¤6:M%(I)²0:‚I½&èA$²""á&ëKL²0:�N²0¤C:I²«5:B$²T$(N):�2343è&î‚N 'ñ˜4,A$:NL²NLª1:‹KL§K²Kª16«C:‰2280'ôX²Ã(A$)7'÷A$²"":�I²1¤X:A$²A$ª"M":‚IU'ú˜4,Ç(15)A$Ç(18)Ç(10)Ç(15)^'ýII²0d' Ž{' ‹C$(0,P%(L))²"À"§Ž†' �N²0¤C•' M%(N)²0:‚Nž' KL²0Å' A$²"":�N²0¤C:BB$²C$(N,P%(L)):�2343ô' ‹NL³±1§�NN²NL¤60:˜4,Ç(10):‚NN:˜4,"**":NL²3û' ‚N( NL²NLª1( ˜4,A$( ‹KL§2316*(! NL²NLª13($ ˜4:Ža(' ‹Ê(BB$,M%(N)ª1,1)²" "§M%(N)²M%(N)ª1:‰2343l(* J²15«Cˆ(- ‹Ã(BB$)«M%(N)³15«C§2370‘(0 KL²1Ë(3 ‹Ê(BB$,M%(N)ª15«C,1)²" "°Ê(BB$,M%(N)ª16«C,1)²" "§2370Ó(6 J²0)9 �M²14«C¤1©«1:‹Ê(BB$,M%(N)ªM,1)²" "§J²M:M²0 )< ‚M)? ‹J²0§J²15«C2)B CC$²Ê(BB$,M%(N)ª1,J)D)E M%(N)²M%(N)ªJR)H A$²A$ªCC$v)K �M²0¤15«C«Ã(CC$)ª1:A$²A$ª" ":‚M•)N ‹II²5§A$²È(A$,Ã(A$)«1)ª" "›)Q Ž¡)T �È)W AA$²C$(Å(È(L$(I),1))«1,P%(L))ª" *"ï)Z AA$²AA$ªC$(Å(É(L$(II),1))«1,P%(L))ü)] M²Ã(AA$)*` Ž *c NN²0;*f �II²1¤5:‹Ã(L$(II))²3§�2391:‹M±NN§NN²M:‰2412r*i ‹Å(L$(II))±0§M²Ã(C$(Å(L$(II))«1,P%(L))):‹M±NN§NN²Mz*l ‚II¬*o NN²µ((33«NN)­2):A$²" ":�II²1¤NN:A$²A$ª" ":‚IIµ*r Ÿ4,4á*u �II²1¤5:‹Ã(L$(II))²3§�2391:˜4,A$;:‰2427 +x ‹Å(L$(II))±0§˜4,A$C$(Å(L$(I))«1,P%(L)))+{ ˜4,""'+~ ‚II:˜4: 4:Ž.+� ‚I7+„ ˜DV,M+‡ ™"“LABEL FORMAT"]+Š �1800:‰2451n+� ™""™+� �I²1¤5:™"LINE"I"= �����"L$(I):‚I:ޤ+“ �J²1¤5®+– �2445×+™ ™"LINE#"J"= FIELD #"û+œ ™" �����"L$(J):…"‘";L$(J)',Ÿ ‹Å(É(L$(J),1))±Cª1°Å(É(L$(J),1))³0§2457S,¢ ‹Å(È(L$(J),1))±Cª1°Å(È(L$(J),1))³0§2457†,¥ ‹Ã(L$(J))±2§‹Ê(L$(J),2,1)³±"*"°Ã(L$(J))±3§2457�,¨ ‚J—,« �2445À,® ™"IS THIS OK? "Ø,± �1806:‹A$³±"Y"§2439î,´ ™"“USING LABELS"ø,· ‰2241-º �II²0¤C-½ ‹TL(II)²0§2502--À ™T$(II)" ="TL(II)[-à ‹G²1§˜4,Ç(14)"TOTAL "T$(II)"="TL(II)Ç(15)c-Æ ‚IIi-É Žu-Ì �II²0¤C†-Ï TL(I)²0:‚I:Ž’-Ò �II²0¤C­-Õ ‹È(T$(II),1)³±"#"§2538Ä-Ø IK²Å(C$(II,P%(L)))Ô-Û ‹IK³±0§2544ó-Þ IK²Å(Ê(C$(II,P%(L)),2,20)).á ‹IK³±0§2544".ä IK²Å(Ê(C$(II,P%(L)),3,20))2.ç ‹IK³±0§2544:.ê ‚II@.í Ž[.ð TL(II)²TL(II)ªIK:‰2538