home *** CD-ROM | disk | FTP | other *** search
/ Simtel MSDOS - Coast to Coast / simteldosarchivecoasttocoast2.iso / teaching / extol30.zip / BEATLES.EXT < prev    next >
Text File  |  1987-10-08  |  7KB  |  411 lines
  1. % this program will give a beatles trivia quiz
  2. % all answers are scanned for correct keywords
  3. %
  4. :menu
  5. .exact
  6. .reset(0)
  7. .reset(2)
  8. .clear
  9.         B E A T L E     T R I V I A
  10. .feed(2)
  11.            Select Difficulty:
  12. .feed(2)
  13.                1) Wimp quiz
  14.                2) Normal quiz
  15.                3) Fanatic's quiz
  16.                4) Quit
  17. .feed(3)
  18. .keyword
  19. .caseon
  20.            Quiz?+
  21. .accept
  22. .match(0,1).1.
  23. .match(0,2).2.
  24. .match(0,3).3.
  25. .match(0,4).4.
  26. .goto(0).menu.wimp.normal.fanatic.quit
  27. %
  28. :wimp
  29. .clear
  30.                         WIMP QUIZ
  31. .feed(3)
  32. .reset(0)
  33. What album does "Birthday" appear on?
  34. .accept
  35. .match(0,1).WHITE.
  36. .if match(0) do
  37. That's correct, although quite obvious!
  38.      .increment(2,1)
  39. .else
  40. Sorry chump, but it was the "White Album"
  41. .enddo
  42. %
  43. .reset(0)
  44. .feed(2)
  45. Where did Paul & George meet?
  46. .accept
  47. .match(9,1).LIVERPOOL.
  48. .if match(9) do
  49. Ingenious! How about being more specific?
  50.      .accept
  51. .enddo
  52. .reset(9)
  53. .match(0,1).SCHOOL.
  54. .if match(0) do
  55. Sure enough, it was in school.
  56.      .increment(2,1)
  57. .else
  58. Nope, in school.
  59. .enddo
  60. %
  61. .reset(0)
  62. .feed(2)
  63. What album does "Penny Lane" appear on?
  64. .accept
  65. .match(0,1).MAGICAL.
  66. .match(0,1).MYSTERY.
  67. .match(0,1).TOUR.
  68. .if match(0,3) do
  69. That's right, it was the "Magical Mystery Tour".
  70.      .increment(2,1)
  71. .else
  72. Sorry, but it was the "Magical Mystery Tour".
  73. .enddo
  74. %
  75. .reset(0)
  76. .feed(2)
  77. In what year did John meet Yoko?
  78. .accept
  79. .match(0,1).1966.66.
  80. .if match(0) do
  81. Yes, it was in 1966.
  82.      .increment(2,1)
  83. .else
  84. No, it was in 1966.
  85. .enddo
  86. %
  87. .reset(0)
  88. .feed(2)
  89. What American Folk singer signed with Apple in 1968?
  90. .accept
  91. .match(0,1).JAMES.
  92. .match(0,1).TAYLOR.
  93. .if match(0,2) do
  94. That's him alright.
  95.      .increment(2,1)
  96. .else
  97. The right answer was James Taylor.
  98. .enddo  
  99. %
  100. .reset(0)
  101. .feed(2)
  102. What will I do "because tomorrow may rain" ?
  103. .accept
  104. .match(0,1).I'LL.
  105. .match(0,1).FOLLOW.
  106. .match(0,1).THE.
  107. .match(0,1).SUN.
  108. .if match(0,4) do
  109. That's correct.
  110.      .increment(2,1)
  111. .else
  112. The lyrics go... "I'll follow the sun".
  113. .enddo
  114. %
  115. .reset(0)
  116. .feed(2)
  117. What album does "My Love" appear on ?
  118. .accept
  119. .match(0,1).RED.
  120. .match(0,1).ROSE.
  121. .match(0,1).SPEEDWAY.
  122. .if match(0,3) do
  123. That's right!
  124.      .increment(2,1)
  125. .else
  126. Nope, the album was called "Red Rose Speedway".
  127. .enddo
  128. %
  129. .reset(0)
  130. .feed(2)
  131. What album does "Thank You Girl" appear on ?
  132. .accept
  133. .match(0,1).2ND.SECOND.
  134. .if match(0) do
  135. Yes, that was it.
  136.      .increment(2,1)
  137. .else
  138. No, it was the "Beatle's 2nd album".
  139. .enddo
  140. %
  141. .reset(0)
  142. .feed(2)
  143. What album does "She Said, She Said" appear on ?
  144. .accept
  145. .match(0,1).REVOLVER.
  146. .if match(0) do
  147. That's right.
  148.      .increment(2,1)
  149. .else
  150. No, it was Revolver!
  151. .enddo
  152. %
  153. .reset(0)
  154. .feed(2)
  155. Where did John & Yoko have their honeymoon ?
  156. .accept
  157. .match(0,1).AMSTERDAM.
  158. .if match(0) do
  159. That's right!
  160.      .increment(2,1)
  161. .else
  162. No, they spent it in Amsterdam.
  163. .enddo
  164. %
  165. Your score on the wimp quiz was+
  166. .print(2)+
  167. out of a possible 10. 
  168. Press return to return to menu.
  169. .accept
  170. .goto.menu
  171. %
  172. :normal
  173. .clear
  174.                      NORMAL QUIZ
  175. .feed(3)
  176. .reset(0)
  177. Who wrote "Don't Worry Kyoko"?
  178. .accept
  179. .match(0,1).YOKO.
  180. .if match(0) do
  181. Yes it was.
  182.      .increment(3,1)
  183. .else
  184. No, it was Yoko Ono.
  185. .enddo
  186. %2
  187. .reset(0)
  188. .feed(2)
  189. What came first, "Pipes of Peace" or "Milk and Honey" ?
  190. .accept
  191. .match(0,1).PIPES.
  192. .if match(0) do
  193. That's right.
  194.      .increment(3,1)
  195. .else
  196. Nope, Pipes of Peace.
  197. .enddo
  198. %3
  199. .reset(0)
  200. .feed(2)
  201. Who sang lead on "No Reply" ?
  202. .accept
  203. .match(0,1).JOHN.LENNON.
  204. .if match(0) do
  205. That's who it was.
  206.      .increment(3,1)
  207. .else
  208. No, it was John Lennon.
  209. .enddo
  210. %4
  211. .reset(0)
  212. .feed(2)
  213. Who sang "Mr Tambourine Man" on "The Concert for Bangladesh" album ?
  214. .accept
  215. .match(0,1).DYLAN.ZIMMERMAN.
  216. .if match(0) do
  217. Yes he did.
  218.     .increment(3,1)
  219. .else
  220. No, it was Bob Dylan.
  221. .enddo
  222. %5
  223. .reset(0)
  224. .feed(2)
  225. What non-Beatle performed on keyboards for "Let It Be" ?
  226. .accept 
  227. .match(0,1).BILLY.WILLIAM.
  228. .match(0,1).PRESTON.
  229. .if match(0,2) do
  230. Yes, it was Billy Preston.
  231.     .increment(3,1)
  232. .else
  233. No, it was Billy Preston.
  234. .enddo
  235. %6
  236. .reset(0)
  237. .feed(2)
  238. In what year was "Love Comes To Everyone" released ?
  239. .accept
  240. .match(0,1).1979.79.
  241. .if match(0) do
  242. Yes, that was the year.
  243.      .increment(3,1)
  244. .else
  245. No, it was 1979.
  246. .enddo
  247. %7
  248. .reset(0)
  249. .feed(2)
  250. What was the name of Paul's first solo album?
  251. .accept
  252. .match(0,1).MCCARTNEY.MC CARTNEY.
  253. .if match(0) do
  254. Yes that was the title.
  255.      .increment(3,1)
  256. .else
  257. No, it was called "McCartney".
  258. .enddo
  259. %8
  260. .reset(0)
  261. .feed(2)
  262. Who recorded "Blow Away" ?
  263. .accept
  264. .match(0,1).GEORGE.HARRISON.
  265. .if match(0) do
  266. Yes, that was him.
  267.      .increment(3,1)
  268. .else
  269. No, it was George Harrison.
  270. .enddo
  271. %9
  272. .reset(0)
  273. .feed(2)
  274. What Beatles song refers to a cival servant in Revenue ?
  275. .accept
  276. .match(0,1).TAXMAN.
  277. .if match(0) do
  278. Yes, that's correct.
  279.      .increment(3,1)
  280. .else
  281. No, it was "Taxman".
  282. .enddo
  283. %10
  284. .reset(0)
  285. .feed(2)
  286. What kind of girl was "Her Majesty" ?
  287. .accept
  288. .match(0,1).PRETTY.
  289. .match(0,1).NICE.
  290. .match(0,1).GIRL.
  291. .if match(0,3) do
  292. Yes, indeed she was.
  293.      .increment(3,1)
  294. .else
  295. She was "a pretty nice girl".
  296. .enddo
  297. %
  298. Your score was+
  299. .print(3)+
  300. out of a possible 10.
  301. .feed(2)
  302. Hit return to return to menu
  303. .accept   
  304. .goto.menu
  305. %
  306. :fanatic  
  307. .clear
  308.                       FANATIC'S QUIZ
  309. .feed(3)
  310. .reset(4)
  311. .reset(0)
  312. What album does "On The Way" appear on ?
  313. .accept
  314. .match(0,1).MCCARTNEY.MC CARTNEY.
  315. .match(0,1).II.2.TWO.
  316. .if match(0,2) do
  317. That's right.
  318.     .increment(4,1)
  319. .else
  320. No, it was "McCartney II".
  321. .enddo
  322. %2
  323. .feed(2)
  324. .reset(0)
  325. What is the name of Pete Best's mother?
  326. .accept
  327. .match(0,1).MONA.
  328. .if match(0) do
  329. That's her name!
  330.     .increment(4,1)
  331. .else
  332. No, it was Mona.
  333. .enddo
  334. %3
  335. .feed(2)
  336. .reset(0)
  337. What 2 of Paul's songs were banned by the BBC in the 70's ?
  338. .accept
  339. .reset(9)
  340. .reset(8)
  341. .match(0,1).HI.
  342. .if match(0) do
  343.     .increment(9,1)  
  344. .enddo
  345. .reset(0)
  346. .match(0,1).GIVE.
  347. .match(0,1).IRELAND.
  348. .match(0,1).BACK.
  349. .match(0,1).TO.
  350. .match(0,1).THE.
  351. .match(0,1).IRISH.
  352. .if match(0,6) do
  353.     .increment(8,1)       
  354. .enddo
  355. .if match(8) do
  356.     .if match(9) do
  357. Yes those were the songs!
  358.         .increment(4,1)
  359.     .else
  360. You got one, but the other was "Hi, Hi, Hi".
  361.     .enddo
  362. .else
  363.     .if match(9) do
  364. You got one, but the other was "Give Ireland Back to the Irish".
  365.     .else
  366. No, the two were "Hi, Hi, Hi" and "Give Ireland Back to the Irish".
  367.     .enddo
  368. .enddo 
  369. %4
  370. .feed(2)
  371. .reset(0)
  372. What was the Beatle's first #1 hit song in Britain?
  373. .accept
  374. .match(0,1).PLEASE.
  375. .match(0,1).ME.
  376. .if match(0,2) do
  377. Yes, that was the song.
  378.     .increment(4,1)
  379. .else
  380. No, it was "Please Please Me".
  381. .enddo
  382. %5
  383. .feed(2)
  384. .reset(0)
  385. What was the "working title" of "Hey Jude" ?
  386. .accept
  387. .match(0,1).HEY.
  388. .match(0,1).JULES.
  389. .if match(0,2) do
  390. Yes it was "Hey Jules".
  391.     .increment(4,1)
  392. .else
  393. No, it was "Hey Jules".
  394. .enddo
  395. %
  396. .feed(3)
  397. Your score was+
  398. .print(4)+
  399. out of a possible 5.
  400. .feed(1)
  401. Press return to return to menu.
  402. .accept
  403. .goto.menu
  404. %
  405. :quit
  406. .stop
  407.  
  408.                  
  409.         
  410.  
  411.