%!PS-AdobeFont-1.0: DigiPlot 1.00 %%CreationDate: Wed March 22 2017 % % Copyright 2017 Peter Cherepanov % % This program is free software: you can redistribute it and/or modify % it under the terms of the GNU General Public License as published by % the Free Software Foundation, either version 3 of the License, or % (at your option) any later version. % % This program is distributed in the hope that it will be useful, % but WITHOUT ANY WARRANTY; without even the implied warranty of % MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the % GNU General Public License for more details. % % You should have received a copy of the GNU General Public License % along with this program. If not, see . % % % This font has been adapted from character paths designed by Igor Melichev's % team for a Digigraph pen plotter circa 1987. The main goal of this program % is preservation of computer history but you are free to use it for any % purpose according to GNU GPL. Feel free to contact me if you intend to % use this file and need any changes. % /DigiPlot 10 dict begin /FontType 3 def /FontMatrix [.001 0 0 .001 0 0] def /FontBBox [-100 -400 1200 1600] def /Encoding [ % koi8-r encoding, 16 codes per line 32 {/.notdef} repeat /space /exclam /quotedbl /numbersign /dollar /percent /ampersand /quoteright /parenleft /parenright /asterisk /plus /comma /hyphen /period /slash /zero /one /two /three /four /five /six /seven /eight /nine /colon /semicolon /less /equal /greater /question /at /A /B /C /D /E /F /G /H /I /J /K /L /M /N /O /P /Q /R /S /T /U /V /W /X /Y /Z /bracketleft /backslash /bracketright /asciicircum /underscore /quoteleft /a /b /c /d /e /f /g /h /i /j /k /l /m /n /o /p /q /r /s /t /u /v /w /x /y /z /braceleft /bar /braceright /asciitilde /.notdef 32 {/.notdef} repeat /.notdef /.notdef /.notdef /afii10071 12 {/.nodef} repeat /.notdef /.notdef /.notdef /afii10023 12 {/.nodef} repeat /afii10096/afii10065/afii10066/afii10088/afii10069/afii10070/afii10086/afii10068/afii10087/afii10074/afii10075/afii10076/afii10077/afii10078/afii10079/afii10080 /afii10081/afii10097/afii10082/afii10083/afii10084/afii10085/afii10072/afii10067/afii10094/afii10093/afii10073/afii10090/afii10095/afii10091/afii10089/afii10092 /afii10048/afii10017/afii10018/afii10040/afii10021/afii10022/afii10038/afii10020/afii10039/afii10026/afii10027/afii10028/afii10029/afii10030/afii10031/afii10032 /afii10033/afii10049/afii10034/afii10035/afii10036/afii10037/afii10024/afii10019/afii10046/afii10045/afii10025/afii10042/afii10047/afii10043/afii10041/afii10044 ] cvx def /CharProcs 200 dict def CharProcs begin /.notdef {600 w} def /A {800 W 0 0 m 400 1400 l 800 0 l 114 400 m 686 400 l} bind def /B {700 W 0 800 m 300 400 400 90 -90 N 0 0 l 0 1400 l 300 1100 300 90 -90 N} bind def /C {600 W 600 0 m 0 0 0 350 350 a 0 1400 350 1400 350 a 600 1400 l } bind def /D {700 W 0 0 m 700 0 700 350 350 a 700 1400 350 1400 350 a 0 1400 l h} bind def /E {600 W 0 800 m 400 800 l 600 1400 m 0 1400 l 0 0 l 600 0 l} bind def /F {600 W 0 0 m 0 1400 l 600 1400 l 600 800 m 0 800 l} bind def /G {700 W 400 800 m 700 800 l 700 0 l 0 0 0 350 350 a 0 1400 350 1400 350 a 700 1400 l } bind def /H {700 W 0 0 m 0 1400 l 0 800 m 700 800 l 700 1400 m 700 0 l} bind def /I {300 W 0 0 m 300 0 l 150 0 m 150 1400 l 0 1400 m 300 1400 l} bind def /J {500 W 0 0 m 500 0 500 350 350 a 500 1400 l} bind def /K {700 W 0 0 m 0 1400 l 0 400 m 700 1400 l 255 764 m 700 0 l} bind def /L {500 W 0 1400 m 0 0 l 800 0 l} bind def /M {900 W 0 0 m 0 1400 l 450 600 l 900 1400 l 900 0 l} bind def /N {700 W 0 0 m 0 1400 l 700 0 l 700 1400 l} bind def /O {700 W 0 350 m 350 1050 350 180 0 N 350 350 350 0 180 N h} bind def /P {700 W 0 0 m 0 1400 l 300 1000 400 90 -90 N 0 600 l} bind def /Q {700 W 0 350 m 350 1050 350 180 0 N 350 350 350 0 180 N h 400 400 m 800 0 l} bind def /R {700 W 0 0 m 0 1400 l 300 1000 400 90 -90 N 0 600 l 300 600 m 700 0 l} bind def /S {700 W 0 126 m 400 700 700 -125 -90 A 400 300 300 -90 55 A 300 1100 300 -125 90 N 300 700 700 90 55 N} bind def /T {700 W 0 1400 m 700 1400 l 350 1400 m 350 0 l} bind def /U {700 W 0 1400 m 350 350 350 180 0 A 700 1400 l} bind def /V {800 W 0 1400 m 400 0 l 800 1400 l} bind def /W {1200 W 0 1400 m 300 0 l 600 1000 l 900 0 l 1200 1400 l} bind def /X {800 W 0 0 m 800 1400 l 0 1400 m 800 0 l} bind def /Y {800 W 0 1400 m 400 600 l 400 0 l 400 600 m 800 1400 l} bind def /Z {700 W 0 1400 m 700 1400 l 0 0 l 700 0 l} bind def /a {700 w 0 200 m 0 1000 200 1000 200 a 600 1000 l 600 0 400 0 200 a 0 0 0 200 200 a h 600 200 m 600 0 700 0 100 a} bind def /b {600 W 0 1400 m 0 0 l 600 0 600 200 200 a 600 1000 400 1000 200 a 0 1000 l} bind def /c {500 w 500 1000 m 0 1000 0 800 200 a 0 0 200 0 200 a 500 0 l} bind def /d {600 W 600 1400 m 600 0 l 0 0 0 200 200 a 0 1000 200 1000 200 a 600 1000 l} bind def /e {600 w 0 500 m 600 500 l 600 1000 400 1000 200 a 0 1000 0 800 200 a 0 0 200 0 200 a 600 0 l} bind def /f {400 W 150 0 m 150 1400 350 1400 200 a 400 1400 l 0 1000 m 400 1000 l} bind def /g {600 0 -400 600 1000 b 0 -400 m 600 -400 600 -200 200 a 600 1000 l 0 1000 0 800 200 a 0 0 200 0 200 a 600 0 l} bind def /h {600 W 0 0 m 0 1400 l 0 1000 m 600 1000 600 800 200 a 600 0 l} bind def /i {300 W 25 1400 m 0 1400 25 0 360 A h 0 1000 m 0 0 200 0 200 a 300 0 l} bind def /j {300 0 -400 335 1425 b 325 1400 m 300 1400 25 0 360 A h 300 1000 m 300 -400 100 -400 200 a 0 -400 l} bind def /k {600 W 0 1400 m 0 0 l 600 0 m 200 533 l 0 300 m 600 1000 l} bind def /l {300 W 0 1400 m 0 0 200 0 200 a 300 0 l} bind def /m {900 w 0 0 m 0 1000 l 900 1000 900 800 200 a 900 0 l 450 0 m 450 1000 l} bind def /n {600 w 0 0 m 0 1000 l 600 1000 600 800 200 a 600 0 l} bind def /o {600 w 200 0 m 600 0 600 200 200 a 600 1000 400 1000 200 a 0 1000 0 800 200 a 0 0 200 0 200 a h} bind def /p {600 0 -400 600 1000 b 0 -400 m 0 1000 l 600 1000 600 800 200 a 600 0 400 0 200 a 0 0 l} bind def /q {600 0 -400 600 1000 b 600 0 m 0 0 0 200 200 a 0 1000 200 1000 200 a 600 1000 l 600 -400 l} bind def /r {600 w 0 0 m 0 1000 l 500 1000 500 800 200 a} bind def /s {600 w 0 76 m 200 300 300 -132 -90 A 400 200 200 -90 58 A 200 800 200 -122 90 N 400 700 300 90 49 N} bind def /t {400 W 0 1000 m 400 1000 l 150 1400 m 150 0 350 0 200 a 400 0 l} bind def /u {600 w 0 1000 m 0 0 200 0 200 a 600 0 l 600 1000 l} bind def /v {600 w 0 1000 m 300 0 l 600 1000 l} bind def /w {1000 w 0 1000 m 250 0 l 500 800 l 750 0 l 1000 1000 l} bind def /x {600 w 0 0 m 600 1000 l 0 1000 m 600 0 l} bind def /y {600 0 -400 600 1000 b 0 -400 m 31 -200 200 -90 -16 A 600 1000 l 0 1000 m 300 0 l} bind def /z {600 w 0 1000 m 600 1000 l 0 0 l 600 0 l} bind def /afii10017 /A load def /afii10018 { % Б 700 W 0 800 m 300 400 400 90 -90 N 0 0 l 0 1400 l 600 1400 l } def /afii10019 /B load def /afii10020 { % Г 600 W 0 0 m 0 1400 l 600 1400 l} bind def /afii10021 { % Д 800 0 -100 800 1400 b 0 -100 m 0 0 l 800 0 l 800 -100 l 100 0 m 350 1400 l 700 1400 l 700 0 l} bind def /afii10022 //E def /afii10023 { 600 0 0 600 1625 b 0 800 m 400 800 l 600 1400 m 0 1400 l 0 0 l 600 0 l 150 1600 d 450 1600 d} bind def /afii10024 { % Ж 900 W 0 0 m 286 764 l 614 764 m 900 0 l 450 0 m 450 1400 l 0 1400 m 450 400 l 900 1400 l} bind def /afii10025 { % З 700 W 0 80 m 300 600 600 -120 -89 A 300 400 400 -90 90 A 200 800 l 300 800 m 300 1100 300 -90 90 A 300 1000 400 90 138 A} bind def /afii10026 { % И 700 W 0 1400 m 0 0 l 700 1400 l 700 0 l} bind def /afii10027 { % Й 700 0 0 700 1600 b 0 1400 m 0 0 l 700 1400 l 700 0 l 200 1600 m 500 1600 l} bind def /afii10028 //K def /afii10029 { % Л 700 W 0 0 m 350 1400 l 700 1400 l 700 0 l} bind def /afii10030 //M def /afii10031 //H def /afii10032 //O def /afii10033 { % П 700 W 0 0 m 0 1400 l 700 1400 l 700 0 l} bind def /afii10034 //P def /afii10035 //C def /afii10036 //T def /afii10037 { % У 700 W 100 0 m 700 0 700 300 300 a 700 1400 l 0 1400 m 0 600 400 600 400 a 700 600 l} bind def /afii10038 { % Ф 1100 W 450 300 m 650 750 450 -90 90 A 450 750 450 90 -90 A h 550 0 m 550 1400 l} bind def /afii10039 //X def /afii10040 { % Ц 700 0 -200 800 1400 b 0 1400 m 0 0 l 800 0 l 800 -200 l 700 0 m 700 1400 l} bind def /afii10041 { % Ч 700 W 0 1400 m 0 600 400 600 400 a 700 600 l 700 1400 m 700 0 l} bind def /afii10042 { % Ш 900 W 0 1400 m 0 0 l 900 0 l 900 1400 l 450 1400 m 450 0 l} bind def /afii10043 { % Щ 900 0 -200 1000 1400 b 0 1400 m 0 0 l 1000 0 l 1000 -200 l 900 0 m 900 1400 l 450 1400 m 450 0 l} bind def /afii10044 { % Ъ 850 -150 0 850 1400 b -150 1400 m 150 1400 l 150 0 l 450 400 400 -90 90 A 150 800 l} bind def /afii10045 { % Ы 800 W 0 800 m 200 400 400 90 -90 N 0 0 l 0 1400 l 800 1400 m 800 0 l} bind def /afii10046 { % Ь 700 W 0 800 m 300 400 400 90 -90 N 0 0 l 0 1400 l} bind def /afii10047 { % Э 700 W 0 0 m 700 0 700 350 350 a 700 1400 350 1400 350 a 0 1400 l 200 800 m 700 800 l} bind def /afii10048 { % Ю 800 W 0 0 m 0 1400 l 0 800 m 200 800 l 200 300 m 500 1100 300 180 0 N 500 300 300 0 180 N h} bind def /afii10049 { % Я 700 W 0 0 m 400 600 l 700 600 m 400 1000 400 -90 90 N 700 1400 l 700 0 l} bind def /afii10065 //a def /afii10066 { % б 600 W 0 200 m 0 1000 200 1000 200 a 600 1000 600 800 200 a 600 0 400 0 200 a 0 0 0 200 200 a h 529 953 m 0 1400 l 600 1400 l} bind def /afii10067 { % в 600 W 0 200 m 0 1000 200 1000 200 a 600 1000 600 800 200 a 600 0 400 0 200 a 0 0 0 200 200 a h 0 800 m 0 1400 200 1400 200 a 300 1250 150 90 -62 N 106 976 l} bind def /afii10068 { % г 600 w 0 865 m 300 600 400 139 90 N 400 800 200 90 -58 N 200 200 200 122 -90 A 300 400 400 -90 -41 A} bind def /afii10069 { % д 600 W 100 1400 m 600 1400 600 1200 200 a 600 0 400 0 200 a 0 0 0 200 200 a 0 1000 200 1000 200 a 600 1000 600 800 200 a} bind def /afii10070 //e def /afii10071 { % ё 600 W 0 500 m 600 500 l 600 1000 400 1000 200 a 0 1000 0 800 200 a 0 0 200 0 200 a 600 0 l 150 1200 d 450 1200 d} bind def /afii10072 { % ж 700 w 0 1000 m 350 300 l 700 1000 l 350 1000 m 350 0 l 0 0 m 233 533 l 467 533 m 700 0 l} bind def /afii10073 { % з 500 w 0 69 m 225 400 400 -124 -90 A 225 275 275 -90 90 A 125 550 l 225 550 m 225 775 225 -90 90 A 225 700 300 90 139 A} bind def /afii10074 //u def /afii10075 { % й 600 W 0 1000 m 0 0 200 0 200 a 600 0 l 600 1000 l 150 1200 m 450 1200 l} bind def /afii10076 { % к 600 w 0 1000 m 0 0 l 600 0 m 200 533 l 0 300 m 600 1000 l} bind def /afii10077 { % л 600 w 0 0 m 400 800 200 166 90 N 600 1000 l 600 0 l} bind def /afii10078 { % м 700 w 0 0 m 0 1000 l 350 500 l 700 1000 l 700 0 l} bind def /afii10079 { % н 600 w 0 0 m 0 1000 l 600 1000 m 600 0 l 0 500 m 600 500 l} bind def /afii10080 //o def /afii10081 //n def /afii10082 //p def /afii10083 //c def /afii10084 //m def /afii10085 { % у 600 0 -400 600 1000 b 100 -400 m 600 -400 600 -200 200 a 600 1000 l 0 1000 m 0 0 200 0 200 a 600 0 l} bind def /afii10086 { % ф 900 0 -400 900 1200 b 300 0 m 900 0 900 300 300 a 900 1000 600 1000 300 a 0 1000 0 700 300 a 0 0 300 0 300 a h 450 -400 m 450 1200 l} bind def /afii10087 //x def /afii10088 { % ц 600 0 -200 700 1000 b 0 1000 m 0 0 200 0 200 a 700 0 l 700 -200 l 600 0 m 600 1000 l} bind def /afii10089 { % ч 600 w 0 1000 m 0 400 300 400 300 a 600 400 l 600 0 m 600 1000 l} bind def /afii10090 { % ш 900 w 0 1000 m 0 0 200 0 200 a 900 0 l 900 1000 l 450 1000 m 450 0 l} bind def /afii10091 { % щ 900 0 -200 1000 1000 b 0 1000 m 0 0 200 0 200 a 1000 0 l 1000 -200 l 900 0 m 900 1000 l 450 1000 m 450 0 l} bind def /afii10092 { % ъ 700 -100 0 700 1000 b -100 1000 m 100 1000 l 100 0 l 400 300 300 -90 90 A 100 600 l} bind def /afii10093 { % ы 700 w 0 1000 m 0 0 l 200 300 300 -90 90 A 0 600 l 700 1000 m 700 0 l} bind def /afii10094 { % ь 600 w 0 1000 m 0 0 l 300 300 300 -90 90 A 0 600 l} bind def /afii10095 { % э 600 w 0 0 m 600 0 600 200 200 a 600 1000 400 1000 200 a 0 1000 l 200 500 m 600 500 l} bind def /afii10096 { % ю 700 w 0 0 m 0 1000 l 400 1000 m 700 1000 700 800 200 a 700 0 500 0 200 a 200 0 200 200 200 a 200 1000 400 1000 200 a h 0 500 m 200 500 l} bind def /afii10097 { % я 600 w 0 0 m 250 500 l 600 0 m 600 1000 l 250 750 250 90 -90 A 600 500 l} bind def /one {400 W 0 1000 m 400 1400 l 400 0 l } bind def /two {700 W 0 1050 m 350 1050 350 180 -37 N 0 0 l 700 0 l} bind def /three {600 W 0 1400 m 600 1400 l 100 800 l 600 800 600 500 300 a 600 0 300 0 300 a 0 0 l} bind def /four {700 W 300 1400 m 0 300 l 700 300 l 500 700 m 500 0 l} bind def /five {600 W 0 0 m 600 0 600 300 300 a 600 800 300 800 300 a 0 800 l 0 1400 l 600 1400 l} bind def /six {700 W 500 1400 m 1060 500 1060 122 180 A 0 0 300 0 300 a 700 0 700 300 300 a 700 800 400 800 300 a 0 800 0 500 300 a} bind def /seven {700 W 0 1200 m 0 1400 l 700 1400 l 300 0 l} bind def /eight {700 W 0 300 m 0 800 300 800 300 a 700 800 700 500 300 a 700 0 400 0 300 a 0 0 0 300 300 a h 350 800 m 350 1100 300 -90 270 arc h} bind def /nine {700 W 200 0 m -360 900 1060 -58 0 A 700 1400 400 1400 300 a 0 1400 0 1100 300 a 0 600 300 600 300 a 700 600 700 900 300 a} bind def /zero {700 W 0 300 m 0 1400 300 1400 300 a 700 1400 700 1100 300 a 700 0 400 0 300 a 0 0 0 300 300 a 700 1100 l} bind def /space {600 w} bind def /period {0 -25 0 25 50 b 0 25 d} bind def /exclam {0 -25 0 25 1400 b 0 25 d 0 200 m 0 1400 l} bind def /quotedbl {200 W 0 1100 m 0 1400 l 200 1400 m 200 1100 l} bind def /numbersign {600 W 50 800 m 600 800 l 550 600 m 0 600 l 112 350 m 288 1050 l 488 1050 m 312 350 l} bind def /dollar {700 0 -100 700 1500 b 0 126 m 400 700 700 -125 -90 A 400 300 300 -90 55 A 300 1100 300 -125 90 N 300 700 700 90 55 N 350 -100 m 350 1500 l} bind def /percent {600 W 0 0 m 600 1400 l 300 1100 m 150 1100 150 0 360 arc h 600 300 m 450 300 150 0 360 arc h} bind def /ampersand {800 W 800 0 m 300 1200 200 -149 -40 N 300 300 300 146 -34 A 800 509 l} bind def /quoteright {200 W 0 1100 m 200 1400 l} bind def /parenleft {205 W 205 0 m 1300 700 1300 -147.5 147.5 N} bind def /parenright {205 W 0 0 m -1095 700 1300 -32.5 32.5 A} bind def /asterisk {600 w 0 700 m 600 700 l 450 960 m 150 440 l 450 440 m 150 960 l} bind def /plus {600 w 0 700 m 600 700 l 300 1000 m 300 400 l} bind def /comma {0 -28 -200 25 50 b 0 25 d 25 25 m -475 25 500 0 -27 N} bind def /hyphen {600 w 0 700 m 500 700 l} bind def /slash {600 W 0 0 m 600 1400 l} bind def /colon {0 -25 0 25 725 b 0 25 d 0 700 d} bind def /semicolon {0 -28 -200 25 725 b 0 25 d 25 25 m -475 25 500 0 -27 N 0 700 d} bind def /less {600 w 600 400 m 0 700 l 600 1000 l} bind def /equal {600 w 0 600 m 600 600 l 600 800 m 0 800 l} bind def /greater {600 w 0 400 m 600 700 l 0 1000 l} bind def /question {600 W 300 25 d 300 200 m 800 476 500 180 129 N 300 1100 300 -51 180 A} bind def /at {800 w 600 400 m 400 400 200 0 180 N 400 600 200 180 0 N 700 300 100 180 0 A 400 600 400 0 180 A 400 400 400 180 -50 A} bind def /bracketleft {200 0 -100 200 1500 b 200 -100 m 0 -100 l 0 1500 l 200 1500 l} bind def /backslash {600 W 0 1400 m 600 0 l} bind def /bracketright {200 0 -100 200 1500 b 0 -100 m 200 -100 l 200 1500 l 0 1500 l} bind def /asciicircum {600 W 0 1200 m 300 1400 l 600 1200 l} bind def /underscore {500 0 -100 500 -100 b 0 -100 m 500 -100 l} bind def /quoteleft {200 W 0 1400 m 200 1100 l} bind def /braceleft {300 0 -100 300 1500 b 300 -100 m 300 100 200 -90 180 N 0 600 100 0 90 A 0 800 100 -90 0 A 300 1300 200 180 90 N} bind def /bar {0 0 -100 0 1500 b 0 -100 m 0 600 l 0 800 m 0 1500 l} bind def /braceright {300 0 -100 300 1500 b 0 -100 m 0 100 200 -90 0 A 300 600 100 180 90 N 300 800 100 -90 180 N 0 1300 200 0 90 A} bind def /asciitilde {600 w 0 700 m 150 550 212 135 45 N 450 850 212 -135 -45 A} bind def end /lw 30 def % Line width for stroking /ops 10 dict begin /m /moveto load def /l /lineto load def /h /closepath load def /a /arct load def /A /arc load def /N /arcn load def /w {0 0 2 index 1000 b} bind def /W {0 0 2 index 1400 b} bind def /b { //lw add exch //lw add exch 4 2 roll //lw sub exch //lw sub exch 4 2 roll 5 -1 roll 200 add 0 6 2 roll setcachedevice //lw setlinewidth 1 setlinecap 1 setlinejoin } bind def /d { 2 copy 25 sub moveto 25 -90 270 arc closepath} bind def currentdict end readonly def /BuildGlyph { exch /CharProcs get exch 2 copy known not {pop /.notdef} if get //ops begin exec stroke end } bind def currentdict dup /ops undef /lw undef /BuildChar { 1 index /Encoding get exch get 1 index /BuildGlyph get exec } bind def currentdict end /Font defineresource pop %%EOF