home *** CD-ROM | disk | FTP | other *** search
/ APDL Public Domain 1 / APDL_PD1A.iso / file_trans / psion < prev    next >
ArcFS Archive  |  1995-10-01  |  26.6 KB

open in: MacOS 8.1     |     Win98     |     DOS

browse contents    |     view JSON data     |     view as text


This file was processed as: ArcFS Archive (archive/arcFS).

ConfidenceProgramDetectionMatch TypeSupport
100% dexvert ArcFS Archive (archive/arcFS) magic Supported
100% file RISC OS archive (ArcFS format) default
99% file data default
100% TrID Acorn ArcFS Archive default
100% gt2 Kopftext: 'Archive' default (weak)
100% detectItEasy Archive: ArcFS default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 41 72 63 68 69 76 65 00 | 3c 03 00 00 9c 03 00 00 |Archive.|<.......|
|00000010| 28 00 00 00 64 00 00 00 | 00 00 00 00 00 00 00 00 |(...d...|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 82 21 50 73 69 6f 6e 00 | 00 00 00 00 ff ff ff ff |.!Psion.|........|
|00000070| 42 fd ff ff 8e 46 fd 27 | 08 00 00 00 ff ff ff ff |B....F.'|........|
|00000080| 18 03 00 80 82 21 42 6f | 6f 74 00 00 ff ff ff ff |.....!Bo|ot......|
|00000090| 06 01 00 00 41 eb ff ff | 41 47 0f e4 03 00 cd 65 |....A...|AG.....e|
|000000a0| 06 01 00 00 24 00 00 00 | 82 21 52 75 6e 00 77 00 |....$...|.!Run.w.|
|000000b0| ff ff ff ff a6 00 00 00 | 41 eb ff ff 84 51 0f e4 |........|A....Q..|
|000000c0| 03 00 37 4c a6 00 00 00 | 4e 01 00 00 82 21 52 75 |..7L....|N....!Ru|
|000000d0| 6e 49 6d 61 67 65 00 ff | 23 2a 00 00 41 fb ff ff |nImage..|#*..A...|
|000000e0| 61 0b 10 e4 03 00 c0 4d | 23 2a 00 00 18 02 00 00 |a......M|#*......|
|000000f0| 82 21 53 70 72 69 74 65 | 73 00 ff ff d0 06 00 00 |.!Sprite|s.......|
|00000100| 41 f9 ff ff c5 1c ec aa | 03 00 c5 c6 d0 06 00 00 |A.......|........|
|00000110| 5f 2c 00 00 82 3f 50 73 | 69 6f 6e 00 ff ff ff ff |_,...?Ps|ion.....|
|00000120| bd 1f 00 00 41 ff ff ff | 87 e8 0d e4 03 00 87 23 |....A...|.......#|
|00000130| bd 1f 00 00 53 33 00 00 | 82 44 61 74 61 00 77 00 |....S3..|.Data.w.|
|00000140| ff ff ff ff ff ff ff ff | 42 fd ff ff d2 49 fd 27 |........|B....I.'|
|00000150| 00 00 00 00 ff ff ff ff | f8 01 00 80 82 41 52 43 |........|.....ARC|
|00000160| 00 00 00 00 00 00 00 00 | b1 02 00 00 41 ff f7 ff |........|....A...|
|00000170| fd 37 b4 4f 03 00 60 03 | b1 02 00 00 34 53 00 00 |.7.O..`.|....4S..|
|00000180| 82 47 41 4d 45 00 00 00 | 00 00 00 00 93 04 00 00 |.GAME...|........|
|00000190| 41 ff f7 ff cf bb c2 63 | 03 00 56 12 93 04 00 00 |A......c|..V.....|
|000001a0| 09 56 00 00 82 49 47 41 | 4d 45 00 00 00 00 00 00 |.V...IGA|ME......|
|000001b0| ed 00 00 00 41 ff f7 ff | b9 ce c2 63 03 00 13 e7 |....A...|...c....|
|000001c0| ed 00 00 00 c0 5a 00 00 | 82 53 45 41 52 43 48 00 |.....Z..|.SEARCH.|
|000001d0| 00 00 00 00 b0 01 00 00 | 41 ff f7 ff e5 e8 35 8e |........|A.....5.|
|000001e0| 03 00 b6 b7 b0 01 00 00 | d1 5b 00 00 82 53 54 41 |........|.[...STA|
|000001f0| 54 00 00 00 00 00 00 00 | 74 01 00 00 41 ff f7 ff |T.......|t...A...|
|00000200| 0b 1f b4 4f 03 00 8a 91 | 74 01 00 00 a5 5d 00 00 |...O....|t....]..|
|00000210| 82 55 44 47 00 00 00 00 | 00 00 00 00 b7 00 00 00 |.UDG....|........|
|00000220| 41 ff f7 ff f5 db c2 63 | 03 00 bb 30 b7 00 00 00 |A......c|...0....|
|00000230| 3d 5f 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |=_......|........|
|00000240| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000250| 00 00 00 00 88 02 00 00 | 82 54 65 78 74 00 77 00 |........|.Text.w.|
|00000260| ff ff ff ff ff ff ff ff | 42 fd ff ff fd 4d fd 27 |........|B....M.'|
|00000270| 00 00 00 00 ff ff ff ff | f4 02 00 80 82 41 52 43 |........|.....ARC|
|00000280| 54 65 78 74 00 00 00 00 | ae 02 00 00 41 ff ff ff |Text....|....A...|
|00000290| 24 97 a0 6f 03 00 65 2a | ae 02 00 00 18 60 00 00 |$..o..e*|.....`..|
|000002a0| 82 49 47 41 4d 45 54 65 | 78 74 00 00 ea 00 00 00 |.IGAMETe|xt......|
|000002b0| 41 ff ff ff 23 9c a0 6f | 03 00 53 82 ea 00 00 00 |A...#..o|..S.....|
|000002c0| ea 62 00 00 82 50 41 53 | 53 54 65 78 74 00 00 00 |.b...PAS|SText...|
|000002d0| 82 00 00 00 41 ff ff ff | 13 ae a0 6f 03 00 fc 3d |....A...|...o...=|
|000002e0| 82 00 00 00 f8 63 00 00 | 82 53 54 41 54 54 65 78 |.....c..|.STATTex|
|000002f0| 74 00 00 00 71 01 00 00 | 41 ff ff ff c9 b3 a0 6f |t...q...|A......o|
|00000300| 03 00 e3 33 71 01 00 00 | 9e 64 00 00 82 55 44 47 |...3q...|.d...UDG|
|00000310| 54 65 78 74 00 00 00 00 | b4 00 00 00 41 ff ff ff |Text....|....A...|
|00000320| 83 b8 a0 6f 03 00 d5 65 | b4 00 00 00 33 66 00 00 |...o...e|....3f..|
|00000330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000340| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000350| 88 02 00 00 00 4d 2b 00 | 69 65 77 00 ff ff ff ff |.....M+.|iew.....|
|00000360| 03 00 37 00 44 dc fd ff | 86 64 00 1a d1 fd 00 00 |..7.D...|.d......|
|00000370| 03 00 00 00 f3 07 08 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000380| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000390| 00 00 00 00 00 00 00 00 | 88 02 00 00 46 69 6c 65 |........|....File|
|000003a0| 44 61 74 61 82 21 42 6f | 6f 74 00 00 ff ff ff ff |Data.!Bo|ot......|
|000003b0| 06 01 00 00 41 eb ff ff | 41 47 0f e4 03 00 cd 65 |....A...|AG.....e|
|000003c0| 7c 3e 21 42 6f 6f 74 20 | 4f 62 65 79 20 66 69 6c ||>!Boot |Obey fil|
|000003d0| 65 20 66 6f 72 20 50 73 | 69 6f 6e 20 50 72 6f 67 |e for Ps|ion Prog|
|000003e0| 2e 20 31 31 2f 35 2f 38 | 39 0a 49 63 6f 6e 53 70 |. 11/5/8|9.IconSp|
|000003f0| 72 69 74 65 73 20 3c 4f | 62 65 79 24 44 69 72 3e |rites <O|bey$Dir>|
|00000400| 2e 21 53 70 72 69 74 65 | 73 0a 7c 20 53 65 74 20 |.!Sprite|s.| Set |
|00000410| 74 68 65 20 6e 61 6d 65 | 20 75 70 20 66 6f 72 20 |the name| up for |
|00000420| 74 68 65 20 66 69 6c 65 | 20 74 79 70 65 20 6f 66 |the file| type of|
|00000430| 20 26 37 46 46 0a 53 65 | 74 20 46 69 6c 65 24 54 | &7FF.Se|t File$T|
|00000440| 79 70 65 5f 37 46 46 20 | 50 73 69 6f 6e 0a 7c 20 |ype_7FF |Psion.| |
|00000450| 52 75 6e 20 74 68 65 20 | 21 50 73 69 6f 6e 2e 21 |Run the |!Psion.!|
|00000460| 52 75 6e 49 6d 61 67 65 | 20 70 72 6f 67 72 61 6d |RunImage| program|
|00000470| 20 69 66 20 79 6f 75 20 | 63 6c 69 63 6b 0a 7c 20 | if you |click.| |
|00000480| 6f 6e 20 61 20 50 73 69 | 6f 6e 20 64 61 74 61 20 |on a Psi|on data |
|00000490| 66 69 6c 65 21 0a 53 65 | 74 20 41 6c 69 61 73 24 |file!.Se|t Alias$|
|000004a0| 40 52 75 6e 54 79 70 65 | 5f 37 46 46 20 52 75 6e |@RunType|_7FF Run|
|000004b0| 20 3c 4f 62 65 79 24 44 | 69 72 3e 2e 21 52 75 6e | <Obey$D|ir>.!Run|
|000004c0| 20 25 25 2a 30 0a 46 69 | 6c 65 44 61 74 61 82 21 | %%*0.Fi|leData.!|
|000004d0| 52 75 6e 00 77 00 ff ff | ff ff a6 00 00 00 41 eb |Run.w...|......A.|
|000004e0| ff ff 84 51 0f e4 03 00 | 37 4c 7c 3e 21 52 75 6e |...Q....|7L|>!Run|
|000004f0| 20 4f 62 65 79 20 66 69 | 6c 65 20 66 6f 72 20 50 | Obey fi|le for P|
|00000500| 73 69 6f 6e 20 50 72 6f | 67 2e 20 31 31 2f 35 2f |sion Pro|g. 11/5/|
|00000510| 38 39 0a 53 65 74 20 46 | 69 6c 65 24 54 79 70 65 |89.Set F|ile$Type|
|00000520| 5f 37 46 46 20 50 73 69 | 6f 6e 0a 53 65 74 20 41 |_7FF Psi|on.Set A|
|00000530| 6c 69 61 73 24 40 52 75 | 6e 54 79 70 65 5f 37 46 |lias$@Ru|nType_7F|
|00000540| 46 20 52 75 6e 20 3c 4f | 62 65 79 24 44 69 72 3e |F Run <O|bey$Dir>|
|00000550| 2e 21 52 75 6e 20 25 25 | 2a 30 0a 7c 20 53 65 74 |.!Run %%|*0.| Set|
|00000560| 20 6d 6f 64 65 20 31 35 | 0a 65 63 68 6f 20 3c 32 | mode 15|.echo <2|
|00000570| 32 3e 3c 31 35 3e 0a 72 | 75 6e 20 3c 4f 62 65 79 |2><15>.r|un <Obey|
|00000580| 24 44 69 72 3e 2e 21 52 | 75 6e 49 6d 61 67 65 0a |$Dir>.!R|unImage.|
|00000590| 46 69 6c 65 44 61 74 61 | 82 21 52 75 6e 49 6d 61 |FileData|.!RunIma|
|000005a0| 67 65 00 ff 23 2a 00 00 | 41 fb ff ff 61 0b 10 e4 |ge..#*..|A...a...|
|000005b0| 03 00 c0 4d 0d 00 0a 19 | f4 20 3e 24 2e 21 50 73 |...M....|. >$.!Ps|
|000005c0| 69 6f 6e 2e 21 52 75 6e | 49 6d 61 67 65 0d 00 14 |ion.!Run|Image...|
|000005d0| 2f f4 20 50 73 69 6f 6e | 20 54 6f 20 41 72 63 68 |/. Psion| To Arch|
|000005e0| 69 6d 65 64 65 73 20 44 | 61 74 61 20 54 72 61 6e |imedes D|ata Tran|
|000005f0| 73 66 65 72 20 50 72 6f | 67 72 61 6d 0d 00 1e 20 |sfer Pro|gram... |
|00000600| f4 20 2a 2a 2a 20 4d 61 | 72 6b 20 54 61 79 6c 6f |. *** Ma|rk Taylo|
|00000610| 72 20 a9 20 31 39 38 38 | 20 2a 2a 2a 0d 00 28 1f |r . 1988| ***..(.|
|00000620| f4 20 4f 72 69 67 69 6e | 61 6c 79 20 77 72 69 74 |. Origin|aly writ|
|00000630| 74 65 6e 20 32 31 2f 32 | 2f 38 38 0d 00 32 29 f4 |ten 21/2|/88..2).|
|00000640| 20 53 6f 6d 65 20 52 69 | 73 63 2d 4f 53 20 6d 6f | Some Ri|sc-OS mo|
|00000650| 64 69 66 69 63 61 74 69 | 6f 6e 73 20 4d 61 79 20 |dificati|ons May |
|00000660| 31 39 38 39 0d 00 3c 1c | f4 20 56 65 72 73 69 6f |1989..<.|. Versio|
|00000670| 6e 20 31 2e 35 32 20 28 | 32 32 2f 35 2f 38 39 29 |n 1.52 (|22/5/89)|
|00000680| 0d 00 46 2c 76 65 72 73 | 69 6f 6e 24 3d 22 50 72 |..F,vers|ion$="Pr|
|00000690| 6f 67 72 61 6d 20 56 65 | 72 73 69 6f 6e 20 31 2e |ogram Ve|rsion 1.|
|000006a0| 35 32 20 4d 61 79 20 31 | 39 38 39 22 0d 00 50 05 |52 May 1|989"..P.|
|000006b0| 3a 0d 00 5a 22 f4 20 53 | 65 74 20 4d 4f 44 45 20 |:..Z". S|et MODE |
|000006c0| 69 6e 20 74 68 65 20 21 | 52 75 6e 20 66 69 6c 65 |in the !|Run file|
|000006d0| 21 21 21 0d 00 64 47 f4 | 20 49 66 20 4d 4f 44 45 |!!!..dG.| If MODE|
|000006e0| 20 4e 4f 54 20 73 65 74 | 20 69 6e 20 21 52 75 6e | NOT set| in !Run|
|000006f0| 20 66 69 6c 65 20 74 68 | 65 6e 20 73 65 74 20 4d | file th|en set M|
|00000700| 4f 44 45 20 28 65 67 20 | 63 61 6c 6c 65 64 20 66 |ODE (eg |called f|
|00000710| 72 6f 6d 20 42 41 53 49 | 43 29 0d 00 6e 12 e7 20 |rom BASI|C)..n.. |
|00000720| eb 3c 3e 31 35 20 8c 20 | eb 20 31 35 0d 00 78 05 |.<>15 . |. 15..x.|
|00000730| 87 0d 00 82 0a f2 73 65 | 74 75 70 0d 00 8c 0e ee |......se|tup.....|
|00000740| 20 85 20 f2 65 72 72 6f | 72 0d 00 96 05 3a 0d 00 | . .erro|r....:..|
|00000750| a0 05 f5 0d 00 aa 09 f2 | 6d 65 6e 75 0d 00 b4 05 |........|menu....|
|00000760| f5 0d 00 be 13 c8 97 20 | 6d 78 2c 6d 79 2c 62 75 |....... |mx,my,bu|
|00000770| 74 74 6f 6e 0d 00 c8 1e | f2 6f 70 74 69 6f 6e 28 |tton....|.option(|
|00000780| 6d 78 2c 6d 79 2c 6e 6f | 25 2c 63 68 6f 69 63 65 |mx,my,no|%,choice|
|00000790| 25 29 0d 00 d2 10 67 65 | 74 25 3d a6 28 30 29 2d |%)....ge|t%=.(0)-|
|000007a0| 34 38 0d 00 dc 1b e7 20 | 67 65 74 25 3e 30 20 8c |48..... |get%>0 .|
|000007b0| 20 63 68 6f 69 63 65 25 | 3d 67 65 74 25 0d 00 e6 | choice%|=get%...|
|000007c0| 36 fd 20 28 62 75 74 74 | 6f 6e 3d 34 20 80 20 63 |6. (butt|on=4 . c|
|000007d0| 68 6f 69 63 65 25 3c 3d | 6e 6f 25 29 20 84 20 28 |hoice%<=|no%) . (|
|000007e0| 67 65 74 25 3e 30 20 80 | 20 67 65 74 25 3c 3d 6e |get%>0 .| get%<=n|
|000007f0| 6f 25 29 0d 00 f0 05 3a | 0d 00 fa 10 c8 8e 20 63 |o%)....:|...... c|
|00000800| 68 6f 69 63 65 25 20 ca | 0d 01 04 1e c9 20 31 3a |hoice% .|..... 1:|
|00000810| f2 50 73 69 6f 6e 5f 41 | 72 63 28 6f 70 74 69 6f |.Psion_A|rc(optio|
|00000820| 6e 24 28 31 29 29 0d 01 | 0e 1e c9 20 32 3a f2 41 |n$(1))..|... 2:.A|
|00000830| 72 63 5f 50 73 69 6f 6e | 28 6f 70 74 69 6f 6e 24 |rc_Psion|(option$|
|00000840| 28 32 29 29 0d 01 18 1a | c9 20 33 3a f2 50 72 69 |(2))....|. 3:.Pri|
|00000850| 6e 74 28 6f 70 74 69 6f | 6e 24 28 33 29 29 0d 01 |nt(optio|n$(3))..|
|00000860| 22 20 c9 20 34 3a f2 43 | 6f 6e 76 65 72 74 46 72 |" . 4:.C|onvertFr|
|00000870| 6f 6d 28 6f 70 74 69 6f | 6e 24 28 34 29 29 0d 01 |om(optio|n$(4))..|
|00000880| 2c 31 f4 20 4e 65 76 65 | 72 20 63 61 6c 6c 20 74 |,1. Neve|r call t|
|00000890| 68 69 73 20 6f 70 74 69 | 6f 6e 21 21 20 28 49 74 |his opti|on!! (It|
|000008a0| 20 64 6f 73 65 6e 74 20 | 65 78 69 73 74 21 29 0d | dosent |exist!).|
|000008b0| 01 36 28 f4 20 57 48 45 | 4e 20 35 3a 50 52 4f 43 |.6(. WHE|N 5:PROC|
|000008c0| 43 6f 6e 76 65 72 74 42 | 61 63 6b 28 6f 70 74 69 |ConvertB|ack(opti|
|000008d0| 6f 6e 24 28 35 29 29 0d | 01 40 19 c9 20 35 3a f2 |on$(5)).|.@.. 5:.|
|000008e0| 48 65 6c 70 28 6f 70 74 | 69 6f 6e 24 28 35 29 29 |Help(opt|ion$(5))|
|000008f0| 0d 01 4a 19 c9 20 36 3a | f2 73 74 61 72 28 6f 70 |..J.. 6:|.star(op|
|00000900| 74 69 6f 6e 24 28 36 29 | 29 0d 01 54 08 c9 20 37 |tion$(6)|)..T.. 7|
|00000910| 3a 0d 01 5e 05 cb 0d 01 | 68 0f fd 20 63 68 6f 69 |:..^....|h.. choi|
|00000920| 63 65 25 3d 37 0d 01 72 | 05 3a 0d 01 7c 0a 2a 46 |ce%=7..r|.:..|.*F|
|00000930| 58 32 2c 30 0d 01 86 07 | d9 23 30 0d 01 90 0e 2a |X2,0....|.#0....*|
|00000940| 50 4f 49 4e 54 45 52 20 | 30 0d 01 9a 07 db 3a ee |POINTER |0.....:.|
|00000950| 0d 01 a4 05 e0 0d 01 ae | 05 3a 0d 01 b8 25 dd f2 |........|.:...%..|
|00000960| 6f 70 74 69 6f 6e 28 6d | 78 2c 6d 79 2c 72 61 6e |option(m|x,my,ran|
|00000970| 67 65 48 25 2c f8 20 63 | 68 6f 69 63 65 25 29 0d |geH%,. c|hoice%).|
|00000980| 01 c2 27 f4 20 4e 6f 74 | 20 76 65 72 79 20 65 6c |..'. Not| very el|
|00000990| 65 67 61 6e 74 20 62 75 | 74 20 69 74 20 77 6f 72 |egant bu|t it wor|
|000009a0| 6b 73 20 6f 6b 21 0d 01 | cc 0f 6f 70 25 3d 6d 79 |ks ok!..|..op%=my|
|000009b0| 20 81 20 33 32 0d 01 d6 | 10 74 61 62 79 25 3d 33 | . 32...|.taby%=3|
|000009c0| 31 2d 6f 70 25 0d 01 e0 | 10 65 76 65 6e 3d 74 61 |1-op%...|.even=ta|
|000009d0| 62 79 25 2f 32 0d 01 ea | 22 e7 20 65 76 65 6e 3d |by%/2...|". even=|
|000009e0| a8 28 65 76 65 6e 29 20 | 8c 20 74 61 62 79 25 3d |.(even) |. taby%=|
|000009f0| 74 61 62 79 25 2b 31 0d | 01 f4 1d 63 68 6f 69 63 |taby%+1.|...choic|
|00000a00| 65 25 3d 28 74 61 62 79 | 25 2d 73 74 61 72 74 79 |e%=(taby|%-starty|
|00000a10| 25 29 2f 32 0d 01 fe 23 | e7 20 63 68 6f 69 63 65 |%)/2...#|. choice|
|00000a20| 25 3c 31 20 84 20 63 68 | 6f 69 63 65 25 3e 72 61 |%<1 . ch|oice%>ra|
|00000a30| 6e 67 65 48 25 20 e1 0d | 02 08 13 fb 31 39 31 20 |ngeH% ..|....191 |
|00000a40| c8 9c 20 31 39 32 3a fb | 33 32 0d 02 12 2f f1 8a |.. 192:.|32.../..|
|00000a50| 79 79 25 2c 74 61 62 79 | 25 2d 31 29 3b 63 68 6f |yy%,taby|%-1);cho|
|00000a60| 69 63 65 25 3b 22 2e 22 | 3b 6f 70 74 69 6f 6e 24 |ice%;"."|;option$|
|00000a70| 28 63 68 6f 69 63 65 25 | 29 0d 02 1c 1a fb 20 31 |(choice%|)..... 1|
|00000a80| 36 30 20 c8 9c 20 30 3a | fb 20 36 33 20 c8 9c 20 |60 .. 0:|. 63 .. |
|00000a90| 31 39 32 0d 02 26 26 e7 | 20 6f 6c 64 74 61 62 79 |192..&&.| oldtaby|
|00000aa0| 25 3c 3e 74 61 62 79 25 | 20 80 20 6f 6c 64 63 68 |%<>taby%| . oldch|
|00000ab0| 6f 69 63 65 25 3e 30 20 | 8c 0d 02 30 38 f1 8a 79 |oice%>0 |...08..y|
|00000ac0| 79 25 2c 6f 6c 64 74 61 | 62 79 25 2d 31 29 3b 6f |y%,oldta|by%-1);o|
|00000ad0| 6c 64 63 68 6f 69 63 65 | 25 3b 22 2e 22 3b 6f 70 |ldchoice|%;".";op|
|00000ae0| 74 69 6f 6e 24 28 6f 6c | 64 63 68 6f 69 63 65 25 |tion$(ol|dchoice%|
|00000af0| 29 0d 02 3a 05 cd 0d 02 | 44 25 6f 6c 64 74 61 62 |)..:....|D%oldtab|
|00000b00| 79 25 3d 74 61 62 79 25 | 3a 6f 6c 64 63 68 6f 69 |y%=taby%|:oldchoi|
|00000b10| 63 65 25 3d 63 68 6f 69 | 63 65 25 0d 02 4e 05 e1 |ce%=choi|ce%..N..|
|00000b20| 0d 02 58 05 3a 0d 02 62 | 12 dd f2 73 74 61 72 28 |..X.:..b|...star(|
|00000b30| 74 69 74 6c 65 24 29 0d | 02 6c 10 fb 31 36 30 3a |title$).|.l..160:|
|00000b40| db 3a ee 3a fb 31 39 0d | 02 76 0e 2a 50 4f 49 4e |.:.:.19.|.v.*POIN|
|00000b50| 54 45 52 20 30 0d 02 80 | 15 f2 63 65 6e 74 72 65 |TER 0...|..centre|
|00000b60| 28 74 69 74 6c 65 24 2c | 31 29 0d 02 8a 09 fb 36 |(title$,|1).....6|
|00000b70| 33 3a ee 0d 02 94 05 f5 | 0d 02 9e 0a f1 27 22 2a |3:......|.....'"*|
|00000b80| 22 3b 0d 02 a8 0a e8 22 | 22 69 6e 24 0d 02 b2 09 |";....."|"in$....|
|00000b90| ff 20 69 6e 24 0d 02 bc | 0b fd 69 6e 24 3d 22 22 |. in$...|..in$=""|
|00000ba0| 0d 02 c6 05 e1 0d 02 d0 | 05 3a 0d 02 da 0b dd f2 |........|.:......|
|00000bb0| 73 70 61 63 65 0d 02 e4 | 07 fb 36 33 0d 02 ee 0b |space...|..63....|
|00000bc0| 2a 46 58 32 31 2c 30 0d | 02 f8 0f e3 49 3d 30 b8 |*FX21,0.|....I=0.|
|00000bd0| 32 30 30 30 3a ed 0d 03 | 02 38 f2 63 65 6e 74 72 |2000:...|.8.centr|
|00000be0| 65 28 22 50 72 65 73 73 | 20 53 50 41 43 45 20 6f |e("Press| SPACE o|
|00000bf0| 72 20 63 6c 69 63 6b 20 | 6d 6f 75 73 65 20 74 6f |r click |mouse to|
|00000c00| 20 63 6f 6e 74 69 6e 75 | 65 22 2c 33 30 29 0d 03 | continu|e",30)..|
|00000c10| 0c 05 f5 0d 03 16 0a 47 | 3d a6 28 30 29 0d 03 20 |.......G|=.(0).. |
|00000c20| 0c c8 97 20 78 2c 79 2c | 62 0d 03 2a 10 fd 20 47 |... x,y,|b..*.. G|
|00000c30| 3d 33 32 20 84 20 62 3e | 30 0d 03 34 0f e3 49 3d |=32 . b>|0..4..I=|
|00000c40| 30 b8 32 30 30 30 3a ed | 0d 03 3e 05 e1 0d 03 48 |0.2000:.|..>....H|
|00000c50| 05 3a 0d 03 52 0b dd f2 | 73 65 74 75 70 0d 03 5c |.:..R...|setup..\|
|00000c60| 1d f4 20 4c 69 6d 69 74 | 65 64 20 54 6f 20 4e 69 |.. Limit|ed To Ni|
|00000c70| 6e 65 20 4f 70 74 69 6f | 6e 73 0d 03 66 09 6e 6f |ne Optio|ns..f.no|
|00000c80| 25 3d 37 0d 03 70 12 de | 20 6f 70 74 69 6f 6e 24 |%=7..p..| option$|
|00000c90| 28 6e 6f 25 29 0d 03 7a | 33 f4 20 53 6f 6d 65 20 |(no%)..z|3. Some |
|00000ca0| 57 6f 72 6b 20 53 70 61 | 63 65 20 46 6f 72 20 54 |Work Spa|ce For T|
|00000cb0| 68 65 20 22 54 69 6d 65 | 26 44 61 74 65 22 20 53 |he "Time|&Date" S|
|00000cc0| 59 53 20 43 61 6c 6c 21 | 0d 03 84 0f de 20 62 6c |YS Call!|..... bl|
|00000cd0| 6f 63 6b 20 31 30 30 0d | 03 8e 1a f4 20 73 74 61 |ock 100.|.... sta|
|00000ce0| 72 74 79 25 20 4d 55 53 | 54 20 62 65 20 65 76 65 |rty% MUS|T be eve|
|00000cf0| 6e 0d 03 98 0d 73 74 61 | 72 74 79 25 3d 36 0d 03 |n....sta|rty%=6..|
|00000d00| a2 1b 6f 6c 64 74 61 62 | 79 25 3d 30 3a 6f 6c 64 |..oldtab|y%=0:old|
|00000d10| 63 68 6f 69 63 65 25 3d | 30 0d 03 ac 0a 79 79 25 |choice%=|0....yy%|
|00000d20| 3d 32 33 0d 03 b6 21 64 | 65 66 61 75 6c 74 24 3d |=23...!d|efault$=|
|00000d30| 22 24 2e 21 50 73 69 6f | 6e 2e 44 61 74 61 2e 4d |"$.!Psio|n.Data.M|
|00000d40| 41 49 4e 22 0d 03 c0 1d | 64 69 72 74 65 78 74 24 |AIN"....|dirtext$|
|00000d50| 3d 22 24 2e 21 50 73 69 | 6f 6e 2e 54 65 78 74 2e |="$.!Psi|on.Text.|
|00000d60| 22 0d 03 ca 1c 2a 53 65 | 74 20 46 69 6c 65 24 54 |"....*Se|t File$T|
|00000d70| 79 70 65 5f 37 46 46 20 | 50 73 69 6f 6e 0d 03 d4 |ype_7FF |Psion...|
|00000d80| 1b f4 20 50 73 69 6f 6e | 20 6c 6f 67 6f 20 64 65 |.. Psion| logo de|
|00000d90| 66 69 6e 69 74 69 6f 6e | 0d 03 de 24 ef 32 33 2c |finition|...$.23,|
|00000da0| 31 32 38 2c 30 2c 31 30 | 32 2c 31 30 32 2c 31 30 |128,0,10|2,102,10|
|00000db0| 32 2c 36 30 2c 30 2c 32 | 35 35 2c 30 0d 03 e8 27 |2,60,0,2|55,0...'|
|00000dc0| ef 32 33 2c 31 32 39 2c | 30 2c 31 30 32 2c 32 33 |.23,129,|0,102,23|
|00000dd0| 31 2c 31 39 35 2c 31 39 | 35 2c 32 33 31 2c 31 30 |1,195,19|5,231,10|
|00000de0| 32 2c 30 0d 03 f2 23 ef | 32 33 2c 31 33 30 2c 30 |2,0...#.|23,130,0|
|00000df0| 2c 30 2c 31 32 36 2c 31 | 32 36 2c 30 2c 31 32 36 |,0,126,1|26,0,126|
|00000e00| 2c 31 32 36 2c 30 0d 03 | fc 27 ef 32 33 2c 31 33 |,126,0..|.'.23,13|
|00000e10| 31 2c 30 2c 31 39 35 2c | 32 33 31 2c 31 30 32 2c |1,0,195,|231,102,|
|00000e20| 31 30 32 2c 32 33 31 2c | 31 39 35 2c 30 0d 04 06 |102,231,|195,0...|
|00000e30| 26 ef 32 33 2c 31 33 32 | 2c 32 35 32 2c 36 33 2c |&.23,132|,252,63,|
|00000e40| 30 2c 32 35 35 2c 32 35 | 35 2c 30 2c 32 35 35 2c |0,255,25|5,0,255,|
|00000e50| 32 35 35 0d 04 10 3b 70 | 73 69 6f 6e 24 3d 22 20 |255...;p|sion$=" |
|00000e60| 22 2b bd 31 32 38 2b 22 | 20 22 2b bd 31 32 39 2b |"+.128+"| "+.129+|
|00000e70| 22 20 22 2b bd 31 33 30 | 2b 22 20 22 2b bd 31 33 |" "+.130|+" "+.13|
|00000e80| 31 2b 22 20 22 2b bd 31 | 33 32 2b 22 20 22 0d 04 |1+" "+.1|32+" "..|
|00000e90| 1a 10 c8 97 20 b8 20 33 | 39 30 2c 34 39 30 0d 04 |.... . 3|90,490..|
|00000ea0| 24 14 ef 31 39 2c 31 2c | 32 34 2c 30 2c 30 2c 31 |$..19,1,|24,0,0,1|
|00000eb0| 34 30 0d 04 2e 18 f4 20 | 2a 2a 2a 20 39 36 30 30 |40..... |*** 9600|
|00000ec0| 20 42 41 55 44 21 20 2a | 2a 2a 0d 04 38 0a 2a 46 | BAUD! *|**..8.*F|
|00000ed0| 58 37 2c 37 0d 04 42 0a | 2a 46 58 38 2c 37 0d 04 |X7,7..B.|*FX8,7..|
|00000ee0| 4c 16 f4 20 31 35 38 3d | 25 31 30 30 31 31 31 31 |L.. 158=|%1001111|
|00000ef0| 30 20 52 58 0d 04 56 16 | f4 20 32 35 32 3d 25 31 |0 RX..V.|. 252=%1|
|00000f00| 31 31 31 31 31 30 30 20 | 54 58 0d 04 60 24 f4 20 |1111100 |TX..`$. |
|00000f10| 20 20 33 3d 25 30 30 30 | 30 30 30 31 31 20 52 45 | 3=%000|00011 RE|
|00000f20| 53 45 54 20 52 53 34 32 | 33 20 50 6f 72 74 0d 04 |SET RS42|3 Port..|
|00000f30| 6a 0e f4 20 2a 46 58 31 | 35 36 2c 33 0d 04 74 0b |j.. *FX1|56,3..t.|
|00000f40| 2a 46 58 32 31 2c 31 0d | 04 7e 0b 2a 46 58 32 31 |*FX21,1.|.~.*FX21|
|00000f50| 2c 32 0d 04 88 0b 2a 46 | 58 32 31 2c 33 0d 04 92 |,2....*F|X21,3...|
|00000f60| 05 e1 0d 04 9c 05 3a 0d | 04 a6 0a dd f2 6d 65 6e |......:.|.....men|
|00000f70| 75 0d 04 b0 0e fb 31 36 | 30 3a db 3a fb 31 39 0d |u.....16|0:.:.19.|
|00000f80| 04 ba 38 f2 63 65 6e 74 | 72 65 28 22 50 73 69 6f |..8.cent|re("Psio|
|00000f90| 6e 2f 41 72 63 68 69 6d | 65 64 65 73 20 44 61 74 |n/Archim|edes Dat|
|00000fa0| 61 20 54 72 61 6e 73 66 | 65 72 20 53 6f 66 74 77 |a Transf|er Softw|
|00000fb0| 61 72 65 22 2c 31 29 0d | 04 c4 09 f2 6c 6f 67 6f |are",1).|....logo|
|00000fc0| 0d 04 ce 07 fb 36 33 0d | 04 d8 2c f2 63 65 6e 74 |.....63.|..,.cent|
|00000fd0| 72 65 28 22 2a 2a 2a 20 | 4d 61 72 6b 20 54 61 79 |re("*** |Mark Tay|
|00000fe0| 6c 6f 72 20 a9 20 31 39 | 38 38 20 2a 2a 2a 22 2c |lor . 19|88 ***",|
|00000ff0| 32 38 29 0d 04 e2 18 f2 | 63 65 6e 74 72 65 28 76 |28).....|centre(v|
|00001000| 65 72 73 69 6f 6e 24 2c | 33 30 29 0d 04 ec 10 87 |ersion$,|30).....|
|00001010| 3a 2a 50 4f 49 4e 54 45 | 52 20 31 0d 04 f6 05 f7 |:*POINTE|R 1.....|
|00001020| 0d 05 00 0c e3 79 3d 31 | b8 6e 6f 25 0d 05 0a 10 |.....y=1|.no%....|
|00001030| f3 20 6f 70 74 69 6f 6e | 24 28 79 29 0d 05 14 29 |. option|$(y)...)|
|00001040| f1 8a 79 79 25 2c 73 74 | 61 72 74 79 25 2b 28 32 |..yy%,st|arty%+(2|
|00001050| 2a 79 29 29 3b 79 3b 22 | 2e 22 3b 6f 70 74 69 6f |*y));y;"|.";optio|
|00001060| 6e 24 28 79 29 0d 05 1e | 05 ed 0d 05 28 07 fb 31 |n$(y)...|....(..1|
|00001070| 35 0d 05 32 30 f1 8a 79 | 79 25 2c 33 2b 28 73 74 |5..20..y|y%,3+(st|
|00001080| 61 72 74 79 25 2b 28 32 | 2a 6e 6f 25 29 29 29 22 |arty%+(2|*no%)))"|
|00001090| 45 6e 74 65 72 20 43 68 | 6f 69 63 65 20 3a 2d 22 |Enter Ch|oice :-"|
|000010a0| 3b 0d 05 3c 05 e1 0d 05 | 46 05 3a 0d 05 50 0a dd |;..<....|F.:..P..|
|000010b0| f2 6c 6f 67 6f 0d 05 5a | 3d f4 20 45 6e 64 20 74 |.logo..Z|=. End t|
|000010c0| 68 69 73 20 70 72 6f 63 | 65 64 75 72 65 20 65 61 |his proc|edure ea|
|000010d0| 72 6c 79 20 73 6f 20 6e | 6f 74 20 74 6f 20 20 69 |rly so n|ot to i|
|000010e0| 6e 66 72 69 6e 67 65 20 | 63 6f 70 79 72 69 67 68 |nfringe |copyrigh|
|000010f0| 74 21 0d 05 64 39 f4 20 | 52 65 6d 6f 76 65 20 74 |t!..d9. |Remove t|
|00001100| 68 65 20 6c 69 6e 65 20 | 62 65 6c 6f 77 20 74 6f |he line |below to|
|00001110| 20 72 65 2d 65 6e 73 74 | 61 74 65 20 74 68 65 20 | re-enst|ate the |
|00001120| 50 53 49 4f 4e 20 6c 6f | 67 6f 2e 0d 05 6e 05 e1 |PSION lo|go...n..|
|00001130| 0d 05 78 26 f4 20 50 72 | 6f 62 61 62 6c 79 20 69 |..x&. Pr|obably i|
|00001140| 6e 66 72 69 6e 67 65 73 | 20 63 6f 70 79 72 69 67 |nfringes| copyrig|
|00001150| 68 74 21 21 21 21 0d 05 | 82 16 fb 31 32 38 2b 32 |ht!!!!..|...128+2|
|00001160| 31 20 c8 9c 20 31 39 32 | 3a fb 36 33 0d 05 8c 15 |1 .. 192|:.63....|
|00001170| f2 63 65 6e 74 72 65 28 | 70 73 69 6f 6e 24 2c 34 |.centre(|psion$,4|
|00001180| 29 0d 05 96 07 fb 31 35 | 0d 05 a0 1c f2 63 65 6e |).....15|.....cen|
|00001190| 74 72 65 28 22 20 50 20 | 53 20 7c 20 4f 20 4e 20 |tre(" P |S | O N |
|000011a0| 22 2c 35 29 0d 05 aa 10 | fb 31 36 30 c8 9c 20 30 |",5)....|.160.. 0|
|000011b0| 3a fb 36 33 0d 05 b4 05 | e1 0d 05 be 05 3a 0d 05 |:.63....|.....:..|
|000011c0| c8 16 dd f2 63 65 6e 74 | 72 65 28 77 6f 72 64 24 |....cent|re(word$|
|000011d0| 2c 59 25 29 0d 05 d2 08 | ea 20 58 25 0d 05 dc 16 |,Y%)....|. X%....|
|000011e0| 58 25 3d 34 30 2d 28 28 | a9 77 6f 72 64 24 29 2f |X%=40-((|.word$)/|
|000011f0| 32 29 0d 05 e6 13 f1 8a | 58 25 2c 59 25 29 3b 77 |2)......|X%,Y%);w|
|00001200| 6f 72 64 24 3b 0d 05 f0 | 05 e1 0d 05 fa 05 3a 0d |ord$;...|......:.|
|00001210| 06 04 0b dd f2 65 72 72 | 6f 72 0d 06 0e 06 ef 33 |.....err|or.....3|
|00001220| 0d 06 18 08 2a 46 58 32 | 0d 06 22 0e 2a 50 4f 49 |....*FX2|..".*POI|
|00001230| 4e 54 45 52 20 30 0d 06 | 2c 09 ee 3a d9 23 30 0d |NTER 0..|,..:.#0.|
|00001240| 06 36 0e e7 20 9f 3d 31 | 37 20 8c 20 e1 0d 06 40 |.6.. .=1|7 . ...@|
|00001250| 09 db 3a fb 31 39 0d 06 | 4a 1e f2 63 65 6e 74 72 |..:.19..|J..centr|
|00001260| 65 28 22 47 65 6e 65 72 | 61 6c 20 45 72 72 6f 72 |e("Gener|al Error|
|00001270| 22 2c 31 29 0d 06 54 13 | 65 72 6c 24 3d c3 9e 3a |",1)..T.|erl$=..:|
|00001280| 65 72 72 24 3d c3 9f 0d | 06 5e 37 72 65 70 6f 72 |err$=...|.^7repor|
|00001290| 74 24 3d f6 24 2b 22 20 | 61 74 20 6c 69 6e 65 20 |t$=.$+" |at line |
|000012a0| 22 2b 65 72 6c 24 2b 22 | 20 2d 20 45 72 72 6f 72 |"+erl$+"| - Error|
|000012b0| 20 4e 75 6d 62 65 72 3d | 22 2b 65 72 72 24 0d 06 | Number=|"+err$..|
|000012c0| 68 17 f2 63 65 6e 74 72 | 65 28 72 65 70 6f 72 74 |h..centr|e(report|
|000012d0| 24 2c 31 37 29 0d 06 72 | 0a f2 73 70 61 63 65 0d |$,17)..r|..space.|
|000012e0| 06 7c 05 e1 0d 06 86 05 | 3a 0d 06 90 17 dd f2 50 |.|......|:......P|
|000012f0| 73 69 6f 6e 5f 41 72 63 | 28 74 69 74 6c 65 24 29 |sion_Arc|(title$)|
|00001300| 0d 06 9a 11 ea 20 64 65 | 66 24 2c 63 68 65 63 6b |..... de|f$,check|
|00001310| 24 0d 06 a4 05 f5 0d 06 | ae 0e fb 31 36 30 3a db |$.......|...160:.|
|00001320| 3a fb 31 39 0d 06 b8 0c | 6f 77 66 6c 61 67 3d 30 |:.19....|owflag=0|
|00001330| 0d 06 c2 0b 2a 46 58 32 | 31 2c 31 0d 06 cc 0b 2a |....*FX2|1,1....*|
|00001340| 46 58 32 31 2c 32 0d 06 | d6 0e 2a 46 58 31 35 36 |FX21,2..|..*FX156|
|00001350| 2c 32 35 32 0d 06 e0 15 | f2 63 65 6e 74 72 65 28 |,252....|.centre(|
|00001360| 74 69 74 6c 65 24 2c 31 | 29 0d 06 ea 09 f2 6c 6f |title$,1|).....lo|
|00001370| 67 6f 0d 06 f4 0e 2a 50 | 4f 49 4e 54 45 52 20 30 |go....*P|OINTER 0|
|00001380| 0d 06 fe 09 ee 3a fb 31 | 35 0d 07 08 3c f2 63 65 |.....:.1|5...<.ce|
|00001390| 6e 74 72 65 28 22 45 6e | 74 65 72 20 66 69 6c 65 |ntre("En|ter file|
|000013a0| 6e 61 6d 65 20 66 6f 72 | 20 74 68 65 20 64 61 74 |name for| the dat|
|000013b0| 61 20 74 6f 20 62 65 20 | 73 61 76 65 64 20 61 73 |a to be |saved as|
|000013c0| 22 2c 31 32 29 0d 07 12 | 1c 64 65 66 24 3d 22 5b |",12)...|.def$="[|
|000013d0| 22 2b 64 65 66 61 75 6c | 74 24 2b 22 5d 20 3a 2d |"+defaul|t$+"] :-|
|000013e0| 22 0d 07 1c 14 f2 63 65 | 6e 74 72 65 28 64 65 66 |".....ce|ntre(def|
|000013f0| 24 2c 31 34 29 0d 07 26 | 10 e8 22 22 66 69 6c 65 |$,14)..&|..""file|
|00001400| 6e 61 6d 65 24 0d 07 30 | 27 e7 20 66 69 6c 65 6e |name$..0|'. filen|
|00001410| 61 6d 65 24 3d 22 22 20 | 8c 20 66 69 6c 65 6e 61 |ame$="" |. filena|
|00001420| 6d 65 24 3d 64 65 66 61 | 75 6c 74 24 0d 07 3a 21 |me$=defa|ult$..:!|
|00001430| f2 54 69 6d 65 5f 44 61 | 74 65 28 66 69 6c 65 6e |.Time_Da|te(filen|
|00001440| 61 6d 65 24 2c 64 61 24 | 2c 74 79 24 29 0d 07 44 |ame$,da$|,ty$)..D|
|00001450| 23 e7 20 74 79 24 3d 22 | 37 46 46 22 20 8c 20 f2 |#. ty$="|7FF" . .|
|00001460| 65 78 69 74 73 28 66 69 | 6c 65 6e 61 6d 65 24 29 |exits(fi|lename$)|
|00001470| 0d 07 4e 0e fd 20 6f 77 | 66 6c 61 67 3d 30 0d 07 |..N.. ow|flag=0..|
|00001480| 58 16 63 68 61 6e 25 3d | ae 28 66 69 6c 65 6e 61 |X.chan%=|.(filena|
|00001490| 6d 65 24 29 0d 07 62 22 | f2 63 65 6e 74 72 65 28 |me$)..b"|.centre(|
|000014a0| 22 41 77 61 69 74 69 6e | 67 20 44 61 74 61 2e 2e |"Awaitin|g Data..|
|000014b0| 2e 22 2c 31 39 29 0d 07 | 6c 0c 63 68 65 63 6b 25 |.",19)..|l.check%|
|000014c0| 3d 30 0d 07 76 0f f5 20 | fd 20 96 28 2d 32 29 3e |=0..v.. |. .(-2)>|
|000014d0| 30 0d 07 80 23 f2 63 65 | 6e 74 72 65 28 22 52 65 |0...#.ce|ntre("Re|
|000014e0| 63 65 69 76 69 6e 67 20 | 44 61 74 61 2e 2e 2e 22 |ceiving |Data..."|
|000014f0| 2c 31 39 29 0d 07 8a 05 | f5 0d 07 94 0e 63 68 61 |,19)....|.....cha|
|00001500| 72 25 3d a4 67 65 74 0d | 07 9e 11 63 68 65 63 6b |r%=.get.|...check|
|00001510| 25 2b 3d 63 68 61 72 25 | 0d 07 a8 11 d5 23 63 68 |%+=char%|.....#ch|
|00001520| 61 6e 25 2c 63 68 61 72 | 25 0d 07 b2 0e fd 63 68 |an%,char|%.....ch|
|00001530| 61 72 25 3d 26 31 41 0d | 07 bc 27 73 61 76 65 24 |ar%=&1A.|..'save$|
|00001540| 3d 22 53 61 76 69 6e 67 | 20 44 61 74 61 20 41 73 |="Saving| Data As|
|00001550| 20 3a 2d 22 2b 66 69 6c | 65 6e 61 6d 65 24 0d 07 | :-"+fil|ename$..|
|00001560| c6 15 f2 63 65 6e 74 72 | 65 28 73 61 76 65 24 2c |...centr|e(save$,|
|00001570| 31 39 29 0d 07 d0 0b d9 | 23 63 68 61 6e 25 0d 07 |19).....|#chan%..|
|00001580| da 23 ff 28 22 2a 53 45 | 54 54 59 50 45 20 22 2b |.#.("*SE|TTYPE "+|
|00001590| 66 69 6c 65 6e 61 6d 65 | 24 2b 22 20 37 46 46 22 |filename|$+" 7FF"|
|000015a0| 29 0d 07 e4 28 63 68 65 | 63 6b 24 3d 22 43 68 65 |)...(che|ck$="Che|
|000015b0| 63 6b 73 75 6d 20 76 61 | 6c 75 65 20 3d 20 22 2b |cksum va|lue = "+|
|000015c0| c3 28 63 68 65 63 6b 25 | 29 0d 07 ee 16 f2 63 65 |.(check%|).....ce|
|000015d0| 6e 74 72 65 28 63 68 65 | 63 6b 24 2c 32 31 29 0d |ntre(che|ck$,21).|
|000015e0| 07 f8 0a f2 73 70 61 63 | 65 0d 08 02 05 e1 0d 08 |....spac|e.......|
|000015f0| 0c 05 3a 0d 08 16 17 dd | f2 41 72 63 5f 50 73 69 |..:.....|.Arc_Psi|
|00001600| 6f 6e 28 74 69 74 6c 65 | 24 29 0d 08 20 0e fb 31 |on(title|$).. ..1|
|00001610| 36 30 3a db 3a fb 31 39 | 0d 08 2a 0e 2a 50 4f 49 |60:.:.19|..*.*POI|
|00001620| 4e 54 45 52 20 30 0d 08 | 34 0b 2a 46 58 32 31 2c |NTER 0..|4.*FX21,|
|00001630| 31 0d 08 3e 0b 2a 46 58 | 32 31 2c 32 0d 08 48 0e |1..>.*FX|21,2..H.|
|00001640| 2a 46 58 31 35 36 2c 31 | 35 38 0d 08 52 15 f2 63 |*FX156,1|58..R..c|
|00001650| 65 6e 74 72 65 28 74 69 | 74 6c 65 24 2c 31 29 0d |entre(ti|tle$,1).|
|00001660| 08 5c 56 f2 63 65 6e 74 | 72 65 28 22 50 6c 65 61 |.\V.cent|re("Plea|
|00001670| 73 65 20 68 61 76 65 20 | 74 68 65 20 50 73 69 6f |se have |the Psio|
|00001680| 6e 20 72 65 61 64 79 20 | 74 6f 20 72 65 63 65 69 |n ready |to recei|
|00001690| 76 65 20 64 61 74 61 20 | 62 65 66 6f 72 65 20 79 |ve data |before y|
|000016a0| 6f 75 20 74 72 61 6e 73 | 66 65 72 20 64 61 74 61 |ou trans|fer data|
|000016b0| 2e 22 2c 34 29 0d 08 66 | 31 f2 63 65 6e 74 72 65 |.",4)..f|1.centre|
|000016c0| 28 22 54 68 65 20 74 72 | 61 6e 73 66 65 72 20 6d |("The tr|ansfer m|
|000016d0| 61 79 20 66 61 69 6c 20 | 6f 74 68 65 72 77 69 73 |ay fail |otherwis|
|000016e0| 65 21 22 2c 36 29 0d 08 | 70 09 ee 3a fb 31 35 0d |e!",6)..|p..:.15.|
|000016f0| 08 7a 3e f2 63 65 6e 74 | 72 65 28 22 45 6e 74 65 |.z>.cent|re("Ente|
|00001700| 72 20 66 69 6c 65 6e 61 | 6d 65 20 66 6f 72 20 74 |r filena|me for t|
|00001710| 68 65 20 64 61 74 61 20 | 74 6f 20 62 65 20 74 72 |he data |to be tr|
|00001720| 61 6e 73 66 65 72 65 64 | 22 2c 31 32 29 0d 08 84 |ansfered|",12)...|
|00001730| 1c 64 65 66 24 3d 22 5b | 22 2b 64 65 66 61 75 6c |.def$="[|"+defaul|
|00001740| 74 24 2b 22 5d 20 3a 2d | 22 0d 08 8e 14 f2 63 65 |t$+"] :-|".....ce|
|00001750| 6e 74 72 65 28 64 65 66 | 24 2c 31 34 29 0d 08 98 |ntre(def|$,14)...|
|00001760| 10 e8 22 22 66 69 6c 65 | 6e 61 6d 65 24 0d 08 a2 |..""file|name$...|
|00001770| 27 e7 20 66 69 6c 65 6e | 61 6d 65 24 3d 22 22 20 |'. filen|ame$="" |
|00001780| 8c 20 66 69 6c 65 6e 61 | 6d 65 24 3d 64 65 66 61 |. filena|me$=defa|
|00001790| 75 6c 74 24 0d 08 ac 16 | 63 68 61 6e 25 3d 8e 28 |ult$....|chan%=.(|
|000017a0| 66 69 6c 65 6e 61 6d 65 | 24 29 0d 08 b6 2d e7 20 |filename|$)...-. |
|000017b0| 63 68 61 6e 25 3d 30 20 | 8c 20 f2 6e 6f 74 66 6f |chan%=0 |. .notfo|
|000017c0| 75 6e 64 28 74 69 74 6c | 65 24 2c 66 69 6c 65 6e |und(titl|e$,filen|
|000017d0| 61 6d 65 24 29 3a e1 0d | 08 c0 21 f2 54 69 6d 65 |ame$):..|..!.Time|
|000017e0| 5f 44 61 74 65 28 66 69 | 6c 65 6e 61 6d 65 24 2c |_Date(fi|lename$,|
|000017f0| 64 61 24 2c 74 79 24 29 | 0d 08 ca 30 e7 20 74 79 |da$,ty$)|...0. ty|
|00001800| 24 3c 3e 22 37 46 46 22 | 20 8c 20 f2 77 72 6f 6e |$<>"7FF"| . .wron|
|00001810| 74 79 70 65 28 74 69 74 | 6c 65 24 2c 66 69 6c 65 |type(tit|le$,file|
|00001820| 6e 61 6d 65 24 29 3a e1 | 0d 08 d4 46 f2 63 65 6e |name$):.|...F.cen|
|00001830| 74 72 65 28 22 50 72 65 | 73 73 20 53 50 41 43 45 |tre("Pre|ss SPACE|
|00001840| 20 42 41 52 20 77 68 65 | 6e 20 79 6f 75 20 61 72 | BAR whe|n you ar|
|00001850| 65 20 72 65 61 64 79 20 | 74 6f 20 74 72 61 6e 73 |e ready |to trans|
|00001860| 66 65 72 20 64 61 74 61 | 2e 22 2c 31 37 29 0d 08 |fer data|.",17)..|
|00001870| de 0e 2a 46 58 31 35 36 | 2c 31 35 38 0d 08 e8 0b |..*FX156|,158....|
|00001880| 2a 46 58 32 31 2c 30 0d | 08 f2 0a f5 fd a5 3d 33 |*FX21,0.|......=3|
|00001890| 32 0d 08 fc 2f 74 72 61 | 6e 66 24 3d 22 54 72 61 |2.../tra|nf$="Tra|
|000018a0| 6e 73 6d 69 74 69 6e 67 | 20 27 22 2b 66 69 6c 65 |nsmiting| '"+file|
|000018b0| 6e 61 6d 65 24 2b 22 27 | 20 4e 6f 77 2e 2e 2e 22 |name$+"'| Now..."|
|000018c0| 0d 09 06 16 f2 63 65 6e | 74 72 65 28 74 72 61 6e |.....cen|tre(tran|
|000018d0| 66 24 2c 32 31 29 0d 09 | 10 05 f5 0d 09 1a 0e 43 |f$,21)..|.......C|
|000018e0| 25 3d 9a 23 63 68 61 6e | 25 0d 09 24 0d f2 73 65 |%=.#chan|%..$..se|
|000018f0| 6e 64 28 43 25 29 0d 09 | 2e 0c fd c5 23 63 68 61 |nd(C%)..|....#cha|
|00001900| 6e 25 0d 09 38 0b d9 23 | 63 68 61 6e 25 0d 09 42 |n%..8..#|chan%..B|
|00001910| 0b 2a 46 58 32 31 2c 32 | 0d 09 4c 0a f2 73 70 61 |.*FX21,2|..L..spa|
|00001920| 63 65 0d 09 56 05 e1 0d | 09 60 05 3a 0d 09 6a 13 |ce..V...|.`.:..j.|
|00001930| dd f2 65 78 69 74 73 28 | 66 6e 61 6d 65 24 29 0d |..exits(|fname$).|
|00001940| 09 74 0e fb 31 36 30 3a | db 3a fb 31 39 0d 09 7e |.t..160:|.:.19..~|
|00001950| 15 f2 63 65 6e 74 72 65 | 28 74 69 74 6c 65 24 2c |..centre|(title$,|
|00001960| 31 29 0d 09 88 09 f2 6c | 6f 67 6f 0d 09 92 0e 2a |1).....l|ogo....*|
|00001970| 50 4f 49 4e 54 45 52 20 | 30 0d 09 9c 09 ee 3a fb |POINTER |0.....:.|
|00001980| 31 35 0d 09 a6 2d 77 6f | 72 64 24 3d 22 46 69 6c |15...-wo|rd$="Fil|
|00001990| 65 20 27 22 2b 66 6e 61 | 6d 65 24 2b 22 27 20 61 |e '"+fna|me$+"' a|
|000019a0| 6c 6c 72 65 61 64 79 20 | 65 78 69 74 73 21 22 0d |llready |exits!".|
|000019b0| 09 b0 15 f2 63 65 6e 74 | 72 65 28 77 6f 72 64 24 |....cent|re(word$|
|000019c0| 2c 31 37 29 0d 09 ba 38 | 77 6f 72 64 24 3d 22 44 |,17)...8|word$="D|
|000019d0| 6f 20 79 6f 75 20 77 69 | 73 68 20 74 6f 20 6f 76 |o you wi|sh to ov|
|000019e0| 65 72 77 72 69 74 65 20 | 66 69 6c 65 20 27 22 2b |erwrite |file '"+|
|000019f0| 66 6e 61 6d 65 24 2b 22 | 27 20 3f 22 0d 09 c4 15 |fname$+"|' ?"....|
|00001a00| f2 63 65 6e 74 72 65 28 | 77 6f 72 64 24 2c 31 39 |.centre(|word$,19|
|00001a10| 29 0d 09 ce 20 f2 63 65 | 6e 74 72 65 28 22 59 65 |)... .ce|ntre("Ye|
|00001a20| 73 20 6f 72 20 4e 6f 20 | 3f 20 3a 2d 22 2c 32 31 |s or No |? :-",21|
|00001a30| 29 0d 09 d8 08 79 24 3d | be 0d 09 e2 0b c8 8e 20 |)....y$=|....... |
|00001a40| 79 24 20 ca 0d 09 ec 16 | c9 20 22 59 22 2c 22 79 |y$ .....|. "Y","y|
|00001a50| 22 3a 6f 77 66 6c 61 67 | 3d 30 0d 09 f6 16 c9 20 |":owflag|=0..... |
|00001a60| 22 4e 22 2c 22 6e 22 3a | 6f 77 66 6c 61 67 3d 31 |"N","n":|owflag=1|
|00001a70| 0d 0a 00 05 cb 0d 0a 0a | 1e 57 24 3d c4 37 30 2c |........|.W$=.70,|
|00001a80| 22 20 22 29 3a f2 63 65 | 6e 74 72 65 28 57 24 2c |" "):.ce|ntre(W$,|
|00001a90| 31 37 29 0d 0a 14 1e 57 | 24 3d c4 37 30 2c 22 20 |17)....W|$=.70," |
|00001aa0| 22 29 3a f2 63 65 6e 74 | 72 65 28 57 24 2c 31 39 |"):.cent|re(W$,19|
|00001ab0| 29 0d 0a 1e 1e 57 24 3d | c4 32 30 2c 22 20 22 29 |)....W$=|.20," ")|
|00001ac0| 3a f2 63 65 6e 74 72 65 | 28 57 24 2c 32 31 29 0d |:.centre|(W$,21).|
|00001ad0| 0a 28 05 e1 0d 0a 32 05 | 3a 0d 0a 3c 13 dd f2 50 |.(....2.|:..<...P|
|00001ae0| 72 69 6e 74 28 74 69 74 | 6c 65 24 29 0d 0a 46 05 |rint(tit|le$)..F.|
|00001af0| f5 0d 0a 50 0e fb 31 36 | 30 3a db 3a fb 31 39 0d |...P..16|0:.:.19.|
|00001b00| 0a 5a 15 f2 63 65 6e 74 | 72 65 28 74 69 74 6c 65 |.Z..cent|re(title|
|00001b10| 24 2c 31 29 0d 0a 64 09 | f2 6c 6f 67 6f 0d 0a 6e |$,1)..d.|.logo..n|
|00001b20| 0e 2a 50 4f 49 4e 54 45 | 52 20 30 0d 0a 78 09 ee |.*POINTE|R 0..x..|
|00001b30| 3a fb 31 35 0d 0a 82 08 | 70 72 3d 30 0d 0a 8c 3a |:.15....|pr=0...:|
|00001b40| f2 63 65 6e 74 72 65 28 | 22 45 6e 74 65 72 20 66 |.centre(|"Enter f|
|00001b50| 69 6c 65 6e 61 6d 65 20 | 6f 66 20 74 68 65 20 64 |ilename |of the d|
|00001b60| 61 74 61 20 74 6f 20 62 | 65 20 70 72 69 6e 74 65 |ata to b|e printe|
|00001b70| 64 22 2c 31 32 29 0d 0a | 96 1c 64 65 66 24 3d 22 |d",12)..|..def$="|
|00001b80| 5b 22 2b 64 65 66 61 75 | 6c 74 24 2b 22 5d 20 3a |["+defau|lt$+"] :|
|00001b90| 2d 22 0d 0a a0 14 f2 63 | 65 6e 74 72 65 28 64 65 |-".....c|entre(de|
|00001ba0| 66 24 2c 31 34 29 0d 0a | aa 10 e8 22 22 66 69 6c |f$,14)..|...""fil|
|00001bb0| 65 6e 61 6d 65 24 0d 0a | b4 27 e7 20 66 69 6c 65 |ename$..|.'. file|
|00001bc0| 6e 61 6d 65 24 3d 22 22 | 20 8c 20 66 69 6c 65 6e |name$=""| . filen|
|00001bd0| 61 6d 65 24 3d 64 65 66 | 61 75 6c 74 24 0d 0a be |ame$=def|ault$...|
|00001be0| 16 63 68 61 6e 25 3d 8e | 28 66 69 6c 65 6e 61 6d |.chan%=.|(filenam|
|00001bf0| 65 24 29 0d 0a c8 2b e7 | 20 63 68 61 6e 25 3d 30 |e$)...+.| chan%=0|
|00001c00| 20 8c 20 f2 6e 6f 74 66 | 6f 75 6e 64 28 74 69 74 | . .notf|ound(tit|
|00001c10| 6c 65 24 2c 66 69 6c 65 | 6e 61 6d 65 24 29 0d 0a |le$,file|name$)..|
|00001c20| d2 21 f2 54 69 6d 65 5f | 44 61 74 65 28 66 69 6c |.!.Time_|Date(fil|
|00001c30| 65 6e 61 6d 65 24 2c 64 | 61 24 2c 74 79 24 29 0d |ename$,d|a$,ty$).|
|00001c40| 0a dc 38 e7 20 74 79 24 | 3c 3e 22 37 46 46 22 20 |..8. ty$|<>"7FF" |
|00001c50| 80 20 63 68 61 6e 25 3e | 30 20 8c 20 f2 77 72 6f |. chan%>|0 . .wro|
|00001c60| 6e 74 79 70 65 28 74 69 | 74 6c 65 24 2c 66 69 6c |ntype(ti|tle$,fil|
|00001c70| 65 6e 61 6d 65 24 29 0d | 0a e6 18 fd 63 68 61 6e |ename$).|....chan|
|00001c80| 25 3e 30 20 80 20 74 79 | 24 3d 22 37 46 46 22 0d |%>0 . ty|$="7FF".|
|00001c90| 0a f0 3a f2 63 65 6e 74 | 72 65 28 22 50 72 69 6e |..:.cent|re("Prin|
|00001ca0| 74 20 66 69 6c 65 20 6f | 6e 20 53 29 63 72 65 65 |t file o|n S)cree|
|00001cb0| 6e 20 6f 72 20 50 29 72 | 69 6e 74 65 72 20 5b 53 |n or P)r|inter [S|
|00001cc0| 5d 20 3a 2d 22 2c 31 36 | 29 0d 0a fa 0c 70 72 69 |] :-",16|)....pri|
|00001cd0| 6e 74 24 3d be 0d 0b 04 | 0f c8 8e 20 70 72 69 6e |nt$=....|... prin|
|00001ce0| 74 24 20 ca 0d 0b 0e 12 | c9 20 22 53 22 2c 22 73 |t$ .....|. "S","s|
|00001cf0| 22 3a 70 72 3d 30 0d 0b | 18 12 c9 20 22 50 22 2c |":pr=0..|... "P",|
|00001d00| 22 70 22 3a 70 72 3d 31 | 0d 0b 22 05 cb 0d 0b 2c |"p":pr=1|.."....,|
|00001d10| 1b db 3a fb 31 39 3a f2 | 63 65 6e 74 72 65 28 74 |..:.19:.|centre(t|
|00001d20| 69 74 6c 65 24 2c 31 29 | 0d 0b 36 07 ef 31 34 0d |itle$,1)|..6..14.|
|00001d30| 0b 40 16 e7 20 70 72 3d | 31 20 8c 20 f2 50 72 69 |.@.. pr=|1 . .Pri|
|00001d40| 6e 74 73 65 74 0d 0b 4a | 07 fb 31 35 0d 0b 54 2f |ntset..J|..15..T/|
|00001d50| f1 8a 30 2c 34 29 22 53 | 61 76 65 64 20 64 61 74 |..0,4)"S|aved dat|
|00001d60| 61 20 66 72 6f 6d 20 74 | 68 65 20 66 69 6c 65 20 |a from t|he file |
|00001d70| 22 3b 66 69 6c 65 6e 61 | 6d 65 24 0d 0b 5e 0f fb |";filena|me$..^..|
|00001d80| 20 36 33 20 c8 9c 20 31 | 39 32 0d 0b 68 05 f1 0d | 63 .. 1|92..h...|
|00001d90| 0b 72 05 f5 0d 0b 7c 0e | 59 25 3d 9a 23 63 68 61 |.r....|.|Y%=.#cha|
|00001da0| 6e 25 0d 0b 86 1e e7 20 | 59 25 3d 26 31 41 20 84 |n%..... |Y%=&1A .|
|00001db0| 20 59 25 3d 26 31 31 20 | 8c 20 59 25 3d 26 30 30 | Y%=&11 |. Y%=&00|
|00001dc0| 0d 0b 90 08 ef 20 59 25 | 0d 0b 9a 0c fd c5 23 63 |..... Y%|......#c|
|00001dd0| 68 61 6e 25 0d 0b a4 07 | d9 23 30 0d 0b ae 1c f1 |han%....|.#0.....|
|00001de0| 27 22 46 69 6c 65 20 73 | 61 76 65 64 20 6f 6e 20 |'"File s|aved on |
|00001df0| 20 20 22 3b 64 61 24 0d | 0b b8 1b f1 27 22 46 69 | ";da$.|....'"Fi|
|00001e00| 6c 65 20 70 72 69 6e 74 | 65 64 20 6f 6e 20 22 3b |le print|ed on ";|
|00001e10| 91 24 0d 0b c2 06 f1 27 | 0d 0b cc 06 ef 33 0d 0b |.$.....'|.....3..|
|00001e20| d6 0a f2 73 70 61 63 65 | 0d 0b e0 05 e1 0d 0b ea |...space|........|
|00001e30| 05 3a 0d 0b f4 0e dd f2 | 50 72 69 6e 74 73 65 74 |.:......|Printset|
|00001e40| 0d 0b fe 09 87 3a fb 31 | 35 0d 0c 08 45 f1 8a 35 |.....:.1|5...E..5|
|00001e50| 2c 33 29 22 50 6c 65 61 | 73 65 20 68 61 76 65 20 |,3)"Plea|se have |
|00001e60| 74 68 65 20 70 72 69 6e | 74 65 72 20 74 75 72 6e |the prin|ter turn|
|00001e70| 65 64 20 6f 6e 20 61 6e | 64 20 74 68 65 20 70 61 |ed on an|d the pa|
|00001e80| 70 65 72 20 61 6c 69 6e | 67 6e 65 64 21 22 0d 0c |per alin|gned!"..|
|00001e90| 12 05 f5 0d 0c 1c 10 70 | 72 69 3d a4 70 72 69 6e |.......p|ri=.prin|
|00001ea0| 74 65 72 0d 0c 26 0e fb | 36 33 20 c8 9c 20 31 39 |ter..&..|63 .. 19|
|00001eb0| 32 0d 0c 30 2c e7 20 ac | 20 70 72 69 20 8c 20 f1 |2..0,. .| pri . .|
|00001ec0| 8a 35 2c 35 29 22 50 72 | 69 6e 74 65 72 20 69 73 |.5,5)"Pr|inter is|
|00001ed0| 20 6e 6f 77 20 4f 46 46 | 22 3a fb 31 35 0d 0c 3a | now OFF|":.15..:|
|00001ee0| 2e e7 20 20 20 20 20 70 | 72 69 20 8c 20 f1 8a 35 |.. p|ri . ..5|
|00001ef0| 2c 35 29 22 50 72 69 6e | 74 65 72 20 69 73 20 6e |,5)"Prin|ter is n|
|00001f00| 6f 77 20 4f 4e 20 22 3a | fb 31 35 0d 0c 44 27 f1 |ow ON ":|.15..D'.|
|00001f10| 8a 35 2c 37 29 22 50 72 | 65 73 73 20 53 50 41 43 |.5,7)"Pr|ess SPAC|
|00001f20| 45 20 42 41 52 20 77 68 | 65 6e 20 72 65 61 64 79 |E BAR wh|en ready|
|00001f30| 22 3b 0d 0c 4e 0b 2a 46 | 58 32 31 2c 30 0d 0c 58 |";..N.*F|X21,0..X|
|00001f40| 12 fd 20 a6 28 2d 39 39 | 29 20 80 20 70 72 69 0d |.. .(-99|) . pri.|
|00001f50| 0c 62 19 db 3a ee 3a f2 | 63 65 6e 74 72 65 28 74 |.b..:.:.|centre(t|
|00001f60| 69 74 6c 65 24 2c 31 29 | 0d 0c 6c 09 ef 32 2c 31 |itle$,1)|..l..2,1|
|00001f70| 35 0d 0c 76 05 e1 0d 0c | 80 05 3a 0d 0c 8a 0d dd |5..v....|..:.....|
|00001f80| a4 70 72 69 6e 74 65 72 | 0d 0c 94 0b 2a 46 58 32 |.printer|....*FX2|
|00001f90| 31 2c 33 0d 0c 9e 13 73 | 74 61 72 74 73 69 7a 65 |1,3....s|tartsize|
|00001fa0| 3d 96 28 2d 34 29 0d 0c | a8 1c ef 32 2c 31 2c 30 |=.(-4)..|...2,1,0|
|00001fb0| 2c 31 2c 30 2c 31 2c 30 | 2c 31 2c 30 2c 31 2c 30 |,1,0,1,0|,1,0,1,0|
|00001fc0| 2c 33 0d 0c b2 0d 77 61 | 69 74 3d a6 28 32 29 0d |,3....wa|it=.(2).|
|00001fd0| 0c bc 11 65 6e 64 73 69 | 7a 65 3d 96 28 2d 34 29 |...endsi|ze=.(-4)|
|00001fe0| 0d 0c c6 18 3d 28 73 74 | 61 72 74 73 69 7a 65 3d |....=(st|artsize=|
|00001ff0| 65 6e 64 73 69 7a 65 29 | 0d 0c d0 05 3a 0d 0c da |endsize)|....:...|
|00002000| 20 dd f2 6e 6f 74 66 6f | 75 6e 64 28 74 69 74 6c | ..notfo|und(titl|
|00002010| 65 24 2c 66 69 6c 65 6e | 61 6d 65 24 29 0d 0c e4 |e$,filen|ame$)...|
|00002020| 0e fb 31 36 30 3a db 3a | fb 31 39 0d 0c ee 15 f2 |..160:.:|.19.....|
|00002030| 63 65 6e 74 72 65 28 74 | 69 74 6c 65 24 2c 31 29 |centre(t|itle$,1)|
|00002040| 0d 0c f8 0e 2a 50 4f 49 | 4e 54 45 52 20 30 0d 0d |....*POI|NTER 0..|
|00002050| 02 05 ee 0d 0d 0c 2a 6e | 6f 74 24 3d 22 46 49 4c |......*n|ot$="FIL|
|00002060| 45 20 27 22 2b 66 69 6c | 65 6e 61 6d 65 24 2b 22 |E '"+fil|ename$+"|
|00002070| 27 20 4e 4f 54 20 46 4f | 55 4e 44 21 22 0d 0d 16 |' NOT FO|UND!"...|
|00002080| 14 f2 63 65 6e 74 72 65 | 28 6e 6f 74 24 2c 31 35 |..centre|(not$,15|
|00002090| 29 0d 0d 20 0a f2 73 70 | 61 63 65 0d 0d 2a 05 e1 |).. ..sp|ace..*..|
|000020a0| 0d 0d 34 05 3a 0d 0d 3e | 20 dd f2 77 72 6f 6e 74 |..4.:..>| ..wront|
|000020b0| 79 70 65 28 74 69 74 6c | 65 24 2c 66 69 6c 65 6e |ype(titl|e$,filen|
|000020c0| 61 6d 65 24 29 0d 0d 48 | 0e fb 31 36 30 3a db 3a |ame$)..H|..160:.:|
|000020d0| fb 31 39 0d 0d 52 15 f2 | 63 65 6e 74 72 65 28 74 |.19..R..|centre(t|
|000020e0| 69 74 6c 65 24 2c 31 29 | 0d 0d 5c 0e 2a 50 4f 49 |itle$,1)|..\.*POI|
|000020f0| 4e 54 45 52 20 30 0d 0d | 66 05 ee 0d 0d 70 35 6e |NTER 0..|f....p5n|
|00002100| 6f 74 24 3d 22 46 49 4c | 45 20 27 22 2b 66 69 6c |ot$="FIL|E '"+fil|
|00002110| 65 6e 61 6d 65 24 2b 22 | 27 20 49 53 20 4f 46 20 |ename$+"|' IS OF |
|00002120| 54 48 45 20 57 52 4f 4e | 47 20 54 59 50 45 21 22 |THE WRON|G TYPE!"|
|00002130| 0d 0d 7a 14 f2 63 65 6e | 74 72 65 28 6e 6f 74 24 |..z..cen|tre(not$|
|00002140| 2c 31 35 29 0d 0d 84 0a | f2 73 70 61 63 65 0d 0d |,15)....|.space..|
|00002150| 8e 05 e1 0d 0d 98 05 3a | 0d 0d a2 09 dd a4 67 65 |.......:|......ge|
|00002160| 74 0d 0d ac 0a 2a 46 58 | 32 2c 31 0d 0d b6 08 67 |t....*FX|2,1....g|
|00002170| 25 3d a5 0d 0d c0 0a 2a | 46 58 32 2c 32 0d 0d ca |%=.....*|FX2,2...|
|00002180| 07 3d 67 25 0d 0d d4 05 | 3a 0d 0d de 11 dd f2 73 |.=g%....|:......s|
|00002190| 65 6e 64 28 63 68 61 72 | 25 29 0d 0d e8 0a 2a 46 |end(char|%)....*F|
|000021a0| 58 33 2c 37 0d 0d f2 0a | ef 63 68 61 72 25 0d 0d |X3,7....|.char%..|
|000021b0| fc 0a 2a 46 58 33 2c 30 | 0d 0e 06 05 e1 0d 0e 10 |..*FX3,0|........|
|000021c0| 05 3a 0d 0e 1a 12 dd f2 | 48 65 6c 70 28 74 69 74 |.:......|Help(tit|
|000021d0| 6c 65 24 29 0d 0e 24 0e | fb 31 36 30 3a db 3a fb |le$)..$.|.160:.:.|
|000021e0| 31 39 0d 0e 2e 15 f2 63 | 65 6e 74 72 65 28 74 69 |19.....c|entre(ti|
|000021f0| 74 6c 65 24 2c 31 29 0d | 0e 38 0e 2a 50 4f 49 4e |tle$,1).|.8.*POIN|
|00002200| 54 45 52 20 30 0d 0e 42 | 09 ee 3a fb 31 35 0d 0e |TER 0..B|..:.15..|
|00002210| 4c 4e f1 8a 35 2c 33 29 | 22 54 68 69 73 20 70 72 |LN..5,3)|"This pr|
|00002220| 6f 67 72 61 6d 20 77 69 | 6c 6c 20 73 61 76 65 20 |ogram wi|ll save |
|00002230| 61 6e 64 20 6c 6f 61 64 | 20 64 61 74 61 20 68 65 |and load| data he|
|00002240| 6c 64 20 6f 6e 20 61 20 | 50 73 69 6f 6e 20 4f 72 |ld on a |Psion Or|
|00002250| 67 61 6e 69 73 65 72 20 | 49 49 2e 22 0d 0e 56 4f |ganiser |II."..VO|
|00002260| f1 8a 35 2c 35 29 22 59 | 6f 75 72 20 50 73 69 6f |..5,5)"Y|our Psio|
|00002270| 6e 20 4f 72 67 61 6e 69 | 73 65 72 20 6d 75 73 74 |n Organi|ser must|
|00002280| 20 62 65 20 63 6f 6e 65 | 63 74 65 64 20 74 6f 20 | be cone|cted to |
|00002290| 74 68 65 20 6e 69 6e 65 | 20 70 69 6e 20 52 53 34 |the nine| pin RS4|
|000022a0| 32 33 20 70 6f 72 74 20 | 6f 6e 22 0d 0e 60 31 f1 |23 port |on"..`1.|
|000022b0| 8a 35 2c 36 29 22 74 68 | 65 20 62 61 63 6b 20 6f |.5,6)"th|e back o|
|000022c0| 66 20 79 6f 75 72 20 41 | 72 63 68 69 6d 65 64 65 |f your A|rchimede|
|000022d0| 73 20 63 6f 6d 70 75 74 | 65 72 2e 22 0d 0e 6a 45 |s comput|er."..jE|
|000022e0| f1 8a 35 2c 38 29 22 54 | 68 69 73 20 70 72 6f 67 |..5,8)"T|his prog|
|000022f0| 72 61 6d 20 69 73 20 73 | 65 74 20 75 70 20 74 6f |ram is s|et up to|
|00002300| 20 75 73 65 20 74 68 65 | 20 66 6f 6c 6c 6f 77 69 | use the| followi|
|00002310| 6e 67 20 70 65 72 61 6d | 65 74 65 72 73 20 3a 2d |ng peram|eters :-|
|00002320| 22 0d 0e 74 39 f1 8a 32 | 33 2c 31 30 29 22 53 70 |"..t9..2|3,10)"Sp|
|00002330| 65 65 64 20 20 20 20 20 | 20 20 3d 20 39 36 30 30 |eed | = 9600|
|00002340| 20 42 41 55 44 20 7d 20 | 2a 43 6f 6e 66 69 67 75 | BAUD } |*Configu|
|00002350| 72 65 20 42 41 55 44 20 | 37 22 0d 0e 7e 27 f1 8a |re BAUD |7"..~'..|
|00002360| 32 33 2c 31 31 29 22 50 | 61 72 69 74 79 20 20 20 |23,11)"P|arity |
|00002370| 20 20 20 3d 20 4f 44 44 | 20 20 20 20 20 20 20 7d | = ODD| }|
|00002380| 22 0d 0e 88 39 f1 8a 32 | 33 2c 31 32 29 22 57 6f |"...9..2|3,12)"Wo|
|00002390| 72 64 20 6c 65 6e 67 74 | 68 20 3d 20 38 20 42 69 |rd lengt|h = 8 Bi|
|000023a0| 74 73 20 20 20 20 7d 20 | 2a 43 6f 6e 66 69 67 75 |ts } |*Configu|
|000023b0| 72 65 20 44 41 54 41 20 | 37 22 0d 0e 92 27 f1 8a |re DATA |7"...'..|
|000023c0| 32 33 2c 31 33 29 22 53 | 74 6f 70 20 62 69 74 20 |23,13)"S|top bit |
|000023d0| 20 20 20 3d 20 31 20 42 | 69 74 20 20 20 20 20 7d | = 1 B|it }|
|000023e0| 22 0d 0e 9c 1f f1 8a 32 | 33 2c 31 34 29 22 48 61 |"......2|3,14)"Ha|
|000023f0| 6e 64 73 68 61 6b 65 20 | 20 20 3d 20 41 4c 4c 22 |ndshake | = ALL"|
|00002400| 0d 0e a6 20 f1 8a 32 33 | 2c 31 35 29 22 50 72 6f |... ..23|,15)"Pro|
|00002410| 74 6f 63 6f 6c 20 20 20 | 20 3d 20 4e 4f 4e 45 22 |tocol | = NONE"|
|00002420| 0d 0e b0 21 f1 8a 32 33 | 2c 31 36 29 22 45 63 68 |...!..23|,16)"Ech|
|00002430| 6f 20 20 20 20 20 20 20 | 20 3d 20 4c 4f 43 41 4c |o | = LOCAL|
|00002440| 22 0d 0e ba 45 f1 8a 35 | 2c 31 38 29 22 59 6f 75 |"...E..5|,18)"You|
|00002450| 72 20 4f 72 67 61 6e 69 | 73 65 72 20 73 68 6f 75 |r Organi|ser shou|
|00002460| 6c 64 20 62 65 20 73 65 | 74 20 74 68 65 20 61 62 |ld be se|t the ab|
|00002470| 6f 76 65 20 76 61 6c 75 | 65 73 20 6f 66 20 63 6f |ove valu|es of co|
|00002480| 75 72 73 65 2e 22 0d 0e | c4 4b f1 8a 35 2c 32 30 |urse."..|.K..5,20|
|00002490| 29 22 54 68 65 20 70 72 | 6f 67 72 61 6d 20 69 73 |)"The pr|ogram is|
|000024a0| 20 71 75 69 74 65 20 73 | 69 6d 70 6c 65 20 74 6f | quite s|imple to|
|000024b0| 20 75 73 65 2c 20 6a 75 | 73 74 20 66 6f 6c 6c 6f | use, ju|st follo|
|000024c0| 77 20 74 68 65 20 70 72 | 6f 6d 70 74 73 20 74 6f |w the pr|ompts to|
|000024d0| 22 0d 0e ce 25 f1 8a 35 | 2c 32 31 29 22 53 61 76 |"...%..5|,21)"Sav|
|000024e0| 65 2f 4c 6f 61 64 20 6f | 72 20 50 72 69 6e 74 20 |e/Load o|r Print |
|000024f0| 64 61 74 61 2e 22 0d 0e | d8 4e f1 8a 35 2c 32 33 |data."..|.N..5,23|
|00002500| 29 22 49 74 65 6d 73 20 | 69 6e 20 73 71 75 61 72 |)"Items |in squar|
|00002510| 65 20 62 72 61 63 6b 65 | 74 73 20 27 5b 5d 27 20 |e bracke|ts '[]' |
|00002520| 61 72 65 20 74 68 65 20 | 64 65 66 61 75 6c 74 73 |are the |defaults|
|00002530| 2c 20 6a 75 73 74 20 70 | 72 65 73 73 20 72 65 74 |, just p|ress ret|
|00002540| 75 72 6e 22 0d 0e e2 28 | f1 8a 35 2c 32 34 29 22 |urn"...(|..5,24)"|
|00002550| 74 6f 20 65 6e 74 65 72 | 20 74 68 65 20 64 65 66 |to enter| the def|
|00002560| 61 75 6c 74 20 76 61 6c | 75 65 2e 22 0d 0e ec 48 |ault val|ue."...H|
|00002570| f1 8a 35 2c 32 36 29 22 | 50 72 65 73 73 69 6e 67 |..5,26)"|Pressing|
|00002580| 20 3c 45 53 43 41 50 45 | 3e 20 77 69 6c 6c 20 61 | <ESCAPE|> will a|
|00002590| 6c 6c 77 61 79 73 20 72 | 65 74 75 72 6e 20 79 6f |llways r|eturn yo|
|000025a0| 75 20 74 6f 20 74 68 65 | 20 6d 61 69 6e 20 6d 65 |u to the| main me|
|000025b0| 6e 75 2e 22 0d 0e f6 35 | f1 8a 35 2c 32 38 29 22 |nu."...5|..5,28)"|
|000025c0| 55 73 65 20 27 2a 54 59 | 50 45 20 52 65 61 64 4d |Use '*TY|PE ReadM|
|000025d0| 65 27 20 66 6f 72 20 6d | 6f 72 65 20 69 6e 66 6f |e' for m|ore info|
|000025e0| 72 6d 61 74 69 6f 6e 2e | 22 0d 0f 00 0a f2 73 70 |rmation.|".....sp|
|000025f0| 61 63 65 0d 0f 0a 05 e1 | 0d 0f 14 05 3a 0d 0f 1e |ace.....|....:...|
|00002600| 19 dd f2 43 6f 6e 76 65 | 72 74 46 72 6f 6d 28 74 |...Conve|rtFrom(t|
|00002610| 69 74 6c 65 24 29 0d 0f | 28 05 f5 0d 0f 32 0e fb |itle$)..|(....2..|
|00002620| 31 36 30 3a db 3a fb 31 | 39 0d 0f 3c 15 f2 63 65 |160:.:.1|9..<..ce|
|00002630| 6e 74 72 65 28 74 69 74 | 6c 65 24 2c 31 29 0d 0f |ntre(tit|le$,1)..|
|00002640| 46 0e 2a 50 4f 49 4e 54 | 45 52 20 30 0d 0f 50 09 |F.*POINT|ER 0..P.|
|00002650| ee 3a fb 36 33 0d 0f 5a | 4f f1 8a 35 2c 34 29 22 |.:.63..Z|O..5,4)"|
|00002660| 54 68 69 73 20 6f 70 74 | 69 6f 6e 20 61 6c 6c 6f |This opt|ion allo|
|00002670| 77 73 20 79 6f 75 20 74 | 6f 20 63 6f 6e 76 65 72 |ws you t|o conver|
|00002680| 74 20 61 20 70 72 65 76 | 69 6f 73 6c 79 20 73 61 |t a prev|iosly sa|
|00002690| 76 65 64 20 50 73 69 6f | 6e 20 64 61 74 61 20 66 |ved Psio|n data f|
|000026a0| 69 6c 65 22 0d 0f 64 43 | f1 8a 35 2c 36 29 22 74 |ile"..dC|..5,6)"t|
|000026b0| 6f 20 61 20 70 75 72 65 | 20 41 53 43 49 49 20 66 |o a pure| ASCII f|
|000026c0| 69 6c 65 20 66 6f 72 20 | 6c 6f 61 64 69 6e 67 20 |ile for |loading |
|000026d0| 69 6e 74 6f 20 61 20 77 | 6f 72 64 20 70 72 6f 63 |into a w|ord proc|
|000026e0| 65 73 73 6f 72 2e 22 0d | 0f 6e 3a f1 8a 35 2c 38 |essor.".|.n:..5,8|
|000026f0| 29 22 54 68 65 20 6f 72 | 69 67 69 6e 61 6c 20 64 |)"The or|iginal d|
|00002700| 61 74 61 20 66 69 6c 65 | 20 77 69 6c 6c 20 62 65 |ata file| will be|
|00002710| 20 6c 65 66 74 20 75 6e | 63 68 61 6e 67 65 64 21 | left un|changed!|
|00002720| 22 0d 0f 78 07 fb 31 35 | 0d 0f 82 3c f2 63 65 6e |"..x..15|...<.cen|
|00002730| 74 72 65 28 22 45 6e 74 | 65 72 20 66 69 6c 65 6e |tre("Ent|er filen|
|00002740| 61 6d 65 20 6f 66 20 74 | 68 65 20 64 61 74 61 20 |ame of t|he data |
|00002750| 74 6f 20 62 65 20 63 6f | 6e 76 65 72 74 65 64 22 |to be co|nverted"|
|00002760| 2c 31 32 29 0d 0f 8c 1c | 64 65 66 24 3d 22 5b 22 |,12)....|def$="["|
|00002770| 2b 64 65 66 61 75 6c 74 | 24 2b 22 5d 20 3a 2d 22 |+default|$+"] :-"|
|00002780| 0d 0f 96 14 f2 63 65 6e | 74 72 65 28 64 65 66 24 |.....cen|tre(def$|
|00002790| 2c 31 34 29 0d 0f a0 0e | e8 22 22 69 70 66 69 6c |,14)....|.""ipfil|
|000027a0| 65 24 0d 0f aa 23 e7 20 | 69 70 66 69 6c 65 24 3d |e$...#. |ipfile$=|
|000027b0| 22 22 20 8c 20 69 70 66 | 69 6c 65 24 3d 64 65 66 |"" . ipf|ile$=def|
|000027c0| 61 75 6c 74 24 0d 0f b4 | 14 63 68 61 6e 25 3d 8e |ault$...|.chan%=.|
|000027d0| 28 69 70 66 69 6c 65 24 | 29 0d 0f be 29 e7 20 63 |(ipfile$|)...). c|
|000027e0| 68 61 6e 25 3d 30 20 8c | 20 f2 6e 6f 74 66 6f 75 |han%=0 .| .notfou|
|000027f0| 6e 64 28 74 69 74 6c 65 | 24 2c 69 70 66 69 6c 65 |nd(title|$,ipfile|
|00002800| 24 29 0d 0f c8 1f f2 54 | 69 6d 65 5f 44 61 74 65 |$).....T|ime_Date|
|00002810| 28 69 70 66 69 6c 65 24 | 2c 64 61 24 2c 74 79 24 |(ipfile$|,da$,ty$|
|00002820| 29 0d 0f d2 36 e7 20 74 | 79 24 3c 3e 22 37 46 46 |)...6. t|y$<>"7FF|
|00002830| 22 20 80 20 63 68 61 6e | 25 3e 30 20 8c 20 f2 77 |" . chan|%>0 . .w|
|00002840| 72 6f 6e 74 79 70 65 28 | 74 69 74 6c 65 24 2c 69 |rontype(|title$,i|
|00002850| 70 66 69 6c 65 24 29 0d | 0f dc 18 fd 63 68 61 6e |pfile$).|....chan|
|00002860| 25 3e 30 20 80 20 74 79 | 24 3d 22 37 46 46 22 0d |%>0 . ty|$="7FF".|
|00002870| 0f e6 05 f5 0d 0f f0 0c | 6f 77 66 6c 61 67 3d 30 |........|owflag=0|
|00002880| 0d 0f fa 3b f2 63 65 6e | 74 72 65 28 22 45 6e 74 |...;.cen|tre("Ent|
|00002890| 65 72 20 66 69 6c 65 6e | 61 6d 65 20 6f 66 20 74 |er filen|ame of t|
|000028a0| 68 65 20 6f 75 74 70 75 | 74 20 66 69 6c 65 20 28 |he outpu|t file (|
|000028b0| 41 53 43 49 49 29 22 2c | 31 36 29 0d 10 04 12 6c |ASCII)",|16)....l|
|000028c0| 65 6e 3d a9 28 69 70 66 | 69 6c 65 24 29 0d 10 0e |en=.(ipf|ile$)...|
|000028d0| 16 e7 20 6c 65 6e 3e 3d | 31 30 20 8c 20 6c 65 6e |.. len>=|10 . len|
|000028e0| 3d 31 30 0d 10 18 18 74 | 65 6d 70 31 24 3d c2 69 |=10....t|emp1$=.i|
|000028f0| 70 66 69 6c 65 24 2c 6c | 65 6e 29 0d 10 22 14 64 |pfile$,l|en)..".d|
|00002900| 6f 74 3d a7 74 65 6d 70 | 31 24 2c 22 2e 22 29 0d |ot=.temp|1$,".").|
|00002910| 10 2c 1b 74 65 6d 70 32 | 24 3d c2 74 65 6d 70 31 |.,.temp2|$=.temp1|
|00002920| 24 2c 6c 65 6e 2d 64 6f | 74 29 0d 10 36 18 74 65 |$,len-do|t)..6.te|
|00002930| 6d 70 32 24 3d 74 65 6d | 70 32 24 2b 22 54 65 78 |mp2$=tem|p2$+"Tex|
|00002940| 74 22 0d 10 40 16 74 65 | 6d 70 32 24 3d c0 74 65 |t"..@.te|mp2$=.te|
|00002950| 6d 70 32 24 2c 31 30 29 | 0d 10 4a 19 64 65 66 74 |mp2$,10)|..J.deft|
|00002960| 24 3d 64 69 72 74 65 78 | 74 24 2b 74 65 6d 70 32 |$=dirtex|t$+temp2|
|00002970| 24 0d 10 54 1d 64 65 66 | 74 65 78 74 24 3d 22 5b |$..T.def|text$="[|
|00002980| 22 2b 64 65 66 74 24 2b | 22 5d 20 3a 2d 22 0d 10 |"+deft$+|"] :-"..|
|00002990| 5e 18 f2 63 65 6e 74 72 | 65 28 64 65 66 74 65 78 |^..centr|e(deftex|
|000029a0| 74 24 2c 31 38 29 0d 10 | 68 0e e8 22 22 6f 70 66 |t$,18)..|h..""opf|
|000029b0| 69 6c 65 24 0d 10 72 20 | e7 20 6f 70 66 69 6c 65 |ile$..r |. opfile|
|000029c0| 24 3d 22 22 20 8c 20 6f | 70 66 69 6c 65 24 3d 64 |$="" . o|pfile$=d|
|000029d0| 65 66 74 24 0d 10 7c 1f | f2 54 69 6d 65 5f 44 61 |eft$..|.|.Time_Da|
|000029e0| 74 65 28 6f 70 66 69 6c | 65 24 2c 64 61 24 2c 74 |te(opfil|e$,da$,t|
|000029f0| 79 24 29 0d 10 86 21 e7 | 20 74 79 24 3d 22 46 46 |y$)...!.| ty$="FF|
|00002a00| 46 22 20 8c 20 f2 65 78 | 69 74 73 28 6f 70 66 69 |F" . .ex|its(opfi|
|00002a10| 6c 65 24 29 0d 10 90 0e | fd 20 6f 77 66 6c 61 67 |le$)....|. owflag|
|00002a20| 3d 30 0d 10 9a 07 fb 36 | 33 0d 10 a4 39 74 65 78 |=0.....6|3...9tex|
|00002a30| 74 24 3d 22 4e 6f 77 20 | 63 6f 6e 76 65 72 74 69 |t$="Now |converti|
|00002a40| 6e 67 20 27 22 2b 69 70 | 66 69 6c 65 24 2b 22 27 |ng '"+ip|file$+"'|
|00002a50| 20 74 6f 20 27 22 2b 6f | 70 66 69 6c 65 24 2b 22 | to '"+o|pfile$+"|
|00002a60| 27 22 0d 10 ae 15 f2 63 | 65 6e 74 72 65 28 74 65 |'".....c|entre(te|
|00002a70| 78 74 24 2c 32 30 29 0d | 10 b8 16 69 70 63 68 61 |xt$,20).|...ipcha|
|00002a80| 6e 25 3d 8e 28 69 70 66 | 69 6c 65 24 29 0d 10 c2 |n%=.(ipf|ile$)...|
|00002a90| 16 6f 70 63 68 61 6e 25 | 3d ae 28 6f 70 66 69 6c |.opchan%|=.(opfil|
|00002aa0| 65 24 29 0d 10 cc 05 f5 | 0d 10 d6 10 59 25 3d 9a |e$).....|....Y%=.|
|00002ab0| 23 69 70 63 68 61 6e 25 | 0d 10 e0 1c e7 20 59 25 |#ipchan%|..... Y%|
|00002ac0| 3d 26 30 39 20 8c 20 d5 | 23 6f 70 63 68 61 6e 25 |=&09 . .|#opchan%|
|00002ad0| 2c 26 32 30 0d 10 ea 1c | e7 20 59 25 3d 26 30 41 |,&20....|. Y%=&0A|
|00002ae0| 20 8c 20 d5 23 6f 70 63 | 68 61 6e 25 2c 26 30 41 | . .#opc|han%,&0A|
|00002af0| 0d 10 f4 1c e7 20 59 25 | 3d 26 30 44 20 8c 20 d5 |..... Y%|=&0D . .|
|00002b00| 23 6f 70 63 68 61 6e 25 | 2c 26 30 44 0d 10 fe 23 |#opchan%|,&0D...#|
|00002b10| e7 20 59 25 3e 33 31 20 | 80 20 59 25 3c 31 32 37 |. Y%>31 |. Y%<127|
|00002b20| 20 8c 20 d5 23 6f 70 63 | 68 61 6e 25 2c 59 25 0d | . .#opc|han%,Y%.|
|00002b30| 11 08 0e fd c5 23 69 70 | 63 68 61 6e 25 0d 11 12 |.....#ip|chan%...|
|00002b40| 07 d9 23 30 0d 11 1c 21 | ff 28 22 2a 53 45 54 54 |..#0...!|.("*SETT|
|00002b50| 59 50 45 20 22 2b 6f 70 | 66 69 6c 65 24 2b 22 20 |YPE "+op|file$+" |
|00002b60| 46 46 46 22 29 0d 11 26 | 0a f2 73 70 61 63 65 0d |FFF")..&|..space.|
|00002b70| 11 30 05 e1 0d 11 3a 05 | 3a 0d 11 44 19 dd f2 43 |.0....:.|:..D...C|
|00002b80| 6f 6e 76 65 72 74 42 61 | 63 6b 28 74 69 74 6c 65 |onvertBa|ck(title|
|00002b90| 24 29 0d 11 4e 1e f4 20 | 54 68 69 73 20 6f 70 74 |$)..N.. |This opt|
|00002ba0| 69 6f 6e 20 6e 6f 74 20 | 77 6f 72 6b 69 6e 67 21 |ion not |working!|
|00002bb0| 0d 11 58 2c f4 20 59 6f | 75 20 73 68 6f 75 6c 64 |..X,. Yo|u should|
|00002bc0| 20 6e 65 76 65 72 20 62 | 65 20 61 62 6c 65 20 74 | never b|e able t|
|00002bd0| 6f 20 63 61 6c 6c 20 69 | 74 21 21 21 0d 11 62 05 |o call i|t!!!..b.|
|00002be0| f5 0d 11 6c 0e fb 31 36 | 30 3a db 3a fb 31 39 0d |...l..16|0:.:.19.|
|00002bf0| 11 76 15 f2 63 65 6e 74 | 72 65 28 74 69 74 6c 65 |.v..cent|re(title|
|00002c00| 24 2c 31 29 0d 11 80 0e | 2a 50 4f 49 4e 54 45 52 |$,1)....|*POINTER|
|00002c10| 20 30 0d 11 8a 09 ee 3a | fb 36 33 0d 11 94 4f f1 | 0.....:|.63...O.|
|00002c20| 8a 35 2c 34 29 22 54 68 | 69 73 20 6f 70 74 69 6f |.5,4)"Th|is optio|
|00002c30| 6e 20 61 6c 6c 6f 77 73 | 20 79 6f 75 20 74 6f 20 |n allows| you to |
|00002c40| 63 6f 6e 76 65 72 74 20 | 61 20 70 72 65 76 69 6f |convert |a previo|
|00002c50| 73 6c 79 20 73 61 76 65 | 64 20 41 53 43 49 49 20 |sly save|d ASCII |
|00002c60| 70 75 72 65 20 66 69 6c | 65 22 0d 11 9e 49 f1 8a |pure fil|e"...I..|
|00002c70| 35 2c 36 29 22 74 6f 20 | 61 20 50 73 69 6f 6e 20 |5,6)"to |a Psion |
|00002c80| 64 61 74 61 20 66 69 6c | 65 20 66 6f 72 20 6c 6f |data fil|e for lo|
|00002c90| 61 64 69 6e 67 20 62 61 | 63 6b 20 69 6e 74 6f 20 |ading ba|ck into |
|00002ca0| 61 20 50 73 69 6f 6e 20 | 4f 72 67 61 6e 69 73 65 |a Psion |Organise|
|00002cb0| 72 2e 22 0d 11 a8 3b f1 | 8a 35 2c 38 29 22 54 68 |r."...;.|.5,8)"Th|
|00002cc0| 65 20 6f 72 69 67 69 6e | 61 6c 20 41 53 43 49 49 |e origin|al ASCII|
|00002cd0| 20 66 69 6c 65 20 77 69 | 6c 6c 20 62 65 20 6c 65 | file wi|ll be le|
|00002ce0| 66 74 20 75 6e 63 68 61 | 6e 67 65 64 21 22 0d 11 |ft uncha|nged!"..|
|00002cf0| b2 07 fb 31 35 0d 11 bc | 3c f2 63 65 6e 74 72 65 |...15...|<.centre|
|00002d00| 28 22 45 6e 74 65 72 20 | 66 69 6c 65 6e 61 6d 65 |("Enter |filename|
|00002d10| 20 6f 66 20 74 68 65 20 | 64 61 74 61 20 74 6f 20 | of the |data to |
|00002d20| 62 65 20 63 6f 6e 76 65 | 72 74 65 64 22 2c 31 32 |be conve|rted",12|
|00002d30| 29 0d 11 c6 0a f2 73 70 | 61 63 65 0d 11 d0 05 e1 |).....sp|ace.....|
|00002d40| 0d 11 da 05 3a 0d 11 e4 | 26 dd f2 54 69 6d 65 5f |....:...|&..Time_|
|00002d50| 44 61 74 65 28 6e 61 6d | 65 24 2c f8 20 64 61 74 |Date(nam|e$,. dat|
|00002d60| 65 24 2c f8 20 74 79 70 | 65 24 29 0d 11 ee 13 24 |e$,. typ|e$)....$|
|00002d70| 62 6c 6f 63 6b 3d 6e 61 | 6d 65 24 2b bd 30 0d 11 |block=na|me$+.0..|
|00002d80| f8 0a 72 30 3d 26 30 35 | 0d 12 02 0c 72 31 3d 62 |..r0=&05|....r1=b|
|00002d90| 6c 6f 63 6b 0d 12 0c 05 | 3a 0d 12 16 2a c8 99 20 |lock....|:...*.. |
|00002da0| 22 4f 53 5f 46 69 6c 65 | 22 2c 72 30 2c 72 31 20 |"OS_File|",r0,r1 |
|00002db0| b8 20 72 30 2c 72 31 2c | 72 32 2c 72 33 2c 72 34 |. r0,r1,|r2,r3,r4|
|00002dc0| 2c 72 35 0d 12 20 05 3a | 0d 12 2a 14 74 65 6d 70 |,r5.. .:|..*.temp|
|00002dd0| 3d 72 32 20 80 20 26 46 | 46 46 30 30 0d 12 34 14 |=r2 . &F|FF00..4.|
|00002de0| 74 79 70 65 24 3d c0 c3 | 7e 74 65 6d 70 2c 33 29 |type$=..|~temp,3)|
|00002df0| 0d 12 3e 12 6d 73 62 3d | 28 72 32 20 80 20 26 46 |..>.msb=|(r2 . &F|
|00002e00| 46 29 0d 12 48 0e 62 6c | 6f 63 6b 21 30 3d 72 33 |F)..H.bl|ock!0=r3|
|00002e10| 0d 12 52 0f 62 6c 6f 63 | 6b 3f 34 3d 6d 73 62 0d |..R.bloc|k?4=msb.|
|00002e20| 12 5c 0c 72 30 3d 62 6c | 6f 63 6b 0d 12 66 0f 72 |.\.r0=bl|ock..f.r|
|00002e30| 31 3d 62 6c 6f 63 6b 2b | 35 30 0d 12 70 09 72 32 |1=block+|50..p.r2|
|00002e40| 3d 33 30 0d 12 7a 05 3a | 0d 12 84 3a c8 99 20 22 |=30..z.:|...:.. "|
|00002e50| 4f 53 5f 43 6f 6e 76 65 | 72 74 53 74 61 6e 64 61 |OS_Conve|rtStanda|
|00002e60| 72 64 44 61 74 65 41 6e | 64 54 69 6d 65 22 2c 72 |rdDateAn|dTime",r|
|00002e70| 30 2c 72 31 2c 72 32 20 | b8 20 72 30 2c 72 31 2c |0,r1,r2 |. r0,r1,|
|00002e80| 72 32 0d 12 8e 05 3a 0d | 12 98 0c 64 61 74 65 24 |r2....:.|...date$|
|00002e90| 3d 22 22 0d 12 a2 11 e3 | 49 25 3d 30 b8 28 32 39 |="".....|I%=0.(29|
|00002ea0| 2d 72 32 29 0d 12 ac 0f | 54 25 3d 3f 28 49 25 2b |-r2)....|T%=?(I%+|
|00002eb0| 72 30 29 0d 12 b6 13 64 | 61 74 65 24 3d 64 61 74 |r0)....d|ate$=dat|
|00002ec0| 65 24 2b bd 54 25 0d 12 | c0 05 ed 0d 12 ca 05 e1 |e$+.T%..|........|
|00002ed0| 0d 12 d4 05 3a 0d 12 de | 25 dc 20 22 50 73 69 6f |....:...|%. "Psio|
|00002ee0| 6e 20 54 6f 20 41 72 63 | 68 69 6d 65 64 65 73 20 |n To Arc|himedes |
|00002ef0| 54 72 61 6e 73 66 65 72 | 2e 22 0d 12 e8 25 dc 20 |Transfer|."...%. |
|00002f00| 22 41 72 63 68 69 6d 65 | 64 65 73 20 54 6f 20 50 |"Archime|des To P|
|00002f10| 73 69 6f 6e 20 54 72 61 | 6e 73 66 65 72 2e 22 0d |sion Tra|nsfer.".|
|00002f20| 12 f2 21 dc 20 22 50 72 | 69 6e 74 2f 44 69 73 70 |..!. "Pr|int/Disp|
|00002f30| 6c 61 79 20 53 61 76 65 | 64 20 46 69 6c 65 2e 22 |lay Save|d File."|
|00002f40| 0d 12 fc 1e dc 20 22 43 | 6f 6e 76 65 72 74 20 74 |..... "C|onvert t|
|00002f50| 6f 20 41 53 43 49 49 20 | 66 69 6c 65 2e 22 0d 13 |o ASCII |file."..|
|00002f60| 06 26 f4 20 4f 70 74 69 | 6f 6e 20 64 6f 65 73 20 |.&. Opti|on does |
|00002f70| 6e 6f 74 20 77 6f 72 6b | 20 73 6f 20 52 45 4d 20 |not work| so REM |
|00002f80| 6f 75 74 21 0d 13 10 25 | f4 20 44 41 54 41 20 22 |out!...%|. DATA "|
|00002f90| 43 6f 6e 76 65 72 74 20 | 66 72 6f 6d 20 41 53 43 |Convert |from ASC|
|00002fa0| 49 49 20 66 69 6c 65 2e | 22 0d 13 1a 0d dc 20 22 |II file.|"..... "|
|00002fb0| 48 65 6c 70 2e 22 0d 13 | 24 12 dc 20 22 2a 20 43 |Help."..|$.. "* C|
|00002fc0| 6f 6d 6d 61 6e 64 2e 22 | 0d 13 2e 0d dc 20 22 45 |ommand."|..... "E|
|00002fd0| 78 69 74 2e 22 0d ff 46 | 69 6c 65 44 61 74 61 82 |xit."..F|ileData.|
|00002fe0| 21 53 70 72 69 74 65 73 | 00 ff ff d0 06 00 00 41 |!Sprites|.......A|
|00002ff0| f9 ff ff c5 1c ec aa 03 | 00 c5 c6 03 00 00 00 10 |........|........|
|00003000| 00 00 00 d4 06 00 00 d4 | 02 00 00 21 70 73 69 6f |........|...!psio|
|00003010| 6e 00 00 00 00 00 00 04 | 00 00 00 10 00 00 00 00 |n.......|........|
|00003020| 00 00 00 07 00 00 00 2c | 00 00 00 80 01 00 00 0c |.......,|........|
|00003030| 00 00 00 00 e0 ee ee ee | ee ee 00 00 00 00 00 00 |........|........|
|00003040| 00 00 00 00 00 00 00 00 | e0 fe ff ff ff ee 00 00 |........|........|
|00003050| 00 00 00 00 00 00 00 00 | 00 00 00 00 e0 fe ff ff |........|........|
|00003060| ff ee 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003070| e0 fe ff ff ff ee 00 00 | 77 77 77 07 00 00 00 00 |........|www.....|
|00003080| 00 00 00 00 e0 ee ee ee | ee ee 77 77 07 00 70 07 |........|..ww..p.|
|00003090| 00 00 00 00 00 00 00 e0 | ee 2e 22 22 22 e2 ee 0e |........|.."""...|
|000030a0| 00 70 77 07 00 00 00 00 | 00 00 00 e0 ee ee ee ee |.pw.....|........|
|000030b0| ee ee ee 0e 00 70 77 77 | 00 00 00 00 00 00 00 e0 |.....pww|........|
|000030c0| ee ee ee ee ee ee ee 0e | 00 00 77 77 07 00 00 00 |........|..ww....|
|000030d0| 00 00 00 00 20 02 00 00 | 00 00 00 00 d0 dd dd dd |.... ...|........|
|000030e0| dd dd 00 00 00 00 00 ee | ee ee ee ee ee ee ee 0e |........|........|
|000030f0| d0 2d 22 22 22 dd 00 00 | 00 00 00 ee ee ee ee ee |.-"""...|........|
|00003100| ee ee ee 0e d0 2d 22 22 | 22 dd 00 00 00 00 00 00 |.....-""|".......|
|00003110| 00 00 00 00 00 00 00 00 | d0 dd dd dd dd dd 00 00 |........|........|
|00003120| 00 00 00 00 00 00 00 00 | 00 00 00 00 d0 dd dd dd |........|........|
|00003130| dd dd 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003140| d0 dd dd dd dd dd 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003150| 00 00 00 00 d0 dd dd dd | dd dd 00 00 00 00 00 00 |........|........|
|00003160| 00 00 00 00 00 00 00 00 | d0 dd dd dd dd dd 00 00 |........|........|
|00003170| 00 00 00 00 00 00 00 00 | 00 00 00 00 d0 dd dd dd |........|........|
|00003180| dd dd 00 00 00 00 00 00 | f0 ff ff ff ff ff 00 00 |........|........|
|00003190| 00 00 00 00 00 00 00 00 | ff ff ff 00 f0 ff ff ff |........|........|
|000031a0| ff ff 00 00 00 00 00 00 | 00 00 00 00 ff ff ff 00 |........|........|
|000031b0| f0 ff ff ff ff ff 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000031c0| ff ff ff 00 f0 ff ff ff | ff ff 00 00 ff ff ff 00 |........|........|
|000031d0| 00 00 00 00 ff ff ff 00 | f0 ff ff ff ff ff ff ff |........|........|
|000031e0| 00 00 00 0f 00 00 00 00 | ff ff ff 00 00 00 00 00 |........|........|
|000031f0| 00 00 00 00 00 00 00 0f | 00 00 00 00 ff ff ff f0 |........|........|
|00003200| ff ff ff ff ff ff ff 0f | 00 00 f0 ff 00 00 00 00 |........|........|
|00003210| ff ff ff f0 ff ff ff ff | ff ff ff 0f 00 00 ff ff |........|........|
|00003220| 0f 00 00 00 ff ff ff 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003230| f0 ff ff ff ff ff 00 00 | ff ff ff f0 ff ff ff ff |........|........|
|00003240| ff ff ff 0f f0 ff ff ff | ff ff 00 00 ff ff ff f0 |........|........|
|00003250| ff ff ff ff ff ff ff 0f | f0 ff ff ff ff ff 00 00 |........|........|
|00003260| ff ff ff 00 00 00 00 00 | 00 00 00 00 f0 ff ff ff |........|........|
|00003270| ff ff 00 00 ff ff ff 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003280| f0 ff ff ff ff ff 00 00 | ff ff ff 00 00 00 00 00 |........|........|
|00003290| 00 00 00 00 f0 ff ff ff | ff ff 00 00 ff ff ff 00 |........|........|
|000032a0| 00 00 00 00 00 00 00 00 | f0 ff ff ff ff ff 00 00 |........|........|
|000032b0| ff ff ff 00 00 00 00 00 | 00 00 00 00 f0 ff ff ff |........|........|
|000032c0| ff ff 00 00 ff ff ff 00 | 00 00 00 00 00 00 00 00 |........|........|
|000032d0| f0 ff ff ff ff ff 00 00 | ff ff ff d4 02 00 00 66 |........|.......f|
|000032e0| 69 6c 65 5f 37 66 66 00 | 00 00 00 04 00 00 00 10 |ile_7ff.|........|
|000032f0| 00 00 00 00 00 00 00 07 | 00 00 00 2c 00 00 00 80 |........|...,....|
|00003300| 01 00 00 0c 00 00 00 00 | 22 d2 0d 70 07 00 70 07 |........|"..p..p.|
|00003310| 00 00 00 00 00 00 00 00 | 00 00 00 00 dd dd dd dd |........|........|
|00003320| dd dd dd dd dd dd dd dd | dd 00 00 00 00 00 00 00 |........|........|
|00003330| dd dd dd 33 33 33 33 33 | 33 33 33 d3 dd 00 00 00 |...33333|333.....|
|00003340| 00 00 00 00 dd dd dd 33 | 33 33 33 33 33 33 33 d3 |.......3|3333333.|
|00003350| dd 00 00 00 00 00 00 00 | dd dd dd 33 33 33 33 33 |........|...33333|
|00003360| 33 33 33 d3 dd 00 00 00 | 00 00 00 00 dd dd dd dd |333.....|........|
|00003370| dd dd dd dd dd dd dd dd | dd 00 00 00 00 00 00 00 |........|........|
|00003380| dd dd 9d 99 99 99 99 99 | 99 99 99 99 dd 00 00 00 |........|........|
|00003390| 00 00 00 00 ff df dd dd | dd dd dd dd dd dd dd dd |........|........|
|000033a0| dd 00 00 00 00 00 00 00 | 00 d0 dd dd dd dd dd dd |........|........|
|000033b0| dd dd dd dd dd 00 00 00 | 00 00 00 00 00 d0 dd dd |........|........|
|000033c0| dd dd dd dd dd dd dd dd | dd 00 00 00 00 00 00 00 |........|........|
|000033d0| 00 d0 dd dd dd dd dd dd | dd dd dd dd dd 00 00 00 |........|........|
|000033e0| 00 00 00 00 00 d0 dd dd | dd dd dd dd dd dd dd dd |........|........|
|000033f0| dd 00 00 00 00 00 00 00 | 00 d0 dd dd dd dd dd dd |........|........|
|00003400| dd dd dd dd dd 00 00 00 | 00 00 00 00 00 d0 dd dd |........|........|
|00003410| dd dd dd dd dd dd dd dd | dd 00 00 00 00 00 00 00 |........|........|
|00003420| 00 d0 dd dd dd dd dd dd | dd dd dd dd dd 00 00 00 |........|........|
|00003430| 00 00 00 00 00 d0 dd dd | dd dd dd dd dd dd dd dd |........|........|
|00003440| dd 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003450| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003460| 00 00 00 00 00 00 00 00 | 00 00 00 00 ff ff ff 00 |........|........|
|00003470| 00 00 ff ff ff ff ff ff | ff ff ff ff 0f 00 00 00 |........|........|
|00003480| ff ff ff 00 00 00 ff ff | ff ff ff ff ff ff ff ff |........|........|
|00003490| 0f 00 00 00 ff ff ff 00 | 00 00 ff ff ff ff ff ff |........|........|
|000034a0| ff ff ff ff 0f 00 00 00 | ff ff ff 00 00 00 ff ff |........|........|
|000034b0| ff ff ff ff ff ff ff ff | 0f 00 00 00 ff ff ff 00 |........|........|
|000034c0| 00 00 ff ff ff ff ff ff | ff ff ff ff 0f 00 00 00 |........|........|
|000034d0| ff ff ff 00 00 00 ff ff | ff ff ff ff ff ff ff ff |........|........|
|000034e0| 0f 00 00 00 ff ff ff 00 | 00 00 ff ff ff ff ff ff |........|........|
|000034f0| ff ff ff ff 0f 00 00 00 | ff ff ff 00 00 00 ff ff |........|........|
|00003500| ff ff ff ff ff ff ff ff | 0f 00 00 00 ff ff ff 00 |........|........|
|00003510| 00 00 ff ff ff ff ff ff | ff ff ff ff 0f 00 00 00 |........|........|
|00003520| ff ff ff 00 00 00 ff ff | ff ff ff ff ff ff ff ff |........|........|
|00003530| 0f 00 00 00 ff ff ff 00 | 00 00 ff ff ff ff ff ff |........|........|
|00003540| ff ff ff ff 0f 00 00 00 | ff ff ff 00 00 00 ff ff |........|........|
|00003550| ff ff ff ff ff ff ff ff | 0f 00 00 00 ff ff ff 00 |........|........|
|00003560| 00 00 ff ff ff ff ff ff | ff ff ff ff 0f 00 00 00 |........|........|
|00003570| ff ff ff 00 00 00 ff ff | ff ff ff ff ff ff ff ff |........|........|
|00003580| 0f 00 00 00 ff ff ff 00 | 00 00 ff ff ff ff ff ff |........|........|
|00003590| ff ff ff ff 0f 00 00 00 | ff ff ff 00 00 00 00 00 |........|........|
|000035a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 ff ff ff 1c |........|........|
|000035b0| 01 00 00 73 6d 21 70 73 | 69 6f 6e 00 00 00 00 02 |...sm!ps|ion.....|
|000035c0| 00 00 00 09 00 00 00 00 | 00 00 00 0b 00 00 00 2c |........|.......,|
|000035d0| 00 00 00 a4 00 00 00 0c | 00 00 00 00 dd dd dd dd |........|........|
|000035e0| dd dd dd 0d 00 00 00 00 | 3d 33 33 33 33 33 33 0d |........|=333333.|
|000035f0| 00 00 00 00 3d 33 33 33 | 33 33 33 0d 00 00 00 00 |....=333|333.....|
|00003600| 9d 99 99 99 99 99 99 0d | 00 00 00 00 dd dd dd dd |........|........|
|00003610| dd dd dd 0d 00 00 00 00 | dd dd dd dd dd dd dd 0d |........|........|
|00003620| 00 00 00 00 dd dd dd dd | dd dd dd 0d 00 00 00 00 |........|........|
|00003630| dd dd dd dd dd dd dd 0d | 00 00 00 00 dd dd dd dd |........|........|
|00003640| dd dd dd 0d 00 00 00 00 | dd dd dd dd dd dd dd 0d |........|........|
|00003650| 00 00 00 00 ff ff ff ff | ff ff ff 0f f0 ff ff 00 |........|........|
|00003660| ff ff ff ff ff ff ff 0f | f0 ff ff 00 ff ff ff ff |........|........|
|00003670| ff ff ff 0f f0 ff ff 00 | ff ff ff ff ff ff ff 0f |........|........|
|00003680| f0 ff ff 00 ff ff ff ff | ff ff ff 0f f0 ff ff 00 |........|........|
|00003690| ff ff ff ff ff ff ff 0f | f0 ff ff 00 ff ff ff ff |........|........|
|000036a0| ff ff ff 0f f0 ff ff 00 | ff ff ff ff ff ff ff 0f |........|........|
|000036b0| f0 ff ff 00 ff ff ff ff | ff ff ff 0f f0 ff ff 00 |........|........|
|000036c0| ff ff ff ff ff ff ff 0f | 00 00 00 46 69 6c 65 44 |........|...FileD|
|000036d0| 61 74 61 82 3f 50 73 69 | 6f 6e 00 ff ff ff ff bd |ata.?Psi|on......|
|000036e0| 1f 00 00 41 ff ff ff 87 | e8 0d e4 03 00 87 23 20 |...A....|......# |
|000036f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003700| 20 20 20 20 20 20 20 20 | 20 49 6e 74 72 6f 64 75 | | Introdu|
|00003710| 63 74 69 6f 6e 0a 0a 54 | 68 69 73 20 70 72 6f 67 |ction..T|his prog|
|00003720| 72 61 6d 20 20 61 6c 6c | 6f 77 73 20 79 6f 75 20 |ram all|ows you |
|00003730| 74 6f 20 63 6f 6e 6e 65 | 63 74 20 79 6f 75 72 20 |to conne|ct your |
|00003740| 50 73 69 6f 6e 20 4f 72 | 67 61 6e 69 73 65 72 20 |Psion Or|ganiser |
|00003750| 49 49 2c 20 76 69 61 20 | 0a 74 68 65 20 52 53 32 |II, via |.the RS2|
|00003760| 33 32 20 43 6f 6d 6d 73 | 20 4c 69 6e 6b 20 70 61 |32 Comms| Link pa|
|00003770| 63 6b 61 67 65 20 66 72 | 6f 6d 20 50 73 69 6f 6e |ckage fr|om Psion|
|00003780| 20 74 6f 20 61 6e 79 20 | 6d 6f 64 65 6c 20 69 6e | to any |model in|
|00003790| 20 74 68 65 20 41 63 6f | 72 6e 20 0a 41 72 63 68 | the Aco|rn .Arch|
|000037a0| 69 6d 65 64 65 73 20 63 | 6f 6d 70 75 74 65 72 20 |imedes c|omputer |
|000037b0| 72 61 6e 67 65 2e 20 28 | 54 68 65 20 41 33 30 30 |range. (|The A300|
|000037c0| 30 20 77 69 6c 6c 20 72 | 65 71 75 69 72 65 20 74 |0 will r|equire t|
|000037d0| 68 65 20 52 53 32 33 32 | 0a 73 65 72 69 61 6c 20 |he RS232|.serial |
|000037e0| 70 6f 72 74 20 75 70 67 | 72 61 64 65 29 0a 0a 54 |port upg|rade)..T|
|000037f0| 68 65 20 20 70 72 6f 67 | 72 61 6d 20 61 6c 6c 6f |he prog|ram allo|
|00003800| 77 73 20 79 6f 75 20 74 | 72 61 6e 73 66 65 72 20 |ws you t|ransfer |
|00003810| 66 69 6c 65 73 20 28 44 | 61 74 61 20 61 6e 64 20 |files (D|ata and |
|00003820| 20 50 72 6f 63 65 64 75 | 72 65 73 29 20 20 74 6f | Procedu|res) to|
|00003830| 20 0a 61 6e 64 20 66 72 | 6f 6d 20 79 6f 75 72 20 | .and fr|om your |
|00003840| 50 73 69 6f 6e 20 61 6e | 64 20 41 72 63 68 69 6d |Psion an|d Archim|
|00003850| 65 64 65 73 2e 0a 0a 54 | 68 69 73 20 20 70 72 6f |edes...T|his pro|
|00003860| 76 69 64 65 73 20 61 20 | 73 69 6d 70 6c 65 20 77 |vides a |simple w|
|00003870| 61 79 20 74 6f 20 62 61 | 63 6b 75 70 20 76 61 6c |ay to ba|ckup val|
|00003880| 75 61 62 6c 65 20 64 61 | 74 61 20 68 65 6c 64 20 |uable da|ta held |
|00003890| 6f 6e 20 20 79 6f 75 72 | 20 0a 4f 72 67 61 6e 69 |on your| .Organi|
|000038a0| 73 65 72 20 74 6f 20 76 | 65 72 79 20 73 61 66 65 |ser to v|ery safe|
|000038b0| 20 61 20 72 65 6c 69 61 | 62 6c 65 20 73 74 6f 72 | a relia|ble stor|
|000038c0| 61 67 65 20 6d 65 64 69 | 75 6d 2e 0a 0a 57 68 69 |age medi|um...Whi|
|000038d0| 6c 65 20 79 6f 75 72 20 | 64 61 74 61 20 69 73 20 |le your |data is |
|000038e0| 68 65 6c 64 20 6f 6e 20 | 64 69 73 63 20 79 6f 75 |held on |disc you|
|000038f0| 20 63 6f 75 6c 64 20 73 | 61 66 65 6c 79 20 63 68 | could s|afely ch|
|00003900| 61 6e 67 65 20 62 61 74 | 74 65 72 69 65 73 20 0a |ange bat|teries .|
|00003910| 6f 72 20 20 65 72 61 73 | 65 20 20 61 20 20 64 61 |or eras|e a da|
|00003920| 74 61 20 70 61 63 6b 2c | 20 20 61 6e 64 20 74 68 |ta pack,| and th|
|00003930| 65 6e 20 72 65 6c 6f 61 | 64 20 79 6f 75 72 20 20 |en reloa|d your |
|00003940| 50 73 69 6f 6e 20 20 61 | 66 74 65 72 20 20 74 68 |Psion a|fter th|
|00003950| 65 20 0a 6f 70 65 72 61 | 74 69 6f 6e 20 69 73 20 |e .opera|tion is |
|00003960| 63 6f 6d 70 6c 65 74 65 | 64 2e 0a 0a 20 20 20 0a |complete|d... .|
|00003970| 4e 6f 77 20 66 6f 72 20 | 73 6f 6d 65 20 6e 6f 74 |Now for |some not|
|00003980| 65 73 20 6f 6e 20 68 6f | 77 20 74 6f 20 75 73 65 |es on ho|w to use|
|00003990| 20 74 68 69 73 20 70 72 | 6f 67 72 61 6d 2c 20 69 | this pr|ogram, i|
|000039a0| 74 20 69 73 20 76 65 72 | 79 20 65 61 73 79 20 74 |t is ver|y easy t|
|000039b0| 6f 20 0a 75 73 65 2c 20 | 65 6d 70 6c 6f 79 69 6e |o .use, |employin|
|000039c0| 67 20 61 20 73 69 6d 70 | 6c 79 20 6d 65 6e 75 20 |g a simp|ly menu |
|000039d0| 73 79 73 74 65 6d 20 74 | 6f 20 75 73 65 20 74 68 |system t|o use th|
|000039e0| 65 20 76 61 72 69 6f 75 | 73 20 66 65 61 74 75 72 |e variou|s featur|
|000039f0| 65 73 2e 0a 0a 54 68 69 | 73 20 20 6d 61 6e 75 61 |es...Thi|s manua|
|00003a00| 6c 20 20 75 73 65 73 20 | 20 74 68 65 20 20 66 6f |l uses | the fo|
|00003a10| 6c 6c 6f 77 69 6e 67 20 | 20 63 6f 6e 76 65 6e 74 |llowing | convent|
|00003a20| 69 6f 6e 2c 20 20 20 69 | 66 20 20 61 20 20 77 6f |ion, i|f a wo|
|00003a30| 72 64 20 20 69 73 20 0a | 73 75 72 72 6f 75 6e 64 |rd is .|surround|
|00003a40| 65 64 20 20 62 79 20 20 | 3c 20 3e 20 20 69 74 20 |ed by |< > it |
|00003a50| 6d 65 61 6e 73 20 70 72 | 65 73 73 20 74 68 61 74 |means pr|ess that|
|00003a60| 20 70 61 72 74 69 63 75 | 6c 61 72 20 20 6b 65 79 | particu|lar key|
|00003a70| 20 20 6f 6e 20 20 74 68 | 65 20 0a 41 72 63 68 69 | on th|e .Archi|
|00003a80| 6d 65 64 65 73 20 6b 65 | 79 62 6f 61 72 64 2e 0a |medes ke|yboard..|
|00003a90| 0a 41 6e 79 20 20 77 6f | 72 64 20 20 73 75 72 72 |.Any wo|rd surr|
|00003aa0| 6f 75 6e 64 65 64 20 62 | 79 20 7b 20 7d 20 6d 65 |ounded b|y { } me|
|00003ab0| 61 6e 73 20 73 65 6c 65 | 63 74 20 74 68 61 74 20 |ans sele|ct that |
|00003ac0| 20 66 75 6e 63 74 69 6f | 6e 20 20 6f 6e 20 20 74 | functio|n on t|
|00003ad0| 68 65 20 0a 50 73 69 6f | 6e 20 62 79 20 70 72 65 |he .Psio|n by pre|
|00003ae0| 73 73 69 6e 67 20 74 68 | 65 20 45 58 45 20 6b 65 |ssing th|e EXE ke|
|00003af0| 79 20 6f 6e 20 74 68 65 | 20 4f 72 67 61 6e 69 73 |y on the| Organis|
|00003b00| 65 72 20 6b 65 79 70 61 | 64 2e 0a 0a 50 72 65 73 |er keypa|d...Pres|
|00003b10| 73 69 6e 67 20 74 68 65 | 20 3c 45 53 43 41 50 45 |sing the| <ESCAPE|
|00003b20| 3e 20 6b 65 79 20 61 74 | 20 61 6e 79 20 74 69 6d |> key at| any tim|
|00003b30| 65 20 77 69 6c 6c 20 72 | 65 74 75 72 6e 20 79 6f |e will r|eturn yo|
|00003b40| 75 20 74 6f 20 74 68 65 | 20 6d 61 69 6e 20 0a 6d |u to the| main .m|
|00003b50| 65 6e 75 20 6f 66 20 74 | 68 65 20 70 72 6f 67 72 |enu of t|he progr|
|00003b60| 61 6d 2e 0a 0a 49 6d 70 | 6f 72 74 61 6e 74 20 4e |am...Imp|ortant N|
|00003b70| 6f 74 65 73 2e 0a 0a 54 | 68 65 20 6f 6e 6c 79 20 |otes...T|he only |
|00003b80| 6c 69 6d 69 74 61 74 69 | 6f 6e 20 74 6f 20 74 68 |limitati|on to th|
|00003b90| 65 20 70 61 63 6b 61 67 | 65 20 69 73 20 74 68 61 |e packag|e is tha|
|00003ba0| 74 20 70 72 6f 63 65 64 | 75 72 65 73 20 77 72 69 |t proced|ures wri|
|00003bb0| 74 74 65 6e 20 20 6f 6e | 20 0a 74 68 65 20 20 50 |tten on| .the P|
|00003bc0| 73 69 6f 6e 20 20 61 72 | 65 20 63 61 6e 20 6f 6e |sion ar|e can on|
|00003bd0| 6c 79 20 62 65 20 74 72 | 61 6e 73 66 65 72 72 65 |ly be tr|ansferre|
|00003be0| 64 20 69 6e 20 20 74 68 | 65 72 65 20 20 6e 6f 6e |d in th|ere non|
|00003bf0| 2d 74 72 61 6e 73 6c 61 | 74 65 64 20 0a 66 6f 72 |-transla|ted .for|
|00003c00| 6d 20 20 28 53 6f 75 72 | 63 65 20 20 63 6f 64 65 |m (Sour|ce code|
|00003c10| 29 2e 0a 54 68 69 73 20 | 20 6d 65 61 6e 73 20 74 |)..This | means t|
|00003c20| 68 61 74 20 79 6f 75 20 | 6d 75 73 74 20 74 72 61 |hat you |must tra|
|00003c30| 6e 73 66 65 72 20 74 68 | 65 20 70 72 6f 63 65 64 |nsfer th|e proced|
|00003c40| 75 72 65 20 63 6f 64 65 | 20 62 65 66 6f 72 65 20 |ure code| before |
|00003c50| 20 79 6f 75 20 0a 64 65 | 6c 65 74 65 20 74 68 65 | you .de|lete the|
|00003c60| 20 73 6f 75 72 63 65 20 | 63 6f 64 65 20 61 6e 64 | source |code and|
|00003c70| 20 6a 75 73 74 20 6b 65 | 65 70 20 74 68 65 20 6f | just ke|ep the o|
|00003c80| 62 6a 65 63 74 20 63 6f | 64 65 2e 0a 57 68 65 6e |bject co|de..When|
|00003c90| 20 20 79 6f 75 20 63 6f | 6d 65 20 74 6f 20 72 65 | you co|me to re|
|00003ca0| 6c 6f 61 64 20 74 68 65 | 20 4f 72 67 61 6e 69 73 |load the| Organis|
|00003cb0| 65 72 20 79 6f 75 20 6d | 75 73 74 20 20 7b 54 52 |er you m|ust {TR|
|00003cc0| 41 4e 53 6c 61 74 65 7d | 20 20 74 68 65 20 0a 70 |ANSlate}| the .p|
|00003cd0| 72 6f 63 65 64 75 72 65 | 20 74 6f 20 4f 50 4c 20 |rocedure| to OPL |
|00003ce0| 62 65 66 6f 72 65 20 75 | 73 69 6e 67 20 69 74 2e |before u|sing it.|
|00003cf0| 0a 20 0a 54 68 69 73 20 | 20 70 61 63 6b 61 67 65 |. .This | package|
|00003d00| 20 20 77 69 6c 6c 20 20 | 77 6f 72 6b 20 20 77 69 | will |work wi|
|00003d10| 74 68 20 61 20 20 50 73 | 69 6f 6e 20 20 4f 72 67 |th a Ps|ion Org|
|00003d20| 61 6e 69 73 65 72 20 20 | 49 49 20 20 61 6e 64 20 |aniser |II and |
|00003d30| 20 61 6e 79 20 0a 41 72 | 63 68 69 6d 65 64 65 73 | any .Ar|chimedes|
|00003d40| 20 63 6f 6d 70 75 74 65 | 72 2c 20 69 74 20 64 6f | compute|r, it do|
|00003d50| 65 73 20 68 6f 77 20 65 | 76 65 72 20 72 65 71 75 |es how e|ver requ|
|00003d60| 69 72 65 20 61 6e 20 61 | 64 61 70 74 6f 72 20 63 |ire an a|daptor c|
|00003d70| 61 62 6c 65 20 74 6f 20 | 0a 6a 6f 69 6e 20 20 74 |able to |.join t|
|00003d80| 68 65 20 74 77 6f 20 75 | 6e 69 74 73 20 74 6f 67 |he two u|nits tog|
|00003d90| 65 74 68 65 72 2e 20 20 | 53 65 65 20 74 68 65 20 |ether. |See the |
|00003da0| 73 65 63 74 69 6f 6e 20 | 43 41 42 4c 45 20 4c 41 |section |CABLE LA|
|00003db0| 59 4f 55 54 20 20 65 6c | 73 65 20 0a 77 61 72 65 |YOUT el|se .ware|
|00003dc0| 20 66 6f 72 20 74 68 65 | 20 63 6f 72 72 65 63 74 | for the| correct|
|00003dd0| 20 74 79 70 65 20 6f 66 | 20 63 61 62 6c 65 20 6e | type of| cable n|
|00003de0| 65 65 64 65 64 2e 0a 0a | 20 20 20 20 20 20 20 20 |eeded...| |
|00003df0| 20 20 20 20 20 20 20 20 | 20 20 50 73 69 6f 6e 20 | | Psion |
|00003e00| 54 6f 20 41 72 63 68 69 | 6d 65 64 65 73 20 54 72 |To Archi|medes Tr|
|00003e10| 61 6e 73 66 65 72 0a 0a | 4f 70 74 69 6f 6e 20 20 |ansfer..|Option |
|00003e20| 31 20 20 61 6c 6c 6f 77 | 73 20 20 74 6f 20 20 74 |1 allow|s to t|
|00003e30| 72 61 6e 73 66 65 72 20 | 66 69 6c 65 73 20 66 6f |ransfer |files fo|
|00003e40| 72 6d 20 20 79 6f 75 72 | 20 20 50 73 69 6f 6e 20 |rm your| Psion |
|00003e50| 20 74 6f 20 20 79 6f 75 | 72 20 0a 41 72 63 68 69 | to you|r .Archi|
|00003e60| 6d 65 64 65 73 20 63 6f | 6d 70 75 74 65 72 2e 0a |medes co|mputer..|
|00003e70| 0a 41 66 74 65 72 20 79 | 6f 75 20 68 61 76 65 20 |.After y|ou have |
|00003e80| 73 65 6c 65 63 74 65 64 | 20 74 68 69 73 20 6f 70 |selected| this op|
|00003e90| 74 69 6f 6e 20 66 72 6f | 6d 20 74 68 65 20 6d 61 |tion fro|m the ma|
|00003ea0| 69 6e 20 6d 65 6e 75 2c | 20 20 79 6f 75 20 20 61 |in menu,| you a|
|00003eb0| 72 65 20 0a 61 73 6b 65 | 64 20 74 6f 20 65 6e 74 |re .aske|d to ent|
|00003ec0| 65 72 20 61 20 66 69 6c | 65 20 6e 61 6d 65 20 66 |er a fil|e name f|
|00003ed0| 6f 72 20 74 68 65 20 64 | 61 74 61 20 74 6f 20 62 |or the d|ata to b|
|00003ee0| 65 20 73 61 76 65 64 20 | 75 6e 64 65 72 20 6f 6e |e saved |under on|
|00003ef0| 20 20 74 68 65 20 0a 64 | 69 73 6b 2e 20 54 68 65 | the .d|isk. The|
|00003f00| 20 64 65 66 61 75 6c 74 | 20 66 69 6c 65 20 6e 61 | default| file na|
|00003f10| 6d 65 20 6f 66 20 24 2e | 21 50 73 69 6f 6e 2e 44 |me of $.|!Psion.D|
|00003f20| 61 74 61 2e 4d 41 49 4e | 20 77 69 6c 6c 20 6f 6e |ata.MAIN| will on|
|00003f30| 6c 79 20 62 65 20 0a 75 | 73 65 64 20 69 66 20 79 |ly be .u|sed if y|
|00003f40| 6f 75 20 70 72 65 73 73 | 20 3c 52 45 54 55 52 4e |ou press| <RETURN|
|00003f50| 3e 20 61 74 20 74 68 65 | 20 70 72 6f 6d 70 74 2e |> at the| prompt.|
|00003f60| 0a 0a 54 68 65 20 20 70 | 72 6f 67 72 61 6d 20 77 |..The p|rogram w|
|00003f70| 69 6c 6c 20 6e 6f 77 20 | 70 61 75 73 65 20 74 6f |ill now |pause to|
|00003f80| 20 77 61 69 74 20 66 6f | 72 20 64 61 74 61 20 74 | wait fo|r data t|
|00003f90| 6f 20 61 72 72 69 76 65 | 20 66 72 6f 6d 20 20 79 |o arrive| from y|
|00003fa0| 6f 75 72 20 0a 50 73 69 | 6f 6e 20 20 4f 72 67 61 |our .Psi|on Orga|
|00003fb0| 6e 69 73 65 72 2e 20 20 | 20 4f 6e 20 20 79 6f 75 |niser. | On you|
|00003fc0| 72 20 20 6f 72 67 61 6e | 69 73 65 72 20 20 79 6f |r organ|iser yo|
|00003fd0| 75 20 20 73 68 6f 75 6c | 64 20 20 66 6f 6c 6c 6f |u shoul|d follo|
|00003fe0| 77 20 20 74 68 65 20 0a | 66 6f 6c 6c 6f 77 69 6e |w the .|followin|
|00003ff0| 67 20 70 72 6f 6d 70 74 | 73 20 3a 2d 0a 0a 20 20 |g prompt|s :-.. |
|00004000| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004010| 20 20 31 2e 53 65 6c 65 | 63 74 20 7b 43 4f 4d 4d | 1.Sele|ct {COMM|
|00004020| 53 7d 0a 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |S}. | |
|00004030| 20 20 20 20 20 20 20 32 | 2e 53 65 6c 65 63 74 20 | 2|.Select |
|00004040| 7b 54 52 41 4e 53 4d 49 | 54 7d 0a 20 20 20 20 20 |{TRANSMI|T}. |
|00004050| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 33 | | 3|
|00004060| 2e 53 65 6c 65 63 74 20 | 7b 46 49 4c 45 7d 20 6f |.Select |{FILE} o|
|00004070| 72 20 7b 50 52 4f 43 45 | 44 55 52 45 7d 0a 20 20 |r {PROCE|DURE}. |
|00004080| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004090| 20 20 0a 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | . | |
|000040a0| 20 20 20 20 20 20 20 49 | 66 20 79 6f 75 20 73 65 | I|f you se|
|000040b0| 6c 65 63 74 65 64 20 7b | 46 49 4c 45 7d 20 3a 2d |lected {|FILE} :-|
|000040c0| 0a 0a 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.. | |
|000040d0| 20 20 20 20 20 20 34 2e | 54 79 70 65 20 69 6e 20 | 4.|Type in |
|000040e0| 74 68 65 20 6e 61 6d 65 | 20 6f 66 20 74 68 65 20 |the name| of the |
|000040f0| 66 69 6c 65 20 74 6f 20 | 62 65 20 73 65 6e 74 0a |file to |be sent.|
|00004100| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004110| 20 20 20 20 20 20 6f 72 | 20 75 73 65 20 74 68 65 | or| use the|
|00004120| 20 64 65 66 61 75 6c 74 | 20 7b 4d 41 49 4e 7d 2e | default| {MAIN}.|
|00004130| 0a 0a 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.. | |
|00004140| 20 20 20 20 20 20 49 66 | 20 79 6f 75 20 73 65 6c | If| you sel|
|00004150| 65 63 74 65 64 20 7b 50 | 52 4f 43 45 44 55 52 45 |ected {P|ROCEDURE|
|00004160| 7d 20 3a 2d 0a 0a 20 20 | 20 20 20 20 20 20 20 20 |} :-.. | |
|00004170| 20 20 20 20 20 20 20 20 | 20 20 34 2e 54 79 70 65 | | 4.Type|
|00004180| 20 69 6e 20 74 68 65 20 | 6e 61 6d 65 20 6f 66 20 | in the |name of |
|00004190| 74 68 65 20 70 72 6f 67 | 72 61 6d 20 66 69 6c 65 |the prog|ram file|
|000041a0| 20 74 6f 20 62 65 20 0a | 20 20 20 20 20 20 20 20 | to be .| |
|000041b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 73 65 | | se|
|000041c0| 6e 74 2e 0a 0a 20 20 20 | 20 20 20 20 20 20 20 20 |nt... | |
|000041d0| 20 20 20 20 20 20 20 20 | 20 35 2e 50 72 65 73 73 | | 5.Press|
|000041e0| 20 20 27 43 4c 45 41 52 | 27 20 20 6f 6e 20 20 74 | 'CLEAR|' on t|
|000041f0| 68 65 20 20 50 73 69 6f | 6e 20 20 6b 65 79 70 61 |he Psio|n keypa|
|00004200| 64 20 20 20 74 6f 20 0a | 20 20 20 20 20 20 20 20 |d to .| |
|00004210| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 72 65 | | re|
|00004220| 74 75 72 6e 20 74 6f 20 | 74 68 65 20 7b 43 4f 4d |turn to |the {COM|
|00004230| 4d 53 7d 20 6d 65 6e 75 | 2e 0a 20 0a 54 68 65 20 |MS} menu|.. .The |
|00004240| 66 69 6c 65 20 6f 72 20 | 70 72 6f 63 65 64 75 72 |file or |procedur|
|00004250| 65 20 73 68 6f 75 6c 64 | 20 6e 6f 77 20 62 65 20 |e should| now be |
|00004260| 73 65 6e 74 20 74 6f 20 | 74 68 65 20 20 41 72 63 |sent to |the Arc|
|00004270| 68 69 6d 65 64 65 73 2e | 20 20 54 68 65 20 0a 64 |himedes.| The .d|
|00004280| 61 74 61 20 20 77 69 6c | 6c 20 20 61 75 74 6f 6d |ata wil|l autom|
|00004290| 61 74 69 63 61 6c 6c 79 | 20 20 62 65 20 73 61 76 |atically| be sav|
|000042a0| 65 64 20 74 6f 20 74 68 | 65 20 64 69 73 6b 20 20 |ed to th|e disk |
|000042b0| 75 6e 64 65 72 20 20 74 | 68 65 20 20 6e 61 6d 65 |under t|he name|
|000042c0| 20 0a 65 6e 74 65 72 65 | 64 20 65 61 72 6c 69 65 | .entere|d earlie|
|000042d0| 72 2e 0a 0a 57 68 65 6e | 20 20 74 68 65 20 74 72 |r...When| the tr|
|000042e0| 61 6e 73 66 65 72 20 68 | 61 73 20 62 65 65 6e 20 |ansfer h|as been |
|000042f0| 63 6f 6d 70 6c 65 74 65 | 64 20 79 6f 75 20 77 69 |complete|d you wi|
|00004300| 6c 6c 20 62 65 20 61 73 | 6b 65 64 20 74 6f 20 20 |ll be as|ked to |
|00004310| 70 72 65 73 73 20 0a 74 | 68 65 20 3c 53 50 41 43 |press .t|he <SPAC|
|00004320| 45 20 42 41 52 3e 20 74 | 6f 20 72 65 74 75 72 6e |E BAR> t|o return|
|00004330| 20 74 6f 20 74 68 65 20 | 6d 61 69 6e 20 6d 65 6e | to the |main men|
|00004340| 75 2e 0a 0a 20 20 20 20 | 20 20 20 20 20 20 20 20 |u... | |
|00004350| 20 20 20 20 20 20 41 72 | 63 68 69 6d 65 64 65 73 | Ar|chimedes|
|00004360| 20 54 6f 20 50 73 69 6f | 6e 20 54 72 61 6e 73 66 | To Psio|n Transf|
|00004370| 65 72 20 0a 0a 4f 70 74 | 69 6f 6e 20 20 32 20 20 |er ..Opt|ion 2 |
|00004380| 61 6c 6c 6f 77 73 20 20 | 79 6f 75 20 20 74 6f 20 |allows |you to |
|00004390| 20 74 72 61 6e 73 66 65 | 72 20 20 66 69 6c 65 73 | transfe|r files|
|000043a0| 20 20 74 6f 20 20 79 6f | 75 72 20 20 41 72 63 68 | to yo|ur Arch|
|000043b0| 69 6d 65 64 65 73 20 0a | 63 6f 6d 70 75 74 65 72 |imedes .|computer|
|000043c0| 20 74 6f 20 79 6f 75 72 | 20 50 73 69 6f 6e 20 4f | to your| Psion O|
|000043d0| 72 67 61 6e 69 73 65 72 | 2e 0a 0a 41 66 74 65 72 |rganiser|...After|
|000043e0| 20 79 6f 75 20 68 61 76 | 65 20 73 65 6c 65 63 74 | you hav|e select|
|000043f0| 65 64 20 74 68 69 73 20 | 6f 70 74 69 6f 6e 20 66 |ed this |option f|
|00004400| 72 6f 6d 20 74 68 65 20 | 6d 61 69 6e 20 6d 65 6e |rom the |main men|
|00004410| 75 2c 20 20 79 6f 75 20 | 77 69 6c 6c 20 0a 62 65 |u, you |will .be|
|00004420| 20 61 73 6b 65 64 20 74 | 6f 20 73 75 70 70 6c 79 | asked t|o supply|
|00004430| 20 61 20 66 69 6c 65 6e | 61 6d 65 20 66 6f 72 20 | a filen|ame for |
|00004440| 74 68 65 20 64 61 74 61 | 20 74 6f 20 62 65 20 74 |the data| to be t|
|00004450| 72 61 6e 73 66 65 72 72 | 65 64 2e 0a 54 68 65 20 |ransferr|ed..The |
|00004460| 20 70 72 6f 67 72 61 6d | 20 77 69 6c 6c 20 6e 6f | program| will no|
|00004470| 77 20 74 72 79 20 74 6f | 20 66 69 6e 64 20 74 68 |w try to| find th|
|00004480| 69 73 20 66 69 6c 65 20 | 6f 6e 20 74 68 65 20 63 |is file |on the c|
|00004490| 75 72 72 65 6e 74 20 20 | 64 69 73 6b 2e 20 0a 49 |urrent |disk. .I|
|000044a0| 66 20 20 74 68 65 20 20 | 66 69 6c 65 20 20 63 6f |f the |file co|
|000044b0| 75 6c 64 20 6e 6f 74 20 | 62 65 20 66 6f 75 6e 64 |uld not |be found|
|000044c0| 20 6f 72 20 77 61 73 20 | 6f 66 20 74 68 65 20 20 | or was |of the |
|000044d0| 77 72 6f 6e 67 20 20 74 | 79 70 65 20 20 74 68 65 |wrong t|ype the|
|000044e0| 20 0a 73 63 72 65 65 6e | 20 77 69 6c 6c 20 64 69 | .screen| will di|
|000044f0| 73 70 6c 61 79 20 74 68 | 65 20 61 70 70 72 6f 70 |splay th|e approp|
|00004500| 72 69 61 74 65 20 65 72 | 72 6f 72 20 6d 65 73 73 |riate er|ror mess|
|00004510| 61 67 65 2e 20 0a 0a 54 | 68 65 20 20 64 65 66 61 |age. ..T|he defa|
|00004520| 75 6c 74 20 66 69 6c 65 | 6e 61 6d 65 20 6f 66 20 |ult file|name of |
|00004530| 24 2e 21 50 73 69 6f 6e | 2e 44 61 74 61 2e 4d 41 |$.!Psion|.Data.MA|
|00004540| 49 4e 20 20 77 69 6c 6c | 20 6f 6e 6c 79 20 62 65 |IN will| only be|
|00004550| 20 20 75 73 65 64 20 69 | 66 20 0a 79 6f 75 20 70 | used i|f .you p|
|00004560| 72 65 73 73 20 3c 52 45 | 54 55 52 4e 3e 20 61 74 |ress <RE|TURN> at|
|00004570| 20 74 68 65 20 70 72 6f | 6d 70 74 2e 0a 0a 59 6f | the pro|mpt...Yo|
|00004580| 75 72 20 20 50 73 69 6f | 6e 20 20 4f 72 67 61 6e |ur Psio|n Organ|
|00004590| 69 73 65 72 20 73 68 6f | 75 6c 64 20 62 65 20 73 |iser sho|uld be s|
|000045a0| 65 74 20 75 70 20 69 6e | 20 74 68 65 20 66 6f 6c |et up in| the fol|
|000045b0| 6c 6f 77 69 6e 67 20 20 | 77 61 79 20 20 62 79 20 |lowing |way by |
|000045c0| 0a 66 6f 6c 6c 6f 77 69 | 6e 67 20 74 68 65 20 70 |.followi|ng the p|
|000045d0| 72 6f 6d 70 74 73 20 3a | 2d 0a 0a 20 20 20 20 20 |rompts :|-.. |
|000045e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 31 | | 1|
|000045f0| 2e 53 65 6c 65 63 74 20 | 7b 43 4f 4d 4d 53 7d 0a |.Select |{COMMS}.|
|00004600| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004610| 20 20 20 20 32 2e 53 65 | 6c 65 63 74 20 7b 52 45 | 2.Se|lect {RE|
|00004620| 43 45 49 56 45 7d 0a 20 | 20 20 20 20 20 20 20 20 |CEIVE}. | |
|00004630| 20 20 20 20 20 20 20 20 | 20 20 20 33 2e 53 65 6c | | 3.Sel|
|00004640| 65 63 74 20 7b 46 49 4c | 45 7d 20 6f 72 20 7b 50 |ect {FIL|E} or {P|
|00004650| 52 4f 43 45 44 55 52 45 | 7d 0a 0a 20 20 20 20 20 |ROCEDURE|}.. |
|00004660| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 49 | | I|
|00004670| 46 20 79 6f 75 20 73 65 | 6c 65 63 74 65 64 20 7b |F you se|lected {|
|00004680| 46 49 4c 45 7d 20 3a 2d | 0a 0a 20 20 20 20 20 20 |FILE} :-|.. |
|00004690| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 34 2e | | 4.|
|000046a0| 53 65 6c 65 63 74 20 7b | 45 52 41 53 45 7d 20 6f |Select {|ERASE} o|
|000046b0| 72 20 7b 41 50 50 45 4e | 44 7d 0a 0a 20 20 20 20 |r {APPEN|D}.. |
|000046c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000046d0| 49 66 20 79 6f 75 20 73 | 65 6c 65 63 74 65 64 20 |If you s|elected |
|000046e0| 7b 50 52 4f 43 45 44 55 | 52 45 7d 20 3a 2d 0a 0a |{PROCEDU|RE} :-..|
|000046f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004700| 20 20 20 20 34 2e 54 79 | 70 65 20 69 6e 20 74 68 | 4.Ty|pe in th|
|00004710| 65 20 66 69 6c 65 6e 61 | 6d 65 20 66 6f 72 20 74 |e filena|me for t|
|00004720| 68 65 20 70 72 6f 63 65 | 64 75 72 65 20 74 6f 20 |he proce|dure to |
|00004730| 0a 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. | |
|00004740| 20 20 20 20 20 20 20 62 | 65 20 73 61 76 65 64 20 | b|e saved |
|00004750| 75 6e 64 65 72 2e 0a 0a | 20 20 20 20 20 20 20 20 |under...| |
|00004760| 20 20 20 20 20 20 20 20 | 20 20 20 20 35 2e 50 72 | | 5.Pr|
|00004770| 65 73 73 20 20 27 43 4c | 45 41 52 27 20 20 74 6f |ess 'CL|EAR' to|
|00004780| 20 72 65 74 75 72 6e 20 | 20 74 6f 20 20 74 68 65 | return | to the|
|00004790| 20 20 7b 43 4f 4d 4d 53 | 7d 20 0a 20 20 20 20 20 | {COMMS|} . |
|000047a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000047b0| 20 6d 65 6e 75 2e 0a 0a | 57 41 52 4e 49 4e 47 3a | menu...|WARNING:|
|000047c0| 20 20 54 68 65 20 50 73 | 69 6f 6e 20 6d 75 73 74 | The Ps|ion must|
|000047d0| 20 62 65 20 73 65 74 20 | 75 70 20 66 69 72 73 74 | be set |up first|
|000047e0| 20 62 65 66 6f 72 65 20 | 74 68 65 20 66 69 6c 65 | before |the file|
|000047f0| 20 74 72 61 6e 73 66 65 | 72 20 0a 69 73 20 20 61 | transfe|r .is a|
|00004800| 74 74 65 6d 70 74 65 64 | 20 20 6f 72 20 20 74 68 |ttempted| or th|
|00004810| 65 20 66 69 6c 65 20 74 | 72 61 6e 73 66 65 72 20 |e file t|ransfer |
|00004820| 20 6d 61 79 20 20 66 61 | 69 6c 2c 20 20 61 6e 64 | may fa|il, and|
|00004830| 20 20 6c 6f 63 6b 20 20 | 62 6f 74 68 20 0a 6d 61 | lock |both .ma|
|00004840| 63 68 69 6e 65 73 20 75 | 70 21 0a 0a 57 68 65 6e |chines u|p!..When|
|00004850| 20 20 79 6f 75 20 68 61 | 76 65 20 74 68 65 20 50 | you ha|ve the P|
|00004860| 73 69 6f 6e 20 73 65 74 | 20 75 70 20 20 72 65 61 |sion set| up rea|
|00004870| 64 79 20 74 6f 20 72 65 | 63 65 69 76 65 20 64 61 |dy to re|ceive da|
|00004880| 74 61 20 70 72 65 73 73 | 20 20 74 68 65 20 0a 3c |ta press| the .<|
|00004890| 53 50 41 43 45 20 42 41 | 52 3e 20 74 6f 20 74 72 |SPACE BA|R> to tr|
|000048a0| 61 6e 73 66 65 72 20 74 | 68 65 20 66 69 6c 65 2e |ansfer t|he file.|
|000048b0| 0a 20 20 0a 54 68 65 20 | 41 72 63 68 69 6d 65 64 |. .The |Archimed|
|000048c0| 65 73 20 77 69 6c 6c 20 | 69 6e 66 6f 72 6d 20 79 |es will |inform y|
|000048d0| 6f 75 20 77 68 65 6e 20 | 74 68 65 20 74 72 61 6e |ou when |the tran|
|000048e0| 73 66 65 72 20 69 73 20 | 63 6f 6d 70 6c 65 74 65 |sfer is |complete|
|000048f0| 20 20 61 6e 64 20 0a 61 | 73 6b 20 79 6f 75 20 74 | and .a|sk you t|
|00004900| 6f 20 70 72 65 73 73 20 | 74 68 65 20 3c 53 50 41 |o press |the <SPA|
|00004910| 43 45 20 42 41 52 3e 20 | 74 6f 20 72 65 74 75 72 |CE BAR> |to retur|
|00004920| 6e 20 74 6f 20 74 68 65 | 20 6d 61 69 6e 20 6d 65 |n to the| main me|
|00004930| 6e 75 2e 0a 0a 20 20 20 | 20 20 20 20 20 20 20 20 |nu... | |
|00004940| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004950| 50 72 69 6e 74 20 46 69 | 6c 65 0a 0a 4f 70 74 69 |Print Fi|le..Opti|
|00004960| 6f 6e 20 33 20 61 6c 6c | 6f 77 73 20 79 6f 75 20 |on 3 all|ows you |
|00004970| 74 6f 20 70 72 69 6e 74 | 20 61 20 70 72 65 76 69 |to print| a previ|
|00004980| 6f 75 73 6c 79 20 73 61 | 76 65 64 20 66 69 6c 65 |ously sa|ved file|
|00004990| 2e 0a 0a 41 66 74 65 72 | 20 79 6f 75 20 68 61 76 |...After| you hav|
|000049a0| 65 20 73 65 6c 65 63 74 | 65 64 20 74 68 69 73 20 |e select|ed this |
|000049b0| 6f 70 74 69 6f 6e 20 79 | 6f 75 20 77 69 6c 6c 20 |option y|ou will |
|000049c0| 62 65 20 61 73 6b 65 64 | 20 74 6f 20 20 70 72 6f |be asked| to pro|
|000049d0| 76 69 64 65 20 0a 61 20 | 20 66 69 6c 65 6e 61 6d |vide .a | filenam|
|000049e0| 65 20 20 6f 66 20 20 74 | 68 65 20 20 66 69 6c 65 |e of t|he file|
|000049f0| 20 74 6f 20 62 65 20 20 | 70 72 69 6e 74 65 64 20 | to be |printed |
|00004a00| 20 6f 75 74 2e 20 20 54 | 68 65 20 20 64 65 66 61 | out. T|he defa|
|00004a10| 75 6c 74 20 20 6f 66 20 | 0a 24 2e 21 50 73 69 6f |ult of |.$.!Psio|
|00004a20| 6e 2e 44 61 74 61 2e 4d | 41 49 4e 20 20 77 69 6c |n.Data.M|AIN wil|
|00004a30| 6c 20 6f 6e 6c 79 20 62 | 65 20 73 65 6c 65 63 74 |l only b|e select|
|00004a40| 65 64 20 69 66 20 79 6f | 75 20 70 72 65 73 73 20 |ed if yo|u press |
|00004a50| 3c 52 45 54 55 52 4e 3e | 20 61 74 0a 74 68 65 20 |<RETURN>| at.the |
|00004a60| 70 72 6f 6d 70 74 2e 0a | 0a 54 68 65 20 20 73 63 |prompt..|.The sc|
|00004a70| 72 65 65 6e 20 77 69 6c | 6c 20 6e 6f 77 20 61 73 |reen wil|l now as|
|00004a80| 6b 20 79 6f 75 20 77 65 | 61 74 68 65 72 20 79 6f |k you we|ather yo|
|00004a90| 75 20 77 61 6e 74 20 74 | 68 65 20 64 61 74 61 20 |u want t|he data |
|00004aa0| 20 64 69 73 70 6c 61 79 | 65 64 20 0a 6f 6e 20 74 | display|ed .on t|
|00004ab0| 68 65 20 73 63 72 65 65 | 6e 20 6f 72 20 74 68 65 |he scree|n or the|
|00004ac0| 20 70 72 69 6e 74 65 72 | 2e 54 68 65 20 64 65 66 | printer|.The def|
|00004ad0| 61 75 6c 74 20 69 6e 20 | 74 68 69 73 20 63 61 73 |ault in |this cas|
|00004ae0| 65 20 69 73 20 5b 53 5d | 20 20 74 68 65 20 0a 73 |e is [S]| the .s|
|00004af0| 63 72 65 65 6e 2c 20 20 | 74 68 69 73 20 20 77 69 |creen, |this wi|
|00004b00| 6c 6c 20 20 62 65 20 20 | 73 65 6c 65 63 74 65 64 |ll be |selected|
|00004b10| 20 69 66 20 79 6f 75 20 | 70 72 65 73 73 20 20 3c | if you |press <|
|00004b20| 52 45 54 55 52 4e 3e 20 | 20 61 74 20 20 74 68 65 |RETURN> | at the|
|00004b30| 20 0a 70 72 6f 6d 70 74 | 2e 0a 0a 54 68 65 20 64 | .prompt|...The d|
|00004b40| 61 74 61 20 66 72 6f 6d | 20 74 68 65 20 73 65 6c |ata from| the sel|
|00004b50| 65 63 74 65 64 20 66 69 | 6c 65 20 77 69 6c 6c 20 |ected fi|le will |
|00004b60| 6e 6f 77 20 62 65 20 70 | 72 69 6e 74 65 64 20 6f |now be p|rinted o|
|00004b70| 6e 20 74 68 65 20 73 63 | 72 65 65 6e 20 0a 6f 72 |n the sc|reen .or|
|00004b80| 20 74 68 65 20 70 72 69 | 6e 74 65 72 2e 0a 0a 57 | the pri|nter...W|
|00004b90| 68 65 6e 20 20 74 68 69 | 73 20 6f 70 65 72 61 74 |hen thi|s operat|
|00004ba0| 69 6f 6e 20 68 61 73 20 | 66 69 6e 69 73 68 65 64 |ion has |finished|
|00004bb0| 20 74 68 65 20 73 63 72 | 65 65 6e 20 77 69 6c 6c | the scr|een will|
|00004bc0| 20 70 72 6f 6d 70 74 20 | 20 79 6f 75 20 20 74 6f | prompt | you to|
|00004bd0| 20 0a 70 72 65 73 73 20 | 74 68 65 20 3c 53 50 41 | .press |the <SPA|
|00004be0| 43 45 20 42 41 52 3e 20 | 74 6f 20 72 65 74 75 72 |CE BAR> |to retur|
|00004bf0| 6e 20 74 6f 20 74 68 65 | 20 6d 61 69 6e 20 6d 65 |n to the| main me|
|00004c00| 6e 75 2e 0a 0a 20 20 20 | 20 20 20 20 20 20 20 20 |nu... | |
|00004c10| 20 20 20 20 20 20 20 20 | 20 20 20 43 6f 6e 76 65 | | Conve|
|00004c20| 72 74 20 46 69 6c 65 20 | 54 6f 20 41 53 43 49 49 |rt File |To ASCII|
|00004c30| 0a 0a 4f 70 74 69 6f 6e | 20 34 20 61 6c 6c 6f 77 |..Option| 4 allow|
|00004c40| 73 20 79 6f 75 20 74 6f | 20 63 6f 6e 76 65 72 74 |s you to| convert|
|00004c50| 20 61 6e 79 20 66 69 6c | 65 20 74 6f 20 41 53 43 | any fil|e to ASC|
|00004c60| 49 49 2c 20 66 6f 72 20 | 6c 6f 61 64 69 6e 67 20 |II, for |loading |
|00004c70| 69 6e 74 6f 0a 61 20 77 | 6f 72 64 20 70 72 6f 63 |into.a w|ord proc|
|00004c80| 65 73 73 6f 72 20 65 74 | 63 2e 20 41 20 64 65 66 |essor et|c. A def|
|00004c90| 61 75 6c 74 20 6e 61 6d | 65 20 6f 66 20 24 2e 21 |ault nam|e of $.!|
|00004ca0| 50 73 69 6f 6e 2e 44 61 | 74 61 2e 4d 41 49 4e 20 |Psion.Da|ta.MAIN |
|00004cb0| 69 73 0a 6f 66 66 65 72 | 65 64 20 66 6f 72 20 74 |is.offer|ed for t|
|00004cc0| 68 65 20 73 6f 75 72 63 | 65 20 6f 66 20 74 68 65 |he sourc|e of the|
|00004cd0| 20 64 61 74 61 20 66 69 | 6c 65 2e 0a 0a 41 6e 20 | data fi|le...An |
|00004ce0| 6f 75 74 70 75 74 20 6e | 61 6d 65 20 69 73 20 67 |output n|ame is g|
|00004cf0| 65 6e 65 72 61 74 65 64 | 20 69 6e 20 74 68 65 20 |enerated| in the |
|00004d00| 70 72 6f 67 72 61 6d 20 | 77 68 69 63 68 20 69 73 |program |which is|
|00004d10| 20 74 68 65 20 73 6f 75 | 72 63 65 20 0a 6e 61 6d | the sou|rce .nam|
|00004d20| 65 20 70 6c 75 73 20 74 | 68 65 20 77 6f 72 64 20 |e plus t|he word |
|00004d30| 27 54 65 78 74 27 2c 20 | 6a 75 73 74 20 70 72 65 |'Text', |just pre|
|00004d40| 73 73 20 3c 52 45 54 55 | 52 4e 3e 20 74 6f 20 61 |ss <RETU|RN> to a|
|00004d50| 63 63 65 70 74 20 74 68 | 65 20 6e 65 77 0a 66 69 |ccept th|e new.fi|
|00004d60| 6c 65 6e 61 6d 65 2e 20 | 0a 0a 54 68 65 20 69 6e |lename. |..The in|
|00004d70| 70 75 74 20 66 69 6c 65 | 20 69 73 20 6e 6f 77 20 |put file| is now |
|00004d80| 63 6f 6e 76 65 72 74 65 | 64 20 61 6e 64 20 74 68 |converte|d and th|
|00004d90| 65 20 6f 75 74 70 75 74 | 20 73 74 6f 72 65 64 20 |e output| stored |
|00004da0| 61 73 20 74 68 65 20 66 | 69 6c 65 0a 6e 61 6d 65 |as the f|ile.name|
|00004db0| 20 79 6f 75 20 73 65 6c | 65 63 74 65 64 2e 20 28 | you sel|ected. (|
|00004dc0| 44 65 66 61 75 6c 74 3d | 27 24 2e 21 50 73 69 6f |Default=|'$.!Psio|
|00004dd0| 6e 2e 54 65 78 74 2e 6e | 61 6d 65 54 65 78 74 27 |n.Text.n|ameText'|
|00004de0| 29 0a 0a 49 27 61 6d 20 | 73 6f 72 72 79 20 62 75 |)..I'am |sorry bu|
|00004df0| 74 20 74 68 69 73 20 6f | 70 74 69 6f 6e 20 77 61 |t this o|ption wa|
|00004e00| 73 20 6e 6f 74 20 74 68 | 6f 75 67 68 74 20 6f 66 |s not th|ought of|
|00004e10| 20 77 68 65 6e 20 49 20 | 66 69 72 73 74 20 77 72 | when I |first wr|
|00004e20| 6f 74 65 20 0a 74 68 69 | 73 20 70 72 6f 67 72 61 |ote .thi|s progra|
|00004e30| 6d 2c 20 74 68 65 72 65 | 66 6f 72 65 20 69 74 20 |m, there|fore it |
|00004e40| 69 73 20 50 52 41 43 54 | 49 43 41 4c 4c 59 20 69 |is PRACT|ICALLY i|
|00004e50| 6d 70 6f 73 73 69 62 6c | 65 20 74 6f 20 77 72 69 |mpossibl|e to wri|
|00004e60| 74 65 20 61 0a 72 65 76 | 65 72 73 65 20 70 72 6f |te a.rev|erse pro|
|00004e70| 63 65 64 75 72 65 20 28 | 65 67 20 74 6f 20 63 6f |cedure (|eg to co|
|00004e80| 6e 76 65 72 74 20 41 53 | 43 49 49 20 74 6f 20 61 |nvert AS|CII to a|
|00004e90| 20 50 73 69 6f 6e 20 64 | 61 74 61 20 66 69 6c 65 | Psion d|ata file|
|00004ea0| 29 2e 0a 28 41 6c 6c 20 | 74 6f 20 64 6f 20 77 69 |)..(All |to do wi|
|00004eb0| 74 68 20 66 69 6c 65 20 | 66 6f 72 6d 61 74 73 2c |th file |formats,|
|00004ec0| 20 74 68 61 74 20 73 6f | 72 74 20 6f 66 20 74 68 | that so|rt of th|
|00004ed0| 69 6e 67 21 29 0a 0a 20 | 20 20 20 20 20 20 20 20 |ing!).. | |
|00004ee0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 48 65 | | He|
|00004ef0| 6c 70 2f 2a 20 43 6f 6d | 6d 61 6e 64 2f 45 78 69 |lp/* Com|mand/Exi|
|00004f00| 74 0a 0a 54 68 65 73 65 | 20 74 68 72 65 65 20 6f |t..These| three o|
|00004f10| 70 74 69 6f 6e 73 20 61 | 72 65 20 61 6c 6c 20 66 |ptions a|re all f|
|00004f20| 61 69 72 6c 79 20 73 65 | 6c 66 20 65 78 70 6c 61 |airly se|lf expla|
|00004f30| 6e 61 74 6f 72 79 2e 0a | 0a 4f 70 74 69 6f 6e 20 |natory..|.Option |
|00004f40| 6e 75 6d 62 65 72 20 66 | 69 76 65 20 64 69 73 70 |number f|ive disp|
|00004f50| 6c 61 79 73 20 6f 6e 65 | 20 70 61 67 65 20 6f 66 |lays one| page of|
|00004f60| 20 68 65 6c 70 2c 20 64 | 65 73 63 72 69 62 69 6e | help, d|escribin|
|00004f70| 67 20 74 68 65 20 73 65 | 74 20 0a 75 70 20 6f 70 |g the se|t .up op|
|00004f80| 74 69 6f 6e 73 20 74 68 | 65 20 50 73 69 6f 6e 20 |tions th|e Psion |
|00004f90| 73 68 6f 75 6c 64 20 62 | 65 20 73 65 74 20 74 6f |should b|e set to|
|00004fa0| 2e 0a 0a 4f 70 74 69 6f | 6e 20 20 6e 75 6d 62 65 |...Optio|n numbe|
|00004fb0| 72 20 73 69 78 20 61 6c | 6c 6f 77 73 20 79 6f 75 |r six al|lows you|
|00004fc0| 20 74 6f 20 64 6f 20 61 | 6e 79 20 73 74 61 72 20 | to do a|ny star |
|00004fd0| 28 2a 29 20 63 6f 6d 6d | 61 6e 64 20 6f 6e 20 20 |(*) comm|and on |
|00004fe0| 74 68 65 0a 41 72 63 68 | 69 6d 65 64 65 73 20 6f |the.Arch|imedes o|
|00004ff0| 70 65 72 61 74 69 6e 67 | 20 73 79 73 74 65 6d 2c |perating| system,|
|00005000| 20 6d 6f 75 6e 74 69 6e | 67 20 6f 66 20 64 69 73 | mountin|g of dis|
|00005010| 6b 73 20 65 74 63 2e 0a | 50 72 65 73 73 69 6e 67 |ks etc..|Pressing|
|00005020| 20 3c 52 45 54 55 52 4e | 3e 20 6f 6e 20 69 74 73 | <RETURN|> on its|
|00005030| 20 6f 77 6e 20 77 69 6c | 6c 20 65 78 69 74 20 74 | own wil|l exit t|
|00005040| 68 69 73 20 70 72 6f 63 | 65 64 75 72 65 2e 0a 0a |his proc|edure...|
|00005050| 4f 70 74 69 6f 6e 20 73 | 65 76 65 6e 20 77 69 6c |Option s|even wil|
|00005060| 6c 20 65 78 69 74 20 74 | 68 65 20 70 72 6f 67 72 |l exit t|he progr|
|00005070| 61 6d 20 74 6f 20 42 41 | 53 49 43 2f 44 45 53 4b |am to BA|SIC/DESK|
|00005080| 54 4f 50 2e 0a 0a 0a 0a | 20 20 20 20 20 20 20 20 |TOP.....| |
|00005090| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000050a0| 20 20 43 61 62 6c 65 20 | 4c 61 79 6f 75 74 0a 0a | Cable |Layout..|
|000050b0| 20 20 20 20 20 20 20 20 | 20 20 20 39 20 50 69 6e | | 9 Pin|
|000050c0| 20 46 65 6d 61 6c 65 20 | 20 20 20 20 20 20 20 20 | Female | |
|000050d0| 20 20 20 20 20 20 20 20 | 20 32 35 20 50 69 6e 20 | | 25 Pin |
|000050e0| 4d 61 6c 65 0a 20 20 20 | 20 20 20 20 20 20 20 20 |Male. | |
|000050f0| 28 41 72 63 68 69 6d 65 | 64 65 73 29 20 20 20 20 |(Archime|des) |
|00005100| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 28 50 | | (P|
|00005110| 73 69 6f 6e 29 0a 0a 20 | 20 20 20 20 20 20 20 20 |sion).. | |
|00005120| 20 20 20 20 20 20 28 54 | 44 29 20 20 33 20 2d 2d | (T|D) 3 --|
|00005130| 2d 2d 2d 2d 2d 2d 3e 2d | 2d 2d 2d 2d 2d 2d 2d 20 |------>-|------- |
|00005140| 32 20 0a 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |2 . | |
|00005150| 20 20 28 52 44 29 20 20 | 32 20 2d 2d 2d 2d 2d 2d | (RD) |2 ------|
|00005160| 2d 2d 3c 2d 2d 2d 2d 2d | 2d 2d 2d 20 33 0a 20 20 |--<-----|--- 3. |
|00005170| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 28 52 54 | | (RT|
|00005180| 53 29 20 37 20 2d 2d 2d | 2d 2d 2d 2d 2d 3e 2d 2d |S) 7 ---|----->--|
|00005190| 2d 2d 2d 2d 2d 2d 20 34 | 0a 20 20 20 20 20 20 20 |------ 4|. |
|000051a0| 20 20 20 20 20 20 20 20 | 28 43 54 53 29 20 38 20 | |(CTS) 8 |
|000051b0| 2d 2d 2d 2d 2d 2d 2d 2d | 3c 2d 2d 2d 2d 2d 2d 2d |--------|<-------|
|000051c0| 2d 20 35 0a 20 20 20 20 | 20 20 20 20 20 20 20 20 |- 5. | |
|000051d0| 20 20 20 28 44 53 52 29 | 20 36 20 2d 2d 2d 2d 2d | (DSR)| 6 -----|
|000051e0| 2d 2d 2d 3c 2d 2d 2d 2d | 2d 2d 2d 2d 20 36 0a 20 |---<----|---- 6. |
|000051f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 28 53 | | (S|
|00005200| 47 29 20 20 35 20 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |G) 5 --|--------|
|00005210| 2d 2d 2d 2d 2d 2d 2d 20 | 37 0a 20 20 20 20 20 20 |------- |7. |
|00005220| 20 20 20 20 20 20 20 20 | 20 28 44 54 52 29 20 34 | | (DTR) 4|
|00005230| 20 2d 2d 2d 2d 2d 2d 2d | 2d 3e 2d 2d 2d 2d 2d 2d | -------|->------|
|00005240| 2d 2d 20 32 30 0a 20 20 | 20 20 20 20 20 20 20 20 |-- 20. | |
|00005250| 20 20 20 0a 20 20 20 20 | 20 20 20 20 20 20 20 20 | . | |
|00005260| 20 20 20 28 44 43 44 29 | 20 31 20 2d 2d 2d 7c 0a | (DCD)| 1 ---|.|
|00005270| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005280| 20 20 20 20 20 20 20 20 | 20 20 7c 0a 20 20 20 20 | | |. |
|00005290| 20 20 20 20 20 20 20 20 | 20 20 20 28 44 54 52 29 | | (DTR)|
|000052a0| 20 34 20 2d 2d 2d 7c 20 | 0a 0a 20 20 20 20 20 4b | 4 ---| |.. K|
|000052b0| 65 79 20 3a 2d 0a 0a 20 | 20 20 20 20 54 44 20 20 |ey :-.. | TD |
|000052c0| 20 54 72 61 6e 73 6d 69 | 74 20 44 61 74 61 0a 20 | Transmi|t Data. |
|000052d0| 20 20 20 20 52 44 20 20 | 20 52 65 63 65 69 76 65 | RD | Receive|
|000052e0| 20 44 61 74 61 0a 20 20 | 20 20 20 52 54 53 20 20 | Data. | RTS |
|000052f0| 52 65 61 64 79 20 74 6f | 20 73 65 6e 64 0a 20 20 |Ready to| send. |
|00005300| 20 20 20 43 54 53 20 20 | 43 6c 65 61 72 20 74 6f | CTS |Clear to|
|00005310| 20 73 65 6e 64 0a 20 20 | 20 20 20 44 52 53 20 20 | send. | DRS |
|00005320| 44 61 74 61 20 73 65 74 | 20 72 65 61 64 79 0a 20 |Data set| ready. |
|00005330| 20 20 20 20 53 47 20 20 | 20 53 69 67 6e 61 6c 20 | SG | Signal |
|00005340| 67 72 6f 75 6e 64 0a 20 | 20 20 20 20 44 54 52 20 |ground. | DTR |
|00005350| 20 44 61 74 61 20 74 65 | 72 6d 69 6e 61 6c 20 72 | Data te|rminal r|
|00005360| 65 61 64 79 0a 20 20 20 | 20 20 44 43 44 20 20 44 |eady. | DCD D|
|00005370| 61 74 61 20 63 61 72 72 | 69 65 72 20 64 65 74 65 |ata carr|ier dete|
|00005380| 63 74 65 64 0a 0a 4e 6f | 74 65 20 70 69 6e 73 20 |cted..No|te pins |
|00005390| 31 20 61 6e 64 20 34 20 | 61 72 65 20 63 6f 6e 6e |1 and 4 |are conn|
|000053a0| 65 63 74 65 64 20 74 6f | 67 65 74 68 65 72 20 61 |ected to|gether a|
|000053b0| 74 20 74 68 65 20 39 20 | 70 69 6e 20 28 50 73 69 |t the 9 |pin (Psi|
|000053c0| 6f 6e 29 20 65 6e 64 20 | 0a 6f 66 20 74 68 65 20 |on) end |.of the |
|000053d0| 63 61 62 6c 65 2e 0a 50 | 69 6e 20 34 20 28 39 20 |cable..P|in 4 (9 |
|000053e0| 70 69 6e 29 20 69 73 20 | 61 6c 73 6f 20 63 6f 6e |pin) is |also con|
|000053f0| 6e 65 63 74 65 64 20 74 | 6f 20 70 69 6e 20 32 30 |nected t|o pin 20|
|00005400| 20 28 32 35 20 70 69 6e | 29 2e 0a 0a 20 20 20 20 | (25 pin|)... |
|00005410| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005420| 20 20 54 65 63 68 6e 69 | 63 61 6c 20 49 6e 66 6f | Techni|cal Info|
|00005430| 72 6d 61 74 69 6f 6e 20 | 20 0a 0a 20 20 20 20 20 |rmation | .. |
|00005440| 48 61 72 64 77 61 72 65 | 20 6e 65 65 64 65 64 2e |Hardware| needed.|
|00005450| 2e 2e 2e 2e 2e 2e 2e 2e | 2e 50 73 69 6f 6e 20 43 |........|.Psion C|
|00005460| 6f 6d 6d 73 20 4c 69 6e | 6b 20 28 52 53 32 33 32 |omms Lin|k (RS232|
|00005470| 29 20 70 61 63 6b 61 67 | 65 0a 20 20 20 20 20 20 |) packag|e. |
|00005480| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005490| 20 20 20 20 20 20 20 20 | 41 63 6f 72 6e 20 41 72 | |Acorn Ar|
|000054a0| 63 68 69 6d 65 64 65 73 | 20 63 6f 6d 70 75 74 65 |chimedes| compute|
|000054b0| 72 0a 0a 20 20 20 20 20 | 54 72 61 6e 73 66 65 72 |r.. |Transfer|
|000054c0| 20 53 70 65 65 64 2e 2e | 2e 2e 2e 2e 2e 2e 2e 2e | Speed..|........|
|000054d0| 2e 39 36 30 30 20 42 41 | 55 44 20 28 52 65 63 65 |.9600 BA|UD (Rece|
|000054e0| 69 76 65 20 61 6e 64 20 | 54 72 61 6e 73 6d 69 74 |ive and |Transmit|
|000054f0| 29 0a 0a 20 20 20 20 20 | 54 72 61 6e 73 66 65 72 |).. |Transfer|
|00005500| 20 50 72 6f 74 6f 63 6f | 6c 2e 2e 2e 2e 2e 2e 2e | Protoco|l.......|
|00005510| 2e 58 4f 4e 2f 58 4f 46 | 46 0a 0a 20 20 20 20 20 |.XON/XOF|F.. |
|00005520| 41 72 63 68 69 6d 65 64 | 65 73 20 66 69 6c 65 20 |Archimed|es file |
|00005530| 74 79 70 65 2e 2e 2e 2e | 2e 26 37 46 46 20 28 50 |type....|.&7FF (P|
|00005540| 73 69 6f 6e 29 0a 0a 20 | 20 20 20 20 46 69 6c 65 |sion).. | File|
|00005550| 20 73 69 7a 65 2e 2e 2e | 2e 2e 2e 2e 2e 2e 2e 2e | size...|........|
|00005560| 2e 2e 2e 2e 2e 41 6e 79 | 20 73 69 7a 65 0a 0a 20 |.....Any| size.. |
|00005570| 20 20 20 20 0a 20 20 20 | 20 20 50 73 69 6f 6e 20 | . | Psion |
|00005580| 53 65 74 75 70 0a 0a 20 | 20 20 20 20 42 41 55 44 |Setup.. | BAUD|
|00005590| 2e 2e 2e 2e 2e 2e 2e 2e | 2e 2e 2e 2e 2e 2e 2e 2e |........|........|
|000055a0| 2e 2e 2e 2e 2e 39 36 30 | 30 0a 20 20 20 20 20 50 |.....960|0. P|
|000055b0| 41 52 49 54 59 2e 2e 2e | 2e 2e 2e 2e 2e 2e 2e 2e |ARITY...|........|
|000055c0| 2e 2e 2e 2e 2e 2e 2e 2e | 4f 44 44 0a 20 20 20 20 |........|ODD. |
|000055d0| 20 42 49 54 53 2e 2e 2e | 2e 2e 2e 2e 2e 2e 2e 2e | BITS...|........|
|000055e0| 2e 2e 2e 2e 2e 2e 2e 2e | 2e 2e 38 0a 20 20 20 20 |........|..8. |
|000055f0| 20 53 54 4f 50 2e 2e 2e | 2e 2e 2e 2e 2e 2e 2e 2e | STOP...|........|
|00005600| 2e 2e 2e 2e 2e 2e 2e 2e | 2e 2e 31 0a 20 20 20 20 |........|..1. |
|00005610| 20 48 41 4e 44 2e 2e 2e | 2e 2e 2e 2e 2e 2e 2e 2e | HAND...|........|
|00005620| 2e 2e 2e 2e 2e 2e 2e 2e | 2e 2e 41 4c 4c 0a 20 20 |........|..ALL. |
|00005630| 20 20 20 50 52 4f 54 4f | 43 4f 4c 2e 2e 2e 2e 2e | PROTO|COL.....|
|00005640| 2e 2e 2e 2e 2e 2e 2e 2e | 2e 2e 2e 2e 4e 4f 4e 45 |........|....NONE|
|00005650| 0a 20 20 20 20 20 45 43 | 48 4f 2e 2e 2e 2e 2e 2e |. EC|HO......|
|00005660| 2e 2e 2e 2e 2e 2e 2e 2e | 2e 2e 2e 2e 2e 2e 2e 4c |........|.......L|
|00005670| 4f 43 41 4c 0a 0a 20 20 | 20 20 20 41 6c 6c 20 6f |OCAL.. | All o|
|00005680| 74 68 65 72 20 76 61 6c | 75 65 73 20 61 72 65 20 |ther val|ues are |
|00005690| 74 68 65 20 43 4f 4d 4d | 53 20 70 72 6f 67 72 61 |the COMM|S progra|
|000056a0| 6d 20 64 65 66 61 75 6c | 74 73 2e 0a 46 69 6c 65 |m defaul|ts..File|
|000056b0| 44 61 74 61 82 41 52 43 | 00 00 00 00 00 00 00 00 |Data.ARC|........|
|000056c0| b1 02 00 00 41 ff f7 ff | fd 37 b4 4f 03 00 60 03 |....A...|.7.O..`.|
|000056d0| 11 11 41 52 43 3a 0d 0a | 47 4c 4f 42 41 4c 20 41 |..ARC:..|GLOBAL A|
|000056e0| 24 28 31 30 29 2c 42 24 | 28 33 2c 31 29 2c 42 25 |$(10),B$|(3,1),B%|
|000056f0| 2c 43 25 2c 44 25 2c 50 | 25 2c 50 31 25 2c 4e 25 |,C%,D%,P|%,P1%,N%|
|00005700| 0d 0a 4f 4e 45 52 52 20 | 46 54 3a 3a 0d 0a 42 24 |..ONERR |FT::..B$|
|00005710| 28 31 29 3d 22 41 22 3a | 42 24 28 32 29 3d 22 42 |(1)="A":|B$(2)="B|
|00005720| 22 3a 42 24 28 33 29 3d | 22 43 22 0d 0a 49 4e 3a |":B$(3)=|"C"..IN:|
|00005730| 3a 0d 0a 50 52 49 4e 54 | 22 4c 4f 4f 4b 20 46 4f |:..PRINT|"LOOK FO|
|00005740| 52 22 2c 0d 0a 54 52 41 | 50 20 49 4e 50 55 54 20 |R",..TRA|P INPUT |
|00005750| 41 24 0d 0a 42 25 3d 31 | 0d 0a 4c 50 3a 3a 0d 0a |A$..B%=1|..LP::..|
|00005760| 4e 25 3d 30 0d 0a 57 48 | 49 4c 45 20 41 24 3c 3e |N%=0..WH|ILE A$<>|
|00005770| 22 58 58 58 22 0d 0a 54 | 52 41 50 20 4f 50 45 4e |"XXX"..T|RAP OPEN|
|00005780| 20 42 24 28 42 25 29 2b | 22 3a 4d 41 49 4e 22 2c | B$(B%)+|":MAIN",|
|00005790| 41 2c 56 24 0d 0a 46 49 | 52 53 54 0d 0a 54 52 41 |A,V$..FI|RST..TRA|
|000057a0| 50 20 55 53 45 20 41 0d | 0a 50 31 25 3d 30 0d 0a |P USE A.|.P1%=0..|
|000057b0| 57 48 49 4c 45 20 46 49 | 4e 44 28 41 24 29 0d 0a |WHILE FI|ND(A$)..|
|000057c0| 50 25 3d 50 4f 53 0d 0a | 4e 25 3d 31 0d 0a 44 25 |P%=POS..|N%=1..D%|
|000057d0| 3d 44 49 53 50 28 2d 31 | 2c 41 24 29 0d 0a 49 46 |=DISP(-1|,A$)..IF|
|000057e0| 20 44 25 3d 31 0d 0a 52 | 45 54 55 52 4e 0d 0a 45 | D%=1..R|ETURN..E|
|000057f0| 4c 53 45 49 46 20 44 25 | 3d 33 32 0d 0a 49 46 20 |LSEIF D%|=32..IF |
|00005800| 41 24 3c 3e 22 22 0d 0a | 46 49 52 53 54 0d 0a 43 |A$<>""..|FIRST..C|
|00005810| 25 3d 30 0d 0a 44 4f 0d | 0a 50 25 3d 50 4f 53 0d |%=0..DO.|.P%=POS.|
|00005820| 0a 4e 45 58 54 0d 0a 43 | 25 3d 43 25 2b 31 0d 0a |.NEXT..C|%=C%+1..|
|00005830| 55 4e 54 49 4c 20 46 49 | 4e 44 28 41 3d 50 31 25 |UNTIL FI|ND(A=P1%|
|00005840| 0d 0a 49 46 20 43 25 3e | 31 0d 0a 50 31 25 3d 50 |..IF C%>|1..P1%=P|
|00005850| 25 0d 0a 45 4c 53 45 20 | 46 49 52 53 54 0d 0a 45 |%..ELSE |FIRST..E|
|00005860| 4e 44 49 46 0d 0a 45 4c | 53 45 20 42 41 43 4b 0d |NDIF..EL|SE BACK.|
|00005870| 0a 45 4e 44 49 46 0d 0a | 45 4c 53 45 49 46 20 44 |.ENDIF..|ELSEIF D|
|00005880| 25 3d 25 5a 20 4f 52 20 | 44 25 3d 25 5a 0d 0a 41 |%=%Z OR |D%=%Z..A|
|00005890| 52 43 3a 0d 0a 45 4c 53 | 45 0d 0a 4e 45 58 54 0d |RC:..ELS|E..NEXT.|
|000058a0| 0a 50 31 25 3d 50 25 0d | 0a 45 4e 44 49 46 0d 0a |.P1%=P%.|.ENDIF..|
|000058b0| 45 4e 44 57 48 0d 0a 43 | 4c 4f 53 45 0d 0a 42 25 |ENDWH..C|LOSE..B%|
|000058c0| 3d 42 25 2b 31 0d 0a 49 | 46 20 42 25 3d 34 0d 0a |=B%+1..I|F B%=4..|
|000058d0| 49 46 20 4e 25 3d 30 0d | 0a 50 52 49 4e 54 22 4e |IF N%=0.|.PRINT"N|
|000058e0| 4f 54 20 46 4f 55 4e 44 | 2e 2e 2e 22 0d 0a 50 52 |OT FOUND|..."..PR|
|000058f0| 49 4e 54 20 41 24 0d 0a | 50 41 55 53 45 20 31 30 |INT A$..|PAUSE 10|
|00005900| 0d 0a 47 4f 54 4f 20 49 | 4e 3a 3a 0d 0a 45 4c 53 |..GOTO I|N::..ELS|
|00005910| 45 0d 0a 42 25 3d 31 0d | 0a 45 4e 44 49 46 0d 0a |E..B%=1.|.ENDIF..|
|00005920| 45 4e 44 49 46 0d 0a 45 | 4e 44 57 48 0d 0a 46 54 |ENDIF..E|NDWH..FT|
|00005930| 3a 3a 0d 0a 49 46 20 45 | 52 52 3c 3e 32 30 36 0d |::..IF E|RR<>206.|
|00005940| 0a 42 25 3d 42 25 2b 31 | 0d 0a 49 46 20 42 25 3d |.B%=B%+1|..IF B%=|
|00005950| 34 0d 0a 42 25 3d 31 0d | 0a 45 4e 44 49 46 0d 0a |4..B%=1.|.ENDIF..|
|00005960| 47 4f 54 4f 20 4c 50 3a | 3a 0d 0a 45 4c 53 45 0d |GOTO LP:|:..ELSE.|
|00005970| 0a 52 45 54 55 52 4e 0d | 0a 45 4e 44 49 46 0d 0a |.RETURN.|.ENDIF..|
|00005980| 1a 46 69 6c 65 44 61 74 | 61 82 47 41 4d 45 00 00 |.FileDat|a.GAME..|
|00005990| 00 00 00 00 00 93 04 00 | 00 41 ff f7 ff cf bb c2 |........|.A......|
|000059a0| 63 03 00 56 12 11 11 47 | 41 4d 45 3a 0d 0a 4c 4f |c..V...G|AME:..LO|
|000059b0| 43 41 4c 20 41 24 28 31 | 29 2c 42 24 28 31 29 2c |CAL A$(1|),B$(1),|
|000059c0| 43 24 28 31 29 2c 44 24 | 28 31 29 2c 45 24 28 32 |C$(1),D$|(1),E$(2|
|000059d0| 29 2c 46 24 28 31 29 2c | 47 24 28 33 32 29 0d 0a |),F$(1),|G$(32)..|
|000059e0| 4c 4f 43 41 4c 20 41 25 | 2c 42 25 2c 43 25 2c 58 |LOCAL A%|,B%,C%,X|
|000059f0| 25 2c 59 25 2c 5a 25 2c | 53 43 25 2c 42 31 25 2c |%,Y%,Z%,|SC%,B1%,|
|00005a00| 46 25 2c 48 24 28 31 29 | 0d 0a 49 47 41 4d 45 3a |F%,H$(1)|..IGAME:|
|00005a10| 0d 0a 43 55 52 53 4f 52 | 20 4f 46 46 0d 0a 41 24 |..CURSOR| OFF..A$|
|00005a20| 3d 43 48 52 24 28 30 29 | 3a 42 24 3d 43 48 52 24 |=CHR$(0)|:B$=CHR$|
|00005a30| 28 31 29 0d 0a 43 24 3d | 43 48 52 24 28 32 29 3a |(1)..C$=|CHR$(2):|
|00005a40| 44 24 3d 43 48 52 24 28 | 33 29 0d 0a 45 24 3d 43 |D$=CHR$(|3)..E$=C|
|00005a50| 48 52 24 28 34 29 2b 43 | 48 52 24 28 36 29 3a 46 |HR$(4)+C|HR$(6):F|
|00005a60| 24 3d 43 48 52 24 28 35 | 29 0d 0a 47 24 3d 52 45 |$=CHR$(5|)..G$=RE|
|00005a70| 50 54 24 28 43 48 52 24 | 28 31 36 35 29 2c 33 32 |PT$(CHR$|(165),32|
|00005a80| 29 3a 48 24 3d 43 48 52 | 24 28 37 29 0d 0a 42 25 |):H$=CHR|$(7)..B%|
|00005a90| 3d 32 30 3a 43 25 3d 31 | 32 3a 58 25 3d 31 36 3a |=20:C%=1|2:X%=16:|
|00005aa0| 59 25 3d 31 0d 0a 44 4f | 0d 0a 43 4c 11 53 20 3a |Y%=1..DO|..CL.S :|
|00005ab0| 50 52 49 4e 54 20 47 24 | 20 3a 41 54 20 58 25 2c |PRINT G$| :AT X%,|
|00005ac0| 59 25 20 3a 20 50 52 49 | 4e 54 20 48 24 0d 0a 41 |Y% : PRI|NT H$..A|
|00005ad0| 25 3d 31 3a 43 25 3d 31 | 2b 52 4e 44 2a 32 0d 0a |%=1:C%=1|+RND*2..|
|00005ae0| 44 4f 0d 0a 41 54 20 41 | 25 20 2c 20 43 25 20 3a |DO..AT A|% , C% :|
|00005af0| 20 50 52 49 4e 54 20 41 | 24 20 3a 20 42 45 45 50 | PRINT A|$ : BEEP|
|00005b00| 20 42 25 20 2c 20 31 30 | 2a 42 25 0d 0a 41 54 20 | B% , 10|*B%..AT |
|00005b10| 41 25 2c 43 25 20 3a 20 | 50 52 49 4e 54 20 42 24 |A%,C% : |PRINT B$|
|00005b20| 20 3a 20 42 45 45 50 20 | 42 25 2c 31 30 2a 42 25 | : BEEP |B%,10*B%|
|00005b30| 0d 0a 41 54 20 41 25 2c | 43 25 20 3a 20 50 52 49 |..AT A%,|C% : PRI|
|00005b40| 4e 54 20 43 24 20 3a 20 | 42 45 45 50 20 42 25 2c |NT C$ : |BEEP B%,|
|00005b50| 31 30 2a 42 25 0d 0a 41 | 54 20 41 25 2c 43 25 20 |10*B%..A|T A%,C% |
|00005b60| 3a 20 50 52 49 4e 54 20 | 44 24 20 3a 20 42 45 45 |: PRINT |D$ : BEE|
|00005b70| 50 20 42 25 2c 31 30 2a | 42 25 0d 0a 41 54 20 41 |P B%,10*|B%..AT A|
|00005b80| 25 2c 43 25 20 3a 20 50 | 52 49 4e 54 20 45 24 20 |%,C% : P|RINT E$ |
|00005b90| 3a 20 42 45 45 50 20 42 | 25 2c 31 30 2a 42 25 0d |: BEEP B|%,10*B%.|
|00005ba0| 0a 41 54 20 41 25 2c 43 | 25 20 3a 20 50 52 49 11 |.AT A%,C|% : PRI.|
|00005bb0| 4e 54 20 46 24 20 3a 20 | 42 45 45 50 20 42 25 2c |NT F$ : |BEEP B%,|
|00005bc0| 31 30 2a 42 25 0d 0a 41 | 54 20 41 25 2c 43 25 20 |10*B%..A|T A%,C% |
|00005bd0| 3a 20 50 52 49 4e 54 22 | 20 22 3a 5a 25 3d 4b 45 |: PRINT"| ":Z%=KE|
|00005be0| 59 0d 0a 49 46 20 5a 25 | 0d 0a 49 46 20 5a 25 3d |Y..IF Z%|..IF Z%=|
|00005bf0| 25 53 20 41 4e 44 20 59 | 25 3d 32 0d 0a 41 54 20 |%S AND Y|%=2..AT |
|00005c00| 58 25 2c 59 25 20 3a 20 | 50 52 49 4e 54 20 43 48 |X%,Y% : |PRINT CH|
|00005c10| 52 24 28 31 36 35 29 0d | 0a 59 25 3d 31 20 3a 20 |R$(165).|.Y%=1 : |
|00005c20| 41 54 20 58 25 2c 31 20 | 3a 20 50 52 49 4e 54 20 |AT X%,1 |: PRINT |
|00005c30| 48 24 0d 0a 45 4e 44 49 | 46 0d 0a 49 46 20 5a 25 |H$..ENDI|F..IF Z%|
|00005c40| 3d 25 58 20 41 4e 44 20 | 59 25 3d 31 0d 0a 41 54 |=%X AND |Y%=1..AT|
|00005c50| 20 58 25 2c 59 25 20 3a | 20 50 52 49 4e 54 20 43 | X%,Y% :| PRINT C|
|00005c60| 48 52 24 28 31 36 35 29 | 0d 0a 59 25 3d 32 20 3a |HR$(165)|..Y%=2 :|
|00005c70| 20 41 54 20 58 25 2c 32 | 20 3a 20 50 52 49 4e 54 | AT X%,2| : PRINT|
|00005c80| 20 48 24 0d 0a 45 4e 44 | 49 46 0d 0a 45 4e 44 49 | H$..END|IF..ENDI|
|00005c90| 46 0d 0a 41 25 3d 41 25 | 2b 31 0d 0a 49 46 20 41 |F..A%=A%|+1..IF A|
|00005ca0| 25 3d 58 25 20 41 4e 44 | 20 43 25 3d 59 25 0d 0a |%=X% AND| C%=Y%..|
|00005cb0| 46 25 3d 30 0d 0a 44 4f | 0d 0a 11 41 54 20 58 25 |F%=0..DO|...AT X%|
|00005cc0| 2c 59 25 20 3a 20 50 52 | 49 4e 54 20 43 48 52 24 |,Y% : PR|INT CHR$|
|00005cd0| 28 31 37 30 2b 46 25 29 | 0d 0a 42 45 45 50 20 31 |(170+F%)|..BEEP 1|
|00005ce0| 30 2c 31 30 30 2b 46 25 | 0d 0a 46 25 3d 46 25 2b |0,100+F%|..F%=F%+|
|00005cf0| 31 20 3a 20 42 45 45 50 | 20 31 30 20 2c 31 30 30 |1 : BEEP| 10 ,100|
|00005d00| 2d 46 25 0d 0a 55 4e 54 | 49 4c 20 46 25 3d 33 30 |-F%..UNT|IL F%=30|
|00005d10| 0d 0a 42 25 3d 42 25 2b | 35 20 3a 20 41 25 3d 31 |..B%=B%+|5 : A%=1|
|00005d20| 36 20 3a 20 58 25 3d 58 | 25 2d 32 0d 0a 49 46 20 |6 : X%=X|%-2..IF |
|00005d30| 58 25 3c 31 20 3a 20 43 | 4c 53 20 3a 20 50 52 49 |X%<1 : C|LS : PRI|
|00005d40| 4e 54 22 47 41 4d 45 20 | 4f 56 45 52 22 0d 0a 50 |NT"GAME |OVER"..P|
|00005d50| 52 49 4e 54 22 53 43 4f | 52 45 3a 22 2c 53 43 25 |RINT"SCO|RE:",SC%|
|00005d60| 20 3a 20 50 41 55 53 45 | 20 34 30 0d 0a 57 48 49 | : PAUSE| 40..WHI|
|00005d70| 4c 45 20 4b 45 59 20 3a | 20 47 45 54 20 3a 20 45 |LE KEY :| GET : E|
|00005d80| 4e 44 57 48 0d 0a 47 45 | 54 20 3a 20 52 45 54 55 |NDWH..GE|T : RETU|
|00005d90| 52 4e 0d 0a 45 4e 44 49 | 46 0d 0a 45 4e 44 49 46 |RN..ENDI|F..ENDIF|
|00005da0| 0d 0a 55 4e 54 49 4c 20 | 41 25 3d 31 36 0d 0a 53 |..UNTIL |A%=16..S|
|00005db0| 43 25 3d 53 43 25 2b 31 | 0d 0a 49 46 20 42 31 25 |C%=SC%+1|..IF B1%|
|00005dc0| 3e 31 11 32 3a 42 25 3d | 42 25 2d 31 3a 42 31 25 |>1.2:B%=|B%-1:B1%|
|00005dd0| 3d 30 0d 0a 45 4c 53 45 | 49 46 20 42 25 3c 36 0d |=0..ELSE|IF B%<6.|
|00005de0| 0a 49 46 20 42 31 25 20 | 41 4e 44 20 42 25 3d 42 |.IF B1% |AND B%=B|
|00005df0| 25 2d 31 3a 42 25 3d 30 | 0d 0a 45 4c 53 45 20 42 |%-1:B%=0|..ELSE B|
|00005e00| 31 25 20 3d 20 31 20 3a | 20 45 4e 44 49 46 0d 0a |1% = 1 :| ENDIF..|
|00005e10| 45 4c 53 45 20 42 25 20 | 3d 20 42 25 2d 31 20 3a |ELSE B% |= B%-1 :|
|00005e20| 20 45 4e 44 49 46 0d 0a | 55 4e 54 49 4c 20 43 25 | ENDIF..|UNTIL C%|
|00005e30| 20 3d 20 33 0d 0a 11 1a | 46 69 6c 65 44 61 74 61 | = 3....|FileData|
|00005e40| 82 49 47 41 4d 45 00 00 | 00 00 00 00 ed 00 00 00 |.IGAME..|........|
|00005e50| 41 ff f7 ff b9 ce c2 63 | 03 00 13 e7 11 11 49 47 |A......c|......IG|
|00005e60| 41 4d 45 3a 0d 0a 75 64 | 67 3a 28 30 2c 30 2c 30 |AME:..ud|g:(0,0,0|
|00005e70| 2c 32 38 2c 33 30 2c 33 | 30 2c 33 30 2c 32 38 2c |,28,30,3|0,30,28,|
|00005e80| 30 29 0d 0a 75 64 67 3a | 28 31 2c 30 2c 30 2c 31 |0)..udg:|(1,0,0,1|
|00005e90| 34 2c 33 31 2c 33 30 2c | 33 31 2c 31 34 2c 30 29 |4,31,30,|31,14,0)|
|00005ea0| 0d 0a 75 64 67 3a 28 32 | 2c 30 2c 30 2c 37 2c 31 |..udg:(2|,0,0,7,1|
|00005eb0| 34 2c 31 32 2c 31 34 2c | 37 2c 30 29 0d 0a 75 64 |4,12,14,|7,0)..ud|
|00005ec0| 67 3a 28 33 2c 30 2c 30 | 2c 33 2c 37 2c 36 2c 37 |g:(3,0,0|,3,7,6,7|
|00005ed0| 2c 33 2c 30 29 0d 0a 75 | 64 67 3a 28 34 2c 30 2c |,3,0)..u|dg:(4,0,|
|00005ee0| 30 2c 31 2c 33 2c 33 2c | 31 2c 30 2c 30 29 0d 0a |0,1,3,3,|1,0,0)..|
|00005ef0| 75 64 67 3a 28 35 2c 30 | 2c 30 2c 30 2c 31 2c 31 |udg:(5,0|,0,0,1,1|
|00005f00| 2c 31 2c 30 2c 30 29 0d | 0a 75 64 67 3a 28 36 2c |,1,0,0).|.udg:(6,|
|00005f10| 30 2c 30 2c 32 34 2c 31 | 36 2c 34 2c 31 36 2c 32 |0,0,24,1|6,4,16,2|
|00005f20| 34 2c 30 29 0d 0a 75 64 | 67 3a 28 37 2c 33 30 2c |4,0)..ud|g:(7,30,|
|00005f30| 31 34 2c 34 2c 31 34 2c | 33 30 2c 31 34 2c 31 31 |14,4,14,|30,14,11|
|00005f40| 2c 32 35 29 0d 0a 0d 0a | 1a 46 69 6c 65 44 61 74 |,25)....|.FileDat|
|00005f50| 61 82 53 45 41 52 43 48 | 00 00 00 00 00 b0 01 00 |a.SEARCH|........|
|00005f60| 00 41 ff f7 ff e5 e8 35 | 8e 03 00 b6 b7 11 11 53 |.A.....5|.......S|
|00005f70| 45 41 52 43 48 3a 0d 0a | 4c 4f 43 41 4c 20 42 24 |EARCH:..|LOCAL B$|
|00005f80| 28 32 35 34 29 2c 46 25 | 2c 4b 25 0d 0a 45 53 43 |(254),F%|,K%..ESC|
|00005f90| 41 50 45 20 4f 46 46 0d | 0a 41 54 20 31 2c 31 20 |APE OFF.|.AT 1,1 |
|00005fa0| 3a 50 52 49 4e 54 22 46 | 49 4e 44 3a 22 3b 0d 0a |:PRINT"F|IND:";..|
|00005fb0| 49 4e 50 55 54 20 42 24 | 0d 0a 4f 50 45 4e 20 22 |INPUT B$|..OPEN "|
|00005fc0| 41 3a 4d 41 49 4e 22 2c | 41 2c 41 24 0d 0a 44 4f |A:MAIN",|A,A$..DO|
|00005fd0| 0d 0a 46 25 3d 46 49 4e | 44 28 42 24 29 0d 0a 49 |..F%=FIN|D(B$)..I|
|00005fe0| 46 20 46 25 3c 3e 30 20 | 3a 4b 25 3d 44 49 53 50 |F F%<>0 |:K%=DISP|
|00005ff0| 28 2d 31 2c 22 22 29 20 | 3a 45 4e 44 49 46 0d 0a |(-1,"") |:ENDIF..|
|00006000| 49 46 20 4b 25 3d 31 20 | 3a 52 45 54 55 52 4e 20 |IF K%=1 |:RETURN |
|00006010| 3a 45 4e 44 49 46 0d 0a | 4e 45 58 54 0d 0a 55 4e |:ENDIF..|NEXT..UN|
|00006020| 54 49 4c 20 46 25 3d 30 | 0d 0a 43 4c 4f 53 45 0d |TIL F%=0|..CLOSE.|
|00006030| 0a 54 52 41 50 20 4f 50 | 45 4e 20 22 42 3a 4d 41 |.TRAP OP|EN "B:MA|
|00006040| 49 4e 22 2c 41 2c 41 24 | 0d 0a 49 46 20 45 52 52 |IN",A,A$|..IF ERR|
|00006050| 3d 32 34 36 20 3a 43 4c | 53 20 3a 41 54 20 31 2c |=246 :CL|S :AT 1,|
|00006060| 31 20 3a 50 52 49 4e 54 | 20 22 2a 2a 2a 20 20 4e |1 :PRINT| "*** N|
|00006070| 4f 20 50 41 4b 20 20 11 | 2a 2a 2a 22 0d 0a 41 54 |O PAK .|***"..AT|
|00006080| 20 31 2c 32 20 3a 50 52 | 49 4e 54 22 2a 2a 2a 2a | 1,2 :PR|INT"****|
|00006090| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 22 0d 0a 50 |********|****"..P|
|000060a0| 41 55 53 45 20 31 35 0d | 0a 45 4e 44 49 46 0d 0a |AUSE 15.|.ENDIF..|
|000060b0| 44 4f 0d 0a 46 25 3d 46 | 49 4e 44 28 42 24 29 0d |DO..F%=F|IND(B$).|
|000060c0| 0a 49 46 20 46 25 3c 3e | 30 20 3a 4b 25 3d 44 49 |.IF F%<>|0 :K%=DI|
|000060d0| 53 50 28 2d 31 2c 22 22 | 29 3a 20 45 4e 44 49 46 |SP(-1,""|): ENDIF|
|000060e0| 0d 0a 49 46 20 4b 25 3d | 31 20 3a 52 45 54 55 52 |..IF K%=|1 :RETUR|
|000060f0| 4e 20 3a 45 4e 44 49 46 | 0d 0a 4e 45 58 54 0d 0a |N :ENDIF|..NEXT..|
|00006100| 55 4e 54 49 4c 20 46 25 | 3d 30 0d 0a 43 4c 4f 53 |UNTIL F%|=0..CLOS|
|00006110| 45 0d 0a 4e 45 58 54 3a | 3a 0d 0a 11 1a 46 69 6c |E..NEXT:|:....Fil|
|00006120| 65 44 61 74 61 82 53 54 | 41 54 00 00 00 00 00 00 |eData.ST|AT......|
|00006130| 00 74 01 00 00 41 ff f7 | ff 0b 1f b4 4f 03 00 8a |.t...A..|....O...|
|00006140| 91 11 11 53 54 41 54 3a | 0d 0a 4c 4f 43 41 4c 20 |...STAT:|..LOCAL |
|00006150| 41 24 28 38 29 2c 42 25 | 2c 43 24 28 35 29 2c 44 |A$(8),B%|,C$(5),D|
|00006160| 24 28 36 29 2c 45 24 28 | 32 29 2c 46 25 0d 0a 41 |$(6),E$(|2),F%..A|
|00006170| 24 3d 22 4d 65 6d 6f 72 | 79 3a 22 3a 43 24 3d 22 |$="Memor|y:":C$="|
|00006180| 4d 41 49 4e 22 0d 0a 44 | 24 3d 22 46 52 45 45 3a |MAIN"..D|$="FREE:|
|00006190| 22 0d 0a 50 52 49 4e 54 | 20 22 4d 6f 64 65 6c 3a |"..PRINT| "Model:|
|000061a0| 22 3b 0d 0a 46 25 3d 50 | 45 45 4b 42 28 24 46 46 |";..F%=P|EEKB($FF|
|000061b0| 45 38 29 0d 0a 49 46 20 | 46 25 3d 30 0d 0a 50 52 |E8)..IF |F%=0..PR|
|000061c0| 49 4e 54 22 43 4d 22 0d | 0a 50 52 49 4e 54 20 41 |INT"CM".|.PRINT A|
|000061d0| 24 2b 22 38 4b 22 0d 0a | 45 4c 53 45 0d 0a 50 52 |$+"8K"..|ELSE..PR|
|000061e0| 49 4e 54 22 58 50 22 0d | 0a 50 52 49 4e 54 20 41 |INT"XP".|.PRINT A|
|000061f0| 24 3b 0d 0a 49 46 20 46 | 25 3d 31 0d 0a 50 52 49 |$;..IF F|%=1..PRI|
|00006200| 4e 54 22 31 36 4b 22 0d | 0a 45 4c 53 45 0d 0a 50 |NT"16K".|.ELSE..P|
|00006210| 52 49 4e 54 22 33 32 4b | 22 0d 0a 45 4e 44 49 46 |RINT"32K|"..ENDIF|
|00006220| 0d 0a 45 4e 44 49 46 0d | 0a 47 45 54 0d 0a 42 25 |..ENDIF.|.GET..B%|
|00006230| 3d 30 0d 0a 44 4f 0d 0a | 45 24 3d 43 48 52 24 28 |=0..DO..|E$=CHR$(|
|00006240| 42 25 2b 25 41 29 2b 22 | 3a 22 0d 0a 49 46 20 45 |B%+%A)+"|:"..IF E|
|00006250| 58 49 53 54 28 45 24 2b | 43 24 29 0d 0a 4f 50 45 |XIST(E$+|C$)..OPE|
|00006260| 4e 20 45 24 2b 43 24 2c | 41 2c 46 24 0d 0a 50 52 |N E$+C$,|A,F$..PR|
|00006270| 49 4e 54 20 44 24 3b 45 | 24 3b 28 53 50 41 43 45 |INT D$;E|$;(SPACE|
|00006280| 2f 31 30 30 30 29 3b 22 | 4b 22 0d 0a 43 4c 4f 53 |/1000);"|K"..CLOS|
|00006290| 45 0d 0a 47 45 54 0d 0a | 45 4e 44 49 46 0d 0a 42 |E..GET..|ENDIF..B|
|000062a0| 25 3d 42 25 2b 31 0d 0a | 55 4e 54 49 4c 20 42 25 |%=B%+1..|UNTIL B%|
|000062b0| 3d 33 0d 0a 1a 46 69 6c | 65 44 61 74 61 82 55 44 |=3...Fil|eData.UD|
|000062c0| 47 00 00 00 00 00 00 00 | 00 b7 00 00 00 41 ff f7 |G.......|.....A..|
|000062d0| ff f5 db c2 63 03 00 bb | 30 11 11 55 44 47 3a 28 |....c...|0..UDG:(|
|000062e0| 58 25 2c 41 25 2c 42 25 | 2c 43 25 2c 44 25 2c 45 |X%,A%,B%|,C%,D%,E|
|000062f0| 25 2c 46 25 2c 47 25 2c | 48 25 29 0d 0a 50 4f 4b |%,F%,G%,|H%)..POK|
|00006300| 45 42 20 24 31 38 30 2c | 36 34 2b 58 25 2a 38 20 |EB $180,|64+X%*8 |
|00006310| 3a 20 50 4f 4b 45 42 20 | 24 31 38 31 2c 41 25 0d |: POKEB |$181,A%.|
|00006320| 0a 50 4f 4b 45 42 20 24 | 31 38 31 2c 42 25 20 3a |.POKEB $|181,B% :|
|00006330| 20 50 4f 4b 45 42 20 24 | 31 38 31 2c 43 25 0d 0a | POKEB $|181,C%..|
|00006340| 50 4f 4b 45 42 20 24 31 | 38 31 2c 44 25 20 3a 20 |POKEB $1|81,D% : |
|00006350| 50 4f 4b 45 42 20 24 31 | 38 31 2c 45 25 0d 0a 50 |POKEB $1|81,E%..P|
|00006360| 4f 4b 45 42 20 24 31 38 | 31 2c 46 25 20 3a 20 50 |OKEB $18|1,F% : P|
|00006370| 4f 4b 45 42 20 24 31 38 | 31 2c 47 25 0d 0a 50 4f |OKEB $18|1,G%..PO|
|00006380| 4b 45 42 20 24 31 38 31 | 2c 48 25 0d 0a 0d 0a 1a |KEB $181|,H%.....|
|00006390| 46 69 6c 65 44 61 74 61 | 82 41 52 43 54 65 78 74 |FileData|.ARCText|
|000063a0| 00 00 00 00 ae 02 00 00 | 41 ff ff ff 24 97 a0 6f |........|A...$..o|
|000063b0| 03 00 65 2a 41 52 43 3a | 0d 0a 47 4c 4f 42 41 4c |..e*ARC:|..GLOBAL|
|000063c0| 20 41 24 28 31 30 29 2c | 42 24 28 33 2c 31 29 2c | A$(10),|B$(3,1),|
|000063d0| 42 25 2c 43 25 2c 44 25 | 2c 50 25 2c 50 31 25 2c |B%,C%,D%|,P%,P1%,|
|000063e0| 4e 25 0d 0a 4f 4e 45 52 | 52 20 46 54 3a 3a 0d 0a |N%..ONER|R FT::..|
|000063f0| 42 24 28 31 29 3d 22 41 | 22 3a 42 24 28 32 29 3d |B$(1)="A|":B$(2)=|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.