SYSDIR SYS OPTROSH RELOPTROSL SYS DEVDES REL`ADDOPT ABSTERMOPT REL SOFTOPT REL`COPYLIB ABSDELETE ABS DISKCHEKABSDOSGEN ABS@ ERRCOPY ABS LIB ABSREPROT ABS@ UFD ABSDRINI BAC@START BAC`DISKCHEKBACLIB BACREPROT BACSYS BAC`PREABS BAC NAMEDISKBAC UFD BAC SETOPT BAC SETCAL BAC @BACKUP CEN #BACKUP ABS BACKUP BAC PRINI BAC BASICINISYS ED BAC @R[KPRINTBAC@MOMSDEF DAT`PRHEAD DATSIZEDEF DATPRINI DATCMDINT SYSPREDEF BAC@COPY BAC TYPE BACPRINT BACPRINT BASINPR[K BAC bc " 1)Hq 9 1qR`!![!"R*{"!"{0 !"i!X*q`~6#~6#~6*{| !X##> #~#fo"!~#foOPTROSL SYS:f` *i` ##~D #~R7!!6#!>1~/w/w> 14#y>~/w/w> y@ 4D>y~/w/w>y 8>y~>y/w >y D>y/wy><2!!R?"i!Aq6#PXE ^!AV{7%7ˮ! / 0:G`h9 !X`!Q~<( } >3}AwGnf##Nɟ>x*Ws:!  <(=(!:>*pR!p"iQ!"iɧ(=(=( I(=(#=FHF$6F!F*-F*0CMDINT SYS Abort RAM*x?g: *m`##~ HR:! " <(=(!:?>A8 2R:WOxpW{ ]x(R2˸(%?v({<.=  i_ {<.= 2{ ~O{4Cy!!zo0$~(?z>  <12{G :!>(4y:!( ?14~>0#2RAMC!2C#~7 ~z>?8v͏>8m{c.s 1 :WOxpW{]x(롩 #x/0 !x ͚/͚/{ 2˸͏(%?v({<.=  i_ {<.= 2{ ~O{4Cy!zo0$~͏(?z>  <12{G :>(4y:W0/&.T] 66͚Ϳ@8= &,t .<(1=>  <(=(! :2/͂= t0.6$Ϳ=.w>2~w$w%͊͊ ,>-ORAM/ >!_>-*.~<(= #,N,,V,~/0:ź ,^,~/ , (GK#(>7*~,"CS2!=ʖ=k ==ʅ K[:[ (:_#~K5>Now.V#~_V10- &ɀo&N{+zs#r[ͅ!6[!:(I <(C <_c "{z0*"!55 .w ,w:@_!!F?DwxNo&4~o-~iwyoO~axpNo&4nw-w}bowyMoqOxpBo&4#4:@ !0  !L#!7& !9))y!o&^w,Vw{(0xp Ao&~!V P.[:@(y8*iy#y 0ڇ!o&s,r>,^,V>>Bos,rͶ>No&6ɀoN-{z>Bo^,V>Jo^,VR>Ͷ ͇8 0".Oͱ.Oͱ, )>#8.~.~,~͍)> ]Ч78zy< *|(z]> ]͉p͉xG ͍> &\͍xpGAo&~<> [>&#z>K>Jos,r>AoF>r0/OG>2A87>2+~2ͩͅ8~*o B͋8)Pڽ*|~b ą8V! w#2!o0$~(,ͅ82O G* #y y=Oh!>w0!4~0:((% : <>(< :<2.7>S0 ?>& >8:!wͩͅ8~O_ K W!w _.w>_V " o g+" !"#"!^,Vͅڑ.  .w>.w:@_!BA ( yOy[( x(!z7>2ͅ?*.~,,,,,,72P!>6>& 2ͅ8(͍8!0 Lͅ8U <- >O0 (=:< 7 : <>(< :<2 !>F>(!N>(> >(:>(@> >2> >2O <(>O0`b  [ͅD8  ͋8bͅ8 Ϳ= :͋ J!F B  0 Y .F ,F   [͋ .F   y  ͋ ͩͅ .~O*E >G   *> J  ͋ !"" #" "!6.:@_-BɁ_F #y Ϳ<<Ϳ=)6.~ . ~,_ ڝ [ ><. w,wv0 f6J _>wyO0z=_~.N<{< ڝ .N.~<,~<ͨ [ԍ8U* ͬ 8K.44 8@͇ͩ86: &w:o>6,= ͍88>2>0 4 s 8    & * #ͩͅ:OE Df ? Ëb:2} +  [ͅ!~O6= <  ͋bͅ!Fx(!N68\<(Y.w6,w.w.N><><q.~Oy8 OzW 4.N6_.~8 wzW{0{ b͋0| w!F&.N<! V-^ͅ8^ ( K .qbͅ8I 8:͋8?!^,Vͅ8-.N.F ,F (  ͋8:Ao&~ w>  >?b >G@> x>(>& *i~ *ip & y0; o}(G0y $}o} z(g0b V0 {0Z >7ȅoG|8g> O{=!p,w: `iV "TM G zG( 0 { b8@@ (H34@w *`-`*.~( [k` 14 @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ DR$HDlMFMOnSF????RM}P)5JT<$݊ݵ<฼<<I%2$ݵ<฼<,<T  *0:DQ[aPaPOPTROSH REL  addopt.absՁ##Ձ,ֈ to start table!#Ձ,ֈ OPTROSH REL!(#Ձ,ֈ~ to terminate2P ""!!4*`-`!~5g.~(I#>(C"N#`8,s-`*.~(8.V.^K@yH`0{7s* !**"ͱ:G(*oLEb9B"*LEC* -`*. "!#b! PͱG#g (Mo _!O qomki!a_][*{/_z/WC~#F#N#( :O:G!j B*++7!BOOʪ~#F#N#( :O:GxAOq#p#BASPICINISYSk(Mo _!O qomki!a_][*{/_z/WC~#F#N#( :O:G!j B*++7!BOOʪ~#F#N#( :O:GxAOq#p#BAS``0r`!{%!}%!%1>ך|^#V{  } |JC^! 89^!DM9 *R:T=0 oO(.$>0^ &"R!2N # ^#V*R> %"R_> _.$`<|W%&,t> _! =W _ W=!9 N9 7?ȇ7n*R}0g>8|9>8}9> 8>9_>(9{![W`R\bR{OzG!B!<80M~A|xg~w,p$p}l&]T))))))_[W6 6~"M:(h: F (6 : )7nf$%(n##^#V#N#F \u!t"2[QÊ828 W:`˿ǁȁnȏn!g~怇8 ^QÒ8#|u!w">57 8*Rw,t  :S> *WP0!RMD!B8MD!xx6 (kb6 y(W|g!x"W> 8|9> `8}9`> g:T)>8w9  ___~ {= {={ ɧO^ +V(^(?(~Gy((  Oy>!*~=˂˂˛N*w *wU`B(1rŽ*t 6#>q#pY*R:T2P(}o>P2T"R!˃wC>2>2:P(;SR2TSRm8 8^O:GG~5ypX(o(@O{ {5q#z56#H(P N>5q#6`{P8a  ( = v m`fqy5m5:2##{PH>:2++{H+:ˇ2P zH:ˇ2z` SPBH:2a H!xx>56 !xP>5 q!x>5q#H>"HG:Gw~5xK86(R(RӃ+(Y(?(A:G> ` y(x8GG:˟2:ˇ2,(˸$xGxG'''Gx8G???GC :o(_( ++^##{ 0Sy5r#x5:w#:O(W zNW>5r#x5:w{PaH:2:2:ˏ2:` ˯2C y56 #x56 #:2W N>56 #y5:w#{PaH:Oˏ2(W#Wx8GG:2:2WPWy5r#x5rz{oN P8z` 8y :2 :g2w~5 :2>2>2((++("~5(O#~2_5G:C(K( ~5 :gy  z |2C` TDMP>56 #ˊ 5 >56  ˊ>56  J( w 6 #  j&T]))))))x ` ` p!p 0BYpw!{%!}%!%1>>|^#V{  } |#o! (! }2W|2V*t6k6k!"Y!X}F N(ˎ;(>8:W9!> 8|9> 8}9!6 x!Px!Xˆ:pVB_ W;{7;{ >8:W 9> 8>x9> 8>9;:V7;!XV˖ >8:W94>#>##o:Q(}2Q*R[T"RST>#>#M ppc  88 !:o` !\د2!~# (~#/(,( ( (~#V :2:P!! =0!2!! =0!2`!!~J :2!!P0!!:2P!,8 6 :p`((7?2!""6#6!:P72O *m`~#7*k`y o0$"~2#"~2:`2ѧ!7!7 *m`~#!7!y2: @ 2Ͷ'͜0':2>Ͷ'͜0X:˟2: *m`^#VͶ*.y 2!yp7o0$~:P *m`^#Vy_0>ͶX'*yo~#<+~#,,, # } o~f>oR  (# >.!!~A:A(&I!XN (7J :=A8*q#>.6#6"#6'6,;y( O y*##" ",د2:ѧ!!!*#~X+~#_ͦ8(:!!+7!:O>`X!+*:O `$`ͩ*"* !Kx<!COPYLIB CEN:Χ7[:::#54>^.s $: >> *.V-^-S~ɇ.(ɯ27''''} 8B 6 #0>0! 6 ! ~.(͔8wX7#~ ( ͔8wq! AڢA^?0:?>E`E`2ί2p4A>-`X[!~4W*$.: 8֯2:Χ(([!~4W*$$. 0`:!ξ :Χʺ*R+":Q!aw !`>2QX!]V!\^ '`>2>2:ηO!!22*"*"#~+~ :W(!7!!!3N#_ͦ8 = !!+7!G==!:O>2Q>`X!+:O `!GGE`E`>-`X*$.[S:<2 XE`E` -`*$$.[S:<2 G*"*"[ S"2[:=2ʲÏ*"*": ί2:O:ιͧ!r!!U:2 v!##!7!9R!7:_(*~?w#:w:_( *:w#:w~#foSC2}2y2``K[:2 .1h:*.~7.~?,*N˶f`q 181 bk6#6 f x0G> a@89q#fx 0(>aq. #fx0> aqϯ>7_~0~8+~# (0:?% 0sA^?Kopiera ########.### ? Kopiera fil? Kopiera fr}n ? Kopiera till ? Verifiering? (J/N) Felaktigt filnamn Felaktigt enhetsnamn Minnet fullt. Originalfilen finns inte. Kopian finns inte. Du anv{nder ett f|r gammalt DOS ! /! SYSDIR SYS Fas 2 Kopiering Programfel !  Fas 3 Verifiering Inga verifieringsfel  Verifieringsfel - Kopiera en g}ng till  Sektorfel p} kopian  Verifieringsfel  Sektorformatfel p} originalfilen  Sektorformatfel p} kopian .r Olika fill{ngd sektorer kopierade ** Kopiering av filer ** Ver 6.00, 1983-02-10 Tillg{ngliga kommandon: A - Kopiera resten av skivan X - Uthopp, kopiera inget I - Kopiera ej resten av skivan J - Kopiera den m-ena fil J=Filnamn.typ - Kopiera med nytt filnamn Original och kopia m}ste vara olika Fel i biblioteketS8iga kommandon: A - Kopiera resten av skivan X - Uthopp, kopiera inget I - Kopiera ej resten av skivan J - Kopiera den  88 !o:P8L!! =0!2j!!P0!!i:j2P!o"C"Eʯw#w:P!72j:j2 *m`~#7!y 3:P *m`^#Vy_0*k`: o0$#N˶f`q*:Py(ʝoB8 ~G#<ʝ~ʝ> o~fʝ>oR  (›#W>.!)!W!G~A:GA(Iʪ!XNʜ ()J *Cq#>.>SCyOҧ §[CSk:pʧ!g!!*E~#45!_B7:jO`!$`!`*E"E!2!7bk6#6 ͆ x0G> ́@89͑#͆x 0(>́͑. #͆x0> ́͑ɯ>7_͞0͞8+~# (0:?A^?Fel i biblioteket.Programfel ! B6'Fas 2 radering Drivenhet? Radera fil? Felaktig enhet. Filen ej funnen. Radera  Filen raderad XXXXXXXX.XXX ?  ** Borttagning av filer ** Ver 6.00, 1984-03-07 Tillg{ngliga kommandon:A - Radera restB[54en av skivanX - Uthopp, radera ingetI - Radera ej resten av skivanJ - Radera denna fil 8 aderad XXXXXXXX.XXX ?  ** Borttagning av filer ** Ver 6.00, 1984-03-07 Tillg{ngliga kommandon:A - Radera restB$  82܅Ʉ8ͅ:p` !6!Ląs:P81!ͅ! Ϳ0!Vͅ2P!ͅ!6,# Ϳ!#~ (~#/(,( (> (:~#˯N 2D 2J 2V 2S 2P 2( :P!V?2*k` ~o0$~2#"~ } !0"!0P!!qB7̀} ͔8L*$T$$.]EMGO,> !x !Iy G, !կ } "!0ίDM!9qpsr ut { ww 6!͔̀܌^V *$.%~(e4W#^+{(Z##~w#~w#͞0,56#B6'nf [Y͟^Vnf+R8Q[R0I~w0G, ~fW˯6 !4!9~w,6,6,~w,~w,~w,w#%P ͔8[ # #~6!"[B4Aw! !5!9!7>_: :'[!":O:η G`͔:η(<~(6nf+^V{(#R8*>g.~ݖG,~G,~!"4 4 : (#'{_*$$$j~  87 w͍7``O >B3N:W !xpg.EM !!D )!Uw "!ag !y_ !W !O !͘͘͘ͅ!9ͅ>ͅ!>ͅ! ~ ͅ!Gͅnf>ͅ!  6ͦ!cͅB2[:p`:0 (:(z !Nͅ{8(! dͅη͟:η>:η>͘ͅ!ͅ! Ϳ:˯OJ>>N>> >~#fd+~# :00+~#^?A:͆:ηB 1i1C!@[!P>N.5l>.5l:!υogDISKCHEKCEN3"*.ͅ:O*.EͿ>^SC2}2y2``K[:2:և! !?!^υog|7ͱ*N˶`qͱ*B 0ZN˶`q:p`!B0 !K ~#foɯ} 8B 6 #0>0~# 7 (+~:06D#6R# w#6:ˮ#ˮ#~:8ˮ:0* *{^#V##O ~:7?| 7Vͥ#~( 0# ʀB /g (̶!9  ͥ :'7s3sE!!5:2ҷ >!]>22VA+##~ # f T WA !9> A AA~0:2ҧ̈́s3sEB .t!!5ͷ^(666>>~ ^w * :2ҧ*,~ #^#VSZSҿ6B6C6'6&6#{3~D7PR: `A-L** Diskcheck ** Ver 6.01, 1984-05-07Du anv{nder ett f|r gaB -rmmalt DOS ! Enhet ? V - Skriv ut varningarD - Skriv ut filnamn som checkasN - Inga {ndringar p} skivanJ - Korrigera alla funna felS - Snabb, varningar checkas ejOptioner (V,D,N,J,S) ? Felaktigt enhetsnamn !Ska filen st{ngasB,Ska denna DIR-sektor raderasSka filen raderasSka lockout-sektorn ers{ttasSka bitmap ers{ttasSka UFD-namnet ers{ttasSka sektorn ers{ttas (J/N) ? Felaktigt recordformat.Felaktigt filhuvud.Enheten ej klar.Skrivskydd.Hittar ej denna reB+scord.Checksummafel.Data f|rlorade.Fysiskt slut p} enheten.Ok{nd status.Filen ej korrekt st{ngd.Dubbelreserverat cluster. DISKEN EJ S[KER !Bitmap felaktig.Biblioteket felaktigt.Lockout-tabell felaktig.Cluster utl}st i bitmap men e B*fj anv{nt,Kan vara utl}st av DOSGEN.Felaktigt recordformat. Ej kritiskt.Felaktigt filnamn :Felaktigt UFD-namn.Du m}ste vara inloggad.Du m}ste vara super-user.Internt fel.Fel vid NET-operation. LDA:, [gare:, LRN:DISKCHECK BT)Yavbruten. . Bitmap Lockout kat.Bibliotek UFD-bibliot.Ingen 8 Felaktigt UFD-namn.Du m}ste vara inloggad.Du m}ste vara super-user.Internt fel.Fel vid NET-operation. LDA:, [gare:, LRN:DISKCHECK B 8> b82!":o` !ڿ:P8=!!] =0!2P!! ~˯6A#6,#w#6 :P :P*k`2P> 2 2!~# (~#/(,( (" (~# ( (N 2 F 2:P! !R :ͷj:P2_!Q!j:B8jJ!¿:A!P !p!j:jJ!¿!L!j:jJ!¿&!)!x:ͷ!j:jK(C:P2*k`o0$~2#"~2:p`ʐB7ʐɯ!~w0> 9`~  T]6[!" ͆(FG #}  .6#6#%:A80~w 0,  $ڼ.:w $ڼ6#:w>^.v­:w >(! ~#(#ʼ(! ~#fo2B6"Q!>^#VS 0]T6!60$ڼ]T 0$ڼ 0:O`8v {ZWS {ZWS{ZWS!00`8,!`8'* :8) UQ!U:ͷ!!:ͷ &! B5/! ~_E( D(!2 !e:p`((6#:w#: w>^.v­:w(~>(! * #" ɯllll} 8B 6 #0>0038 := =(Q!:=_7DB4<:p`Q! *.xg::=/_: (#'ZW*N˶`q*N˶`qC!(7>7:OU!6*q`!6:ͷ6C6SC2}2y2``K[:2:7SjЃНн!kBG3I! 80!̅og~#fo ! SYSDIR SYSDOSGEN CEN 2 M 2 g: ͧ 0ͧ@ͧͧ``:Oͽ*u`~ w({(/_O ٷ7``:OS ͽ(_( B2Yͽ ~, ``O xyz{ͯ0 @ N @;@NNGw, Enheten ej klar, kontrollera ! Skriv in "K" n{r du {r klar !  Skivan skrivskyddad ! SkrB 1fiv in "K" n{r du har kollat !Enkel eller dubbel densitet? (E/D)  Svara E eller D !  Skivan verkar vara d}ligt formaterad ! Ska den formateras ?  ABSOLUT s{ker ?? [0m  Du anv{nder ett kB 0Sf|r gammalt DOS !! Enhet ?  Felaktigt enhetsnamn ! Volymnamn ?  Ska skivan formateras (F/-) ? Du m}ste vara inloggad.Du m}sta vara "Super user".Felaktig sub-funktion.Det finns redan ett job.Hittar inte "DOSGEN.CEN".KaLB /`n inte {ndra under bibliotek.Felaktig login.N}got fel vid laddning av "DOSGEN.CEN".Felaktig "ERROR" kod.Programfel.Central:** Disk generation ** Ver 6.02, 1984-03-07 Skivan i ***: kommer att rensas helt vid initieringen. [r dbB .met OK ?  Sp}r 0 {r d}ligt (borttaget) ! Tyv{rr kan biblioteket inte initieras p} denna skiva. Prova med formatering om du inte redan har gjort det !! Skivan testas ! anv{ndbara sektorer. Har du bytt skiB -zva??? Annars kommer skivan, som detta program laddades fr}n, att initieras (raderas) !!! [r det OK ?  Felaktig option ! Felaktigt enhetsnamn ! Internt fel. Kan inte formatera, kontrollera !!! Skivan format(B,xeras !Nu testas sektor Sektor ***** {r d}lig - borttagen!   !6ͱ( !5 >é@(#v +('&@((&|=o| ( '#0>é>ࣵ_G!yxz{ I D`(y.EM_B+k8( oo( ҂‚%0( !5(72?2?.e~! ~o0$~<(=( ( x =::*x?g8G!yxz{ I D`(y.EM_BB 8!":R Ÿ!! =0!2! ! =0!2!!Pͬ0!!!`ͬ0!:2P:2`!6 !~# (~ ( ,ʺ##~2> 2!R B`.P>4:R2!b~ T]!BB8 `!j~ T]!B`!`> `$!I` $`͚`!H B`: !i !~ ]Tm!Ny! !: B`TB`!OB`BB`!AB`![ #E`2:E`NE`-`w!~4W*$.: 8߯2:ʧ(%w!B7~4W*$$. 0`:!ʾ :ʧʢ:Q!aw !`>2Q!]V!\^ '`>2:E`!R4»#4ûNE`*R[ʧRB͢> #"R:!) ! !1!A: !}*$.!%!.!.~_Jʶ: !%!.!.~B6&_Jʻ!%!.!.L*$.s#û.%B8'x!.UA~#p6 !.|A~#t6 !.A~ 886.#6 !-!T!{Ɛ'@'OBJABSTXTXXXXXXXXXXXbk6#6  x0GB53> @89&#x 0(>&. #x0> &˯>7_3038+~# (0:?A^?͚~0:?~08 833bk)8)88)8 _8͚͛+(- I#~ (ɯͽͽͽͽ}!Bo4@ 8B 6 #0>0*$.MUZW C0w#O xyz{0>,( 3T3{j3] Vill du hoppa |ver sektorn? (J/N)  Vill du beh}lla sektorn som den {r? (J/N)  Decimalt fywB62 llnadstal? (0-255)  CRC AM-fel i sektor i2H Hittar inte originalfilen ! Filnamn saknas H{r anges sektorinneh}llet. Felaktigt filnamn Felaktigt enhetsnamn Felaktig fil?  Felaktig enhet?  6Bz2Kopians namn?  Kopians enhet? ** Errcopy ** Ver 6.01, 1984-03-07 ** Ny fil ** ** BAD OPTION SPEC. **'8ektorinneh}llet. Felaktigt filnamn Felaktigt enhetsnamn Felaktig fil?  Felaktig enhet?  6B 88!ί2Q.S!̯ww66*m`^#VS{> >w:P .!! P2!!)!6L#6,# :P!7=(w!~# (~# (K (G,(/ ~# (9 (5_N &S &B8 F &P O :'>((:TP &:b :m (+!m:͊!b.͊!j ͊ ~ݾ!.*k` ~o0$~2"#~202; :@ Nr]C0C:?*w2:2>2rC0:?@*w2:2B7z].*k`o0$##V#^!r#s; f(. 6R#6A#6Mʧ!~ J[r\*.^#Vz #~_0r[o!6 ##!zʧ; z\~ [r[.~,n <=}w~ [}B6'_0tZ*$.#~ (S(R#^#VS#~<= R ( *( #yV ##F(1}ݶOtrr> > 0N(]*| I}oV#>_:(:< tZ[!E<( ̯sB4A}  8B(0>0> !6^ 5 4 ^ͨ54~*m`##~:*.~7.~?,v*~?@w*#N˶~2`q~ (#y3W:'7B3FssE!!:η >!]ͳ>2V'+##~ # L : W' !9> ' ''~0:ΧjssE!!͝^(666>>~ ^w * ͜.89ͬ#͡x 0(>ͬ͜. #͡x0> ͬ͜ί>7_͹0B 1Q8+~# (0:?A^?V#~( 0# (!9   ~# 7 (+~:06D#6R# w#6:ˮ#ˮ#~:8ˮ:0* *{^#V##O ~:7?| 7 UFD:P FILENAME.EXT ** LibraB 0^ry list ** Ver 6.03, 1984-03-07 Drive ***:RAM:xxxxxInga av  sektorer lediga.Skiv fel = Felaktig enhet !Enhet/Bibliotek? S - StorlekN - Fysiskt filnummer.F - Filstatus.P - Utskrift p} printer.ingen - Filnamn enbart.Opt`B /kioner (S,N,F,P,ingen) 807 Drive ***:RAM:xxxxxInga av  sektorer lediga.Skiv fel = Felaktig enhet !Enhet/Bibliotek? S - StorlekN - Fysiskt filnummer.F - Filstatus.P - Utskrift p} printer.ingen - Filnamn enbart.Opt`B 8+!+8!g++:R 8!+!dP!:R 7!%+! d~˯6,#wZ !}B`:P!7OR`!*k`: ~o0$#"!#~ (~ (s (o,# ~˯X( S(R U:P_:Q! *m`N#fi*N˶f`q!B/8:P*o~<7#~w*N˶c`q!>2Q!7.7bk6#6 ͎ x0G> ͉89͙#͎x 0(>͉͙. #͎x0> ͉͙ȯ>7_ͦ0ͦ8+~# (0:?A^?~# 7 (+~:06D#6R# w#6:B7$ˮ#ˮ#~:8ˮ:0* *{^#V##O ~:7?| 7VJ#~( 0# * ([!9  J ** File protection utility ** Ver 6.00, 1984-03-07 Felaktig optionREPROT,XSR Filnamn.Ext Fel vid B61skrivning i biblioteket. Filnamn : Felaktigt filnamn Felaktig enhetHittar ej filen X - Avl{gsna skyddS - S{tt skrivskyddR - S{tt raderskyddAnge option (X,S,R) : ABSv8S4-03-07 Felaktig optionREPROT,XSR Filnamn.Ext Fel vid BB 8P:8 !P*m`^#VS>!#~ (~#/(,( (2 (.~˯LMvFRCʐDt!P!7:R H!P! ͉~ (˯6,#wC(R !P!͉PD87:R !7)-R:PO`8#-`83`O3`G(*>B!`!B8 7!72!4[>z(c!"B86`_6`WS@˳ 6`o_08}*o*BP!P[@z!"B P!P!͌[>͌:p`( ( C>2>2S2:*k`>~ :2``2:DS>*mB7`s#r[>z!72o6`_6`W͌:Pz!72o6`_6`W*>͌zo6`_,- :O `RH`!`͌!.!iP͂-R:PO`:QoP*$.T]6! *>}9`|9`:P͹B6'9`0`0`#R n*$o=w, !8f !PP:Q!`͌!Z~ #6U#~ 6f#~ 6d:R !`!.7!7$`!`!C7!w7͂[>z!|728*$.~< Y,  [>86`_6`W͌6`_O~+(Bs54`8$`!`!\P*m`##~*m`##w!7!7*k`: o0$#N˶`q*k`: o0$#N˶`qx4Dbk6#6 ͳ x0G> ͮ89;#ͳx 0(>ͮ;. #ͳx0> ͮ;˯>7_0B4C8+~# (0:?A^?~# 7 (+~:06D#6R# w#6:ˮ#ˮ#~:8ˮ:0* *{^#V##O ~:7?| 7Vo#~( 0# O (̀!9  o ** User File Directory ** Ver 63B3P.05, 1984-03-07Felaktig option !UFD,LMFRCD FilnamnL - Lista aktivt bibliotekM - Aktivera master-biblioteketF - Aktivera fader-biblioteketR - Byt namn p} aktivt bibliotekC - Skapa nytt bibliotekD - Radera aktivt bibliotekingebB2]n - Aktivera gammalt bibliotekAnge option (L,M,F,R,C,D,ingen) :Filnamn : Aktivt bibliotek {r ' .Ufd'MFD'under fader-bibliotek 'Aktivt bibliotek {r 'MFD'UFD skapatUFD raderatUFD har bytt namnKan inte radera 'MFD'KwB 1jan inte byta namn p} 'MFD'Enhet f}r ej anges !'MFD' har ingen fader !Inget namn angett !Felaktig fil !Hittar ej filen !Filtyp f}r ej anges !Filen finns redan !Ej tillr{ckligt kontinuerligt utrymme p} enheten !Fel vid l{sning/)B Q0wskrivning p} disken !Biblioteket m}ste vara tomt !Kan ej st{lla UFD-pekaren.8tt !Felaktig fil !Hittar ej filen !Filtyp f}r ej anges !Filen finns redan !Ej tillr{ckligt kontinuerligt utrymme p} enheten !Fel vid l{sning/)Baei /* DRINI .BAC *** DR_: initialization *#* Tillh|r Systemdisk, UFD-DOS*,'* Copyright (c) 1983, Luxor Datorer AB$**.%* Program to detect type of DOS PROM+8&* and to set DR_: equal to BOOT drive2B-* and to set drives to old biased addressingL*'V"* Ver date / Ver nb / Sign / Note1`,* 83-03-01 / 6.00 / LDAB / Urspr. DOSVERS7j2* 83-04-25 / 6.01 / LDAB / ABC806 TIME$ settingt* ~&!** ** ** ** ** ** ** ** ** ** ***ީݵ True/False*2'Switch T/F here for display/no display@ 5Switch T/F here for old biased/new linear addressing*:/Switch T/F here for keyboard click on ABC802/6*$start"Name of next program*&!********************************* * Main routine* ,(,݊2<2,ފ2<<,ߓ2k< F,ߓ mFFP* Z^Pd*,n ",߸Turn off 5 ms clickx*+"DOS {r 2<FP*  "*&!********************************** Detect DOS version*"* At exit : 0 if old 5" dos,'* 1 if old 5" DT and 8" DOS3.* >=12, New UFD DOS version number* ) pf`ݸ old 5" DOS#i`-ߜ-R D ޸'o`Get UFD DOS version number",*'6"*********************************@*#J* Separate between old DOSsesT*^Sj A)z!h out (2),a : retr+Z |޸,,}  ޸,-}   Z'ABC 6-1x eller 8"/800 8"/800ABC 6-1x*)$************************************% * Separate between mellanDOSses*  Lj`-劽 ABC 6-3xj`-튽 ABC 6-2x &ok{nt0:*,D'***************************** *********N*&X!* Separate between Super and NETb* l2!w vp``$`݊ UFD-DOS ver. ,$`ኽ ABC-NET ver. , UFD-DOS ver. ,*,'**************************************** %* Set current drive to DR: mellanDOS*  !刵4m`-,圸 Set DR_:, e.g. shift 1 bit left#݊DR_: motsvarar SF_:DR_: motsvarar MF_: ** %**************************************) 4$* Set current UFD-DOS drive to DR_:>*H!#!!R`ݍ\-݊ fᜈpk`-, Set DR_:zk`-k`-ߜ-'DR_: motsvarar  _:**%**************** **********************%* Set UFD-DOS drives to biased addr.* #9#i## k`- ᜵X䡜ޜ,䈧␽ޜ,@ Set biased  ᜵  Gammal addressering$ .  *(8 #**********************************B *"L * Copy CMOS clock into TIME$V *` .J$$C$6j >dž6>Dž6y :t ǀ6>6>dž 2~ 6>6> 8 dž67LJ# >  6  ++Z  * 詸,ݸ8 ,,,6 멸,ޫ,߫, Datum och tid: )  *$ ****************************** * * Convert BCD --> Decimal *( %91%zQ%2  < 숧F VersDosversSepoldSepmellSetmelldrSepsupTypSetsupdrOffsDevConoutSepDrSetSetoldBiaSetbiaTableEntryClusiLinkDrdescClcSettimeCodTbufList2200BdPtrBcdClickGy y""q%"#, 2R"<"F"P*$Z9`i!숧F VersDosversSepoldSepmellSetmelld@aQ * START .BAC ** ( priniߜ-'DR_: motsvarar  _: **UVersDosversSepoldSepmellSetmelldrSepsupTypSetsupdrOffsDevConoutSepDrSety y" R"!`!!b**  ** Ver 6.00, 1982-09-23# Copyright 1982 Dataindustrier AB; DISKCHEKABS`! +݊, P,ǰ,금 r! @BD!FHJLN Diskcheck Fel vid laddning av DISKCHEK.ABSKABS`! +݊, P,ǰ,금 r! @BD11!4** , ** Ver 6.03, 1983-02-02# Copyright 1983 Dataindustrier AB LIB ABS`! +݊  {oǰ,`,,, , ,1 , , , , , , , , , , ,  a! . ABC800 LIBFel vid laddning av LIB.ABSF|r gammal version av LIB.ABS {oǰ,`,,, , ,AA!c**  ** Ver 6.00, 1982-09-23# Copyright 1982 Dataindustrier AB; REPROT ABS`! +݊ , R, ǰ,금 s! !ACEAGIKMO Skydda filerFel vid laddning av REPROT.ABS ABS`! +݊ , R, ǰ,금 s! !ACEQQTk m0 ** 2 ** Ver 6.03, 1983-11-03# Copyright 1982 Dataindustrier ABW  FY AAas L    ! ++* Q 0! ::+0+* ++*0  0 0:+0+*  &--------------------------------------Dž-D8 ݊Q Q: ;QRAM[a!QN g> ;m. ;s ;y  &--------------------------------------޵㸼K ݊ j( ? DR_:    _:#Qg _:;mǀ@@;s?4Q;y;##䈧;;ǀ  ;@  ;jA'ea RAM:y;##䈧;ǀQ!N u!p4  () / ) ;Ƽ¼ ¼  ޵㸼H v   _: ( / ) ;Ƽ¼ ¼ a Q a݊c>  RAM: (. /! ) ;Ƽ¼ ¼    (;D ) ;Ƽ¼ ¼ ¼(=¼ ¼(=¼Q ¼ ޵丼4¼ ,ᡸ[޵丼%l ,;$$y! (@) ;Ƽ¼¼ ¼(=¼ Q ¼ ݵ丼5¼%?[. ݵ丼;,; 1 (?4Q) ;Ƽ¼V¼'M.䖆 ǀ@塜.Q [W (䈧) ;Ƽ¼h:¼'  1,2,4,8,16,32婈$߂$[ǀ@݊ (;@) ;t) ;Q Ƽ¼ ¼ C [@¼   [@%+%1 (;ǀ) ;) ;Ƽ¼ ¼ Q m [ǀ¼ 7 [ǀ'" (;<ǀ ; ;) ;Ƽ¼ ¼ Q m [ ǀ¼ : [ ǀ w!ry! (/) ;Ƽ¼ ¼  z Q :DEVDES.REL;Ƽ¼ݍ¼¼: ¼:P¼ DEVDES.REL޸#޸,7ᡜ#޸7 9޸:  'DEVDES.REL' ޸ ީ[ݵ޵gmQsyk`-p`%+1Dž-DQݵH丼HHJM'W5/W8',0,'A6/A8',64,'A5',128,'A6/A8 fast',192,'A6',64,'A8',64,'W5',0,'W8',02"-DߜDD QD-DD݊Ky#F$ݵHQ฼HHU݊[7%2$ݵH฼H,H`b&&ޟޜw #2EakySystem-enheter HighRes-minneSystem enhetsnamnParametrar f|r diQskenheterCentral Gammal addr Vill du {ndra parametrarJ[ndra parametrar f|rkonverteras till矸 ,<QZdm[ndra DR_: konverteringFelaktigt namn[ndra controllertypFel typ[ndra CsFel typ[ndQra clusterstorlekFel clusterstorlekGammal adresseringN '/HRw[r enheten centralFel CsSka parametrarna sparasp} skiva#[ndringarna best}r till n{sta resetSpara p} enhetFilen ej funnenTQyp Controllertyp '0<>@BDFCsClusterstorlekSp{rrad S{tt sp{rr  *0:DQ[agmsy%+1Q7Hrollertyp '0<>@BDFCsClusterstorlekSp{rrad S{tt sp{rr  *0:DQ[agmsy%+1aea=* PREABS .BAC **%+----------------------------------+*%! PREABS !*%! ------ !*%! Autostart p} f|rst en assembler !*%! fil och sedan en basic-str{ng. !a*$%! !*.%! (C) Luxor Datorer AB !*8%+----------------------------------+B*'L"* Date / VerRev / Sign / Note>V9* 83-02-22 / 6.00 / LDAB / Tillh|r Systemdisk, UFD-DOS`*&j!** ** *a* ** ** ** ** ** ** ** **t* ~&!********************************** Main program* *5Autostart av maskinkodsfil (N) ݫ $ j  *Enhet: ݫaU : 2*Felaktigt enhetsnamn C&3 Hittar ej & BASICINI.SYS `*( Vill du {ndra (N) ݫ  j!*(j22Maskinkodsfil f|r autostaart ݫI 7< ] 'Felaktigt filnamn F*;P Skriv BASICstr{ng (max. 158 tkn) ݫ Z ! d 0n*7x,Kan ej st{nga BASICINI.SYS m * a*'"*********************************** Initialization*  ݵ ީ False/True* Ǡ Ǡ0 &H?DR0DR1DR2DR3HD0HD1HD2HD3SF0SF1SF2SF3MF0MF1MF2MF3MO0MO1MO2MO3UFD:E<`abcdaefghijklmnopqrstuvwxyz}{|@ABCDEFGHIJKLMNOPQRSTUVWXYZ][\D" .0123456789DN,*6TޜX$@ ABC 800 PREABS  Ver 6.00XJXTXޟXT XT= X^* hXr)|!Program f|r uppl{ggning aav BASIC-)!kommandon och/eller maskinkodsfil"som ska utf|ras vid RESET.)!Mata in enhet som ska f|rses med,+#eller f} {ndrad, autostartfunktion.%Enheten m}ste inneh}lla filen"BASICINI.SYS".  a *&!*********************************$* Skriv ledtext och h{mta svar** V#9#Y#z(Ǡ; &0ߟ :D*&N!********************************X*,b'* Kontrola lera och formatera enhetsnamn(l#* Enhetsnamn ut i Dev$ om ej errorv*I , z +01DR:& ኽ  "(=  "a (=  2 _(=  :݊:&  *( #***********************************9 4* \ppna filen BASICINI.SYS och h{mta gamla str{ngar**a 4 2z# 2$>H BASICINI.SYS޸R#޸,L\ #޸,踇f#޸,Zp #޸,Ǡz ޟ !* X/&Gammal maskinkodsfil: Y"Gammal Ba ASICstr{ng :   * *& !******************************** *" * Skriv record 0 p} BASICINI$ * Filen {r |ppen som #1. * 8 i&SB / L #޸,݂V #޸, ` #޸,a&j #޸,]Sǃ t ~ #޸,3 #޸,O!4` / #޸,!5  #޸,L #޸,b * #޸,Z #޸,0 ޸ a *    *& !********************************( *2 * Felfunktion < *F ( $$ P !Z ;';;;d  n - Tryck ;x ll  ;'; a   *& !******************************** * * Kontroll av filnamn7 2* Filnamn 11 tkn utan . ut i Assnamn$ om ej error * !Hzy  閽 . 施  aD ݊ ߵv#" Nv݊, x 6 b@ ޵v^J v T ` _.^ . bbb b bh r bbb |   *& !******a************************** *$ * S{tt punkt och packa filnamn * &zy  z  ޵ V鐸    劽 . ޜ   & *InitConFormnamnFelaOpenDevSlaskInmatningText1BasicKontrollStatusAssDriveAssnamnDevsTextRadKolFr}gaDisplyoldAbsfilBasAss1Ass2SkrivKvitteraIndexHeadFchr1FchrList2500ErrBasic1WriteCodMprogSetpWidth80Xmid 9 :y& y& 0!:"Dar%N%XJ%b"l vy ngText1BasicKontrollStatusAssDriveAssnamnDevsTextRadKolFr}gaDisplyoldAbsfilBasAss1Ass2SkrivKvitteraIndexHeadFchr1FchrList2500ErrBasic1WriteCodMprogSetpWidth80Xmid 9 :y& y& 0!:"Dq #qA g #*****************************#* NAMEDISK.BAC *#* Program f|r skivm{rkning *#* ABC800, ABC802 och ABC806 *#* (c)LUXOR Motala *#*****************************$*#.* Tillh|r qsystemdisk, UFD-DOS8*'B"* Ver date / VerRev / Sign / Note;L6* 83-03-03 / 6.00 / LDAB / Urspr. NAMEDISK Ver. 2.0V*`j#t*****************************~Dimensionering y ǠInmatningsbuffert*qީݵ True/False* $Eݫ)2 Gammalt namn<Volym: F*$PNytt namn (N)?qݫUZ jd*.n Nytt namn Volym: ݫ1xw"F|r l}ng rad. ݫ8 8>ݫQM{rkning utf|rd* ;*#q*****************************Funktionsdefinitioner*&!*********************************,'* Kontrollera och formatera enhetsnamn(#* Enhetsnamn ut i Dev$ om ej error*h  z ",+6q01DR:$@Jኽ  "T(=  "^(=  h.݊r:$ |*% *******************************q*+&* Make drive descriptor from dev-name*Y!"""%$ DR$'>$ $  k`-3ߜ- ᜵ &*0$'>q :DN*#X**** L{s en sektor **********b!#I#l,vf`K Q?Qݍ4$Kan ej l{sa fr}n skivan. Kontrolleraޫ8 Q#*****************************#**** Skriv en sektorq *********A"#I#,c`K Q?Qݍ4$Kan ej skriva p} skivan. Kontrolleraޫ8 Q#*****************************# ****L{s gammalt volymnamn****   *y W4q hW >WWޜ犈HW WRW  \WޜWfpz"****************************$**** L{gg variabel i dosbuff**"X ޵W6WWz ,Wq WޜW 8#*****************************#**** Inmatningsfunktion****** ##$& ;Ǡ;; &  ; $ . ߟ '8 Felaktig inmatning. ݫa8B q L #V *****************************#` **** Felfunktion*************j 9!|#!$t ;;%~ ݊Kvittera med CE;2    ;(;  VolymnamnSlaskDevDevsInmatDevnameqFelDescReadsektDrdescDosbuffWritesektIdevTableEntryDriveSektnrStatusTextRadKolKvitteran R yy$ . 8Q >!KyQ#Wy    ;(;  VolymnamnSlaskDevDevsInmatDevnameqktDriveSektnrStatusFelWritesektDosbuffInmatTextRadKolKvitteraSkrivSlaksVolymnanLisytDevsFormnamnDevFinddevDrdescDescIdescEntryTableAuto890IdevDevname4 R yy$B$.#8$>Q KyQ1!Wy VolymnamnSlaskReadse  !e**  ** Ver 6.00, 1982-09-23# Copyright 1982 Dataindustrier AB; UFD ABS`! +݊ , R, ǰ,금 w! (EGIKMOQSUser file directoryFel vid laddning av UFD.ABSS`! +݊ , R, ǰ,금 w! (EGIK  a  addopt.absՁ##Ձ,ֈ to start table!#Ձ,ֈ OPTROSH REL!(#Ձ,ֈ~ to terminate2  a i)d$!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!)n$! !)x$! PROGRAM F\R S[TTNING AV DEN !)$! BATTERIDRIVNA INTERNA KLOCKAN. !)$! DELAR AV PROGRAMMET M]STE VARA !)$! I MASKINSPR]K. !)$! !)$! LUXOR DATORER AB !)$! !)$!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! " I r  %_¡;   ޜa@;ސ8"0 ,ݖޟ 96 / :  ;@JT^ HUVUDPROGRAMhr | ޵D!  - І KALENDER OCH KLOCKS[TTNING ІO= Ѓ]R: 19ЃM]NAD: ЃDATUM: ЃTIMME: ЃMINUT: Ѓ̡SEKUND: ЃVECKODAGSNUMMER: $INMATNING MED KOLL AV MAXV[RDE&߫d%0߫M/:/'ނ/'邕D߫9N9'ނ9'X߫CbC'l߫MvM'<߫WW'<ޫfaa1a7HC '킠C'M '킠M'9 '킠9' k7k/ '킠/'% '킠%' k(ka'W '킠W' kS[TT KALENDER+k+u;,%',/',9',C',M',W' R[TT TID ? ([R TIDEN RIKTIG (J/N)? _; <)*݊ 4 {>{n{NH{R\?f:DATA SATSER SOM INNEH]LLER RUTIN F\R S[TTNING AV KALENDERp+z*$62,134,211,54,62,133,211,54,227,227$#1,224,4,62,6,211,54,203,1,62*)#14,31,211,54,227,227,62,13 4,211,54$#227,227,16,235,14,7,6,8,62,6('!211,54,203,6,62,14,31,211,54,227+*$227,62,134,211,54,227,227,16,235,35!13,32,229,62,5,211,54,201>InpTextLengVarSlask]rM}nadDatumTimmeMinutSekundDagzy y% / 9 !C:!Mj!W!a!kzuy{z,14,7,6,8,62,6('!211,54,203,6,62,14,31,211,54,227+*$227,62,134,211,54,227,227,16,235,35!13,32,229,62,5,211,54,201>InpTextLengVarSlask]rM}nadDatumTimmeMinutSekundDagzy y% / 9 A 8Backup Central 1983-09-12 11.14.!"!"!"!"!"*$."*~2*͘S60w![* 6D*)~(,(>7f~*8u t 7(!f͚n f "5ɯ2!"͜:ܧ(8 7!"9*["08*#"!5 :ܧ( >7ɯ2͜:ܧ(M!"908>[xW*# ("*+"|(!5 :ܷ(*| (>7ɷ!"ܯ2* 8'*xg.[S:<28(( 7*b#z7"b>2ܷK ~#fo*m~#F#N*B*)*mw#p#qN^VzHN^VzH*ms#r#q* 90* ^͹^V 9Ͱ0^ V ɷ9Ͱ0͹^ V *"!*ͿͿP?6&$Ϳ!Ϳ-Ϳ0Ϳ*!"!"!Ϳy78!  {6019@'{!Ԝ@9.` CMDINT SYSGzD:!@*:ͥ0!@: !#@E` pɯ2V2W2:[ [{:2\> >2\2[2W|y2{2z2 [ͯ! 0::W7(2:Oi:(>AZB{q(O* ͫ2:W( :[(< !~ (r:!6z!:O!@! y͗~͌X!7ȯ2*|(!:\ b">2 z̈́̈́!yɯ2!c~# (~# 7,P ~# 7 (+" ###~: #" ++++> ͚2[2\ :2\>̈́:Bzw( :[̈́" !@!c6A#6,# y6 #!۝@Py6,#!@ y~͌ #!V F T N E A R `80 > #(+~@8_0 !9srq ut! 9By+ut>Ͳމwut މ{  : ͯ!ɟމ*.~#w #6 4 4^V~ O ~ ͯ!ɟމ*~ oȜ ~d ~&?  ~&?(O(++#~ʶ<ʶyʶ6y(~ʶ ~d¶6^VB_Bx8ʥ:¶ͧ2 66  Ή+~d:_("*~ o@`!ɟމ*$.Fʳ:ň!V~6! @w !<:w(!F@:[!Oá@!ơ@~ ˿A(M!y~˯#(w XNʳ ʳA(&IJ(R(S~Շ}o~d(WBwE ~=S;:w( ~;66 2W~ wIqp ö:w;~˯w ~=S;:w!y7މ*~ o@sr~6 ׏͇ͧ6nf~ OBB Rut: ͇nf ~ nfN ͫ8F^Vͯ!ɟ88~ BvR͗~ w R4 ~ &!@6>2~ !'9!7*~ oN#Fx +++@`[<2X~sZBu_8!`!8 !`8 ͇ъAZ]hu𘧑:Xo( ~ݶA :v(~<  ! `(Kjx[h::=O^`![X`!ɟ[~(K?W~ ?((~ w ~ :X( ( nf~o~gBB tl( ^V R<:=ݶ_V  NF R0q{(!:X(a(]>2v L~<  ! :a<`8,$`>22og"a:_!Oá!O@!@"a!O:[á!O@:p`( ! !`^' $`^V*`^V]B syկ2=2̌E`E`*`-`!~4W~*$. !!4:(lE`E`E`zW[ 0`!ɟ7!~w04 ͩ !`! !`A!~w04~ʉ ~ ( w (3 6uB ry:_($g [X`!ɟ*$.ˆ`!ɟͩ>2*#"~ ( ց w v  [h`!ɟ~ <``!ɟnf!@^:Q<`!E`E`~<  ! :a<`f֋:Xoʲ!Ó@F^PB ql`!^V*`~<  ! `N^V*`nf"22E`͎E`-`*R#"R!4>W~*$. !!:(A]E`SE` -`!4>W*$$. *(*+"|( :ʫ!Р@B!"!N !!;AB p_@>2!y@! y!@!͗~͌X!7~w*+"| ͇~ ͗f֋n [TR(0z "T͇~ ((( !"Tn ~v '^Vz~<  ! `:X(<:=BoR<_R0 >2׏!ɟ7:R"acE`~<  ! `*$$.6, *] }9`|9`:`9`0` 0`#R ~*$$o=w,  `8` !`[hsr*]~ S]*Ynf"Y׏͇~ (utsrut!ɟBnE>2W_ $`>2׏׏nf"Y*Y SY*T|(͗:Xo(nf6nf"Ynf"]*T|0: ,!X~({: y~ʪʪo ':G( 6 !C@2og"T"Y"]!͗:W !@! y͗~͌X!7? ͣF ͗)Bm86~o :G(!X>2!C@2og"!4!"a<5΢!:(!{ !*@! y!͗~͌X!7? ͣ!"a<*.T] Ғ!X^6 6!m@*|(!`: b">2 2>2X!&~s͇:]Bl+ԓsosj~݆w~ݎwwwww v( ~ ˷w 666~ ( ~w~ ((6f`O> A(>? ~/ #~08:a~# h,(}*(>.( /(T?(E08b:8 ˯A8X^0TNI J(Bk> A(0(->?2A(>?2I (6U#6f#6d!f7/(>=ɇ_W~#fo6#* ~s8͇6շRDMbk#B?Ŕ6.#~ #w#76/#~ # (w#6/# ++~/((#7ɱՔДBj*Y:\*]:`O|(yͥy2!*a|!8;: f`!ɟ8&[!q# :()= "a"~< ~< *dr?1[! 1! DM[! 6:͇ѷR1!Bi1! DM! * "*ѷRDM~(0 (, ~ O##y(~ ׏͇ǯ=O>2[f`!ɟ8A*.^#V#N*ͯ{( f`8A*.^#V#Nͯ8Jͧ8Epututqz y_IB)iWͯ!ɟ8*yo ~w ##͇d۝xcLc FcNKh cYc]cacKcIcFcASYSDIR SYSBACKUPBc0 CENh * .6~s͇JrrǗ.~݆w~ݎwww wwww~ ( ~w~ ((͗͗~͇ ͗3wwww~   (  ͗.: J}(F!X@! hBgy͗~͌X!7? ͣ>2*|(!:\ b">2 * =!cP!*m`^#VS#~2v:_|y2{2z2 :*k` ~og~O#~_<7= !@* ͗՘?~ ?o&$}!@!@͇~ 7 !Ó@ɯm hBc+** Kopiera filer och bibliotek ** Ver 6.01, 1984-05-07 V - Verifiering.F - Flera fr}n-skivor.T - Flera till-skivor.N - Kopiera enbart ej m{rkta filer.E - Kopierade filer m{rks ej p} fr}n-skivan.A - Kopiera samtliga filer.OptionBb8er (V,F,T,N,E,A) ? Fr}n - filbeskrivning: Till - enhet:  Tillg{ngliga kommandon: J Kopiera denna fil. J=nn.e Kopiera med nytt filnamn. N Kopiera ej denna fil.(RETURN) Kopiera ej denna fil. A KopierRBaEa }terst}ende filer. I Kopiera ej }terst}ende filer. X Uthopp, kopiera inget!  Kopiering fr}n  Radering p}  till  Verifiering av ovanst}ende kopiering.  Borttagning av gamla filer.  Ej kopierade filer: MinnB`Ret fullt.BACKUP avbruten. Fel vid l{sning/skrivning p} skivan. Kan ej st{lla UFD-pekaren. Fr}n-enheten ej klar. Kan ej |ppna till-filen. Felaktigt filslut. Felaktigt recordformat. Felaktigt filnamn. Felaktiga parametrar. Fel del av fr}n^B__-fil. N}got fel. Fel vid |ppning av fr}n-fil. {r korrekt kopierad. Verifieringsfel. Verifieringsfel - Kopiera en g}ng till. UFD {r {ndrat till MFD. Kopiera Radera <^9 ?  Kopieras. Felaktig del av fr}n-fil. ***** sektorerB] kopierade. {r borttagen. del *****Till-skivan {r full. S{tt i en ny till-skiva och tryck p} RETURN.(X = avbryt, ? = visa okopierade). Till-skivan har inte plats f|r ett nytt UFD.Till-skivan har***** lediga sektorer. S{tt i en ny t|B] ill-skiva om du vill attfilen inte ska delas. Tryck p} RETURN.(X = avbryt, ? = visa okopierade) Filen delas.S{tt i n{sta till-skiva och tryck p} (RETURN)(X = avbryt, ? = visa okopierade) S{tt i n{sta fr}n-skiva och tryck p} (RETUB\RN)(X = avbryt)  S{tt i n{sta till-skiva, om det finns n}gon. Tryck p} RETURN.(X = avbryt, ? = visa okopierade, F = forts{tt kopieringen)  Tryck p} X f|r att avbryta <g o2>2:*k`>~ :2``2: D*m`s#r#q:p`(> >0ͣ>ꚷ:p`(> B!e!>0ͣ>ꚷ*.w ~(  :\w:`w*Yut*]ut~w~w~w ~w ~w ~w ~w >^2y2ɜS>2C``K: :>(:(7.(7*.~ w~ w~ɯ!!:B"d!!} 8B 6 #0>0V_#~( 0# ? (p!9  _ ~# 7 (+~:06D#6R# w#6:ˮ#ˮ#~:8ˮ:0* *{^#V##O ~:7?| 7ɼ{ w~ɯ!!:B !p**  ** Ver 6.01, 1984-05-02# Copyright 1983 Dataindustrier AB; BACKUP ABS`! +݊ 'ǰ,,,금 ! 5UWY[]_ac Kopiering av filer och bibliotekFel vid laddning av BACKUP.ABS`! +݊ 'ǰ,,,금 ! 5UWY[]_a ^X  E!(Printer-parameter: ; 2 MF0:COPY.BAC < FON ERROR GOTO 130P PRINI.DAT޸Z#޸, d޸ n 縇 x'ANGE Printer-parameter ?   prini.dat޸ #޸, ޸@IniprIniPriniRuned170y R yFON ERROR GOTO 130P PRINI.DAT޸Z#޸, d޸ n 縇 x'ANGE Printer-parameter ?   prini )5JT]SO!4`!5ADDOPT ABSINTEGER : EXTEND : CHAIN 'DRINI.BAC' r$(67-10*(peek(-172)=80)) chr$(-72*(fgpoint(0,0)<>255),-82*(fgpoint(0,0)<>255),46):;num$(sys(2)) " bytes free." All DOS LFT:s busyLine too longFile not foundLU not openEnd of fileHard disc error during readHard disc error during writeRecord fmt err (Unintialized data.)Record number out of rangeFile is write protectedFile is delete protected of memoryFile space fullDrive off lineHardware write protectLogical file no openInvalid logical file numberInvalid drive numberInvalid trap numberFailure in system dataInvalid physical file numberDevice busyI/O operation is illegal in this deviceoryConsole function keyIEC both talker and listenerIEC input without being listenerIEC output without being talkerKeyboard wait exhaustedByte from device not ASCIINew filename already existsBuffer overflowIllegal time specificationhis deviceoryISAM - Mismatch at checkreadISAM - Key not foundISAM - Overlay missingISAM - Illegal opcodeISAM - Can't find index fileISAM - Index file not in placeISAM - Can't find data fileISAM - File not openISAM - Illegal end of fileISAM - Illegal keyyISAM - No key accessedISAM - Disc I/O errorISAM - Duplicate keysISAM - Illegal record terminationISAM - Illegal end of sectorISAM - Reserved error codeFloating point overflowArray index outside legal rangeInteger overflowISAM - Illegal keyyASCII arithmetic overflowString index negative or too largeNegative TAB, SPACE$ or STRING$Overflow in string assignAttempt to expand array or stringExpression out of range in 'ON'RETURN without GOSUBWrong return typeOut of DATA statementseyyWrong argument to built-in functionIllegal SYS() subfunctionPreviosly rejected lineDEF or FNEND entered wrong wayPrint using errorIllegal data terminatorInsufficient dataRestore to a non-DATA lineToo much dataRESUME or ERRCODE without errory Dot address off screenMatrix size mismatchCan't do this MAT operation into selfMatrix too singularLine not foundLine is in wrong function definitionCan't find matching 'NEXT''NEXT' without matching 'FOR'Wrong variable after 'NEXT'hout errory Nested FOR loops with same variableFOR with local variable illegal (sorry)Undefined user functionMultiple defined user functionNested DEF:s illegalNumber of indices not consistentNot assignableOption not part of this configurationEnd of memory Protection violationIncompatible SAVE formatCan't merge compiled programsGRAPHICS is too late or COMMON errorPlease use the RUN commandCan't continueIllegal in direct modeBad command argumentIllegal numberCan't change precisionEnd of memory Undecodeable statementText after expected end of lineMust be first on a lineIllegal index or argument(s)Illegal mode mixing in expressionNot a simple variableIllegal statement after 'ON'Can't find commaCan't find '='Can't find ')'d of memory Cant find 'AS FILE'Can't find 'AS'Can't find 'TO'Linenumber expectedIllegal variable namer argument(s)Illegal mode mixing in expressionNot a simple variableIllegal statement after 'ON'Can't find commaCan't find '='Can't find ')'d of memoryaattffnn AA IIEEaa'' iidd''SSaa'' iidd''OOiieeuubbrreeppcceelleeaa aaiibbeennmm rruueettsslleeaa ooeemmxxnn nneeppeessoooo iippeevvrraalllleeaa ttttmmnn ffee OO''CCnnttffnn oommaa'' iidd''''CCnnttffnn )) ffmmmmrr Drive 0 RING .BAC 3 LIB .BAC 7 CIRKLAR .BAC 3 PRINT100.ZPR 32  251 av 296 sektorer kvar Drive 1 Volume: ABC80SYS CMDINT .SYS 7 COPY .ABS 4 LIB .BAC 11 REMSBOOT.BAC 5 SPACE .ABS 4 MAP .ABS 3 COPYLIB .ABS 6 ABSIN .ABS 4 DOSGEN .ABS 14 FORMAT .BAC 5 DISKKILL.BAC 7 BASF .BAC 2 SEEKTEST.BAC 5 FASTGEN .BAC 6 KRYPTO .BAC 20 LIB .BAS 10 BASICERR.SYS 11 CHECKHEX.BAC 4 MORSE .BAC 15 LASGEN .BAC 7 BYE .ABS 2 KRYPTO .ABS 10 DEBUG .ABS 32 OVERLAY .BAS 12 LATE .BAC 3 DISCDUPL.ABS 16 RGBMOT .ABS 3 EDIT .ABS 15 FIX .ABS 7 MARKVOL .BAC 4 BACDUMP .BAC 5 EWA .BAC 6 WRL .BAC 10 DOSGENFF.ABS 11  2 av 288 sektorer kvarSGEN .BAC 7 BYE .ABS 2 KRYPTO .ABS 10 DEBUG .ABS 32 OVERLAY .BAS 12 LAT 3 DISCDUPL.ABS 16 RGBMOT .ABS 3 EDIT .ABS 15 FIX .ABS 7 MARKVOL .BAC 4 BACDUMP .BAC 5 EWA .BAC 6 WRL .BAC 10 DOSGENFF.ABS 11  2 av 288 sektorer kvarSGEN .BAC 7 BYE .ABS 2 KRYPTO .ABS 10 DEBUG .ABS 32 OVERLAY .BAS 12 LAT ax1) *** ED ver 1.01 ***Fz z 1Ǡ(2<! yyFޜ ( L2,-R(7TXXޟ^X㜧d8XP xj|j<ݵpFFXP9Rp,X,ݸ,jXp,jXp,X,ݸ`KX(SRp,X,ݸ,jp(p.ǀ,jp(p.ǀ,X,ݸ2MX(XPUndefined screen sizePrZdX_ INITdR%=RADPOS K%=KOLPOSnA$(0-23)=BILDSK[RMEN%x A2$=RADERNA UTANF\R BILDSK[RMENFIL 1=INFIL,FIL 2=UTFILFݐݵFݖF FFL; " jjjjL݊ j抾LL^Lj劾LLݖL-j⊾"^L޸ީ; jj FޜFVj늾KL^: 'L^ jꊾFޜFݵLjjֈD FޟFjFޟFݵLHjLݖ5FFLޟ  FLޜLޟLDjL^1FFL  FLޜ^L?jLݖ.FFL FLߜ jL݊;+jL圵LL^^LjߊݵLj(,jLޜF(Lޜj (2 jFXݵLjjj䊾$ xjjeRadnrF sista rad ledigad ; j jdjLj"+-,FFL FLߜ$6LޜLLX^L ;@p*LߜF(pp pޟL'Fޜ3(pppޟLFޟ#(pp݊ & ޟFpޟLF S\KSTR[NG:;;(((ߟ (X,bp޸ީppޟ'lޟvd3  ޜ#߸,+;>ݵpߟppޜޟh* Fpppޜ*D4ޟpppޜ >HUTBYTESSTR[NG:;222ߟ 22 (6 LX%FFL 2XL H ;FFL 2FLޜXL = FFL 2FLޜ -L`#޸,ߟ QVX X `X!j"Xݵ޸9tERR ; ~ Qqi޸ݵFilnamn ;<<<޸ީ4޵*; "Skiva f|r arbetsfil (0/1) "; : INPUT D!DR :TEMP.][\߸ݵp up 4+XޜdP  ݵpޟ  #߸,p2; + ݵp  #߸,p; 6 pޟ  #߸,p; A# #߸,;   A <5'Skall arbetsfilen ers{tta infilen (J/N);3&  _J<TEMP.][\<(%0 ޵p޸%Filnamn ;05 $L No changeTEMP.][\: temp.}{|D RAM:INPR[K.BACdJpޜީppޟWޜBpFޜީppޟbFXM4#߸,;#߸,;Aݵpߟppޜmޟ*ݵpFߟppޜx FߐݵFXFޟFFXp Radnr:X;;  Ň  ݐj]ޟp޸ީppޟFݵLP p݊.z212ޟݵݵp #߸,p;ޟ.ݵpޟppޜXXݵޜޜb)* RAM:INPR[K.BAC~z(z2z<FyLy RX ^d jypy  ! yyyy  ޜXXݵޜޜb)* RAM:INPR[K.BAC~z(z2z<FyLy RX ^d jypy  ! y G3(#+  $ *+(@:@J@Zj2 ;)<$F2=8 : F3=50 : F4=12 : Lastindex=35FRAM:SIZEDEF.DAT޸P#޸, tZ#޸, zd#޸, ŀn#޸, ņx#޸, ޸RAM:MOMSDEF.DAT޸#޸,ƌŒ100.00 ޸ ݊㵪  Command ? Ū  ID?DEF FNInputkund **********************************************Vilken kund ?ݵ"ON ERROR GOTO 310,ݵ6.ADR@RAM:⸇J޵ T^#,h#,r#,|#,  ݊⸇MHDEF FNInputr{k *******************************************************MF1:.R[K งІ;O *.Ё;F\LJESEDELS DATAUM ?   V   .&Ђ;F\LJESEDELS NUMMER ? 0 .:Ѓ;F\LJESEDELS SUMMA ? *ID*.݊3 ;fel DECIMAL antal ݵǸ UN**.3 ;Fel DECIMAL antal ݵǸ 5X* * bޜl'vݵON ERROR GOTO 740݊ 0.00* ޜ83Ber{kna total moms grundande summa ( Total.+Fakt$)Ber{kna moms f|r totalŒ = 8ber{kna totala summan f|r ((total.+Fakt$)*moms.)+total.Œ *ber{kna |resutj{mning4.>1&(H'Հ&0+ &:(R'Հ0- :\ݵDfpz޵Dݵ60#, #,#,*F #, #,Œ #, #,: # ,0งDC>DEF FNSkapakund *********************************************(Ska  l{ggas upp ? JNamn ? $Address ? .Post adress  ? 8Fakt.avgift ? B.ADR L⸇V#,`#,j#, t#,~޵⸇ފ}HCDEF FNInipr ******************************************************ON ERROR GO TO 1120 RAM:PRINI.DAT޸#޸,U޸ U縇#,C 'ANGE Printer-parameter ? U prini.dat޸ #޸,U ޸1_J(EDEF FNPrinthead *************************** *************************2RAM:PRHEAD.DAT߸<#߸,e5F#,U Cancel uni-directional printing.P#,BG eH 'Z#,< ; NORRK\PING ; )d޵o⸼*#߸,ƀ€€ߟ n# ,€q)xo渼U#߸,ƀ€€ߟ <#,G ;€;H ;2€;o5#,U Select uni-directional printing##,Reg nr: 91 64 12 - 7848#,H D?DEF FNR{kprint ***********************************************6#,2 "change line spaceing to 1/6 inchh8#,3 #change line spacing to 12/144 inch#,t;#, ;z;#, ;; #, ;; "MF1:.R[K ,ง6ݵoC@>h{r l{ses variablerna Field1 ,Field2 ,Field3 in fr}n floppyn.J'T#,Ơ#,ƪ#,ƴ5^´㖾(´´ ,´´.h   ª´ޟ´r|?#,#,ƌ#,#,:#,05Œ㖾(ŒŒ ,ŒŒ5㖾( ,50㖾(00 ,0005;6DEF FNTextprint *************************************a#,t; ; ;z ; ;ª;ª; ;´;´;  <7DEF FNSpaceprint *************************************@#,t; ;z; ;; ;; :5DEF FNEndprint *************************************C#,t; ;z; ;; ;; &^0#,t; ;z; ;; Fakt. avgift ; ;;; :CD#,t; ;z; ;; ;; NMiX#,t; ;z; ;–;MOMS ;–; % ; ;Œ;Œ; bCl#,t; ;z; ;; ;; v\#,t; ;z; ;; S:A KRONOR ; ;;; 0C#,t; ;z; ;; ;; `#,t; ;z; ;;\RES UTJ[MNING ; ;:;:; C#,t; ;z; ;; ;; 5\#,t; ;z; ;; S:A KRONOR ; ;0;0; I#,t; ;z; ;; ;; ޵o츼 # A,  # 1 S[TTA FAKTURA DATUM #*2 UTSKRIFT AV R[KNING #43 VILKEN KUND #>4  MATA IN F\LJESEDLAR #H5 TYPE #R6 #\7 ED #f8 #p9 END z.;;;; ; ;ݸMF1:DATEDEF.DAT߸FAKTURA DATUM ? Ơ #߸, ߸RAM:DATEDEF.DAT߸ #߸, ߸RAM:DATEDEF.DAT߸ #߸,Ơ ߸ Z=FNMeny$ .  8 dummyB L V  ` j t RAM:ED.BAC~ RAM:TYPE.BAC7DatumLfIniprKundprintPriniPrintheadNamnLoopInR{kprintBackprintTextprintEndprintField1Field2Field3FaktMomsMonsSa1\resSa2KundAdrPadrKund4KundinputSkapakundTempGoto220List140ErrLisNofileTypTimCroosInputr{kF|ljdatumF|ljnummerF|ljsummaIndexExitF|ljsummFakturadatumDirmf0ComputeSpaceprintStopindexTotalCmdLastlineLastindexFakturaSizedefCleafrMenyLisrReeFieldMomsdefF|ljedtumF|ljedatumF|ljenummerF|ljesummaInsterWaitMf0NputF|ltesummaFsummaEedStrlenFfield3CopResume85RefCopyMaxDeffnFdatumUmmerz 9+ V1'*/:~J~Z0jR0t z!#,)*yy(&%n$#.Q**$& 0J$:"$DQ&U _yeJ!oq!!"#R#Mf0NputF|ltesummaFsummaEedStrlenFfield3CopResume85RefCopyMaxDeffnFdatumUmmerz 9+ V1'*/:~J~Z0jR0t z!#,)*yy(&%n$#.Q**$& 0J$:"$alCmdLastlineLastindexFakturaSizedefCleafrMenyLisrReeFieldMomsdefF|ljedtumF|ljedatumF|ljenummerF|ljesummaInsterWaitMf0NputF|ltesummaFsummaEedStrlenFfield3CopResume85RefCopyMaxDeffnFdatumUmmer9+ V1'*/:~J~Z0jR0tyz !#,)*j$y(&%n$#. Q**$&0 :J$D"$NQ&_ iyoJ!yq!!"#R#yyyy y1maEedStrlenFfield3CopResume85RefCopyMaxDeffnFdatumUmmer9+ V1'*/:~J~Z"@"0.2346 ݵޜޜb)*~z(z2z<FyLy RX ^d jypy  ! yyyy  pp" ݵޜޜb)*~z(z2z<FyLy RX ^d jypy  ! yyyy  pp2`2Magnussons Partiaff{r Tr{dg}rdsgatan 2 Postadress: Solviksgatan 27 603 64 NORRK\PING Telefon 12 15 54 - 12 01 70 Bankgiro 108 - 6081 Postgiro 32 75 71-6 2ons Partiaff{r Tr{dg}rdsgatan 2 Postadress: Solviksgatan 27 603 64 NORRK\PING Telefon 12 15 54 - 12 01 70 Bankgiro 108 - 6081 Postgiro 32 75 71-6 BB8 8 50 12 35 ޜޜb)*~z(z2z<FyLy RX ^d jypy  ! yyyy  ppB12 35 ޜޜb)*~z(z2z<FyLy RX ^d jypy  ! yyyy  ppRRPR:VSA40A99.77  R0A99.77  bbp?m^V@+##~ # c Q W@ !9  @ @@~(02v{>pÞÕHÀðçÓÛABS BAS CSS OVLCSS ABSy:o`Bb>{/ 0!s#:w!!4E` 4!w#w#w=2A>20:0G!Ao~<(!`:020q8!*|(ˆ˞!P~# (+ ʞ~`8 w# !46.36!~$ 4H:N:.R .F:4M_B`6:+++~ >@6 O0:4@o&q:N:H:4lBb=n :N! !eB B`L:4B_͓.N~..R H.F:4J_B`:4 :N,(/ !3n&~ #( +}23!4~wq(!~$ !BO# >2J !CB`!@~!ʕOB`0!fÕ:@!AN!]``:0({'{!RFB`F̀ (A8Bbw#! <;F Ver 6.02, 1984-04-03 Copyright 1982 Dataindustrier AB i#<~# 7 (+~:06D#6R# w#6:ˮ#ˀBb;#~:8ˮ:0* *{^#V##O ~:7?| 7 NAMENAME.EXT F|rst}r ej Hittar ej filen Filnamn saknas Felaktigt enhetsnamn Inte {nnu. -t); ** Disc operating system - Ver 6.** ** ;G :ˮ#ˀBb>p #~:8ˮ:0* *{^#V##O ~:7?| 7 NAMENAME.EXT F|rst}r ej Hittar ej filen Filnamn saknas Felaktigt enhetsnamn Inte {nnu. -t); ** Disc operating system - Ver 6.** ** ;G :ˮ#ˀBrrae:=⸇ǀ:=万(ǁ:=ḇ2ǂ:=縇<ǃ:=縇Fǭ:=P:=Z:=d:=n:=x:=:=:=:=:=ḇr:=츇:=츇:=츇:=츇:=:=:=:=4/**********************************************4/* H[R SKRIVER MAN TEXTEN SOM SKA DEFINIERAS *4/****************************r******************:=ED ,ǀ:=CROSS '6ǁ:=VAR @ǂ:= ; INP(34)Jǃ:= Tǭ:=GOSUB ^:=LIST h:= LIST 200- r:= LIST 400- |:= LIST 600- r:= LIST 800- :=REN :=DIR :=RUN := ATTRIBUTE 0 := ATTRIBUTE 3 :=TRACE :=NO TRACE :=SAVE MF0:R[KPRINT :=LOAD MF0:Rr[KPRINT:=LOAD MF0:PREDEF:=SAVE MF0:PREDEF  nul:AoEd170KeyAttribute := ATTRIBUTE 3 :=TRACE :=NO TRACE :=SAVE MF0:R[KPRINT :=LOAD MF0:RA  q  @+ *:(ݵ 2&D< RAM:INPR[K.BAC F0P,渇ZݵJ฼6df`JDn[xl츼& [l n.  ޟ}}TADR< } *} .ADRޜ>DAT&*} .DATޜ ޜ]L ݵaMF1:*޸RAM:*߸ #޸,:#߸,:" ,ERROR6@ MF1:COPY.DATง J޸,߸T ޜ^DhrQ|MF0:޸RAM:߸ #޸,:#߸,: ޸,߸#,Ə{งݸBDatumLfIniprKundprintPriniPrintheadNamnLoopInR{kprintBackprintTextprintEndprintField1Field2Field3FaktMomsMonsSa1\resSa2KundAdrPadrKund4KundinputSkapakundTempGoto220List140ErrLisNofileTypTimCroosInputr{kF|ljdatumF|ljnummerF|ljsummaIndexExitF|ljsummFakturadatumDirmf0ComputeSpaceprintStopindexTotalCmdLastlineLastindexFakturaSizedefCleafrMenyLisrReeFieldMomsdefF|ljedtumF|ljedatumF|ljenummerF|ljesummaInsterWaitMf0NputF|ltesummaFsummaEedStrlenFfield3CopResume85RefCopyMaxDeffnFdatumUmmerCoNotracey ~~*0:R0DyJy[yly}yy1%zedefCleafrMenyLisrReeFUyfywy}yy1%kturaSizedefCleafrMenyLisrReeFieldMomsdefF|ljedtumF|ljedatumF|ljenummerF|ljesummaInsterWaitMf0NputF|ltesummaFsummaEedStrlenFfield3CopResume85RefCopyMaxDeffnFdatumUmmerCo~~$04R0>yDy a2#  $222$ (M42 Command ? :<: -F P ~ Z &d1 Ny Kund Som Skall Visas &n2 Visa Adress &x3 Visa R{kning &4 [ndra Namn Och Adress &5 &6 &7 INPR[K &8 ED &9 END  ;ݸNy Kund som skall visasVilken Kund ?  Visa AdressRAM:.ADR޸#޸,@#޸,J"#޸,T,#޸,^6޸ @ JЁ;;Њ;T ^Ѕ;Namn ! ;@ hЂ;Adress ! ;J rЃ;Post Adress ! ;T| І;Fakt.Avgift ! ;^ PF1 = Return " h Visa R{kning  MF1:.R[K߸Er&3#߸,r#߸,r#߸,r$t?#߸,^#߸,ƃ#߸,ƍ#߸,Ɨ#߸,ơ߸N@Datum Fakt.NR: Summa Datum Fakt.NR: Summa;@-irWr;r;r;r;rr$.;r$; !sr&fr(;r;r(;r;r(r$.;r$8);Fakt.Avgift ;9^.;^<);Moms ;9ƒ.;ƒ<&);Summa ;9.;<0);\resutj{mning ;9—.;—<:);Summa ;9¡.;¡0D;Њ;Ё;; PF1 = Return;ЋM;;;N" hXb RAM:INPR[K.BACl RAM:ED.BAC v ComonKundDeffnMenyNySomSkallVisasVisaAdressR{kningCmdNamnAdrPadrFaktTempLoop DatumFakturanrFsummaMomsSa1\resSa2NexKakturanrFanrRedulnLrenUz "$$v#4y:!@ "J2"TR"^z"h"ry ###$ v ComonKundDeffnMenyNySomSkallVisasVisaAdressR{kningCmdNamnAdrPadrFaktTempLoop a+ $ *A@::@:P:`p:zݵ: (2 <G48 F? P Zd–݊  n x Command ? Šފ 2ߊ ኾ⊾ RAM:TYPE.BAC㊾䊾 RAM:ED.BAC劾抾݊ ݸ i3|RAM:SIZEDEF.DAT޸"#޸, Ŧ,#޸, Ŭ6#޸, Ų@#޸, ŸJ#޸, T޸^ݸh r_)3V|RAM:MOMSDEF.DAT޸#޸,ƾ¾100.00 ޸ݸ 5ݵޟzǂ Ϣ bzǂ N` )`` ޟ 8`"ݸ 2ݵݵ.ADR&RAM:⸇0޵:#, D#, N#, X#, b  l⸇ vYݸ iI ` RAM:PRINI.DAT޸#޸,#޸ #縇#,C ݸ  RAM:PRHEAD.DAT߸#߸,-5#,U Cancel uni-directional printing. #,BG -H '#,< ; NORRK\PING ;–) ޵7⸼*#߸,HHHߟ H*#,H9)47渼U#߸,HHHߟ H<>#,G ;H;H ;2H;7 N5H#,U Select uni-directional printing#R#,Reg nr: 91 64 12 - 7848\#,H fݸp z ! 6#,2 "change line spaceing to 1/6 inch 8#,3 #change line spacing to 12/144 inch#,;#, ;;#, ;; #, ;; MF1:.R[K งݵ7C>h{r l{ses variablerna Field1 ,Field2 ,Field3 in fr}n floppyn.' #,h#,r#,|5|㖾(|| ,|||. hh rr|ޟ|| $ .Y?8#,#,ƾ#,Ɔ#,Ɛ#,ƚ5B¾㖾(¾¾ ,¾¾Ѣ 5L†㖾(†† ,††5Vš㖾(šš ,šš `jݸt ~I"{a#,; ;h;h; ;r;r; ;|;|;Ѣ ݸ W)N@#,; ;; ;; ;; ݸ !"C#,; ;; ;; ;; \^#,; ;; ;; Fakt. avgift ; ;;; C #,; ;; ;; ;; i#,; ;; ;;MOMS ;; % ; ;¾;¾; (. C2#,; ;; ;; ;; <\F#,; ;; ;; S:A KRONOR ; ;†;†; PwCZ#,; ;; ;; ;; d(`n#,; ;; ;;\RES UTJ[MNING ; ;;; xC#,; ;; ;; ;; m\#,; ;; ;; S:A KRONOR ; ;š;š; I#,; ;; ;; ;; ޵7츼 #ݸ A,  #1 S[TTA FAKTURA DATUM #2 UTSKRIFT AV R[KNING #3 VILKA KUNDER #4 #5 TYPE #6 #"7 ED #,8 #69 #@0  END J.T;;;;–; ^;hݸr |4MF1:DATEDEF.DAT߸FAKTURA DATUM ? Ɩ #߸,–߸RAM:DATEDEF.DAT߸ #߸,–߸ݸ I 5@RAM:DATEDEF.DAT߸#߸,Ɩ߸ݸ .1%&ݵ:0,渇:ݵ฼Df`NX:Pb츼& l:P:P v.:P :ʢP ޟ5:PR[K`:P ޜ :ޜ: ݸ 12  WݵޟCzǁ ;z;;;;`ݵ "ǡݖ ޟ$"ǣޟ ޜ "zǂ "zǁ h "YݵޟCzǂ ;z;;;;`ݵh*"YݵޟCzǁ ;z;;;;`ݵ4"f>;Ї;?PF1 = ON ,PF2 = OFF ,PF3 = ALL ON ,PF4 = ALL OFF ,PF5 = RETURN ;;z;EH;z;;;;`;; R \fDatumLfIniprKundprintPriniPrintheadNamnLoopInR{kprintBackprintTextprintEndprintField1Field2Field3FaktMomsMonsSa1\resSa2KundAdrPadrKund4KundinputSkapakundTempGoto220List140ErrLisNofileTypTimCroosInputr{kF|ljdatumF|ljnummerF|ljsummaIndexExitF|ljsummFakturadatumDirmf0ComputeSpaceprintStopindexTotalCmdLastlineLastindexFakturaSizedefCleafrMenyLisrReeFieldMomsdefF|ljedtumF|ljedatumF|ljenummerF|ljesummaInsterWaitMf0NputF|ltesummaFsummaEedStrlenFfield3CopResume85RefCopyMaxDeffnFdatumUmmerCtrlDirectoryPrintfr}gaInputkundFaktdatumInpmomsInpsizedefNotraceMainSetfaktdateSetfakturadatumInpfakturadatumPrintInpkund<9+ V1'*/:y@~P~`0pR0z1y 5)* !#,y1z y(&% n$## -J!7q!H!h"r#|R#$"$J$yyyy zsizedefNotraceMainSetfaktdateSetfakturadatumInpfakturadatumPrintInpkund<9+ V1'*/:y@~ 10000 INTEGER : EXTEND 10001 A=64 : DIM A$(A)=13,B$(A)=13,Copy$(A),Cop$=253,Ctrl$(A) : A=0 10002 ! 10003 ; CHR$(12) 10004 Z=FNDirectory 10005 Z=FNPrintfr}ga 10006 ! 10007 DEF FNDirectory 10008 POKE -767,9 10009 FOR D=0 TO 3 10010 Z=CALL(24678,D+16) 10011 FOR E=62720 TO 62975 STEP 16 10012 FOR B=4 TO 15 10013 B$(A)=B$(A)+CHR$(PEEK(E+B)) 10014 NEXT B 10015 IF INSTR(1,B$(A),' ') H=INSTR(1,B$(A),' ')-1 ELSE H=8 10016 IF MID$(B$(A),9,3)='R[K' Copy$(C)=LEFT$(B$(A),8) : C=C+1 10017 A=A+1 10018 NEXT E 10019 NEXT D 10020 Max=C 10021 RETURN 0 10022 FNEND 10023 DEF FNPrintfr}ga 10024 ; CHR$(12) 10025 FOR C=0 TO Max-1 : Ctrl$(C)=CHR$(129) : ; CUR(C,0);Ctrl$(C);CUR(C,2);C;CUR(C,7);Copy$(C) : NEXT C 10026 C=0 10027 IF INP(34)=161 IF C>0 C=C-1 10028 IF INP(34)=163 IF Cz.H;F\LJESEDELS DATAUM ? ZRZV\Z Z.fЂ;F\LJESEDELS NUMMER ? jpj j.zЃ;F\LJESEDELS SUMMA ? zIz.݊3 ;fel DECIMAL antal ݵ#Ǹ %Uzz.3 ;Fel DECIMAL antal ݵ#Ǹ 05z z ޜ')ЍAvsluta ??? (tryck p} ALT)  "ǃ ? ݵ݊ 0.00EEzE ޜ$?8.3Ber{kna total moms grundande summa ( Total.+Fakt$)8EEBBer{kna moms f|r totalLE® =V8ber{kna totala summan f|r ((total.+Fakt$)*moms. )+total.`E®Ojber{kna |resutj{mningtOO.Y~1Yc(Y'ՀOcm+ cw(Y'ՀOYm- Ywݵ ޵ݵ60#,Z#,j#, z #, #,® #,O #,w #,m งݸ( 2Y%},<Vilken kund ska l{ggas upp ? FNamn ?  PAddress ?  ZPost adress ?  dFakt.avgift ?  nx.ADRMF1:⸇#, #, #,  #,⸇RAM:⸇#, #, #,  #,⸇ݸ A,  #"1 SKAPA NY KUND #,2 VILKEN KUND #63 MATA IN F\LJESEDLAR #@4 #J5 TYPE #T6 UTSKRIFT AV R[KNINGAR#^7 ED  #h8 #r9 #|0 END .;;;;’; ;ݸ Q4%ݵ ,渇ݵ฼f`  ᵾ츼&     .      ޟ5&  ADR0  ޜ 0 ޜ :D NXݸbDatumLfIniprKundprintPriniPrintheadNamnLoopInR{kprintBackprintTextprintEndprintField1Field2Field3FaktMomsMonsSa1\resSa2KundAdrPadrKund4KundinputSkapakundTempGoto220List140ErrLisNofileTypTimCroosInputr{kF|ljdatumF|ljnummerF|ljsummaIndexExitF|ljsummFakturadatumDirmf0ComputeSpaceprintStopindexTotalCmdLastlineLastindexFakturaSizedefCleafrMenyLisrReeFieldMomsdefF|ljedtumF|ljedatumF|ljenummerF|ljesummaInsterWaitMf0NputF|ltesummaFsummaEedStrlenFfield3CopResume85RefCopyMaxDeffnFdatumUmmerInpsizedefInpmomsdefInputkundSetfakturadatumMainInpmomsInpfakturadatumPrintDirectoryPrintfr}gaSizeErrnWdfPalazeCtrlBgBgmList400An09+ y~ ~00@R0J5ZV1j'z/y* !#,51zz 5y(&% n$##.?Q*E*O$Yc mJ$w"$Q&)yyyyyradatumPrintDirectoryPrintfr}gaSizeErrnWdfPalazeCtrlBgBgmList400An09+ y~ ~00@R0J5ZV1j'z/y