list TYPO16K.BAS :KK.:dimensionera antalet konverteringar SNٷٺsi:N aKet:Nrtin:N%=ANTALET KONVERTERINGAR *4.513,2.659,.934,1.07,4.216,.237,25.4 +.0394,3.785,.264,.621,1.609,.454,2.205 /S944,:S1.X.4:S05 S1%=ANTALET STILAR 5.59,4.58,5.19,5.19,5.59 6Y9,`.5:Y.4AS0:YNri 49999.49,4995.54,2494.8,1247.4,623.7,310.8,155.4  %*******************************   "Detta {r programmet 0*"'TRYCKERIFAKTOR HUVUDMENY 14"(======================================== #>"F|ljande subprogram finns: H M !R@"1 Konvertering **************************** (f@"2 Manuskriptber{kning p@" 3 Pappersvikt )z@"4 Reproduktionsprocent %@"5 Bildproportioner    ""Vilket program v{ljer Du;  VAL AV SUBPROGRAM :::  : ."%_____________________________________ +""Skriv siffran och tryck p} RETURN. B;:Sn   +SS P޺. #Sպ.S ^޺ %.KONVERTERING******************* B 0L"'Detta {r programmet Subprogram 0V"'TRYCKERIFAKTOR KONVERTERING 1`"(======================================== +j""Du kan omvandla f|ljande storheter t 9~" 1 cicero till mm; @"2 mm till cicero <" 3 pica till cicero @"4 cicero till pica 5" 5 pica till mm; @"6 mm till pica 3" 7 tum till mm; @" 8 mm till tum <" 9 gallon till l;@"10 liter till gallon @"2 mm till cicero 4" 11 Fahrenheit;@"12 Celsius till 1" till Celsius;"@" Fahrenheit :"13 pounds till kg;@"14 kg till pounds     0"'_______________________________________ "2 mm till cicero 0 "'Skriv siffran f|r |nskad omvandling och "tryck p} RETURN ,"#Vill Du tillbaks till huvudmenyn s} ("tryck endast p} RETURN /<B;"Vilken omvandling beh|ver Du FB;:Nlk _______ "2 mm till cicero +PNN ޺.er Z 0d"'Detta {r programmet Subprogram 5n"$TRYCKERIFAKTOR KONVERTERING;Nl պ 1x"(======================================== == ______ "2 mm till cicero ?PB"$Vilket v{rde vill Du omvandla ; B;:VB V⺇.Vi   6RVNKVi:Formel f|r omvandling FRRP :Avrundar till tv} decimaler 9Np$:DELA TILLDELNING I 2 RADER +Nպ$@hLA|ILEL  LN +Lպ LA0ILDEL 5VԹ;" cicero=;RԹ;" mm  ecimaler 9CR" :PԹR C  /VԹ;" mm=;C:Թ;" cicero ; X  ICR" :PCRicR :P P dP 1"VԹ;" pica=;CԹ;" cicero ; ,X 6 I@CR" :PR cRo :P P dP 2JVԹ;" cicero=;CԹ;" pica ; TX ^ -hVԹ;" pica=;RCԹ;" mm r ;CԹ;" cicero ; I|CR" :PR mR :P P dP .VԹ;" mm=;CԹ;" pica ; X  .VԹ;" tum=;RԹ;" mm  -VԹ;" mm=;RRԹ;" tum  1VԹ;" gallon=;R;Թ;" liter  2VԹ;" liter=;RR;Թ;" gallon  'RV"2PÐ 6VԹ;" Fahrenheit=;RԹ;" Celsius  ;" tum  'RV"ÐP2 6VԹ;" Celsius=;RԹ;" Fahrenheit & -0VԹ;" pounds=;RRԹ;" kg : -DVԹ;" kg=;R;Թ;" pounds N  ;" tum  9XP$PԹ;" punkter 6bP⺽!" 1 punkt %lP⺇" v 9B"'_______________________________________   ;" tum  8B"&Skriv talet och tryck p} RETURN s} f}r 8B"&Du svaret omedelbart. Skriver Du 0 som 8B"&v{rde s} kan Du v{lja en annan konver- 6B"$tering. Vill Du byta till huvudmenyn ;" tum  1B"igen s} tryck endast p} RETURN.  $MANUSKRIPTBER[KNING***********  9B"'Detta {r programmet Subprogram 9B"'TRYCKERIFAKTOR MANUSKRIPTBER[KNING enyn ;" tum  9 B"'======================================= 1 B"Tecken/rad :T==ٷ 1 B"Antal rader :R==ٷ 0$ B"Manussidor :S== .. B;" Manuskriptets:AS 8 B;" antal nedslag %B B"Stil 3L B"Grad :G V B"tc-tal %` B' : S :S== .. B;" Manuskriptets:AS Hj B"Satsbredd : B" (i cicero):BP 2t B"Antal rader :!Rٷ 0~ B"Sidantal :SR ! B'  Bildsk{rmsunderstycke ts:AS 9 B"'_______________________________________ 9 B"'Fyll i siffrorna och skriv 0 (noll) f|r 8 B"&det Du s|ker. RETURN visar huvudmenyn. (  B;:T D:Tr.TTU2ٷ (  B;:R D:Rr.RTU2ٷ '  B;:S D:Sr.STU2 : A T;RS SS:B" # STR[NGAR F\R UTSKRIFT UTAN E+ BR[TR RUTd AR[BR SUTd & BASֻ:ANTALET TECKEN Rr.RTU2ٷ   B;:S: + S P TA:MAX ANT STIL  B;:G ( G ⺇P T )2 G EGr޺ ST d AR[BR SUTd & BASֻ:ANTALET TECKEN Rr.RTU2ٷ h< S PGGSX: S " S P :Formel tc-tal + avrundning .F B;" ;: B; SS Թ P B;:B Z B;:!R d B;:S n [NDRINGSINPUT x  DR *  B" : B;:S h S PG SX;: S  S P :Formel tc-tal + avrundning + B;" ;: B; SԹ   * B" : B;:G  DR  G ⺇0 h S PGS X;: S  S P :Formel tc-tal + avrundning + B;" ;: B; SԹ   , B;" : B;:BԹ   DR , B;" : B;:!RԹ  , B;" : B;:SԹ  V[LJ FORMEL  GLJ⺇0 " BLJ⺇b , !RLJ⺇v 6 SLJ⺇ @ LJ 0  DR R: SLJASB !RB: B;' ;: B;: SFoԹ BD GLJ SS XRP: B;" LN GLJGP : B;:G;Թ;:" punkter X SLJ: _b BLJAS S!R: B;" ;: B;BԹԹ;:" cic l BLJ: Av !RLJA SBSٷ: B;" # B;!RSպ;:" rader  !Rٷ: : l SA SB "!Rer:SS P : B;" 1 B;SSԹ;:" sidor:S: $ B;" & B;";: $B;" ٷ: : $ B;" 7 B"%Vill Du {ndra uppgiften om stil (1), 9 B"'grad (2), bredd (3), radantal (4), sid- 9 B"'antal (5) e. samtliga uppgifter (6)  #B;:Nal ٷ: : ' N#պ l ) s tl a  #:]TER SUBSTART  $ PAPPERSVIKT*******************   0 "'Detta {r programmet Subprogram 0* "'TRYCKERIFAKTOR PAPPERSVIKT :Nal ٷ: : 14 "(======================================== > B" Papprets h|jd !H B"(Skriv A0...A6) R B" bredd \ B" (eller cm) /f B"Gramvikt :G== Nal ٷ: : 2p B"Antal ark :A 1z B"Vikt i kg :VA 9 B"'_______________________________________ 9 B"'Fyll i siffrorna och skriv 0 (noll) f|r  B" det Du s|ker.  B;:P D # P"'A亽 o   B;: P'  0PP;2 P' 8   YP; $  YY;2  0PY;AԶ 8 B;:G L B;:A V B;:V !X B;"************** &Y B;"*;: &B;"* &ZB;"*;:&B;"* &[B;"*;:&B;"* !\B;"************** `G⺇** B;:A jA⺇** tV⺇** ~  OGV0P**A*:B;GrԹ;:' g:GRAMVIKT  KAV0PG**:B;AGrԹ;:' ark:ARK  :A KV0PGA*:B;VGrԹ;:' kg:VIKT AB;"%Vill Du r{kna ut flera upplagor (J/N);:[' &["J[il"j޺ le %["N[il"n޺ l    A $REPRODUKTIONSPROCENT**********  0 "'Detta {r programmet Subprogram 0"'TRYCKERIFAKTOR REPRODUKTIONSPROCENT 0"'======================================= (B" \nskat m}tt   A "2B"Originalets m}tt 9FB"'_______________________________________ 6PB"$Skriv m}tten (valfri enhet) + RETURN ZB" dB;:\ nB" ; t   A )xB" ;B;:Oen R\O  9B" :BR +Թ;:" % 6B"$TANGENTEN K trycker du p} om Du vill 1B" kolla bildens bredd  A 0B' " N ber{kna en ny bild 5B'# " S ha samma m}tt p} bilden 5B'# " RETURN f|r }terg}ng till menyn 5B'# " P se bildens proportioner &B"Vad vill Du g|ra nu; F &F"KFd "k޺"; &F"NFd "n޺; &F"SFd "s޺n; NY BER[KNING MED SAMMA \ &F B"PFME"p޺^;  B #" B"M}ttet ; ,M 6BMRtt @ B;BRtԹ J T $^BILDPROPORTIONER************** h rIER |I B; ; I B"BILD- B"PROPOR- ; ,M B"TIONER B" ========= B"L[NGD B;:OGD P" PPPԶ " PO'"  PÀ躽  B"L[NGDEN "PROPOR- ; ,M E B" ST\RRE [N: B"BILD-: B"SK[RMEN "Py P\R IB"BILDEN:B"VISAS I:BPSԹ;:" %  Py (YPԶ PENԹ:HOR LINJE ; ,M &ٺ,Y ٺ 0Yٺ :B"H\JD DB;:MD N0PM;" X0Pr躽b  Z B"H\JDEN E\ B" ST\RRE [N: B"BILD-: B"SK[RMEN ; ,M 0^Pq0P\R :0P"q I`B"BILDEN:B"VISAS I:BPSԹ;:" % 'b YPԶ PENԹ:2A HORIZ l0Pٺ, Y ٺ v YPٺ B"PROCENT  B;:RCE (pPM;RRC" pPÀ躽 0PypP :pP y IB"BILDEN:B"VISAS I:BPSԹ;:" % 0Pq B"PROCENT  B;:RCE 0`PROLD'" `Pr躽  B"BILDEN E B" ST\RRE [N: B"BILD-: B"SK[RMEN 0Pq`P\R :`P"q  B;:RCE IB"BILDEN:B"VISAS I:BPSԹ;:" % 80YPԶ`PENԹ :3e punktlinje hor pPٺ,0Y`ٺ 0YPٺ @PPO ) )XP0PԹ :VERT LINJE ;:RCE Xٺ,P0ٺ XXٺ + XX0PٺԹ :2a vertlinje   Xٺ, P0ٺ  XXٺ 9 0XXpPٺԹ ve:3e punktlinje vert *0Xٺ,`Ppٺ 40XXٺ >B;"Fler ;:RCE @B;"bilder BB;'(J/N):A &DA"JAJ/"j޺^: %FA"NAJ/"n޺ : H  ve:3e punktlinje vert *0Xٺ,`Ppٺ 40XXٺ >B;"Fler ;:RCE