|
|
1.1 ! root 1: .PS 5.5i ! 2: .ps 20 ! 3: boxht = boxht/2 ! 4: lineht = 3*lineht/4 ! 5: linewid = 3*linewid/4 ! 6: ## figure 8 ! 7: ## EXAMPLE: THE ALTERNATE FILESYSTEM APPROACH (cont.) ! 8: B2: box "flintstones" ! 9: B2a: box "descriptor" with .w at (B2.e.x+linewid, B2.e.y) ! 10: B2b: box "attributes" with .w at (B2.e.x+linewid, B2.e.y-lineht) ! 11: B2c: box "DU" with .w at (B2.e.x+linewid, B2.e.y-2*lineht) ! 12: ## ! 13: B3: box "1" with .w at (B2.e.x+linewid, B2.e.y-3*lineht) ! 14: B3a: box "descriptor" with .w at (B3.e.x+linewid, B3.e.y) ! 15: move to B3a.e; "\ \ depth 1" ljust ! 16: ## ! 17: B4: box "1" with .w at (B3.e.x+linewid, B3.e.y-lineht) ! 18: B4a: box "descriptor" with .w at (B4.e.x+linewid, B4.e.y) ! 19: move to B4a.e; "\ \ depth 1, fred" ljust ! 20: B4b: box "DU" with .w at (B4.e.x+linewid, B4.e.y-lineht) ! 21: B5: box "2" with .w at (B3.e.x+linewid, B4.e.y-2*lineht) ! 22: B5a: box "descriptor" with .w at (B5.e.x+linewid, B5.e.y) ! 23: move to B5a.e; "\ \ depth 1, wilma" ljust ! 24: B5b: box "DU" with .w at (B5.e.x+linewid, B5.e.y-lineht) ! 25: ## ! 26: B6: box "2" with .w at (B2.e.x+linewid, B4.e.y-4*lineht) ! 27: B6a: box "descriptor" with .w at (B6.e.x+linewid, B6.e.y) ! 28: move to B6a.e; "\ \ depth 2, pebbles" ljust ! 29: ## ! 30: B7: box "3" with .w at (B2.e.x+linewid, B4.e.y-5*lineht) ! 31: B7a: box "descriptor" with .w at (B7.e.x+linewid, B7.e.y) ! 32: move to B7a.e; "\ \ depth 1" ljust ! 33: B7b: box "DU" with .w at (B7.e.x+linewid, B7.e.y-lineht) ! 34: ## ! 35: B8: box "1" with .w at (B7.e.x+linewid, B7.e.y-2*lineht) ! 36: B8a: box "descriptor" with .w at (B8.e.x+linewid, B8.e.y) ! 37: move to B8a.e; "\ \ depth 1, dino" ljust ! 38: B8b: box "DU" with .w at (B8.e.x+linewid, B8.e.y-lineht) ! 39: ## ! 40: line from ((B2.e.x+B2a.w.x)/2, B2.e.y) to ((B2.e.x+B2a.w.x)/2, B7.w.y) ! 41: line from B2.e to ((B2.e.x+B2a.w.x)/2, B2.e.y) ! 42: line from ((B2.e.x+B2a.w.x)/2, B2a.w.y) to B2a.w ! 43: line from ((B2.e.x+B2a.w.x)/2, B2b.w.y) to B2b.w ! 44: line from ((B2.e.x+B2a.w.x)/2, B2c.w.y) to B2c.w ! 45: line from ((B2.e.x+B2a.w.x)/2, B3.w.y) to B3.w ! 46: line from ((B2.e.x+B2a.w.x)/2, B6.w.y) to B6.w ! 47: line from ((B2.e.x+B2a.w.x)/2, B7.w.y) to B7.w ! 48: ## ! 49: line from ((B3.e.x+B3a.w.x)/2, B3.e.y) to ((B3.e.x+B3a.w.x)/2, B5.w.y) ! 50: line from B3.e to ((B3.e.x+B3a.w.x)/2, B3.e.y) ! 51: line from ((B3.e.x+B3a.w.x)/2, B3a.e.y) to B3a.w ! 52: line from ((B3.e.x+B3a.w.x)/2, B4.e.y) to B4.w ! 53: line from ((B3.e.x+B3a.w.x)/2, B5.e.y) to B5.w ! 54: ## ! 55: line from ((B4.e.x+B4a.w.x)/2, B4.e.y) to ((B4.e.x+B4a.w.x)/2, B4b.w.y) ! 56: line from B4.e to ((B4.e.x+B4a.w.x)/2, B4.e.y) ! 57: line from ((B4.e.x+B4a.w.x)/2, B4a.e.y) to B4a.w ! 58: line from ((B4.e.x+B4a.w.x)/2, B4b.w.y) to B4b.w ! 59: ## ! 60: line from ((B5.e.x+B5a.w.x)/2, B5.e.y) to ((B5.e.x+B5a.w.x)/2, B5b.w.y) ! 61: line from B5.e to ((B5.e.x+B5a.w.x)/2, B5.e.y) ! 62: line from ((B5.e.x+B5a.w.x)/2, B5a.e.y) to B5a.w ! 63: line from ((B5.e.x+B5a.w.x)/2, B5b.w.y) to B5b.w ! 64: ## ! 65: line from B6.e to B6a.w ! 66: ## ! 67: line from ((B7.e.x+B7a.w.x)/2, B7.e.y) to ((B7.e.x+B7a.w.x)/2, B8.w.y) ! 68: line from B7.e to ((B7.e.x+B7a.w.x)/2, B7.e.y) ! 69: line from ((B7.e.x+B7a.w.x)/2, B7a.w.y) to B7a.w ! 70: line from ((B7.e.x+B7a.w.x)/2, B7b.w.y) to B7b.w ! 71: line from ((B7.e.x+B7a.w.x)/2, B8.w.y) to B8.w ! 72: ! 73: ## ! 74: line from ((B8.e.x+B8a.w.x)/2, B8.e.y) to ((B8.e.x+B8a.w.x)/2, B8b.w.y) ! 75: line from B8.e to ((B8.e.x+B8a.w.x)/2, B8.e.y) ! 76: line from ((B8.e.x+B8a.w.x)/2, B8a.e.y) to B8a.w ! 77: line from ((B8.e.x+B8a.w.x)/2, B8b.w.y) to B8b.w ! 78: ## ! 79: .PE
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.