;;; -*- Mode:LISP; Package:USER; Base:10 -*-

(defvar *plot* '(
 PROGN
 (MOVE 160. 264.)
 (PRINT-TEXT "G")
 (MOVE 169. 264.)
 (PRINT-TEXT "J")
 (MOVE 178. 264.)
 (PRINT-TEXT "C")
 (MOVE 187. 264.)
 (PRINT-TEXT " ")
 (MOVE 196. 264.)
 (PRINT-TEXT "2")
 (MOVE 205. 264.)
 (PRINT-TEXT "0")
 (MOVE 214. 264.)
 (PRINT-TEXT ":")
 (MOVE 223. 264.)
 (PRINT-TEXT "1")
 (MOVE 232. 264.)
 (PRINT-TEXT "4")
 (MOVE 241. 264.)
 (PRINT-TEXT ":")
 (MOVE 250. 264.)
 (PRINT-TEXT "4")
 (MOVE 259. 264.)
 (PRINT-TEXT "4")
 (MOVE 268. 264.)
 (PRINT-TEXT " ")
 (MOVE 277. 264.)
 (PRINT-TEXT "S")
 (MOVE 286. 264.)
 (PRINT-TEXT "u")
 (MOVE 295. 264.)
 (PRINT-TEXT "n")
 (MOVE 304. 264.)
 (PRINT-TEXT "d")
 (MOVE 313. 264.)
 (PRINT-TEXT "a")
 (MOVE 322. 264.)
 (PRINT-TEXT "y")
 (MOVE 331. 264.)
 (PRINT-TEXT ",")
 (MOVE 340. 264.)
 (PRINT-TEXT " ")
 (MOVE 349. 264.)
 (PRINT-TEXT "2")
 (MOVE 358. 264.)
 (PRINT-TEXT "0")
 (MOVE 367. 264.)
 (PRINT-TEXT "t")
 (MOVE 376. 264.)
 (PRINT-TEXT "h")
 (MOVE 385. 264.)
 (PRINT-TEXT " ")
 (MOVE 394. 264.)
 (PRINT-TEXT "O")
 (MOVE 403. 264.)
 (PRINT-TEXT "c")
 (MOVE 412. 264.)
 (PRINT-TEXT "t")
 (MOVE 421. 264.)
 (PRINT-TEXT "o")
 (MOVE 430. 264.)
 (PRINT-TEXT "b")
 (MOVE 439. 264.)
 (PRINT-TEXT "e")
 (MOVE 448. 264.)
 (PRINT-TEXT "r")
 (MOVE 457. 264.)
 (PRINT-TEXT ",")
 (MOVE 466. 264.)
 (PRINT-TEXT " ")
 (MOVE 475. 264.)
 (PRINT-TEXT "1")
 (MOVE 484. 264.)
 (PRINT-TEXT "9")
 (MOVE 493. 264.)
 (PRINT-TEXT "8")
 (MOVE 502. 264.)
 (PRINT-TEXT "5")
 (MOVE 511. 264.)
 (MOVE -181. -507.)
 (PRINT-TEXT "X")
 (MOVE -172. -507.)
 (PRINT-TEXT "m")
 (MOVE -163. -507.)
 (PRINT-TEXT "i")
 (MOVE -154. -507.)
 (PRINT-TEXT "n")
 (MOVE -145. -507.)
 (PRINT-TEXT " ")
 (MOVE -136. -507.)
 (PRINT-TEXT "=")
 (MOVE -127. -507.)
 (PRINT-TEXT " ")
 (MOVE -118. -507.)
 (PRINT-TEXT "-")
 (MOVE -109. -507.)
 (PRINT-TEXT "3")
 (MOVE -100. -507.)
 (PRINT-TEXT " ")
 (MOVE -91. -507.)
 (PRINT-TEXT " ")
 (MOVE -82. -507.)
 (PRINT-TEXT "X")
 (MOVE -73. -507.)
 (PRINT-TEXT "m")
 (MOVE -64. -507.)
 (PRINT-TEXT "a")
 (MOVE -55. -507.)
 (PRINT-TEXT "x")
 (MOVE -46. -507.)
 (PRINT-TEXT " ")
 (MOVE -37. -507.)
 (PRINT-TEXT "=")
 (MOVE -28. -507.)
 (PRINT-TEXT " ")
 (MOVE -19. -507.)
 (PRINT-TEXT "3")
 (MOVE -10. -507.)
 (PRINT-TEXT " ")
 (MOVE -1. -507.)
 (PRINT-TEXT " ")
 (MOVE 8. -507.)
 (PRINT-TEXT "Y")
 (MOVE 17. -507.)
 (PRINT-TEXT "m")
 (MOVE 26. -507.)
 (PRINT-TEXT "i")
 (MOVE 35. -507.)
 (PRINT-TEXT "n")
 (MOVE 44. -507.)
 (PRINT-TEXT " ")
 (MOVE 53. -507.)
 (PRINT-TEXT "=")
 (MOVE 62. -507.)
 (PRINT-TEXT " ")
 (MOVE 71. -507.)
 (PRINT-TEXT "-")
 (MOVE 80. -507.)
 (PRINT-TEXT "1")
 (MOVE 89. -507.)
 (PRINT-TEXT " ")
 (MOVE 98. -507.)
 (PRINT-TEXT " ")
 (MOVE 107. -507.)
 (PRINT-TEXT "Y")
 (MOVE 116. -507.)
 (PRINT-TEXT "m")
 (MOVE 125. -507.)
 (PRINT-TEXT "a")
 (MOVE 134. -507.)
 (PRINT-TEXT "x")
 (MOVE 143. -507.)
 (PRINT-TEXT " ")
 (MOVE 152. -507.)
 (PRINT-TEXT "=")
 (MOVE 161. -507.)
 (PRINT-TEXT " ")
 (MOVE 170. -507.)
 (PRINT-TEXT "1")
 (MOVE 179. -507.)
 (REL-DRAW -691. 393.)
 (REL-DRAW 1023. 0.)
 (REL-DRAW -1023. -6.)
 (REL-DRAW 0. 12.)
 (REL-DRAW 85. -12.)
 (REL-DRAW 0. 12.)
 (REL-DRAW 86. -12.)
 (REL-DRAW 0. 12.)
 (REL-DRAW 85. -12.)
 (REL-DRAW 0. 12.)
 (REL-DRAW 85. -12.)
 (REL-DRAW 0. 12.)
 (REL-DRAW 85. -12.)
 (REL-DRAW 0. 12.)
 (REL-DRAW 86. -12.)
 (REL-DRAW 0. 12.)
 (REL-DRAW 85. -12.)
 (REL-DRAW 0. 12.)
 (REL-DRAW 85. -12.)
 (REL-DRAW 0. 12.)
 (REL-DRAW 85. -12.)
 (REL-DRAW 0. 12.)
 (REL-DRAW 86. -12.)
 (REL-DRAW 0. 12.)
 (REL-DRAW 85. -12.)
 (REL-DRAW 0. 12.)
 (REL-DRAW 85. -12.)
 (REL-DRAW 0. 12.)
 (MOVE -512. -128.)
 (PRINT-TEXT "-")
 (MOVE -503. -128.)
 (PRINT-TEXT "3")
 (MOVE -494. -128.)
 (MOVE 502. -128.)
 (PRINT-TEXT "3")
 (MOVE 511. -128.)
 (REL-DRAW -511. -351.)
 (REL-DRAW 0. 729.)
 (REL-DRAW -6. -729.)
 (REL-DRAW 12. 0.)
 (REL-DRAW -12. 73.)
 (REL-DRAW 12. 0.)
 (REL-DRAW -12. 73.)
 (REL-DRAW 12. 0.)
 (REL-DRAW -12. 73.)
 (REL-DRAW 12. 0.)
 (REL-DRAW -12. 73.)
 (REL-DRAW 12. 0.)
 (REL-DRAW -12. 72.)
 (REL-DRAW 12. 0.)
 (REL-DRAW -12. 73.)
 (REL-DRAW 12. 0.)
 (REL-DRAW -12. 73.)
 (REL-DRAW 12. 0.)
 (REL-DRAW -12. 73.)
 (REL-DRAW 12. 0.)
 (REL-DRAW -12. 73.)
 (REL-DRAW 12. 0.)
 (REL-DRAW -12. 73.)
 (REL-DRAW 12. 0.)
 (MOVE -18. -479.)
 (PRINT-TEXT "-")
 (MOVE -9. -479.)
 (PRINT-TEXT "1")
 (MOVE 0. -479.)
 (MOVE -9. 236.)
 (PRINT-TEXT "1")
 (MOVE 0. 236.)
 (REL-DRAW -512. -402.)
 (REL-DRAW 54. -109.)
 (REL-DRAW 54. -94.)
 (REL-DRAW 54. -69.)
 (REL-DRAW 53. -36.)
 (REL-DRAW 54. -1.)
 (REL-DRAW 54. 35.)
 (REL-DRAW 54. 67.)
 (REL-DRAW 54. 92.)
 (REL-DRAW 54. 109.)
 (REL-DRAW 53. 115.)
 (REL-DRAW 54. 109.)
 (REL-DRAW 54. 92.)
 (REL-DRAW 54. 67.)
 (REL-DRAW 54. 35.)
 (REL-DRAW 54. -1.)
 (REL-DRAW 53. -36.)
 (REL-DRAW 54. -69.)
 (REL-DRAW 54. -94.)
 (REL-DRAW 54. -109.)
 (PRINT-TEXT "")
 ))