File DRAW.FT (FORTRAN source file)

Directory of image this file is from
This file as a plain text file

6703 0240 6322 3717 6322 6701 6640 1304 4301 6727 5212 0303 6304 0722 6327 4640 
6723 0240 6322 6711 6301 4722 5314 0331 6303 7317 6703 1305 6316 2305 6240 4727 
5324 0310 6314 7311 6705 1301 6240 6711 6301 2707 6723 2256 6710 2301 6640 1711 
6240 7724 6240 0723 6331 4654 4324 5215 6703 2640 6723 1705 6240 4324 6305 1640 
6722 1717 6323 0710 6711 1722 6240 7724 6640 1304 5301 0327 6723 1324 6301 3711 
5310 0324 6314 7311 5305 6323 6301 2316 6240 0703 6316 0640 6314 7723 6640 1303 
6705 2301 4305 5215 6303 1640 6714 1717 5305 0304 6320 6317 6331 7707 5316 0323 
5317 0306 6716 1655 6311 2704 6323 0640 5316 0304 6727 2311 6310 0640 6640 0323 
6305 4703 6306 1711 6240 0722 6704 2711 6723 2256 6710 1711 6240 6711 6320 4714 
4305 6723 5212 0303 6324 2710 6240 1301 6311 4714 5324 0331 5324 0317 6711 1716 
6303 4722 5302 0305 6301 2316 6240 4703 6722 2703 6315 1723 6322 1311 6705 3240 
6705 4722 6240 4723 6315 6320 6331 1254 6731 1640 6320 1705 6711 4706 6311 3716 
6215 1612 6240 4324 6305 1640 6717 1322 6705 2303 6240 0722 6704 2711 6323 0640 
5316 0304 6324 2710 6240 0723 5315 0305 6303 7305 6724 1305 6640 1701 6240 7706 
6722 2240 5310 0305 6317 4722 6307 7311 5301 0314 6320 6317 6331 7707 4316 6656 
5212 0303 6304 0722 6327 0640 6314 7723 6240 0710 6323 0640 5314 0314 6324 2710 
6240 7710 6325 2723 6313 2705 6320 7311 6307 3240 6325 1716 6324 7711 5316 7323 
6215 1612 4211 4704 6304 0722 5327 0323 6704 1301 6713 3240 6705 2303 4317 6722 
4212 4703 6305 2611 6722 1701 5305 0323 6723 1303 6305 7305 6215 1612 4211 4706 
6303 0710 6711 1716 6240 7724 6240 7715 6304 3311 6731 1656 4326 5215 6303 3611 
6211 4303 6301 7311 6723 2240 6317 3640 6306 1711 6656 3323 6215 1612 4211 4711 
6311 4716 6324 0711 6714 5311 5305 0323 6324 1301 4314 6705 4212 4703 6314 2211 
6722 3701 6323 6240 6311 4307 6724 3240 6705 2303 4317 6722 4212 4703 6716 3611 
6722 2311 5305 0323 6316 6725 6315 2702 6322 7640 6706 0240 6317 7311 5324 0323 
6325 2723 6304 4640 6716 2240 6301 6302 4305 5215 6303 7611 6211 6717 6711 1724 
6240 7720 6711 2316 6323 3240 6322 6717 6240 0724 6302 2714 5240 1650 4251 5215 
6703 0211 6611 1304 6701 1727 6240 7720 6711 2316 6215 1612 4211 4724 6303 0710 
6711 1716 6240 7724 6240 0724 5320 7305 4323 6726 4212 4703 6727 3611 6722 2311 
5305 0323 6301 6314 6240 7720 6711 2316 4323 5215 6703 4211 6611 4305 6711 1724 
6640 1306 5317 0315 6320 7722 6307 0722 4315 5215 6703 4611 6611 1304 6701 1727 
6240 7720 6314 3731 5317 0316 6250 0722 6704 2711 6323 7254 6325 1315 5305 0322 
5317 0306 6323 2311 5305 4723 6215 1612 6240 7706 6722 1324 5301 0316 4311 6711 
5212 0303 5323 0322 6272 2640 6722 1701 6305 3256 5324 7640 6240 7712 6331 3256 
5324 7640 6240 2306 5311 7323 5306 0324 6257 0640 6314 4320 6301 3256 4324 5215 
6303 1640 5710 5240 6240 0724 5320 7305 5323 0326 6257 6640 6317 4704 5306 7331 
5323 0326 6257 3640 6306 1711 6656 3323 6215 1612 6240 2702 6301 1322 6705 2311 
6325 3716 6240 7726 6316 2240 6705 2703 5323 1640 5670 3655 4267 6663 6212 1611 
6317 6715 5317 0316 6316 0724 6302 4654 4320 6724 6212 2211 6311 2715 6316 4723 
5317 0316 6316 0724 5302 4240 5665 0260 5254 4663 4215 4612 6707 2317 5717 1640 
6215 1612 6240 7311 5311 0324 6324 1301 4314 6705 4212 4661 6711 2320 4275 6660 
6212 1611 6301 6314 6240 2306 5311 0323 5250 6260 5660 0254 4251 5215 6211 7707 
5324 0317 4263 5215 6303 2640 6722 1701 6705 1640 6303 2722 4305 6716 4212 4662 
6303 6301 6314 2640 6722 1701 4305 5215 6303 3640 5305 0324 6303 7717 6322 4704 
6716 2301 5305 0323 6301 2316 6240 4303 6301 0722 6303 2724 4322 6723 4212 4663 
6303 6301 6314 5240 5317 4331 5311 6330 5311 6331 4313 6651 5212 0303 5704 1250 
5270 4670 6240 0704 5322 0313 6326 1705 6724 1317 6254 7640 5650 4671 5262 0251 
6317 4715 5324 0254 5711 3250 5260 4670 6240 7311 6311 4724 6301 4714 4332 6705 
5212 0303 5714 4250 5260 4660 6240 4714 6707 2310 6240 2726 6303 7724 5322 0254 
5720 0650 5660 3265 6651 0240 6317 7311 5324 0254 5705 1650 5265 4662 6640 1305 
6301 2723 4254 5215 6703 3640 5650 2661 5260 4664 6640 1327 6311 2724 6240 0724 
6302 2714 6654 2240 5650 1661 5261 4662 6240 0724 5320 6305 5240 4307 5664 0270 
6251 1640 6310 4701 6716 2240 6317 3640 6306 1711 6215 1612 5240 4331 5661 1666 
5262 0251 6320 6317 6331 7707 5316 0254 5730 0650 5665 4266 6251 2640 6730 2311 
6215 1612 5240 4306 5664 3261 6251 1640 6310 4701 6716 2240 6317 6640 6317 4704 
4306 6731 6212 4611 5306 4240 5713 1255 5270 4670 5240 6264 5261 6267 4264 5215 
6264 4611 5306 4240 5713 4655 5271 4662 5240 6265 5262 6263 4265 5215 6265 4611 
5306 4240 5713 3255 5260 4670 5240 6266 5661 3254 5615 3212 6211 3311 6240 5650 
5655 0270 5260 0251 5667 0654 5670 3654 5615 3612 6211 3311 6240 5650 5655 2661 
5266 4670 5670 1254 5670 4254 5615 4212 6211 3311 6240 5650 5655 0261 5265 4666 
5240 6271 5261 6271 4271 5215 6271 4611 5306 4240 5713 1655 5265 4662 5640 0261 
5254 6262 4261 6660 5612 0261 6211 3311 6240 5650 5655 2661 5260 4664 5640 0661 
5654 0662 5654 0661 5615 0612 6261 4611 5306 4240 5713 0655 5663 1261 5651 0640 
5662 1254 5666 0654 4262 5215 4261 4662 5311 0306 5250 6713 5664 0270 5651 0640 
5663 1254 5667 0654 4263 5215 4261 4663 5311 0306 5250 6713 5661 1666 5262 0251 
5261 6264 5263 6261 4261 6664 5612 2261 6211 3311 6240 5650 5655 1271 5270 0251 
5261 6265 5263 6260 4261 6665 5612 2661 6211 3311 6240 5650 5655 3270 5264 0251 
5261 6266 5263 6270 4261 6666 5612 3261 6211 3311 6240 5650 5655 0664 5266 0251 
5663 1254 5671 1654 6215 1612 6240 2723 6324 4640 6240 7706 6322 2240 6301 5722 
6240 2726 6303 7724 4322 5215 5614 3661 5611 6711 4260 5215 6211 7707 5324 0317 
4262 6660 5212 0303 6311 6275 6311 4307 6724 3240 6705 2303 5317 6322 6303 6301 
6314 3240 6704 1711 6240 7706 6322 6240 6701 2323 6240 7720 6711 2316 5615 0612 
6270 4611 4275 6661 6212 1611 6301 6314 6240 2306 5311 4323 6260 7254 6324 1301 
6650 0311 5724 1254 6251 7254 6324 1301 6650 0311 5724 1654 4251 6651 6212 3611 
6317 7724 5640 0262 6215 1612 5640 6711 6320 4717 4316 6724 5612 4661 5611 6711 
4255 6661 5212 0303 6304 0722 6727 3240 6705 2303 5317 6322 6640 2720 6724 0240 
6317 7311 6324 4640 6716 2240 6301 6302 4305 5215 4262 4660 6303 6301 6314 3240 
6704 1711 5250 6311 5311 6330 5311 4731 4215 4612 6711 2320 6675 0311 5724 0653 
4215 4612 6316 0724 6302 4650 5320 6324 5661 6651 4311 5215 6611 2316 5301 4302 
6711 2320 5254 4662 6675 4311 4215 4612 6316 0724 6302 4650 5320 6324 5663 6651 
4311 6731 6212 3611 6317 7724 4240 6663 5212 0303 6327 4722 5324 0305 6722 2717 
6324 7311 6305 3655 6317 4240 6317 2715 6254 1640 6301 6314 6240 2306 5311 0323 
6727 2311 6310 2640 6301 4303 6240 7720 6711 2316 5615 1212 6261 1611 6301 6314 
6240 2306 5311 4323 5660 0254 5254 4660 4215 4612 5304 0317 5262 0262 5716 0675 
6654 0311 4324 5215 4262 4662 6303 6301 6314 3240 6704 1711 6650 2316 5301 4302 
5716 0654 6251 7254 6324 1301 5250 6316 5262 6251 6316 0724 6302 7250 5254 4663 
4251 5215 6211 7707 5324 0317 4263 5215 6303 7640 6715 2311 6240 7722 6325 4724 
5316 6705 6707 2305 6240 7716 6240 3317 6240 7720 6711 2316 6723 2240 6317 7640 
6715 2311 5615 1212 6263 1611 6301 6314 6240 6301 6320 0710 4215 4612 6322 0705 
5304 4240 5661 0654 5260 4660 4240 6715 5612 0261 6260 3211 6317 6722 5301 0324 
5250 1647 5647 0654 5311 4663 4215 4612 5311 0306 6650 0311 6324 6655 5651 1240 
5665 1254 5665 1254 4264 5215 4262 4664 6711 2320 6675 0311 6324 6655 4215 4612 
6303 6301 6314 2640 6722 1701 4305 5215 6211 7707 5324 0317 4262 6661 5612 2662 
6211 0703 5314 0314 6305 0722 4323 6705 6212 3611 6317 7724 4240 6661 5612 3262 
6211 0703 5314 0314 6303 0710 5311 0316 6650 2247 6301 2720 4247 6651 5612 3662 
6211 0703 5314 0314 6303 0710 5311 0316 6250 3647 6306 1711 4247 6651 5612 4662 
6211 0703 5314 0314 6303 0710 5311 0316 6250 6647 6317 4704 5306 3731 4251 5215 
4262 4670 6303 6301 6314 2640 6730 2311 6215 1612 6640 1327 6311 2724 6640 0311 
4324 5215 4263 4660 6303 6301 6314 0640 6314 4320 4301 5215 6611 1327 6311 2724 
5640 0650 5654 0261 5261 0251 6711 2320 5615 0612 4260 4661 6706 1317 6715 2301 
6240 4650 4263 6651 6212 3611 6317 7724 4240 6663 5612 0663 6211 0703 5314 0314 
6701 0314 4310 6701 5212 0303 6320 6317 6331 7707 6716 1240 6717 2325 6311 2716 
4215 4612 6322 0705 5304 4240 5661 0654 5260 4663 5240 6322 4330 5215 5661 1660 
6211 7706 6322 0715 5324 4240 6247 0722 6704 2711 5323 3640 5306 7263 5260 0247 
6243 7640 6706 1640 6311 2704 5323 3640 5306 7263 4260 6651 6212 1611 6301 6314 
6240 7712 6331 4650 6330 4654 6331 5654 4251 5215 5611 2330 5275 7266 5662 1670 
5661 2670 4263 5215 5611 1730 5275 7260 4215 4612 5730 6662 5330 7664 4330 5215 
6611 0311 6324 4675 5320 5724 4261 5215 6611 2316 5301 4302 6711 2320 5254 4661 
5675 0655 4215 4612 6316 0724 6302 4650 5320 6324 5662 6651 6311 4706 6730 1250 
6251 4653 4330 5215 6611 2316 5301 4302 6711 2320 5254 4663 6675 4711 4215 4612 
6303 6301 6314 3240 6704 1711 5650 0655 6654 2316 5301 4302 6711 2320 5254 4662 
6654 2316 5301 4302 6711 2320 5254 4663 4251 5215 4263 4664 6711 2320 6675 0311 
5724 0653 4215 4612 5311 0306 6650 0311 5724 2655 5260 4660 5640 2663 5654 2663 
5654 3663 5615 1612 6265 7211 6324 1301 6650 0311 5724 0654 5651 0675 4215 6212 
6611 2316 5301 4302 6711 2320 5254 4662 6275 3311 5311 4330 6322 1652 5317 4323 
5330 4663 6251 4653 4330 5215 6611 2316 5301 4302 6711 2320 5254 4663 6275 3311 
5311 4330 6722 1652 5311 4316 5330 4663 6251 4653 4331 5215 5611 1730 5675 1730 
5653 1330 4215 4612 5311 0306 5650 1730 5655 2330 5651 1640 5666 1654 5666 1654 
5615 1612 6266 1611 6301 6314 6240 2306 5311 0323 5250 6261 6316 0724 6302 4650 
5320 6324 5262 6251 6316 0724 6302 4650 5320 6324 5263 4651 4215 4612 6707 2317 
5717 1640 4264 5215 4263 4667 6303 6301 6314 0640 6314 4320 4301 5215 6611 1327 
6311 2724 5640 0650 5654 0261 4264 6651 5612 0261 6264 3211 6317 6722 5301 0324 
6250 6647 6701 1324 5311 0330 6306 6311 6314 2305 4247 6651 6212 3611 6317 7724 
4240 6663 5212 0303 6715 3317 6311 3716 6640 2723 6302 7722 6325 4724 4316 6705 
5612 4263 6211 0703 5314 0314 6701 0314 4310 6701 6612 1211 6305 2301 5640 0650 
5654 0261 5265 0251 4313 5215 5661 2660 6211 7706 6322 0715 5324 4240 6247 2704 
6723 1324 5317 0331 6317 2314 6677 4640 5275 6261 5640 6716 5262 3640 5311 4661 
4215 4612 6707 2317 5317 4240 5264 6260 5263 4671 4254 6713 5612 4663 6611 0316 
6324 4675 4320 6724 6212 7211 6324 1301 6650 0311 5724 0653 5254 4661 5675 0655 
4215 4612 6707 2317 5717 2240 4261 5215 4264 4660 6716 2320 4275 6660 5612 0664 
6211 0703 5314 0314 6712 4717 6650 4311 6654 4711 5254 4713 4215 4612 5716 6730 
4311 6730 6212 7211 6332 4675 4331 5215 6211 0703 5314 0314 6712 4717 6650 4311 
6654 4711 5254 4713 4215 4612 5716 6730 5311 6730 4316 6730 6212 7211 6332 4675 
6331 7255 4332 5215 6211 7704 5640 1264 5640 6716 6261 4654 4320 6724 6212 7211 
6324 1301 6650 0316 6324 7253 5254 4661 6675 2316 5301 4302 5716 0654 4251 5215 
6611 2316 5301 4302 6716 2320 5253 6316 5662 6651 6316 0724 6302 7250 5254 4662 
6653 4316 5615 2212 6262 7211 6324 1301 6650 0316 6324 7253 5254 4663 6675 2316 
5301 4302 5716 1654 6251 7253 4332 5215 6611 0311 6324 4675 5320 5724 6716 2320 
4215 4612 6303 6301 6314 0640 6314 4320 4301 5215 6611 1327 6311 2724 5640 0650 
5654 0261 5266 0251 6711 2320 5615 0612 4260 4666 6706 1317 6715 2301 6240 4650 
4263 6651 6212 3611 6317 7724 4240 6663 6212 2611 4316 6704 4612 5214 0000 0000 
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 
0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 0000 



Feel free to contact me, David Gesswein djg@pdp8online.com with any questions, comments on the web site, or if you have related equipment, documentation, software etc. you are willing to part with.  I am interested in anything PDP-8 related, computers, peripherals used with them, DEC or third party, or documentation. 

PDP-8 Home Page   PDP-8 Site Map   PDP-8 Site Search