Cs-writer dl F0:0:7:236099\,30:"23658",ç:"110" d>0:0:7:236099\,30:s"31524" i%"18",ç;:"1":"18",ç;:"" k"60063":"31525" n<0:0:7:236099\,30:"55363" xpo="55652":yn="32332":in="60063":dc="256":x="55496"+dc*"55497":p="9800":pm="9600":vf="9510":fn="9050":rq="9700":if="9650":pr="8000":def="7900":zr=ç:zr:z= c$="31541":yn"130" "":c$>"9"(c$-"55")*"400" c$*"400"  :a$=°"2"+"COPY BLOCKS OF TEXT":pr:a$=°"5"+"Beginning line? ":pr:s:a$=a$+s:pr:a$=°"7"+"Ending line? ":pr:e:a$=a$+e:pr:a$=°"9"+"New beginning line? ":pr:n:a$=a$+n:pr:l=e-s+"1":n+l>"351"a$=°"12"+"OUT OF FILE ERROR":pr:x=zr̰"100":x: :l=l*"64":s="s*64+32768":n="n*64+32768":n>s"440" 0s=s+l-:n=n+l-:nf$"23295"+g,32 :"817" /"23295"+g,f$(g) 1g 41:a$=°"2"+"Load ? (y/n)":pr:yn"32568": >in:f$"32768": 8:a$=°"2"+"SAVE TEXT ON TAPE":pr:fn:rq:f"1230" )if:f$"32768",x:vf:ff$"32768",x  #pm:if:f$st,ln:vf:ff$st,ln  @G:a$=°"2"+"LOAD TEXT FROM WAFADRIVE":pr:"9520":fn:in:*d$+f$: F:a$=°"2"+"SAVE TEXT ON WAFADRIVE":pr:"9520":fn:rq:f"2050" &if:*d$+f$,"32768",x:vf:f*d$+f$  %pm:if:*d$+f$,st,ln:vf:f*d$+f$   `s:a$=°"2"+"ERASE FILE ON WAFADRIVE":pr:"9520":fn:a$=°"7"+"Press a key to erase the file":pr:ç:*d$+f$: 4:a$=°"3"+"DIRECTORY OF WAFER":pr:"9520":ç: !:"55492"<23210 J"NEW START (1) CONTINUE (0) ";poke:poke55738,33!:"3203" 055738,37%:55598.,61022^ po: "55492"=çpo: xa$=°"2"+"PRINT OUT THE TEXT":pr:a$=°"5"+"Baud rate? ":pr:def:vl=dcvl="64460"+dc*"64461":*"r";vl::po: :"32355":yn"3650" i"17",zr;" ":a$=°"17"+"Insert character code:":pr:ch:ch<"128"ch>"143""3600" $3:"code1:";c1,"code2:";c2,"code3:";c3,"code4:";c4 .:c1dcc2dcc3dcc4dcc1"19200""4020" ;"64460",vl-dc*(vl/dc):"64461",(vl/dc):a$=a$+vl:pr a$=°"9"+"Interface code":a="55492":p:a$=°"10"+"Page numbering mode":a="55499":p:a$=°"11"+"Next page number":a="55533":p:a$=°"12"+"Lines per page":a="55532":p:a$=°"13"+"Left margin":a="55495":p fa$=°"14"+"Page header?":pr:a$=°"16":a="1"̰"32":a$=a$+¾(a+55499):a:pr:a$:a$=zr a$>"32""4060" C"60089":n$("32"):n$=a$:a="1"̰"32":"55499"+a,n$(a):a: 0::s=:"32692""Cs-writer"ʰ"100":23736\,181:"1""31525","1243":23736\,181:"""55360","10176":"REWIND TAPE & PRESS A KEY TO"'"VERIFY":ç:"":"":"": : "9e3": "23658",ç:"57623" P "59275" b$:b$=""vl=dc:  vl=b$: )*"S/W:"+"23672":"9e3":ç:"7950" @a$="55612": #(k#"writer"ʰ"9990":*"writer":#"code 1","31525","1243":*"code 1":#"code","55360","10175":*"code": #Z."Filename?",f$:f$>"10"zƱf$=zr"9050" #d z=:: %3a$=°"10"+"PARAMETER ERROR":pr:x=zr̰"100":x: %&8:a$=°"3"+"Do you wish to verify (y/n)":pr:f=yn: %0#a$=°"5"+"Which drive? (A/B)":pr %2d$=:d$="""9522" %4 d$="b:"(d$="B"d$="b"):*d$: %:"23767",zr: %K:a$=°"3"+"From line? ":pr:st:a$=a$+st:pr:st>"351"st"351""9490" %(ln="(e-st+1)*64":st="st*64+32768": %:fst="32768":ln=x %Ba$=°"3"+"Saving """+f$+""" - start:"+st+" - length:"+ln:pr: %Ea$=°"5"+"Do you wish to save the whole file? (y/n)":pr:f=yn:: &Ha$=a$+"? ("+a+"): ":pr &Rdef:vl=dcvl=a &\vl"255""9810" &fa,vl:a$=a$+vl:pr: '&"31524":*"CODE 1":*"CODE":"107" 'a$:a$="58965" '*: s11 %{߀C>29\>2 \>2 \>͛">2\k !@D~SPECTRAL WRITER -  1984 SOFTEK LTD. - Written by Gianluca Carri!`@D~1. Copies blocks of text in the file!@D~2. Load/Merge text-file from cassette!@D~3. Saves text-file on cassette!@D~4. Loads text-file from Wafadrive!@D~5. Saves text-file on Wafadrive!HD~6. Deletes file from Wafadrive! HD~7. Directory of wafer!@HD~8. Prints out the text-file!`HD~9. Redefines printer control characters!HD~A. Redefines special parameters!HD~B. Saves SPECTRAL WRITER program!HD~C. Returns to the text-file!HD~D. Return to BASIC system!`PD~Press the key corresponding to the desired option.0&~18E0:8A8!PD~Option g: are you sure ? (y/n)On(>^(!͵:\"8ٯ2:0&~Y(N !`PD~REDEFINE PRINTER CONTROL CODES!.>>GD~CHR$o& > gg>:g> g~o& #<! PD~Do you wish to change these? (y/n)͙͙͙(-(-(-͙͙͙!n7V0>6R:n0 n ![~< #  y > :n [y6H*1#"1ٯ24͊اR7>!@@D~k Save to Tape or to Drive A ? (T/D)0&~T(D Q]mRJ '@߀'͟:0\O!Z ^#Vةؙw|؉ؙة>y>y2>y>; 24232:!"1!6Z<  GQ@+G"8ٯ2: ~͑ #x (->W>W>W*16H*1DMR"1͟! @"8Press 'A' to stop printing!!`H"8g :G:.<2. :اW!>*1#`iR"124͊(*G>@O@:4ٹ(~C#:4<2424:اW:اW W _!~:hO!n ^#V~ڴ__Th{ {PZ yYY?PB {y;YYPB yYY>ր_!.~(W#:ЧG> Wɯ2.:ا ! *: o&):?8! y X#-:!@~C#44>2.!4!?6 n(>^(!͵T:\ !j\>wã((  !A\w 6ã `H͊w͡>2;͓:4<24@Dܯ24*1#ͅ"1:3< !7Z23:G:4ٸ !d ͵͡ã 1͡24*1#ͅ"1:3<(23Z:;Zܯ2YZ( >͡:4=>?24*1+ͅ"1:3=23Z24Z:;ZܯaZ( 1͡Z*1#ͅ"1:3< 23:;ȯ2Y( ͡*1+ͅ"1:3=23Zܧ( /͡:4<@fݯ24*1#ͅ"1:3<ʃ23Z24Z R͡:4=>?24*1+ͅ"1:3=23(24͊G>?O6 :3G"8gZ͊ ~:3o&)))))):4_͊ѧR͟!@"8ٯ2:!A\>@(!LH!H! @"8LIST OF COMMANDS ( !A\w 6͟6Z 7͡c:3G"8gZ͊:4G>?_> {OT]+6  $͑͡S͊> :4G>?OT]#6 :4!#!wͮãH!w͡:4!#~24Z !6 > h ͊͡#>.` ͟ø E͡_Z:3224͊!@R!XRDMx(!?6 -͡*1:3G>#OT] ͅ:;Z"1ٯ2Z +͡*1:3+OT]Bͅ:;Z"1ٯZM !͊͡RZO> ZT]#6 S F͡2Sޯ24͊R!XR@RDMx!#T]?6 :3 ͡24͑:3G"8gZ͊GO?G͸DG͊?KBT]+6 ͊?T]#6 > A # y@> A? + y@ —6H͊͟R:3o&))))))R6Z*1Rͅ !"1ٯ2324͊6Z*1ͅ !_"1ٯ24>23͊@R6Z '͡!"1ٯ24͑#ͅ"1 é -͡!"1ٯ24?͊(͑#ͅ"1  -͡!"1ٯ24?͊(c#ͅ"1 ¾͡>@ܯ24Z>?24͊"د24͊26͢>?24͒vc*~ ͊~ :6@O> {͡/24͊26͢:6241!44͊~ (͑͊~ :4<@024 >͊~ :4<@24:4Gx24 !"1>#ͅ"1 ø !"1#ͅ"1 ø U͡*1#ͅZ"1Z:42*1+"124͊G>@OT] +T]6 24Z”͡*1#ͅ"1|24͊~ *1#ͅ"124͊~+"1 24͊*1#"1͊0*1+"1!7N>"1*1+"1=_RA24*1#"1͊ _"1"1 ͡!7>w ͡!7>wG͡wZ*16H*1DMRL"1͟! @"8Press 'A' to stop printing!`H"8g !`H[ $>L*1#`iRL"1 Z͟!@"8PRESS:!*H"8Y - DELETE TEXT FILE!jH"8N - RETURN TO EDITOR@4͟)PAPER ?)INK ?)BORDER?20)BRIGHT?0!/(˶>w00!@"8ٯ2:¿͡*\+!!'"B\6 v͊+(6#R`͡!P"8ٯ2:NOT FOUND dv# x( (#RDMH :W :W£6C*\+!!x"B\6 vv~ x 6 KE\>:N ͗>2:\dvn CN{<  Interface error*\+!!'"B\6 v2;͓!P:4_;"8͓?>0>2::4?>0>2::3G:4_;"8xWoz@g!P"8ٯ2:CURSOR AT *1>,g:4o&> g!P"82:WORDWRAP O!7F(  JUSTIFICATION O!7N( !P>"82:0^( CAPS !P>"82:>!A\ GRAPH >͛"> EXTEND>͛"NORMAL:0Û"~#g>Ng> g>Fg>FgC222} <8B= {zJ{K{0zfKC>2;͓:: *8#"8ٯ2:*8::Oy :;٧(>w:;٧(>ww$!::;4 o&)))!G> BG $ BBG> G $  *1)))))):4_!?X6 !?6 !6 2A\!XX:/w!ZZ:w:0î!P"8ٯ2:@>.g2;!~8O!P_;"8͓#͟!@"8ٯ2:~͑# x !P"8!@"8͊2:@:4_R~g#|(#>2;`R+!@@6!PP6$ n(>^(!͵:\:3G>_!P"8*1͍j:3G>_!P"8*1͍j:3_!@"8*1٧R͍j!> X > x( `i<<<<<<"1PY))))))R}24R{23*1}23 *8::OA±>wú>ww$!:4>*8#"8ٯ2::3G"8͊2::3p@p:4? !7ɧ!7^˞͊+~ /!7N:4*1+"1>:3=23@23"124!7F͡͡ ͊+~!),({.(w:(s;(o?(k](g}(c*1+"1>?24͊> @(Q##>?O+T]6 y x(!7N >:3=2323"124ͮ!͡!_͍Rxo(Gx x  x (W͎z(>!2:.2^F EDIT----:Help page AND--:Reform paragraph C.LOCK--:Capital letters on/off OR---:Move "window" forwards T.VIDEO-:Insert a space AT---:Move "window" backwards I.VIDEO-:Delete a space STOP-:Options list arrows--:Move the cursor NOT--:Delete line GRAPHICS:Graphic mode on/off STEP-:Insert line DELETE--:Delete character TO---:Cursor at start of text <= -----:Move characters left THEN-:Cursor at end of text <> -----:Centre the line ENTER:"Carriage return" >= -----:Move characters right BREAK:Next tabulation EDIT--:Help page Y----:Divide line C.LOCK:Capital letters on/off P----:Print text on ZXPrinter arrows:Move the cursor S----:Search for a string 1-----:Set tabulation D----:Delete text-file 2-----:Reset tabulations F----:Send a form-feed code 6-----:Move down quickly G----:Send a line-feed code 7-----:Move up quickly H----:Unjustify the text 8-----:Move to next full stop J----:Justify the text Q-----:Move text to left margin K----:Auto-justif. on/off W-----:Centre text-file L----:Auto-wordwrap on/off E-----:Move text to right margin C----:Change screen colours R-----:Unjustify line ENTER:"Carriage return" T-----:Justify line BREAK:Next tabulation ` !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~ llC j j G j 3 H 5=FP ` pPP```0PPpp@``0@`PP p @@ P PP PP0`P p P PPPPp @p`` @@ pPp@p pPPPpP pPp@pP p@ppP p@@@pP p@@@@P p @p PPPpp ppPp ` p @PpPPp PPPPpP p 0 P P @ppPPpPP`P`PP`0@@@@0`PPPP`p@`@@pp@`@@@0@@pP0PPpPPPp pPP0PP``PP@@@@@pPpppPPpPPPPPpPPPPppPPp@@pPPPpppPP``Pp@ppp PPPPPpPPPPP PPppp PP PPPPP p @p`@@@@`@@  PPPP P pPPPPppPp@@pPPpp@@@ppPPppPp@p`@`@@@pPPpp@@pPPP ` pP0@P`PPP@@@@@0PpppPpPPPPpPPPppPPp@@pPPpp@@@@p@pp p 0PPPPpPPPP Pppp PP PPPPPppp @p0 @ 0 `  `Pp`𐐐00000000000000000000000000000000B