home *** CD-ROM | disk | FTP | other *** search
/ minnie.tuhs.org / unixen.tar / unixen / PDP-11 / Trees / V7 / usr / games / ching.d / macros < prev    next >
Encoding:
Text File  |  1979-01-10  |  1.3 KB  |  92 lines
  1. .ds N6 Six
  2. .ds N9 Nine
  3. .ds L1 at the beginning
  4. .ds L2 in the second place
  5. .ds L3 in the third place
  6. .ds L4 in the fourth place
  7. .ds L5 in the fifth place
  8. .ds L6 at the top
  9. .ds GR ()
  10. .ds CR []
  11. .ds BL \(em\(em\ \(em\(em
  12. .ds SL \(em\(em\(em\(em\(em
  13. .ds T1 Ch\'ien\ The Creative, Heaven
  14. .ds T2 Sun\ \ \ \ The Gentle, Wind
  15. .ds T3 Li\ \ \ \ \ The Clinging, Flame
  16. .ds T4 K\o'^e'n\ \ \ \ Keeping Still, Mountain
  17. .ds T5 Tui\ \ \ \ The Joyous, Lake
  18. .ds T6 K\'an\ \ \ The Abysmal, Water
  19. .ds T7 Ch\o'^e'n\ \ \ The Arousing, Thunder
  20. .ds T8 K\'un\ \ \ The Receptive, Earth
  21. .de H
  22. .ds LH The Lines
  23. .in 0
  24. .ta 0.5i 1.0i 1.5i 2.0i
  25. .na
  26. .nf
  27. .sp 2
  28. \\$1.    \\$2 / \\$3
  29. ..
  30. .de X
  31. .sp
  32. .XX \\$1 "above" "\\*(T\\$1"
  33. .XX \\$2 "below" "\\*(T\\$2"
  34. ..
  35. .de XX
  36. .ie \\$1>4     \\*(BL
  37. .el     \\*(SL
  38. .ie (\\$1-1%4)>1     \\*(BL\\c
  39. .el     \\*(SL\\c
  40.     \\$2    \\$3
  41. .ie \\$1%2     \\*(SL
  42. .el     \\*(BL
  43. ..
  44. .de J
  45. .in 0
  46. .sp
  47. The Judgement
  48. .na
  49. .nf
  50. .in 0.5i
  51. .sp
  52. ..
  53. .de I
  54. .in 0
  55. .sp
  56. The Image
  57. .na
  58. .nf
  59. .sp
  60. .in 0.5i
  61. ..
  62. .de LX
  63. .in 0.5i
  64. .ti -0.5i
  65. .if '\\$3'G' \\{\\
  66. \\*(GR    \\$1 \\$2 means:\\}
  67. .if '\\$3'C' \\{\\
  68. \\*(CR    \\$1 \\$2 means:\\}
  69. .if '\\$3'' \\{\\
  70.     \\$1 \\$2 means:\\}
  71. ..
  72. .de L
  73. .if !'\\*(LH'' \\{\\
  74. .in 0
  75. .sp
  76. \\*(LH
  77. .rm LH
  78. .in 0.5i\\}
  79. .sp
  80. .LX "\\*(N\\$2" "\\*(L\\$1" \\$3
  81. .na
  82. .nf
  83. ..
  84. .de LA
  85. .sp
  86. .if '\\$1'6' .LX "When all the lines are" "sixes, it"
  87. .if '\\$1'9' .LX "When all the lines are" "nines, it"
  88. .na
  89. .nf
  90. ..
  91. .po 0.5i
  92.