SYSDIR SYS BASICINISYSADDOPT ABS DEVDES REL OPTROSH RELOPTROSL SYS ISAMOPT REL TERMOPT RELSOFTOPT RELCMDINT SYS SYSTEM ABS@COPY ABSCOPYLIB ABSDELETE ABS@DISKCHEKABSDOSGEN ABS` ERRCOPY ABS LIB ABS REPROT ABS` UFD ABSDRINI BAC `START BAC DISKCHEKBAC LIB BAC `CLIB BAS PREABS BAC @REPROT BAC ` SETCAL BAC SYS BAC`UFD BACISAMDEMOBAC)IDEMO1 BAC`DEMOCRE BACCREINDEXBAC`ARTIKLARDATARTIKLARISMARTIKLARIS1 bc6@FLR\flv"(.4:DJ[s%/: '1110,0,'Nu skapas en testfil p} SF1: ' " *7~]SO!4`!5ADDOPT ABSRUN DRINI Kan ej |ppna fler filerF|r l}ng rad (>160tkn)Hittar ej filenFilen ej |ppnadSlut p} filenChecksummafel vid l{sningChecksummafel vid skrivningFelaktigt sektorformatSektornummer utanf|r filenFilen skrivskyddadFilen raderingsskyddadSkivan full Enheten ej klarSkivan skrivskyddadLogisk fil ej |ppnadFel logiskt filnummerFel enhetsnummerFel trapnummerFel i biblioteketFelaktigt fysiskt filnummerEnheten upptagenEj till denna enhetFunktionstangentIEC-b}de s{ndare och mottagare IEC-mottagare ej aktivIEC-s{ndare ej aktivTecken fr}n tangentbordet ej i tidOgiltigt tecken inl{stFelaktigt "NAME"Felaktig tidspecifikationNyckel finns ejDubblettnycklarFelaktig nyckelFel vid kontroll{sningIndex finns ejFelaktig postl{ngd Fel ISAM-filversionSlut p} minnet i centralenF|r stort flyttalIndex utanf|r till}tet omr}deF|r stort heltalFel i ASCII-aritmetiskt uttryckIndex utanf|r str{ngenNegativ "SPACE$","STRING$" eller "TAB"<1F|r l}ng str{ngEj till}tet |ka "DIM" Fel v{rde i "ON"-uttryck"RETURN" utan "GOSUB"Felaktig "RETURN"-variabelData slutFelaktigt argument i funktionFelaktig "SYS"-funktionEj till}ten rad"FNEND" utan f|reg}ende "RETURN""PRINT USING" felFelaktiga dataF|r lite indata "RESTORE" ej p} en "DATA"-radF|r mycket indata"RESUME" utan felGrafisk punkt utanf|r sk{rmenHittar ej detta radnummerFelaktigt inhopp i funktion"NEXT" eller "WEND" saknas"FOR" eller "WHILE" saknasFel variabel efter "NEXT" Blandade "FOR"-loopar med samma variabel"FOR"-loop med lokal variabel ej till}tetFunktion ej definieradFlera funktioner med samma namnFelaktig funktionFel antal indexEj tilldelningsbar i funktionEnheten ej anslutenMinnet fullt "LIST"-skyddat programFel programformat"MERGE" g}r ej p} ".BAC"-fil"COMMON" felAnv{nd kommandot "RUN"Kan ej forts{ttaOtill}tet som kommandoFel data till kommandoFelaktigt talPrecision f}r ej {ndrasF|rst}r ejOtill}tet tecken efter satsen M}ste st} f|rst p} en radFel antal eller typ av argumentOtill}ten blandning av tal och str{ngarEj enkel variabelFelaktig sats efter "ON""," saknas"=" saknas")" saknas"AS FILE" saknas"AS" saknas"TO" saknasRadnummer saknasFelaktig variabel00DEVDES REL0 ""!!4*`-`!~5g.~(I#>(C"N#`8,s-`*.~(8.V.^K@yH`0{7s* !**"ͱ:G(*oLEb9B"*LEC* -`*. "!#b! 0ͱG#g (Mo _!O qomki!a_][*{/_z/WC~#F#N#( :O:G!j B*++7!BOOʪ~#F#N#( :O:GxAOq#p#BAS0ICINISYSk(Mo _!O qomki!a_][*{/_z/WC~#F#N#( :O:G!j B*++7!BOOʪ~#F#N#( :O:GxAOq#p#BAS@@ (H34@w *`-`*.~( [k` 14 @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ DR$HDlMFMOnSF????RM%)5JT<$݊ݵ<฼<<I%2$ݵ<฼<,<T  *0:DQ[aP"P (RP 1Ճ1͂hɁ/`!}[!"Ɂ*{"!"{!"i*q`~6#~6J#~6J!}6#!>1~/w/w> 14#y>~/w/w> y@ 4D>y~/w/w>y >P=<2!}R?"i!Aq6#PXE ^!AV{:7%7ˮ!' / 0:G`h9 !Ձ`!Q~<( } >3}AwGnf##Nɟ9>9x*W:}(?14PC>0#s::} :>*Ʉ!"iՂ!"iɧ(=(=(b(=(#=FHF$6F!F*-F*0RAMCMDINT SYS Abort OPTROSL SYS<*x?g: *m`##~P:}W :?>A8 2ɟ:WOxpW{]x(4Ɏ2˸)(%?v({<.=  i_ {<.= 2{ ~O{4Cy!}zo0$~)(?P z>  <12{G :}>(4yRAM!#~7 ~z>?8v͏>8m{c.s 1 :WOxpW{]x(롩 #x/` !x ͚/͚/{ 2˸͏(%?v({<.=  i_ {<.= 2{ ~O{4Cy!zo0$~͏(?z>  <12{G :>(4y:W`/&.T] 66͚Ϳ@8= &,a .<(=> :2/o= a0.6$Ϳ=.w>2~w$w%ww ,>-ORAMB >!_>-*.~<(= #,N,,V,~/ ,^,~/ , (G`MK#(>7*~,"CS2!=ʖ=k ==ʅ K[:[ (:_#~K5>Now.V#~_V &ɀo&N{+z`@s#r[ͅ!6[!:(I <(C <_c "{z0*"!55 .w ,w:@_!!F?DwxNo&4~o-~iwyoO~axpNo&4nw-w}bowyMoqOxpBo&4#4:@ !  !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ͱ.Oͱ.Oͱ,` )>#8.~.~,~͍)> ]Ч78zy< *|(z]> ]͉p͉xG ͍> &\͍xpGAo&~<> [>&#z>K>Jos,r>AoF>OG>2A8w`7>2+~2ͩͅ8~*o B͋8)Pڽ*|~b ą8V! w#2!o0$~(,ͅ82O G* #y y=Oh!>w0!4~0:((% : <>(< :<2.7>` ?>& >8:n` 4!wͩͅ8~O_ K W!w _.w>_V " o g+" !"#"!^,Vͅڑ.  .w>.w:@_!BA ( yOy[( x(!z7>2ͅ?*.~,,,,,,72P!>6>& 2ͅ8(͍8!ͅ` A8U <- >O0 (=:< 7 : <>(< :<2 !>F>(!N>(> >(:>(@> >2> >2O <(>O0`b  [ͅD8  ͋8bͅ8 Ϳ= :͋ J!F B   .F ,F:` N   [͋ .F   y  ͋ ͩͅ .~O*E >G   *> J  ͋ !"" #" "!6.:@_-BɁ_F #y Ϳ<<Ϳ=)6.~ . ~,_ ڝ [ ><. w,w6J _>wyO0z=_~.N<{< ڝ .N.~<,~<ͨ [ԍ8U* ͬ 8K.44 8@͇ͩ86: &w:o>6,= ͍88>2 8  ` ) h  & * #ͩͅ:OE D ? Ëb:2} +  [ͅ!~O6= <  ͋bͅ!Fx(!N68\<(Y.w6,w.w.N><><q.~Oy8 OzW 4.N6_.~8 wzW{0{ b͋!F&.N`q }<! V-^ͅ8^ ( K .qbͅ8I 8:͋8?!^,Vͅ8-.N.F ,F (  ͋8:Ao&~ w>  >?m >G@> x>(>& *i~ *ip & y0; o}(G0y $}o} z(0 {y`W a0Z >7ȅoG|8g> O{=!p,w: `iV "TM G zG( 0 { b&`++! / 0:G`h9 !ͣ`!Q~<( } >3}AwGnf##Nɟ`>`x*WsRɧ(=(=(*(=( =:F$`6F!`F*`-`F*`0`! #(0}[JBͷx7~!"3`o"`H`*88*`-`!"!"3*@">2A*. JDR0J DR1JDR2JUFDJ"MF0J*MF1J 2MF2J :MO0J BMO1J JSF0JRSF1JZSF2JbHD0JjHD1JrHD2JHD3JBASICINISYSCMDINT SYS Abort DRHDMFMOSF????RM`)Ei>] i> Z9!c`i9!9c!c> Z8!9@>>[#>7Y=%րBYEKILLNAMEAS_נFׇ(eL@GN T{by 1983-09-26(s8p'p0pS%k8z8:N*o >2ASORTORDRTAB*}"!"}nf~#+ NF !"!#"###":& ( *r#"Å "DŽf"ł1*!pَnf ~#foTO.#,****Ä*ń*ǂ  P!@666666׍!D~ !n f |ԛu t ]T6>Z8v66FppȄ!ut0z8;.~>~ 2OF<7 !!΂Nkk8>4>2">93333[##||S΂CЁS҂CԈ~+~ ~pG #~!j !k ~#fo{8~ ^ Vwsr+,-./0  Z   +  ; !9N#F#^#V#N#F#>47ISMn f Fu* 9ɯ!KΈpISAM OPENISOPISAM READISRDISAM WRITEISWRISAM UPDATEISUPISAM DELETEISDLKEYINDEXFIRSTLASTNEXTPREVIOUSPREVf666666ہ'# '# >76#Hw#pۅEɎ#>7 &+    ((#,( ( (y9 w7 >/>͋g !9>9= ͏&0  !9>[^Xف[+V+^pQ.N !^X!ف[!Æ6!C΁ 1(+V+^+Q8. <2Ö++4 #4!^X!ف[Dq#^#V] !X![#^#V!C΁Dp +r+sH}!0΁DYPF.FzD:Ç(F!`>!!`!-`!0`!?`!*`0y#7*3!"3sā‡"3{ā"3 Ӄ ՝ >45Ȧ!p 0!0   [ΎO  !ְxG#R# *7!ف^8![X8* 7~( =( =( ~ >>>* 7~* 7F N * 7 F* 7p !NɃ  Ѓ[΁ 2*Аu>z7$%,-(5Mւ0jx7 0 " 8  e  Ђ9 Ђ0 Ђ 8(  Ђ 8 (x7 `"(x7 U8L ep [ 3b B}^! i`! !Xw!Ӆ" 9f^(* 9R ^ !^!J*҂KԊ + (9y[ -06 #< ȁ[(  ~ >|7~p ~  0} Ȅ Hut" 7nf  $ {0 4   1  i*҂Kԁ h $ {0 4  10` ?Y *Ԃ[ЇR>}7 $ S(8 0py( 4  1*΂KЁ  h S(   { A8 1V6" 9! [ 3*ԎB  A[ҁ 2>{7 ȁ" 7* 7 " 7~* 7 " 7p7R {ف !݁ڃF |[ -!  Eց*҂Kԃ ց*΂KЋ6#!  2 !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_p@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^ +\][ (\][ -x ~#^#V ǃ ~#^#V!؆4(5 ߁! !F΁ 1  =2ؖ]T!F΅!  1 H!pIΆN#F)dدGOdd)0 G{( x7{TدGO(n~{~Z)TدGO(Jn0>CقFZ~W:WFzFzFpD#4 #4!@΃wo*وB8 ("ٖ MD!! ĦNwy#~@_^V  Oq6R>} G=(=(=(-=((~#ph N#~#hyhx态pG~#N#? 7eyH˹e~# +0/x/>΅  [G~0G #~O #` ! og~!ցJ (4" 98'z8ӊ0* 9F R*p 9F(Sz0" Aɂ#[8  8# 1 'p [O!Y\( 9 9 C!aƂی!R8!^ ( 0:a( # [!^6#p!^cN %!܅R [ކOBֆ <#[Ӂֆ#c!a ցp [O!܈Ƃ[!R8!^[WɅɉpF(wp!^R MDRMDkb6s>΄ <{ 7 0[ 7R f(!pƃ [N( m8ɌF>x7# [=ݾ0 ~ y7ɉ~(O( m(F( #[!ցӂ!a~(ɋs [!R8ɁɁp^!a;(Ʉ ֈˎɊ6Bi`RMD|܃!ՁՂ!ZՁ!^ ( ن!^ [2ف!ֈF Ɇ #6#!Y!ցɈ6#6#!\ 9!apF !^ [Dw[i!^6!GaӇ !X!aF#c}^X!ِw( # ɐӧRMDkb6 n ɆF( #[N(>p΄ F( #[  [F(OBaG!R8 [w>Ά0-!i`i` F(>x7!^ (>"7[0 p`p# 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{![WR\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 *wUB(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     0BYw!{%!}%!%1>>|^#V{  } |#o! (! }2W|2V*t6k6k!"Y!X}F N(ˎ;(>8:W9!> 8|9> 8}9!6 x!Px!Xˆ:VB_ W;{7;{ >8:W 9> 8>x9> 8>9;:V7;!XV˖ >8:W94>#>##o:Q(}2Q*R[T"RST>#>#M  p?m^V@+##~ # c Q W@ !9  @ @@~(02v{>pÞÕHÀðçÓÛABS BAS CSS OVLCSS ABSy:o`B>{/ 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:4lB=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̀ (A8Bw#! <;F Ver 6.02, 1984-04-03 Copyright 1982 Dataindustrier AB i#<~# 7 (+~:06D#6R# w#6:ˮ#ˀB;#~: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 :ˮ#ˀB>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 :ˮ#ˀB :!>w#s#r!S!v!~ r180ڇO!  (> ** Systemmeny ** Ver 6.00, 1983-02-101. COPY - Kopiering en fil.2. COPYLIB - Kopiering flera filer.3. DELETE - Radering flera filer.4. DISK: CHEK - Testning.5. DOSGEN - Formattering.6. ERRCOPY - Kopiering felaktig fil.7. LIB - Bibliotek.R ]terg}ng till DOS. V{lj (1-7,R)? COPY COPYLIB DELETE DISKCHEKDOSGEN ERRCOPY LIB : - Radering flera filer.4. DISKA 8!:R Ÿ!! =0!Y2i!! =0!Y2j!w!Pk0!B!!`k0!B:i2P:j2`!6 !~# (+~ ( ,ʻ##~2G> 2G!RK B`.P9/!b~ T]!KB`!j~B8 T]!SB`!`9 `!/` $`͕`! VB`:X !B !`~ ]Th!VNy!Y X!D:G B`TB`!AOB`BB`!HAB`! E`2g-E`-`!g~4W*$.:g 8߯2h:gɧ(%!h~4W*$$.6B7 0`:g!hɾ :fɧʝ:Q!aw !`>2Q!]V!\^ '`>2f-E`!R4®#4îOBJABSTXTXXXXXXXXXXXbk6#6  x0G> @89#x 0(>. #x0> ɯ>7_B6&08+~# (0:?A^?** Doscopy ** Ver 6.00, 1984-03-07 ** Ny fil ** Felaktigt filnamn Felaktigt biblioteksnamn Fil som ska kopieras?  Kopiera fr}n ?  Kopiera till ?  Kopians naBB53mn?  Hittar inte originalfilen ! ** BAD OPTION SPEC. **81984-03-07 ** Ny fil ** Felaktigt filnamn Felaktigt biblioteksnamn Fil som ska kopieras?  Kopiera fr}n ?  Kopiera till ?  Kopians naB 88 !:o` !\د2!~# (~#/(,( ( (~#V :2:P!! =0!2!! =0!2`!!~J :2!!P0!!:2P!,B8 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!ypB7o0$~:P *m`^#Vy_0>ͶX'*yo~#<+~#,,, # } o~f>oR  (# >.!!~A:A(&I!XN (7J :=A8*q#>.6#6"#B6'6,;y( O y*##" ",د2:ѧ!!!*#~X+~#_ͦ8(:!!+7!:O>`X!+*:O `$`ͩ*"* !Kx<!COPYLIB CEN:Χ7[:::#B54>^.s $: >> *.V-^-S~ɇ.(ɯ27''''} 8B 6 #0>0! 6 ! ~.(͔8wX7#~ ( ͔8wq! AڢA^?0:?>E`E`2ί2pB4A>-`X[!~4W*$.: 8֯2:Χ(([!~4W*$$. 0`:!ξ :Χʺ*R+":Q!aw !`>2QX!]V!\^ '`>2>2:ηO!!22*"*"#~+~ :W(!7!!!B3N#_ͦ8 = !!+7!G==!:O>2Q>`X!+:O `!GGE`E`>-`X*$.[S:<2 XE`E` -`*$$.[S:<2 G*"*"[ S"B2[:=2ʲÏ*"*": ί2:O:ιͧ!r!!U:2 v!##!7!9R!7:_(*~?w#:w:_( *:w#:w~#foSC2}2y2``K[:2B .1h:*.~7.~?,*N˶f`q 181 bk6#6 f x0G> a@89q#fx 0(>aq. #fx0> aqϯ>7_~0~8+~# (0:?%B 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 !B /! 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 B .r Olika fill{ngd sektorer kopierade ** Kopiering av filer ** Ver 6.00, 1984-06-14 Tillg{ngliga kommandon: A - Kopiera resten av skivan X - Uthopp, kopiera inget I - Kopiera ej resten av skivan J - Kopiera denB 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 denB 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 restBD 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 B8> 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_Bb8!":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 &B!8 F &P O :'>((:TP &:b :m (+!m:͊!b.͊!j ͊ ~ݾ!.*k` ~o0$~2"#~202; :@ Nr]C0C:?*w2:2>2rC0:?@*w2:2B!7z].*k`o0$##V#^!r#s; f(. 6R#6A#6Mʧ!~ J[r\*.^#Vz #~_0r[o!6 ##!zʧ; z\~ [r[.~,n <=}w~ [}B!6'_0tZ*$.#~ (S(R#^#VS#~<= R ( *( #yV ##F(1}ݶOtrr> > 0N(]*| I}oV#>_:(:< tZ[!E<( ̯sB!4A}  8B(0>0> !6^ 5 4 ^ͨ54~*m`##~:*.~7.~?,v*~?@w*#N˶~2`q~ (#y3W:'7B!3FssE!!:η >!]ͳ>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`B1!1 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!B1/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:B17$ˮ#ˮ#~: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 B161skrivning 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 BAbA 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!`!BA8 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>*mBA7`s#r[>z!72o6`_6`W͌:Pz!72o6`_6`W*>͌zo6`_,- :O `RH`!`͌!.!iP͂-R:PO`:QoP*$.T]6! *>}9`|9`:P͹BA6'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~+(BAs54`8$`!`!\P*m`##~*m`##w!7!7*k`: o0$#N˶`q*k`: o0$#N˶`qx4Dbk6#6 ͳ x0G> ͮ89;#ͳx 0(>ͮ;. #ͳx0> ͮ;˯>7_0BA4C8+~# (0:?A^?~# 7 (+~:06D#6R# w#6:ˮ#ˮ#~:8ˮ:0* *{^#V##O ~:7?| 7Vo#~( 0# O (̀!9  o ** User File Directory ** Ver 63BA3P.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 bibliotekingebBA2]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'KwBA 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/)BA 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/)BQQai l* 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 drQive2B-* 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$ setting=t8* 83-11-09 / 6.02 / LDAB / Knows about typQe 6 DOS-NET~* &!** ** ** ** ** ** ** ** ** ** ***ީݵ True/False*2'Switch T/F here for display/no display@ 5Switch T/F here for old biased/new linear addressing*:/Switch T/F hereQ for keyboard click on ABC802/6*$start"Name of next program*&!******************************** ** Main routine* (,2,݊2<<,ފ2<F,ߓ2< PQ,ߓ FFZ* dPn*,x ",߸Turn off 5 ms click*+"DOS {r 2<FP*  "*&!********************************** Detect DOS version*Q"* 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 numberQ,6*'@"*********************************J*#T* Separate between old DOSses^*hSj A)z!r out (2),a : ret|+Z ޸,,}  ޸,-}   QZ'ABC 6-1x eller 8"/800 8"/800ABC 6-1x*)$************************************% * Separate between mellanDOSses*  Lj`-劽 ABC 6-3x&j`-튽 ABC 6-2xQ 0ok{nt:D*,N'**************************************X*&b!* Separate between Super and NETl* v2! p``$`݊ UFD-DOS ver. ,$`ኽ ABC-NET ver. ,(`㊽UFD-DOS-NET ver. ,Q  UFD-DOS ver. ,*,'****************************************%* Set current drive to DR: mellanDOS*  !刵4m`-,圸 Set DR_:, e.g. shift 1 bit left# ݊DR_: motsQ varar SF_:DR_: motsvarar MF_: ***4%************************************>*)H$* Set current UFD-DOS drive to DR_:R*\!#!!f`ݍp-݊ zᜈk`-, Set Q DR_:k`-k`-ߜ-'DR_: motsvarar  _:**%**************************************%* Set UFD-DOS drives to biased addr.* #9#i## k`- ᜵X䡜 ޜQ , 䈧␽ޜ,@ Set biased  ᜵$ . Gammal addressering8 B *(L #**********************************V *"` * Copy CMOS clock into TIME$j *t .J$$C$6~ >dž6>Dž6Qy : ǀ6>6>dž 2 6>6> 8 dž67LJ# >  6  ++Z  Q* 詸,ݸ8 ,,,6 멸,ޫ,߫, Datum och tid: )  *$ ****************************** *( * Convert BCD --> Decimal2 *< %Q91%zQ%F  P 숧Z VersDosversSepoldSepmellSetmelldrSepsupTypSetsupdrOffsDevConoutSepDrSetSetoldBiaSetbiaTableEntryClusiLinkDrdescClcSettimeCodTbufList2200BdPtrBcdClickGy Qy""q%"#, 2R"<"F"P*$Z9`i!숧Z VersDosversSepoldSepmellSetmelldrSepsupTypSetsupdrOffsDevConoutSepDrSetSetoldBiaSetbiaTableEntryClusiLinkDrdescClcSettimeCodTbufList2200BdPtrBcdClickGy a `aaP * START .BAC **  ( nul:ߜ-'DR_: motsvarar  _: **UVersDosversSepoldSepmellSetmelldrSepsupTypSetsupdrOffsDevConoutSepDrSety y" R"q q!b**  ** Ver 6.00, 1982-09-23# Copyright 1982 Dataindustrier AB; DISKCHEKABS`! +݊, P,ǰ,금 r! @BDqFHJLN Diskcheck Fel vid laddning av DISKCHEK.ABSKABS`! +݊, P,ǰ,금 r! @BD  )(jd xg. Enheten ej klar 4( !Skrivaren ej READY.  < ݵ""ݓ"/࣐/"ޜ:9;J@( !Skrivaren ej READY.  C "ޜ" "ޟ"i` I;; ݵީ ǠOk`-Y_ i_,, ,ݸ,Y,Y, ,ݸ9BUFDDR0DR1DR2DR3HD0HD1HD2HD3SF0SF1SF2SF3MF0MF1MF2MF3MO0MO1MO2MO3RAM/ CsƃzƍƗƧƧ,,ݸ,޸,,,ݸ,޸TII( 浱ݵ 쵷  ABC800 LIB  Ver. 6.01II= ǠO* ABC800 LIB * Ver. 6.01 * * O= 'Filnamn: Storlek: Skriv-Raderskydd:'------------ -------- ----- -----------IP!!('8 >ǡǻ 'p`!:v!U~<~<_## ?h) c9&I_i5 _(=_ @ ᜵i_ !Y&&9UFD:9 9 9RAM:R M ݵ' Yߜ-᜵ Yᜈ ݊Yᜈ9RAM:9'9RAM: ކYޜ䈧Q&L'ᜈ%Y%ޜ䈧-݊ I Dd9UFD: 4  F  (yՂ&y ½;1 - Skrivare (Printer) 2 - Storlek 3 - Filstatus4 - Viss drivenhetV{lj (1,2,3,4) O޵6O1234O݊Oᖆ;ޜO1 O2 22O3 8 8O4  Enhet ? EOO%Felaktigt enhetsnamn 4 Z(J)q))y zǠ;.RIS ;ޜ;0    ߟ Funktionstangent l W ) z :9 01DR:9 ኽ  /݊ :91!)!*Q*y q*½ 9—Lkvar avRIVOLYM: ;ޜޜ= ƒޟݵ}ޜ;ƒ ƒ ƒ ƒ; ޜ ފ ߊኆ ޜޟݐݵ⊽C C㊽Z U)9+y a+>pr:޸#޸,#޸#޸,9—,Llediga av totaltR sektorer .#޸,VOLYM: #޸#޸,)#޸,)ƒޟފ )޵ޜ#޸,;#޸,ƒ ƒ ƒ ƒ;ޜo Y#݁ y [ ޜ犈   ޜV#Q>9 sysdir.sys߸ #߸,O踈O .O'+zYᜈߜ-/ᜈYDRޜ RAM (:) +",a,,,ƒޟ=ߣƒޜ  ޜƒ ƒޜ+,!-,f`݊ǀ 툽,9Skivan d}ligt formatterad.R퟈!9Diskfel ' %!*I-ފ2 ފ9UFD:{{+Rޟ +L9UFD:ޟ $퐸s ޜ[)VJ)݊ _  _  8",3!*", § .j-e!*--8݊  §ޜ ވ(=S߈(=Rz(!*!.Q.z(2  §ߜ04§0 +'.!*",.q){s݊x ޵[§ ݊)=e휵ޜcƒޜƒޜƒC+>r*+Iߟ*; Iߟ ;f1"aIPI;Fler utskrifter (J/N) ? OO j  *IP(PF5=F|reg}ende SH+PF5=F|reg}ende enhet;%PF7=N{sta SH+PF7=N{sta enhet >;;I= ;;MPF5=F|reg}ende PF7=N{sta SH+PF5=F|reg}ende enhet SH+PF7=N{sta enhet >;;I= ;  /9/ ;;I;;;Ljޟ5 - Tryck ;  ݊ Ɲ;I; "/9CIOY_is%28LR{5 - Tryck ;  ݊ Ɲ;I; "/9CIOY_is%28LR o ` 1000 ! * LIB .BAC * 1010 ! +------------------------------+ 1020 ! ! LIB.BAC ! 1030 ! ! Biblioteksprogram ! 1040 ! ! f|r alla diskenheter & RAM: ! 1050 ! ! (C) Luxor Datorer AB / ! 1060 ! ! Tillh|r Systemdisk, UFD-DOS ! 1070 ! +------------------------------+ 1080 ! * 1090 ! * Because of the size of this programme, it should be squeezed when 1100 ! * running, to perform well. 1110 ! * 1120 ! * Ver date / VerRev / Sign / Note 1130 ! * 83-03-17 / 6.00 / LDAB / Orig. LIB Ver 5.0 f|r RAM/skiva 1140 ! * 83-06-23 / 6.01 / LDAB / CE or CR clears error message 1150 ! 1160 EXTEND : INTEGER 1170 ! *********************************************************************** 1180 ! * E* 1190 ! * M A I N P R O G R A M * 1200 ! * E* 1210 ! *********************************************************************** 1220 ! * 1230 Q7=FNInit 1240 Q7=FNSetlin(T) 1250 ! * 1260 IF Scan THEN GOTO 1320 1270 IF FNEnhet THEN Q7=FNFel('Enheten ej klar',T) : GOTO 1450 1280 IF Fil THEN IF FNPrlist THEN Q7=FNFel('Skrivaren ej READY.',T) 1290 IF Fil=F THEN Q7=FNScroll 1300 GOTO 1450 1310 ! * 1320 ! * Scan sequence 1330 ! * 1340 Devnr=0 ! First device 1350 ! * 1360 WHILE Devnr>=0 AND Devnr'RAM:' THEN Selcod=Selcod OR VAL(MID$(Dev$,3,1)) 2390 IF Dev$='RAM:' THEN Selcod=Selcod OR 1 2400 Clusi=2^(PEEK(Table+Entry+1) AND 7) 2410 Dirbeg=16 2420 RETURN F 2430 FNEND 2440 ! * 2450 DEF FNUdesc LOCAL Qselcod 2460 Qselcod=PEEK(-7) 2470 Entry=Qselcod AND 16+8+4 2480 Selcod=30 2490 Clusi=2^(PEEK(Table+Entry+1) AND 7) 2500 Dirbeg=PEEK2(-9) 2510 IF Dirbeg=0 THEN RETURN T ! UFD not active 2520 RETURN F 2530 FNEND 2540 ! * 2550 ! +---------------------------------+ 2560 ! ! Huvudrutin f|r en drive el. RAM ! 2570 ! +---------------------------------+ 2580 DEF FNEnhet 2590 Q7=FNVolname 2600 IF Dev$='UFD:' THEN Q7=FNMfd ELSE Q7=FNVolshort 2610 IF FNBitmap THEN RETURN T 2620 Q7=FNReadfil 2630 RETURN Q7 2640 FNEND 2650 ! * 2660 ! ********************************************************************** 2670 ! * D* 2680 ! * S U B F U N C T I O N D E C L A R A T I O N P A R T * 2690 ! * D* 2700 ! ********************************************************************** 2710 ! * 2720 DEF FNUnsign.(X)=-(X AND 32768)*2.+X 2730 ! * 2740 ! +-----------------------------+ 2750 ! ! Meny ! 2760 ! +-----------------------------+ 2770 DEF FNMeny LOCAL I 2780 ! * 2790 ; Huvud$ CUR(8,0); 2800 ; TAB(Widcomp1) '1 - Skrivare (Printer)' 2810 ; TAB(Widcomp1) '2 - Storlek' 2820 ; TAB(Widcomp1) '3 - Filstatus' 2830 ; TAB(Widcomp1) '4 - Viss drivenhet' 2840 Q7$=FNCon$('V{lj (1,2,3,4) ',13,Widcomp1+3) 2850 I=1 2860 WHILE I<=LEN(Q7$) 2870 IF INSTR(1,'1234',MID$(Q7$,I,1))=0 OR LEN(Q7$)>4 THEN 2780 2880 I=I+1 2890 WEND 2900 IF INSTR(1,Q7$,'1') THEN Fil=T ELSE Fil=F 2910 IF INSTR(1,Q7$,'2') THEN Storlek=T ELSE Storlek=F 2920 IF INSTR(1,Q7$,'3') THEN Filstatus=T ELSE Filstatus=F 2930 IF INSTR(1,Q7$,'4') THEN Scan=F ELSE Scan=T 2940 IF Scan THEN RETURN F 2950 ! * 2960 Q7$=FNCon$('Enhet ? ',16,6) 2970 IF FNDevname(Q7$) OR FNDesc THEN Q7=FNFel('Felaktigt enhetsnamn',T) : GOTO 2950 2980 RETURN F 2990 FNEND 3000 ! * 3010 ! ******************************** 3020 ! * 3030 ! * Skriv ledtext och h{mta svar 3040 ! * 3050 DEF FNCon$(Text$,Rad,Kol) LOCAL S,S1,T$=160 3060 ! * 3070 S=160 3080 ; CUR(Rad,Kol) Text$; 3090 WHILE S1<=S AND (PEEK(65362)4 OR LEN(N$)<3 THEN RETURN T 3360 IF LEN(N$)=4 THEN N$=LEFT$(N$,3) 3370 IF INSTR(1,Devs$,N$)=0 THEN RETURN T 3380 Dev$=N$+':' 3390 RETURN F 3400 FNEND 3410 ! * 3420 ! +------------------------------------+ 3430 ! ! Scroll rutin ! 3440 ! +------------------------------------+ 3450 DEF FNScroll LOCAL Mxname,Index,Lin,I,Opt 3460 ; Huvud$ 3470 ; Dev$ Volshort$ FNUnsign.(Rsi ze) 'kvar av' FNUnsign.(Osize) TAB(Wid) 3480 ; 'VOLYM: ' Volname$ 3490 ; CUR(4,0); 3500 ; TAB(Widcomp2+1) Lhead1$ 3510 ; TAB(Widcomp2+1) Lhead2$ 3520 Q7=FNHelp 3530 Mxname=LEN(Summa$)/20-1 ! Max filename nr 3540 WHILE Index+Mxlin<=Mxname 3550 L!in=0 3560 WHILE Lin<=Mxlin 3570 I=20*(Index+Lin)+1 3580 ; CUR(Lin+6,Widcomp2); 3590 ; MID$(Summa$,I,12)+' '+MID$(Summa$,I+12,6)+' '+MID$(Summa$,I+18,1)+' '+MID$(Summa$,I+19,1); 3600 Lin=Lin+1 3610 WEND 3620 Opt=FNKey(CHR$(13,32,196,198,212,21"4)) 3630 IF Opt=1 THEN RETURN T 3640 IF Opt=2 OR Opt=4 THEN Index=Index+1 3650 IF Opt=3 THEN Index=Index-1 : IF Index<0 THEN Index=0 3660 IF Opt=5 THEN Forw=F : RETURN F ELSE Forw=T 3670 IF Opt=6 THEN RETURN F 3680 WEND 3690 RETURN F 3700 FNEND# 3710 ! * 3720 ! ******************************* 3730 ! * 3740 ! * List filenames on pr: 3750 ! * 3760 DEF FNPrlist LOCAL Mxname,Name,I,Tabul 3770 ON ERROR GOTO 3950 3780 PREPARE 'pr:' AS FILE 1 3790 ; #1,Prhead$ 3800 ; #1 3810 ; #1,Dev$ Volshort$$ ',' FNUnsign.(Rsize) 'lediga av totalt' FNUnsign.(Osize) 'sektorer.' 3820 ; #1,'VOLYM: ' Volname$ 3830 ; #1 3840 ; #1,Lhead1$ TAB(41) Lhead1$ 3850 ; #1,Lhead2$ TAB(41) Lhead2$ 3860 Mxname=LEN(Summa$)/20-1 3870 WHILE Name<=Mxname 3880 IF Tabul=%1 THEN Tabul=41 ELSE Tabul=1 3890 I=20*Name+1 3900 ; #1,TAB(Tabul); 3910 ; #1,MID$(Summa$,I,12)+' ' MID$(Summa$,I+12,6)+' '+MID$(Summa$,I+18,1)+' '+MID$(Summa$,I+19,1); 3920 LET Name=Name+1 3930 WEND 3940 RETURN F 3950 ! * 3960 RESUME 3970 3&970 RETURN T 3980 FNEND 3990 ! * 4000 ! ******************************* 4010 ! * 4020 ! * Read volume name 4030 ! * 4040 DEF FNVolname 4050 Volname$='' 4060 IF FNRdsec(0) THEN RETURN T 4070 I=-2681 4080 WHILE I<-2560 4090 IF PEEK(I)=13 AND PE'EK(I+1)=10 THEN RETURN F 4100 IF PEEK(I)<32 OR PEEK(I)>127 THEN Volname$='' : RETURN F 4110 Volname$=Volname$+CHR$(PEEK(I)) 4120 I=I+1 4130 WEND 4140 Volname$='' 4150 RETURN F 4160 FNEND 4170 ! * 4180 ! ******************************* 4190 ! *( 4200 ! * Read short volume name in sysdir 4210 ! * 4220 DEF FNVolshort 4230 ON ERROR GOTO 4280 4240 OPEN Dev$+'sysdir.sys' AS FILE 2 4250 GET #2,Q7$ COUNT 11 4260 Volshort$=LEFT$(Q7$,8)+'.'+RIGHT$(Q7$,9) 4270 RETURN F 4280 ! * 4290 RESUME 4300 )4300 Volshort$=SPACE$(12) 4310 RETURN F 4320 FNEND 4330 ! * 4340 ! ******************************* 4350 ! * 4360 ! * Find MFD device 4370 ! * 4380 DEF FNMfd LOCAL Mfdcod,D$=3 4390 Mfdcod=PEEK(-7) 4400 D$=CVT%$(PEEK2(Table+(Mfdcod AND 16+8+4)+2)) 4*410 IF (Mfdcod AND 16+8+4)=PEEK(Table) THEN D$='DR' 4420 D$=D$+NUM$(Mfdcod AND 2+1) 4430 IF Mfdcod>=28 THEN D$='RAM' 4440 Volshort$=' ('+D$+':) ' 4450 RETURN F 4460 FNEND 4470 ! * 4480 ! +------------------------------+ 4490 ! ! Sortera in fil+namn i listan ! 4500 ! +------------------------------+ 4510 DEF FNSort(Filnamn$) LOCAL Bottom,Mitten,Top 4520 Top=LEN(Summa$)/20-1 4530 WHILE Bottom<>Top 4540 Mitten=(Bottom+Top)/2 4550 IF Filnamn$'UFD:' AND PEEK(Dosbuf+3)<>255 THEN Mxdirsec=7 ELSE Mxdirsec=15 4830 Osize=CALL(VARPTR(Bitmap$))*Clusi 4840 ! * 4850 IF FNRdsec(Sec-1) THEN RETURN T 4860 Rsize=CALL(VARPTR0(Bitmap$))*Clusi 4870 IF Dev$='UFD:' THEN IF FNRdsec(Dirbeg-1) THEN RETURN T 4880 WHILE Index<16 4890 Antal(Index)=PEEK(-2577+Index) 4900 Index=Index+1 4910 WEND 4920 RETURN F 4930 FNEND 4940 ! * 4950 ! +------------------------------------+ 14960 ! ! Omvandlar sm} bokst{ver till stora ! 4970 ! +------------------------------------+ 4980 DEF FNUpcase$(Text$) 4990 IF LEN(Text$)=0 THEN RETURN '' 5000 IF ASCII(Text$)>95 AND ASCII(Text$)<127 THEN RETURN CHR$(ASCII(Text$) AND 95)+FNUpcase$(R2IGHT$(Text$,2)) 5010 RETURN LEFT$(Text$,1)+FNUpcase$(RIGHT$(Text$,2)) 5020 FNEND 5030 ! * 5040 ! +-------------------------------------+ 5050 ! ! H{mta filnamn ur DOSBUF 0 ! 5060 ! +-------------------------------------+ 5070 DEF FNFilnamn$(Index3) LOCAL Filnamn$=12 5080 Filnamn$=MID$(Dosbuf$,Index+4,11) 5090 Filnamn$=LEFT$(Filnamn$,8)+'.'+RIGHT$(Filnamn$,9) 5100 RETURN Filnamn$ 5110 FNEND 5120 ! * 5130 ! +-------------------------------------+ 5140 ! ! Skriv- och rad`rskydd ! 5150 ! +--4-----------------------------------+ 5160 DEF FNProt$(Index) LOCAL Prot$=4,Protbyte 5170 IF Filstatus=0 THEN RETURN ' ' 5180 Prot$=' ' 5190 Protbyte=ASCII(MID$(Dosbuf$,Index+1,1)) 5200 IF (Protbyte AND 1) THEN MID$(Prot$,1,1)='S' 5210 IF (Protb5yte AND 2) THEN MID$(Prot$,2,1)='R' 5220 RETURN Prot$ 5230 FNEND 5240 ! * 5250 ! +-------------------------------------+ 5260 ! ! Filens storlek ! 5270 ! +-------------------------------------+ 5280 DEF FNStorlek$(Index) LOCAL Ribad,Filesize,Stor6lek$=6 5290 IF Storlek=F THEN RETURN ' ' 5300 Filesize=CVT$%(MID$(Dosbuf$,Index+2,2)) 5310 Storlek$=NUM$(FNUnsign.(Filesize)) 5320 IF Filesize THEN RETURN SPACE$(6-LEN(Storlek$))+Storlek$ 5330 ! * 5340 ! * Old DOS file size computing 5350 ! * 57360 Ribad=Clusi*(SWAP%(CVT$%(MID$(Dosbuf$,Index,2)))/32) 5370 Filesize=Clusi*CALL(VARPTR(Stor$),Ribad) 5380 Storlek$=NUM$(FNUnsign.(Filesize)) 5390 RETURN SPACE$(6-LEN(Storlek$))+Storlek$ 5400 FNEND 5410 ! * 5420 ! +-------------------------------8----+ 5430 ! ! Huvudrutin f|r l{sning av filnamn ! 5440 ! +-----------------------------------+ 5450 DEF FNReadfil LOCAL Status,Index,Filnamn$=20,Dirsec,Rad 5460 Summa$=SPACE$(20) 5470 WHILE Dirsec<=Mxdirsec 5480 IF Antal(Dirsec)=0 THEN GOTO 55909 5490 IF FNRdsec(Dirsec+Dirbeg) THEN RETURN T 5500 Index=1 5510 WHILE Index<=250 5520 Q7=ASCII(RIGHT$(Dosbuf$,Index)) 5530 IF Q7=0 OR Q7=255 THEN GOTO 5560 5540 Filnamn$=FNFilnamn$(Index)+FNStorlek$(Index)+FNProt$(Index) 5550 Q7=FNSort(Filnamn$): 5560 ! * 5570 Index=Index+16 5580 WEND 5590 ! * 5600 Dirsec=Dirsec+1 5610 WEND 5620 IF LEN(Summa$)<20*(Mxlin+1) THEN Summa$=Summa$+SPACE$(20*(Mxlin+1)-LEN(Summa$)) 5630 RETURN F 5640 FNEND 5650 ! * 5660 ! +----------------------------------;+ 5670 ! ! L{s ett tkn ! 5680 ! +----------------------------------+ 5690 DEF FNKey(Opt$) LOCAL Key$=1 5700 ; CUR(23,Wid-2) '*'; 5710 GET Key$ 5720 ; CUR(23,Wid-2) ' '; 5730 RETURN INSTR(1,Opt$,Key$) 5740 FNEND 5750 ! * 5760 ! +---------------<-------------------+ 5770 ! ! Fler utskrifter ?? ! 5780 ! +----------------------------------+ 5790 DEF FNMore 5800 IF Wid<80 THEN ; CUR(22,0) SPACE$(Wid); 5810 Q7$=FNCon$('Fler utskrifter (J/N) ? ',23,0) 5820 IF (ASCII(Q7$) OR 32)=ASCII('j') T=HEN RETURN T ELSE RETURN F 5830 FNEND 5840 ! * 5850 ! +------------------------------------+ 5860 ! ! Skriv ut hj{lptext ! 5870 ! +------------------------------------+ 5880 DEF FNHelp 5890 IF Wid>=80 THEN GOTO 5940 5900 ; CUR(22,0) 'PF5=F|reg}>ende SH+PF5=F|reg}ende enhet'; 5910 ; CUR(23,0) 'PF7=N{sta SH+PF7=N{sta enhet >'; 5920 ; CUR(21,0);STRING$(Wid,ASCII('=')); 5930 RETURN F 5940 ! * 5950 ; CUR(23,0);'PF5=F|reg}ende PF7=N{sta SH+PF5=F|reg}ende enhet SH+PF7=N{sta enhet >'; 596?0 ; CUR(22,0);STRING$(Wid,ASCII('=')); 5970 RETURN F 5980 FNEND 5990 ! * 6000 ! ******************************** 6010 ! * 6020 ! * Felfunktion 6030 ! * 6040 DEF FNFel(Skriv$,Kvittera) 6050 ; CHR$(7); 6060 ; CUR(23,0);SPACE$(Wid);CUR(23,0);Skr@iv$; 6070 IF Kvittera=F THEN Q7=5000 : WHILE Q7 : Q7=Q7-1 : WEND : GOTO 6130 6080 ; ' - Tryck '; 6090 Q$=' ' 6100 WHILE INSTR(1,CHR$(24,13),Q$)=0 6110 GET Q$ 6120 WEND 6130 ! * 6140 ; CUR(23,0);SPACE$(Wid); 6150 RETURN F 6160 FNEND 6170 A! * 070 IF Kvittera=F THEN Q7=5000 : WHILE Q7 : Q7=Q7-1 : WEND : GOTO 6130 6080 ; ' - Tryck '; 6090 Q$=' ' 6100 WHILE INSTR(1,CHR$(24,13),Q$)=0 6110 GET Q$ 6120 WEND 6130 ! * 6140 ; CUR(23,0);SPACE$(Wid); 6150 RETURN F 6160 FNEND 6170 B70 IF Kvittera=F THEN Q7=5000 : WHILE Q7 : Q7=Q7-1 : WEND : GOTO 6130 6080 ; ' - Tryck '; 6090 Q$=' ' 6100 WHILE INSTR(1,CHR$(24,13),Q$)=0 6110 GET Q$ 6120 WEND 6130 ! * 6140 ; CUR(23,0);SPACE$(Wid); 6150 RETURN F 6160 FNEND 6170   =* PREABS .BAC **%+----------------------------------+*%! PREABS !*%! ------ !*%! Autostart p} f|rst en assembler !*%! fil och sedan en basic-str{ng. !*$%! !*.%! (C) Luxor Datorer AB !*8%+----------------------------------+B*'L"* Date / VerRev / Sign / Note>V9* 83-02-22 / 6.00 / LDAB / Tillh|r Systemdisk, UFD-DOS`*&j!** ** ** ** ** ** ** ** ** ** **t* ~&!********************************** Main program* *5Autostart av maskinkodsfil (N) ݫ $ j  *Enhet: ݫU : 2*Felaktigt enhetsnamn C&3 Hittar ej & BASICINI.SYS `*( Vill du {ndra (N) ݫ  j!*(j22Maskinkodsfil f|r autostart ݫI 7< ] 'Felaktigt filnamn F*;P Skriv BASICstr{ng (max. 158 tkn) ݫ Z ! d 0n*7x,Kan ej st{nga BASICINI.SYS m * *'"*********************************** Initialization*  ݵ ީ False/True* Ǡ Ǡ0 &H?DR0DR1DR2DR3HD0HD1HD2HD3SF0SF1SF2SF3MF0MF1MF2MF3MO0MO1MO2MO3UFD:E<`abcdefghijklmnopqrstuvwxyz}{|@ABCDEFGHIJKLMNOPQRSTUVWXYZ][\D" .0123456789DN,*6TޜX$@ ABC 800 PREABS  Ver 6.00XJXTXޟXT XT= X^* hXr)|!Program f|r uppl{ggning av 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".   *&!*********************************$* Skriv ledtext och h{mta svar** V#9#Y#z(Ǡ; &0ߟ :D*&N!********************************X*,b'* Kontrol lera och formatera enhetsnamn(l#* Enhetsnamn ut i Dev$ om ej errorv*I , z +01DR:& ኽ  "(=  " (=  2 _(=  :݊:&  *( #***********************************9 4* \ppna filen BASICINI.SYS och h{mta gamla str{ngar** 4 2z# 2$>H BASICINI.SYS޸R#޸,L\ #޸,踇f#޸,Zp #޸,Ǡz ޟ !* X/&Gammal maskinkodsfil: Y"Gammal B ASICstr{ng :   * *& !******************************** *" * Skriv record 0 p} BASICINI$ * Filen {r |ppen som #1. * 8 i&SB / L #޸,݂V #޸, ` #޸,&j #޸,]Sǃ t ~ #޸,3 #޸,O!4` / #޸,!5  #޸,L #޸,b * #޸,Z #޸,0 ޸  *    *& !********************************( *2 * Felfunktion < *F ( $$ P !Z ;';;;d  n - Tryck ;x ll  ;';    *& !******************************** * * Kontroll av filnamn7 2* Filnamn 11 tkn utan . ut i Assnamn$ om ej error * !Hzy  閽 . 施  D ݊ ߵv#" Nv݊, x 6 b@ ޵v^J v T ` _.^ . bbb b bh r bbb |   *& !******************************** *$ * S{tt punkt och packa filnamn * &zy  z  ޵ V鐸    劽 . ޜ   & *InitConFormnamnFelOpenDevSlaskInmatningText1BasicKontrollStatusAssDriveAssnamnDevsTextRadKolFr}gaDisplyoldAbsfilBasAss1Ass2SkrivKvitteraIndexHeadFchr1FchrList2500ErrBasic1WriteCodMprogSetpWidth80Xmid 9 :y& y& 0!:"Dr%N%XJ%b"l vy ngText1BasicKontrollStatusAssDriveAssnamnDevsTextRadKolFr}gaDisplyoldAbsfilBasAss1Ass2SkrivKvitteraIndexHeadFchr1FchrList2500ErrBasic1WriteCodMprogSetpWidth80Xmid 9 :y& y& 0!:"D @ !c**  ** Ver 6.00, 1982-09-23# Copyright 1982 Dataindustrier AB; REPROT ABS`! +݊ , R, ǰ,금 s! !ACEGIKMO Skydda filerFel vid laddning av REPROT.ABS ABS`! +݊ , R, ǰ,금 s! !ACE b 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 Tk m0 ** 2 ** Ver 6.03, 1983-11-03# Copyright 1982 Dataindustrier ABW  FY AAas L    ! ++*  0! ::+0+* ++*0  0 0:+0+*  &--------------------------------------Dž-D8 ݊Q Q: ;QRAM[a!N g> ;m. ;s ;y  &--------------------------------------޵㸼K ݊ j( ? DR_:    _:#g _:;mǀ@@;s?4Q;y;##䈧;;ǀ  ;@  ;jA'ea RAM:y;##䈧;ǀ!N u!p4  () / ) ;Ƽ¼ ¼  ޵㸼H v   _: ( / ) ;Ƽ¼ ¼ a  a݊c>  RAM: (. /! ) ;Ƽ¼ ¼    (;D ) ;Ƽ¼ ¼ ¼(=¼ ¼(=¼ ¼ ޵丼4¼ ,ᡸ[޵丼%l ,;$$y! (@) ;Ƽ¼¼ ¼(=¼  ¼ ݵ丼5¼%?[. ݵ丼;,; 1 (?4Q) ;Ƽ¼V¼'M.䖆 ǀ@塜. [W (䈧) ;Ƽ¼h:¼'  1,2,4,8,16,32婈$߂$[ǀ@݊ (;@) ;t) ; Ƽ¼ ¼ C [@¼   [@%+%1 (;ǀ) ;) ;Ƽ¼ ¼  m [ǀ¼ 7 [ǀ'" (;<ǀ ; ;) ;Ƽ¼ ¼ m [ ǀ¼ : [ ǀ w!ry! (/) ;Ƽ¼ ¼  z :DEVDES.REL;Ƽ¼ݍ¼¼: ¼:P¼ DEVDES.REL޸#޸,7ᡜ#޸7 9޸:  'DEVDES.REL' ޸ ީ[ݵ޵gmsyk`-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$ݵH฼HHU݊[7%2$ݵH฼H,H`b&&ޟޜw #2EakySystem-enheter HighRes-minneSystem enhetsnamnParametrar f|r diskenheterCentral Gammal addr Vill du {ndra parametrarJ[ndra parametrar f|rkonverteras till矸 ,<QZdm[ndra DR_: konverteringFelaktigt namn[ndra controllertypFel typ[ndra CsFel typ[ndra clusterstorlekFel clusterstorlekGammal adresseringN '/HRw[r enheten centralFel CsSka parametrarna sparasp} skiva#[ndringarna best}r till n{sta resetSpara p} enhetFilen ej funnenTyp Controllertyp '0<>@BDFCsClusterstorlekSp{rrad S{tt sp{rr  *0:DQ[agmsy%+17Hrollertyp '0<>@BDFCsClusterstorlekSp{rrad S{tt sp{rr  *0:DQ[agmsy%+1`!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! (EGIKa START Start av ISAMDEMO&!1982-07-20 M Rudolfson Id`-Data ( ;2Ѓ ISAM-DEMOЇ<T-FЃSTARTЇ6PЃ TangentenЁPF1Ѓanv{nds alltid+ZЃf|r att avbryta en funktion$dЃProgrammet laddas.#nЃEtt |gonblick ...x޵p7݊#"    IDEMO1.BACExtenbdE3xtendy znv{nds alltid+ZЃf|r atd8 >fRp!n Record lengthxH 2z޵縼]& ՂSpecify indices ! 7Ձ ފ= #,##,Isam file : \##,Data file : p##,Record length : 7##,"Name Start Lgth Type Dupl.޵縼 #, ;#"#,ք 0;",#,Յ ;*6#,օ@ ޜ ;4@#,օx; Y;N;JT^hinitiate filesrt\\ޟ 1Ձu#Ձ,/ wՁ|pՁՁ\Ձ#Ձ, f!#Ձ, //޵縼-'#Ձ,#Ձ,*޵ޟ#Ձ, Ձ IDEMO1.BACget index data&ւ@ * Index no ;*)&"Name of index 02:>Ձ D> N޵ޟ-'X  2*b(lKey start position ;v2z 2 z  Key length ;J2 zޜ 2u. / /z  Key type (;+޵⸼ ;,;);mR R޵⸼!R ݵ222! ޟ (Duplicate keys (Y/N) RR0*RY(= RN4>Herror processin gR \օ8;2 փ` ;f2ޜ '@Yrp ;zBad name ! ;Bad number ! ;Bad key ! ;Duplicate name !;unpack filename D0">  ք0>ݵ2޵2R(R$>.޵Ḽ8R /BՂ DR :޵8$#Lւ@Ձ 088䖽V޵帼`> R>j )tR/. ޜ~޵฼>RJ>5Rޟ R>Ձ Aݵ2zz Ձ !. 0  _ _ ޜ   Bք@ ;** Isam file creation ver ;0 ;.0 **4"P"";R޵( 2ߵ2<FR'zzݖݵ2 P 'ARTIKLAR','ARTIKLAR',50'ARTNR',1,7,'A','N''VARUGR',41,2,'I','Y' ''* izP  Ђ;޵D+ D;*޵UXW4F >HLiatInputCreateStringx ~y"y(z2y8y>zHz Rz\ fzp zyyy ~ y x y yyy /zDI UA * izP  Ђ;޵D+ D;*޵UXW4F >HLiatInputCreateStringx ~y"y(z2y8y>zHz  id&$b+ &ISAMDEMO Demonstration av ISAM-filer&!1982-07-20 M Rudolfson Id`-Data (2ARTIKLARޫ߫" < ߫"F)P$------------ Huvudmeny ------------Z dn݊Gxޖv1,------------ Skapa ny ISAM-fil ------------ 0Ѓ Den befintliga ISAM-filen kommerЃ att raderas.4[r detta riktigt (J/N) ?ޫN"X""J "N ; DEMOCRE.BAC72------------ Kolla om ISAM-fil finns ------------ " ),z6ޫ@-Jߊ T ^ኽ hr2|------------- Avsluta programmet ------------ xs0 V#M޵,2,C4 mS7$Ska posten lagras (J/N) ?ޫJ. 8SB","L"NyV"J ;s ` Yj1t#޸,Y ~ޜ߫WyS # 4O݊߫IS(ЃS|kningen kan ske efter: Ѓ1 Artikelnummer Ѓ2 Varugruppskod5 V{lj alternativ (1/2) :ޫ1' S!*"1޵cARTNRi1"4"2cVARUGRi> ;^H)RЃ S|kning efterЁcs4\Ange s|kbegrepp :cJf pSDz"cc~c~cg ;lc""""'/"'1"#޸,Yi-%x   Y Y } + V{lj funktion :ݫǟ   ៸ X $ . 8 #޸,Y҇B I%L "   V D` j #޸,Yчt %~ "     9  @  (  S< Ska {ndringarna lagras (J/N) ?ޫJ  S "" "NS "J ;l ( ( Y2 #޸Y < %F yd   W  P SZ d )) n 8x Ska posten raderas (J/N) ?ޫJz  S "" "NS "J ;p 3 #޸, ޟ ߫   X  S $   ݊߫ S) ЃListningen kan ske efter: Ѓ1 Artikelnummer Ѓ2 Varugruppskod5 V{lj alternativ (1/2) :ޫ1    S "1ARTNRi, "2VARUGRi& ;h 0 : #޸,YiχD YSN 5X #޸,Yiчb YSl v   ) 5 P  ޵,2O! (,Ђ;(  ,s,, ;    )*% S NS :  ޵,2!* (,Ђ;54 ,ފ% ,C,, ;4> ,ޖ$,,C,C;H R \ f '%%,'޵,2$',2O(.',C,, 8'7B',C'/L'V',C'1`' j'22 t'~'N'E%*'޵'޵,2',m ',""%3'%ݖ"% "%ޟ "%ޟ%',J'0"'ߜ%'2"'᜵E'",,~,~, ,C"' ( ( N y zZ*NR4N++>N޵5$HN+ +RN7 \N 11fN9," -> Pil h|ger"pN8," <- Pil v{nster"zN199,"PF8 Pil v{nster"N24," CE Radera raden"N192,"PF1 Avbryt""N!196,"PF5 F|reg}ende f{lt"N198,"PF7 N{sta f{lt""N!194,"PF3 F|reg}ende post"N195,"PF4 N{sta post"N193,"PF2 [ndra post"N197,"PF6 Radera post" NTN225]N555555F5V5s5C+N*$'Artikelnummer',1,1,7,0,7,0501,0515)N("'Ben{mning',1,1,25,0,25,0601,0615+O*$'Styckpris',3,0,99999,2,8,0701,0715.O-''Antal i lager',3,0,9999,1,6,0801,0815-O &'Varugruppskod',2,0,999,0,3,0901,0915$O .O޵52{U8O5s555555F5V BOP5V5V✲LObVOީݵS`Oߵ jOtO~ONY#EY+O O ; Om O OO OC):O5O5; OmO O*y'PTryck p} RETURN !;& P || +|ኆP+|⊽SP ;(P2Pq(Y+ R%.%_;%;ީ]X!R%݊ݖœ""%S%݊߸! S" _  S޸8 S"ݵ%œ*S4St,kA+),z^>Sdd.ޟЂ_dd.dd.;ݸHSRSs"j&),zA,\SЃ;(fSߜpS( ; zSSS'v"A'X'p''S5SKSSSSM!-D"X'p'+$SݸSީSݸSShy-_zX'p'"TA T'#T$T"ީ.Tݸ8TBT-zX'p'')."LT VT' `T  1jT  "" . 0""tT".݊ ".""~T"000000". "Tީ -""TީTݸTT*#yzzZy T"T޵5A5 ,T_ǀ5( = T TTT5,,zA'X'p''Uޖ0" UUU!a.z2U HUVUDMENYVV V5"V"Skapa ISAM-fil",V "Inmatning")6V(""S|kning - [ndring - Borttagning"!@V "Li!stning p} bildsk{rmen"JV "Avsluta" TV^V޵5T hVrV5ߡ;|V5 5ЃV5 ݸЃV:VV{lj ett alternativ (0 - 4) ޫR&V"ݮޟx ;V"&V"' Vݍ V޵5 Ɔ VV Y$Y Y޵,2d4Y,Fd,Fd.ޟЃ,s;*Z,V,,C #ZZ Zx%o(Z޵2M/2ZVCHR\3PName of data file ;.dat(Z2d8 >fRp!n Record lengthxH 2z޵縼]& ՂSpecify indices ! 7Ձ ފ= #,##,Isam file : \##,Data file : p##,Record length : 7##,"Name Start Lgth Type Dupl.޵縼 #, ;#"#,ք 0;",#,Յ ;*6#,օ@ ޜ ;4@#,օx; Y;N;JT^hinitiate filesrt\\ޟ 1Ձu#Ձ,/ wՁ|pՁՁ\Ձ#Ձ, f!#Ձ, //޵縼-'#Ձ,#Ձ,*޵ޟ#Ձ, Ձ IDEMO1.BACget index data&ւ@ * Index no ;*)&"Name of index 02:>Ձ D> N޵ޟ-'X  2*b(lKey start position ;v2z 2 z  Key length ;J2 zޜ 2u. / /z  Key type (;+޵⸼ ;,;);mR R޵⸼!R ݵ222! ޟ (Duplicate keys (Y/N) RR0*RY(= RN4>Herror processin gR \օ8;2 փ` ;f2ޜ '@Yrp ;zBad name ! ;Bad number ! ;Bad key ! ;Duplicate name !;unpack filename D0">  ք0>ݵ2޵2R(R$>.޵Ḽ8R /BՂ DR :޵8$#Lւ@Ձ 088䖽V޵帼`> R>j )tR/. ޜ~޵฼>RJ>5Rޟ R>Ձ Aݵ2zz Ձ !. 0  _ _ ޜ   Bք@ ;** Isam file creation ver ;0 ;.0 **4"P"";R޵( 2ߵ2<FR'zzݖݵ2 P 'ARTIKLAR','ARTIKLAR',50'ARTNR',1,7,'A','N''VARUGR',41,2,'I','Y' ''* izP  Ђ;޵D+ D;*޵UXW4F >HLiatInputCreateStringx ~y"y(z2y8y>zHz Rz\ fzp zyyy ~ y x y yyy /zDI UA * izP  Ђ;޵D+ D;*޵UXW4F >HLiatInputCreateStringx ~y"y(z2y8y>zHz ""  LIST CRE EDIT 2.1 1982-11-18dnx޸nyckel$.ISM huvud$.DAT޵4]r S  Skapa ISAM-filer Ver 40 .0 " T=T="   !*! ,%6_; @  J ޜ?T; ^hݖޟ 9r " ǀ  ;|:Z!!y !` ޜD _ (=  !!!""!z5&21 36 39 41 42 43 48 132 147 210&݊FEL 0$0ޜ 7Oe : DЁ>< ; N X bT;lݸ޸v'Hitta"r ej filen'%$'Checksummafel vid skrivning''Filen skrivskyddad''Skivan full''Enheten ej klar''Skivan skrivskyddad''Fel i biblioteket''F|r stort heltal''Felaktiga data''Felaktigt tal'")"pI"y")!yJ" ޵ Skapa index nr:4* Namn p} index:4>2H卽 "R2\ Startposition:1'&fݖ.݊HMpz210210ni ( / /2 L{ngd p} "nyckel:T',ݖ.݊HޜM210}132$c.8B /L Indextyp (B,A,I,F,D):ޫV!`BAIFD" ݍj147t+~BAIFDޟ /Dubblett-nycklar (J/N):ޫJNݍݍ147G"(=NJޟ ޜ" 芽 Skapa index nr4 Namn p} index:7 ޟ(2 <4F޵N߸9PN_NNamn p} Nfil:" mZN_N_S0dN_.݊N_N_N$nxN_N(N_:ݍ ooP__:ޜuuu.ޟ u__.ޜ"uu" u4ޜ߸$ Postl{ngd:O ‰'H"Hݖ‰.݊M,6@132RJT1478^nhr |;" 1#޸,4 o u ޜ/H/޵N#޸,N޵N#޸,޸aoTypeFileExtHeadInpTextLengVarSlaskConvNameErro"rErrcCodeKeyDummyNumberSizeIsamnameDriveKeys . $V 4yH"Ny _"o!#u* R "I"Q#y#޸,޸aoTypeFileExtHeadInpTextLengVarSlaskConvNameErro2a2ABC 80 Dator H ABC 800Dator, komplett 5@H ABC 810Bildsk{rm, f{rg } H ABC 815Bildsk{rm, monokromatisk  ABC 830Flexskiveenhet, 160 kByte@H ABC2 832Flexskiveenhet, 640 kByteZ ORD Ordbehandlingsprogram ;z DIAGRAMDiagramritningsprogram Hz GRAFIK Grafikeditor z ABC830 Flexskiveenhet, 160 kByte@H ABC2 465456 !@ 123 123  789 789 vv fdsa 12 @@{ uytyu uyt dh jhgf jh2gf 543 543 b dsfa fds  fgdssaffdfds hgfghf hgfhgf - 432432 4324223432 XX 786678 7866875 DDc 7865567875457864  k 98798 8765 [l 6543654654 Lx# 432143243243223241  <`+0 <`+ B <`+<`09`<0+90`+< 765763476437463764376476543764 RiH 6543 543 )h jhgghjjjhg 2 jhgjhg jhgfjghfjhgf S# <`+<`09`<0+90`+< 765763476437463764376476543764 RiH 6543 543 )h jhgghjjjhg BBARTIKLARDAT2ARTNR VARUGR )BABC 80 2ABC 800dABC 810ABC 815ABC 830ABC 832aDIAGRAMGRAFIK /ORD B2d/aB98798 #<@+0 U<@+<@09ANDERS [DSFA FDSA FGDSSAFFREDRIKHGFGHF JHGF JHGGHJJ JHGJHG 2KALLE dOLLE PELLE UYTYU B^789 RR R BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB