hello connect

Home » Personal collection » Commodore disks » disk30d2_loadstar_131.d64 » hello connect

hello connect

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk:	Home » Personal collection » Commodore disks » disk30d2_loadstar_131.d64
Filename:	hello connect
Read OK:	✔
File size:	03B4 bytes
Load address:	0801
Exec address:	0000

Duplicates

There are 2 duplicate copies of this file in the archive:

Arnold website » Loadstar_C64 » Loadstar_C64_1541_Loadstar_Issue_197_199x_Softdisk_Side_D_Loadstar_Issue_197_199x_Softdisk_Side_D.d64 » hello connect
Arnold website » magazines_LoadStar » magazines_LoadStar_Loadstar148_LS148S4.d64 » hello connect
Personal collection » Commodore disks » disk30d2_loadstar_131.d64 » hello connect

File contents

     3 POKE53281,0:POKE53280,0:POKE32767,13
     5 POKE56578,PEEK(56578)OR3:POKE56576,(PEEK(56576)AND252)OR3
    10 POKE53272,21:POKE648,4:POKE55,0:POKE56,160:POKE51,0:POKE52,160:GOSUB500
    20 GOSUB40000
   500 DV=PEEK(186):IFDV<8THENDV=8
   505 PRINT"<clr><text mode><shift disable>":A$="                                     "
   510 B$="◤◤◤◤◤◤◤◤◤◤◤◤◤◤◤◤◤◤◤◤◤◤◤◤◤◤◤◤◤◤◤◤◤◤◤◤◤◤"
   520 POKE214,9:PRINT:POKE646,15:FORI=1TO10:PRINT"<cursor right>"B$:NEXT
   530 POKE214,11:PRINT:POKE646,11:FORI=1TO7:PRINTTAB(2)LEFT$(B$,34):NEXT
   540 POKE214,10:PRINT:POKE646,3:FORI=1TO7:PRINTTAB(3)"<reverse on>"LEFT$(B$,34):NEXT
   550 POKE214,12:PRINT:POKE646,7:FORI=1TO4:PRINTTAB(5)"<reverse on>"LEFT$(A$,30):NEXT
   555 POKE214,11:PRINT:PRINTTAB(5)"<reverse on><yellow>                              "
   560 PRINTTAB(7)"<reverse on>🭰HERE IS NO 🭼🭽♠🭷♥🭰♠🭻 MENU"
   562 PRINTTAB(7)"<reverse on>ON THIS SIDE.  🭰RY ANOTHER"
   565 PRINTTAB(7)"<reverse on>SIDE AND PRESS A KEY.   "
   570 GETA$:IFA$=""THEN570
   580 RETURN
 10000 OPEN15,8,15,"S0:HELLO CONNECT":CLOSE15:SAVE"HELLO CONNECT",8:END
 40000 A$="HELLO CONNECT":FORI=8TO13:CLOSE2:OPEN2,I,2:CLOSE2:IFSTTHEN40020
 40010 CLOSE15:OPEN15,I,15,"R0:"+A$+"="+A$:INPUT#15,ER:CLOSE15:IFER=63THEN40030
 40020 NEXT:PRINT"<clr>":POKE2048,0:POKE44,8:POKE53272,23:POKE186,8:END
 40030 POKE646,PEEK(53281):PRINT"<clr><cursor down><cursor down><cursor down>LOAD"CHR$(34)A$CHR$(34)","I
 40040 PRINT"<cursor down><cursor down><cursor down><cursor down>RUN<home>":POKE44,8:POKE2048,0:POKE631,13:POKE632,13:POKE198,2:END

!�53281,0:�53280,0:�32767,13O�56578,�(56578)�3:�56576,(�(56576)�252)�3�
�53272,21:�648,4:�55,0:�56,160:�51,0:�52,160:�500��40000��DV��(186):�DV�8�DV�8���"�":A$�"                                     "	�B$�"��������������������������������������"5	�214,9:�:�646,15:�I�1�10:�""B$:�a	�214,11:�:�646,11:�I�1�7:��2)�(B$,34):��	�214,10:�:�646,3:�I�1�7:��3)""�(B$,34):��	&�214,12:�:�646,7:�I�1�4:��5)""�(A$,30):��	+�214,11:�:��5)"�                              "
0��7)"�HERE IS NO ������ MENU"=
2��7)"ON THIS SIDE.  �RY ANOTHER"a
5��7)"SIDE AND PRESS A KEY.   "t
:�A$:�A$�""�570z
D��
'�15,8,15,"S0:HELLO CONNECT":�15:�"HELLO CONNECT",8:��
@�A$�"HELLO CONNECT":�I�8�13:�2:�2,I,2:�2:�ST�40020"J��15:�15,I,15,"R0:"�A$�"="�A$:�15,ER:�15:�ER�63�40030NT��:�"�":�2048,0:�44,8:�53272,23:�186,8:�|^��646,�(53281):�"�LOAD"�(34)A$�(34)","I�h��"RUN":�44,8:�2048,0:�631,13:�632,13:�198,2:�

!HC@.53281,0:.53280,0:.32767,13@oHE@.56578,.(56578).3:.56576,(.(56576).252).3@.HJ@.53272,21:.648,4:.55,0:.56,160:.51,0:.52,160:.500@.HT@.40000@.H.Adv..(186):.dv.8.dv.8@.H.A.".NH":a$."                                     "@OI.Ab$."......................................"@5IHB.214,9:.:.646,15:.i.1.10:."]"b$:.@AIRB.214,11:.:.646,11:.i.1.7:..2).(b$,34):.@.I£B.214,10:.:.646,3:.i.1.7:..3)"R".(b$,34):.@.I&B.214,12:.:.646,7:.i.1.4:..5)"R".(a$,30):.@.I+B.214,11:.:..5)"R.                              "@WJ0B..7)"R.here is no ........ menu"@=J2B..7)"Ron this side.  .ry another"@AJ5B..7)"Rside and press a key.   "@TJ:B.a$:.a$."".570@ZJdB.@.JP'.15,8,15,"s0:hello connect":.15:."hello connect",8:.@.J@.a$."hello connect":.i.8.13:.2:.2,i,2:.2:.st.40020@"Kj..15:.15,i,15,"r0:".a$."=".a$:.15,er:.15:.er.63.40030@nKt..:.".":.2048,0:.44,8:.53272,23:.186,8:.@.K...646,.(53281):.".QQQload".(34)a$.(34)","i@.KH.."QQQQrunS":.44,8:.2048,0:.631,13:.632,13:.198,2:.@@@

00000000  21 08 03 00 97 35 33 32  38 31 2c 30 3a 97 35 33  |!....53281,0:.53|
00000010  32 38 30 2c 30 3a 97 33  32 37 36 37 2c 31 33 00  |280,0:.32767,13.|
00000020  4f 08 05 00 97 35 36 35  37 38 2c c2 28 35 36 35  |O....56578,.(565|
00000030  37 38 29 b0 33 3a 97 35  36 35 37 36 2c 28 c2 28  |78).3:.56576,(.(|
00000040  35 36 35 37 36 29 af 32  35 32 29 b0 33 00 85 08  |56576).252).3...|
00000050  0a 00 97 35 33 32 37 32  2c 32 31 3a 97 36 34 38  |...53272,21:.648|
00000060  2c 34 3a 97 35 35 2c 30  3a 97 35 36 2c 31 36 30  |,4:.55,0:.56,160|
00000070  3a 97 35 31 2c 30 3a 97  35 32 2c 31 36 30 3a 8d  |:.51,0:.52,160:.|
00000080  35 30 30 00 90 08 14 00  8d 34 30 30 30 30 00 a9  |500......40000..|
00000090  08 f4 01 44 56 b2 c2 28  31 38 36 29 3a 8b 44 56  |...DV..(186):.DV|
000000a0  b3 38 a7 44 56 b2 38 00  df 08 f9 01 99 22 93 0e  |.8.DV.8......"..|
000000b0  08 22 3a 41 24 b2 22 20  20 20 20 20 20 20 20 20  |.":A$."         |
000000c0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000000d0  20 20 20 20 20 20 20 20  20 20 20 20 22 00 0f 09  |            "...|
000000e0  fe 01 42 24 b2 22 a9 a9  a9 a9 a9 a9 a9 a9 a9 a9  |..B$."..........|
000000f0  a9 a9 a9 a9 a9 a9 a9 a9  a9 a9 a9 a9 a9 a9 a9 a9  |................|
00000100  a9 a9 a9 a9 a9 a9 a9 a9  a9 a9 a9 a9 22 00 35 09  |............".5.|
00000110  08 02 97 32 31 34 2c 39  3a 99 3a 97 36 34 36 2c  |...214,9:.:.646,|
00000120  31 35 3a 81 49 b2 31 a4  31 30 3a 99 22 1d 22 42  |15:.I.1.10:."."B|
00000130  24 3a 82 00 61 09 12 02  97 32 31 34 2c 31 31 3a  |$:..a....214,11:|
00000140  99 3a 97 36 34 36 2c 31  31 3a 81 49 b2 31 a4 37  |.:.646,11:.I.1.7|
00000150  3a 99 a3 32 29 c8 28 42  24 2c 33 34 29 3a 82 00  |:..2).(B$,34):..|
00000160  8f 09 1c 02 97 32 31 34  2c 31 30 3a 99 3a 97 36  |.....214,10:.:.6|
00000170  34 36 2c 33 3a 81 49 b2  31 a4 37 3a 99 a3 33 29  |46,3:.I.1.7:..3)|
00000180  22 12 22 c8 28 42 24 2c  33 34 29 3a 82 00 bd 09  |".".(B$,34):....|
00000190  26 02 97 32 31 34 2c 31  32 3a 99 3a 97 36 34 36  |&..214,12:.:.646|
000001a0  2c 37 3a 81 49 b2 31 a4  34 3a 99 a3 35 29 22 12  |,7:.I.1.4:..5)".|
000001b0  22 c8 28 41 24 2c 33 30  29 3a 82 00 f2 09 2b 02  |".(A$,30):....+.|
000001c0  97 32 31 34 2c 31 31 3a  99 3a 99 a3 35 29 22 12  |.214,11:.:..5)".|
000001d0  9e 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |.               |
000001e0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 22  |               "|
000001f0  00 17 0a 30 02 99 a3 37  29 22 12 d4 48 45 52 45  |...0...7)"..HERE|
00000200  20 49 53 20 4e 4f 20 cc  cf c1 c4 d3 d4 c1 d2 20  | IS NO ........ |
00000210  4d 45 4e 55 22 00 3d 0a  32 02 99 a3 37 29 22 12  |MENU".=.2...7)".|
00000220  4f 4e 20 54 48 49 53 20  53 49 44 45 2e 20 20 d4  |ON THIS SIDE.  .|
00000230  52 59 20 41 4e 4f 54 48  45 52 22 00 61 0a 35 02  |RY ANOTHER".a.5.|
00000240  99 a3 37 29 22 12 53 49  44 45 20 41 4e 44 20 50  |..7)".SIDE AND P|
00000250  52 45 53 53 20 41 20 4b  45 59 2e 20 20 20 22 00  |RESS A KEY.   ".|
00000260  74 0a 3a 02 a1 41 24 3a  8b 41 24 b2 22 22 a7 35  |t.:..A$:.A$."".5|
00000270  37 30 00 7a 0a 44 02 8e  00 b3 0a 10 27 9f 31 35  |70.z.D......'.15|
00000280  2c 38 2c 31 35 2c 22 53  30 3a 48 45 4c 4c 4f 20  |,8,15,"S0:HELLO |
00000290  43 4f 4e 4e 45 43 54 22  3a a0 31 35 3a 94 22 48  |CONNECT":.15:."H|
000002a0  45 4c 4c 4f 20 43 4f 4e  4e 45 43 54 22 2c 38 3a  |ELLO CONNECT",8:|
000002b0  80 00 e9 0a 40 9c 41 24  b2 22 48 45 4c 4c 4f 20  |....@.A$."HELLO |
000002c0  43 4f 4e 4e 45 43 54 22  3a 81 49 b2 38 a4 31 33  |CONNECT":.I.8.13|
000002d0  3a a0 32 3a 9f 32 2c 49  2c 32 3a a0 32 3a 8b 53  |:.2:.2,I,2:.2:.S|
000002e0  54 a7 34 30 30 32 30 00  22 0b 4a 9c a0 31 35 3a  |T.40020.".J..15:|
000002f0  9f 31 35 2c 49 2c 31 35  2c 22 52 30 3a 22 aa 41  |.15,I,15,"R0:".A|
00000300  24 aa 22 3d 22 aa 41 24  3a 84 31 35 2c 45 52 3a  |$."=".A$:.15,ER:|
00000310  a0 31 35 3a 8b 45 52 b2  36 33 a7 34 30 30 33 30  |.15:.ER.63.40030|
00000320  00 4e 0b 54 9c 82 3a 99  22 93 22 3a 97 32 30 34  |.N.T..:.".":.204|
00000330  38 2c 30 3a 97 34 34 2c  38 3a 97 35 33 32 37 32  |8,0:.44,8:.53272|
00000340  2c 32 33 3a 97 31 38 36  2c 38 3a 80 00 7c 0b 5e  |,23:.186,8:..|.^|
00000350  9c 97 36 34 36 2c c2 28  35 33 32 38 31 29 3a 99  |..646,.(53281):.|
00000360  22 93 11 11 11 4c 4f 41  44 22 c7 28 33 34 29 41  |"....LOAD".(34)A|
00000370  24 c7 28 33 34 29 22 2c  22 49 00 b3 0b 68 9c 99  |$.(34)","I...h..|
00000380  22 11 11 11 11 52 55 4e  13 22 3a 97 34 34 2c 38  |"....RUN.":.44,8|
00000390  3a 97 32 30 34 38 2c 30  3a 97 36 33 31 2c 31 33  |:.2048,0:.631,13|
000003a0  3a 97 36 33 32 2c 31 33  3a 97 31 39 38 2c 32 3a  |:.632,13:.198,2:|
000003b0  80 00 00 00                                       |....|
000003b4

Our privacy policy is here.
Last updated: 28 Jul 2024, 23:31 UTC
Website designed by .