1
0

uni_programs.qsrc 78 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576157715781579158015811582158315841585158615871588158915901591159215931594159515961597159815991600160116021603160416051606160716081609161016111612161316141615161616171618161916201621162216231624162516261627162816291630163116321633163416351636163716381639164016411642164316441645164616471648164916501651165216531654165516561657165816591660166116621663166416651666166716681669167016711672167316741675167616771678167916801681168216831684168516861687168816891690169116921693169416951696169716981699170017011702170317041705170617071708170917101711171217131714171517161717171817191720172117221723172417251726172717281729173017311732173317341735173617371738173917401741174217431744174517461747174817491750175117521753175417551756175717581759176017611762176317641765176617671768176917701771177217731774177517761777177817791780178117821783178417851786178717881789179017911792179317941795179617971798179918001801180218031804180518061807180818091810181118121813181418151816181718181819182018211822
  1. # uni_programs
  2. !!This is the file containing the variables and actions for handling the different programs the player can attend at the university.
  3. !!The following variables are important.
  4. !! university['student'] is set to 1 if the player is enrolled in a university program.
  5. !! $university['enrolled_in'] is the name of the university program the player is enrolled in, there is the following progams: teaching_studies, nursing
  6. !! university['enrolled_in_semester'] is the semester the player enrolled in, starting at 1 for the first semester and ending with 8 for the last.
  7. if $ARGS[0] = 'program_name':
  8. if $university['enrolled_in']= 'teaching_studies':
  9. $RESULT = 'teaching studies'
  10. end
  11. if $university['enrolled_in']= 'nursing':
  12. $RESULT = 'nursing'
  13. end
  14. end
  15. if $ARGS[0] = 'uni_period_first':
  16. !!This arg has two functions. If called with gs without any optional argument, it will make the cations to go to class availeble.
  17. !!Second if called as a function with the additional ARGS[1] of monday, tuesday, wednesday or thursday, it will print on the screen the name of the class and the time period.
  18. if $university['enrolled_in'] = 'teaching_studies':
  19. if university['enrolled_in_semester'] = 1:
  20. if $ARGS[1] = 'monday':
  21. $Result = 'General Education 101 (09:00 to 10:30)'
  22. elseif $ARGS[1] = 'tuesday':
  23. $Result = 'General Education 101 (09:00 to 10:30)'
  24. elseif $ARGS[1] = 'wednesday':
  25. $Result = 'General Education 101 (09:00 to 10:30)'
  26. elseif $ARGS[1] = 'thursday':
  27. $Result = 'Teaching Methods 101 (09:00 to 10:30)'
  28. elseif week = 1:
  29. *nl
  30. 'Your next class will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  31. act 'Go to your General Education 101 class':
  32. if hour = 8: minut += 60 - minut
  33. if hour = 7: minut += 120 - minut
  34. uni_period['first'] = daystart
  35. gs 'stat'
  36. gt 'uni_lessons1', 'general_education_101'
  37. end
  38. elseif week = 2:
  39. *nl
  40. 'Your next class will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  41. act 'Go to your General Education 101 class':
  42. if hour = 8: minut += 60 - minut
  43. if hour = 7: minut += 120 - minut
  44. uni_period['first'] = daystart
  45. gs 'stat'
  46. gt 'uni_lessons1', 'general_education_101'
  47. end
  48. elseif week = 3:
  49. *nl
  50. 'Your next class will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  51. act 'Go to your General Education 101 class':
  52. if hour = 8: minut += 60 - minut
  53. if hour = 7: minut += 120 - minut
  54. uni_period['first'] = daystart
  55. gs 'stat'
  56. gt 'uni_lessons1', 'general_education_101'
  57. end
  58. elseif week = 4:
  59. *nl
  60. 'Your next class will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  61. act 'Go to your Teaching Methods 101 class':
  62. if hour = 8: minut += 60 - minut
  63. if hour = 7: minut += 120 - minut
  64. uni_period['first'] = daystart
  65. gs 'stat'
  66. gt 'uni_lessons1', 'teaching_methods_101'
  67. end
  68. end
  69. elseif university['enrolled_in_semester'] = 2:
  70. if $ARGS[1] = 'monday':
  71. $Result = 'General Education 102 (09:00 to 10:30)'
  72. elseif $ARGS[1] = 'tuesday':
  73. $Result = 'General Education 102 (09:00 to 10:30)'
  74. elseif $ARGS[1] = 'wednesday':
  75. $Result = 'General Education 102 (09:00 to 10:30)'
  76. elseif $ARGS[1] = 'thursday':
  77. $Result = 'Teaching Methods 102 (09:00 to 10:30)'
  78. elseif week = 1:
  79. *nl
  80. 'Your next class will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  81. act 'Go to your General Education 102 class':
  82. if hour = 8: minut += 60 - minut
  83. if hour = 7: minut += 120 - minut
  84. uni_period['first'] = daystart
  85. gs 'stat'
  86. gt 'uni_lessons2', 'general_education_102'
  87. end
  88. elseif week = 2:
  89. *nl
  90. 'Your next class will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  91. act 'Go to your General Education 102 class':
  92. if hour = 8: minut += 60 - minut
  93. if hour = 7: minut += 120 - minut
  94. uni_period['first'] = daystart
  95. gs 'stat'
  96. gt 'uni_lessons2', 'general_education_102'
  97. end
  98. elseif week = 3:
  99. *nl
  100. 'Your next class will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  101. act 'Go to your General Education 102 class':
  102. if hour = 8: minut += 60 - minut
  103. if hour = 7: minut += 120 - minut
  104. uni_period['first'] = daystart
  105. gs 'stat'
  106. gt 'uni_lessons2', 'general_education_102'
  107. end
  108. elseif week = 4:
  109. *nl
  110. 'Your next class will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  111. act 'Go to your Teaching Methods 102 class':
  112. if hour = 8: minut += 60 - minut
  113. if hour = 7: minut += 120 - minut
  114. uni_period['first'] = daystart
  115. gs 'stat'
  116. gt 'uni_lessons2', 'teaching_methods_102'
  117. end
  118. end
  119. elseif university['enrolled_in_semester'] = 3:
  120. if $ARGS[1] = 'monday':
  121. $Result = 'General Education 201 (09:00 to 10:30)'
  122. elseif $ARGS[1] = 'tuesday':
  123. $Result = 'General Education 201 (09:00 to 10:30)'
  124. elseif $ARGS[1] = 'wednesday':
  125. $Result = 'General Education 201 (09:00 to 10:30)'
  126. elseif $ARGS[1] = 'thursday':
  127. $Result = 'Assessment 201 (09:00 to 10:30)'
  128. elseif week = 1:
  129. *nl
  130. 'Your next class will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  131. act 'Go to your General Education 201 class':
  132. if hour = 8: minut += 60 - minut
  133. if hour = 7: minut += 120 - minut
  134. uni_period['first'] = daystart
  135. gs 'stat'
  136. gt 'uni_lessons3', 'general_education_201'
  137. end
  138. elseif week = 2:
  139. *nl
  140. 'Your next class will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  141. act 'Go to your General Education 201 class':
  142. if hour = 8: minut += 60 - minut
  143. if hour = 7: minut += 120 - minut
  144. uni_period['first'] = daystart
  145. gs 'stat'
  146. gt 'uni_lessons3', 'general_education_201'
  147. end
  148. elseif week = 3:
  149. *nl
  150. 'Your next class will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  151. act 'Go to your General Education 201 class':
  152. if hour = 8: minut += 60 - minut
  153. if hour = 7: minut += 120 - minut
  154. uni_period['first'] = daystart
  155. gs 'stat'
  156. gt 'uni_lessons3', 'general_education_201'
  157. end
  158. elseif week = 4:
  159. *nl
  160. 'Your next class will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  161. act 'Go to your Assessment_201 class':
  162. if hour = 8: minut += 60 - minut
  163. if hour = 7: minut += 120 - minut
  164. uni_period['first'] = daystart
  165. gs 'stat'
  166. gt 'uni_lessons3', 'assessment_201'
  167. end
  168. end
  169. elseif university['enrolled_in_semester'] = 4:
  170. if $ARGS[1] = 'monday':
  171. $Result = 'General Education 202 (09:00 to 10:30)'
  172. elseif $ARGS[1] = 'tuesday':
  173. $Result = 'General Education 202 (09:00 to 10:30)'
  174. elseif $ARGS[1] = 'wednesday':
  175. $Result = 'General Education 202 (09:00 to 10:30)'
  176. elseif $ARGS[1] = 'thursday':
  177. $Result = 'Learning Theories 202 (09:00 to 10:30)'
  178. elseif week = 1:
  179. *nl
  180. 'Your next class will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  181. act 'Go to your General education 202 class':
  182. if hour = 8: minut += 60 - minut
  183. if hour = 7: minut += 120 - minut
  184. uni_period['first'] = daystart
  185. gs 'stat'
  186. gt 'uni_lessons4', 'general_education_202'
  187. end
  188. elseif week = 2:
  189. *nl
  190. 'Your next class will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  191. act 'Go to your General Education 201 class':
  192. if hour = 8: minut += 60 - minut
  193. if hour = 7: minut += 120 - minut
  194. uni_period['first'] = daystart
  195. gs 'stat'
  196. gt 'uni_lessons4', 'general_education_202'
  197. end
  198. elseif week = 3:
  199. *nl
  200. 'Your next class will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  201. act 'Go to your General Education 201 class':
  202. if hour = 8: minut += 60 - minut
  203. if hour = 7: minut += 120 - minut
  204. uni_period['first'] = daystart
  205. gs 'stat'
  206. gt 'uni_lessons4', 'general_education_202'
  207. end
  208. elseif week = 4:
  209. *nl
  210. 'Your next class will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  211. act 'Go to your Assessment_201 class':
  212. if hour = 8: minut += 60 - minut
  213. if hour = 7: minut += 120 - minut
  214. uni_period['first'] = daystart
  215. gs 'stat'
  216. gt 'uni_lessons4', 'learning_theories_202'
  217. end
  218. end
  219. end
  220. end
  221. if $university['enrolled_in'] = 'nursing':
  222. if university['enrolled_in_semester'] = 1:
  223. if $ARGS[1] = 'monday':
  224. $Result = 'Patient Care 101 (09:00 to 10:30)'
  225. elseif $ARGS[1] = 'tuesday':
  226. $Result = 'Anatomy and Physiology 101 (09:00 to 10:30)'
  227. elseif $ARGS[1] = 'wednesday':
  228. $Result = 'Examination and Treatment 101 (09:00 to 10:30)'
  229. elseif $ARGS[1] = 'thursday':
  230. $Result = 'Patient Care 101 (09:00 to 10:30)'
  231. elseif week = 1:
  232. *nl
  233. 'Your next class will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  234. act 'Go to your Patient Care 101 class':
  235. if hour = 8: minut += 60 - minut
  236. if hour = 7: minut += 120 - minut
  237. uni_period['first'] = daystart
  238. gs 'stat'
  239. gt 'uni_lessons1', 'patient_care_101'
  240. end
  241. elseif week = 2:
  242. *nl
  243. 'Your next class will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  244. act 'Go to your Anatomy and Physiology 101 class':
  245. if hour = 8: minut += 60 - minut
  246. if hour = 7: minut += 120 - minut
  247. uni_period['first'] = daystart
  248. gs 'stat'
  249. gt 'uni_lessons1', 'anatomy_and_physiology_101'
  250. end
  251. elseif week = 3:
  252. *nl
  253. 'Your next class will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  254. act 'Go to your Examination and Treatment 101 class':
  255. if hour = 8: minut += 60 - minut
  256. if hour = 7: minut += 120 - minut
  257. uni_period['first'] = daystart
  258. gs 'stat'
  259. gt 'uni_lessons1', 'examination_and_treatment_101'
  260. end
  261. elseif week = 4:
  262. *nl
  263. 'Your next class will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  264. act 'Go to your Patient Care 101 class':
  265. if hour = 8: minut += 60 - minut
  266. if hour = 7: minut += 120 - minut
  267. uni_period['first'] = daystart
  268. gs 'stat'
  269. gt 'uni_lessons1', 'patient_care_101'
  270. end
  271. end
  272. elseif university['enrolled_in_semester'] = 2:
  273. if $ARGS[1] = 'monday':
  274. $Result = 'Patient Care 102 (09:00 to 10:30)'
  275. elseif $ARGS[1] = 'tuesday':
  276. $Result = 'Anatomy and Physiology 102 (09:00 to 10:30)'
  277. elseif $ARGS[1] = 'wednesday':
  278. $Result = 'Examination and Treatment 102 (09:00 to 10:30)'
  279. elseif $ARGS[1] = 'thursday':
  280. $Result = 'Patient Care 102 (09:00 to 10:30)'
  281. elseif week = 1:
  282. *nl
  283. 'Your next class will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  284. act 'Go to your Patient Care 102 class':
  285. if hour = 8: minut += 60 - minut
  286. if hour = 7: minut += 120 - minut
  287. uni_period['first'] = daystart
  288. gs 'stat'
  289. gt 'uni_lessons2', 'patient_care_102'
  290. end
  291. elseif week = 2:
  292. *nl
  293. 'Your next class will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  294. act 'Go to your Anatomy and Physiology 102 class':
  295. if hour = 8: minut += 60 - minut
  296. if hour = 7: minut += 120 - minut
  297. uni_period['first'] = daystart
  298. gs 'stat'
  299. gt 'uni_lessons2', 'anatomy_and_physiology_102'
  300. end
  301. elseif week = 3:
  302. *nl
  303. 'Your next class will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  304. act 'Go to your Examination and Treatment 102 class':
  305. if hour = 8: minut += 60 - minut
  306. if hour = 7: minut += 120 - minut
  307. uni_period['first'] = daystart
  308. gs 'stat'
  309. gt 'uni_lessons2', 'examination_and_treatment_102'
  310. end
  311. elseif week = 4:
  312. *nl
  313. 'Your next class will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  314. act 'Go to your Anatomy and Physiology 102 class':
  315. if hour = 8: minut += 60 - minut
  316. if hour = 7: minut += 120 - minut
  317. uni_period['first'] = daystart
  318. gs 'stat'
  319. gt 'uni_lessons2', 'patient_care_102'
  320. end
  321. end
  322. elseif university['enrolled_in_semester'] = 3:
  323. if $ARGS[1] = 'monday':
  324. $Result = 'Patient Care 201 (09:00 to 10:30)'
  325. elseif $ARGS[1] = 'tuesday':
  326. $Result = 'Anatomy and Physiology 201 (09:00 to 10:30)'
  327. elseif $ARGS[1] = 'wednesday':
  328. $Result = 'Dosages and Pharmaceuticals 101 (09:00 to 10:30)'
  329. elseif $ARGS[1] = 'thursday':
  330. $Result = 'Patient Care 201 (09:00 to 10:30)'
  331. elseif week = 1:
  332. *nl
  333. 'Your next class will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  334. act 'Go to your Patient Care 201 class':
  335. if hour = 8: minut += 60 - minut
  336. if hour = 7: minut += 120 - minut
  337. uni_period['first'] = daystart
  338. gs 'stat'
  339. gt 'uni_lessons3', 'patient_care_201'
  340. end
  341. elseif week = 2:
  342. *nl
  343. 'Your next class will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  344. act 'Go to your Anatomy and Physiology 201 class':
  345. if hour = 8: minut += 60 - minut
  346. if hour = 7: minut += 120 - minut
  347. uni_period['first'] = daystart
  348. gs 'stat'
  349. gt 'uni_lessons3', 'anatomy_and_physiology_201'
  350. end
  351. elseif week = 3:
  352. *nl
  353. 'Your next class will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  354. act 'Go to your Dosages and Pharmaceuticals 101 class':
  355. if hour = 8: minut += 60 - minut
  356. if hour = 7: minut += 120 - minut
  357. uni_period['first'] = daystart
  358. gs 'stat'
  359. gt 'uni_lessons3', 'dosages_and_pharmaceuticals_101'
  360. end
  361. elseif week = 4:
  362. *nl
  363. 'Your next class will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  364. act 'Go to your Patient Care 201 class':
  365. if hour = 8: minut += 60 - minut
  366. if hour = 7: minut += 120 - minut
  367. uni_period['first'] = daystart
  368. gs 'stat'
  369. gt 'uni_lessons3', 'patient_care_201'
  370. end
  371. end
  372. elseif university['enrolled_in_semester'] = 4:
  373. if $ARGS[1] = 'monday':
  374. $Result = 'Patient Care 202 (09:00 to 10:30)'
  375. elseif $ARGS[1] = 'tuesday':
  376. $Result = 'Anatomy and Physiology 202 (09:00 to 10:30)'
  377. elseif $ARGS[1] = 'wednesday':
  378. $Result = 'Dosages and Pharmaceuticals 102 (09:00 to 10:30)'
  379. elseif $ARGS[1] = 'thursday':
  380. $Result = 'Patient Care 202 (09:00 to 10:30)'
  381. elseif week = 1:
  382. *nl
  383. 'Your next class will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  384. act 'Go to your Patient Care 202 class':
  385. if hour = 8: minut += 60 - minut
  386. if hour = 7: minut += 120 - minut
  387. uni_period['first'] = daystart
  388. gs 'stat'
  389. gt 'uni_lessons4', 'patient_care_202'
  390. end
  391. elseif week = 2:
  392. *nl
  393. 'Your next class will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  394. act 'Go to your Anatomy and Physiology 202 class':
  395. if hour = 8: minut += 60 - minut
  396. if hour = 7: minut += 120 - minut
  397. uni_period['first'] = daystart
  398. gs 'stat'
  399. gt 'uni_lessons4', 'anatomy_and_physiology_202'
  400. end
  401. elseif week = 3:
  402. *nl
  403. 'Your next class will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  404. act 'Go to your Dosages and Pharmaceuticals 102 class':
  405. if hour = 8: minut += 60 - minut
  406. if hour = 7: minut += 120 - minut
  407. uni_period['first'] = daystart
  408. gs 'stat'
  409. gt 'uni_lessons4', 'dosages_and_pharmaceuticals_102'
  410. end
  411. elseif week = 4:
  412. *nl
  413. 'Your next class will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  414. act 'Go to your Patient Care 202 class':
  415. if hour = 8: minut += 60 - minut
  416. if hour = 7: minut += 120 - minut
  417. uni_period['first'] = daystart
  418. gs 'stat'
  419. gt 'uni_lessons4', 'patient_care_202'
  420. end
  421. end
  422. end
  423. end
  424. end
  425. if $ARGS[0] = 'uni_period_second':
  426. !!This arg has two functions. If called with gs without any optional argument, it will make the options to go to class available.
  427. !!Second if called as a function with the additional ARGS[1] of monday, tuesday, wednesday or thursday, it will print on the screen the name of the classe and the time period.
  428. if $university['enrolled_in'] = 'teaching_studies':
  429. if university['enrolled_in_semester'] = 1:
  430. if $ARGS[1] = 'monday':
  431. $Result = 'Teaching Methods 101 (11:00 to 12:30)'
  432. elseif $ARGS[1] = 'tuesday':
  433. $Result = 'Learning Theories 101 (11:00 to 12:30)'
  434. elseif $ARGS[1] = 'wednesday':
  435. $Result = 'Teaching Methods 101 (11:00 to 12:30)'
  436. elseif $ARGS[1] = 'thursday':
  437. $Result = 'Learning Theories 101 (11:00 to 12:30)'
  438. elseif week = 1:
  439. *nl
  440. 'Your next class will start at 11:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  441. act 'Go to your Teaching Methods 101 class':
  442. if hour = 10: minut += 60 - minut
  443. uni_period['second'] = daystart
  444. gs 'stat'
  445. gt 'uni_lessons1', 'teaching_methods_101'
  446. end
  447. elseif week = 2:
  448. *nl
  449. 'Your next class will start at 11:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  450. act 'Go to your Learning Theories 101 class':
  451. if hour = 10: minut += 60 - minut
  452. uni_period['second'] = daystart
  453. gs 'stat'
  454. gt 'uni_lessons1', 'learning_theories_101'
  455. end
  456. elseif week = 3:
  457. *nl
  458. 'Your next class will start at 11:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  459. act 'Go to your Teaching Methods 101 class':
  460. if hour = 10: minut += 60 - minut
  461. uni_period['second'] = daystart
  462. gs 'stat'
  463. gt 'uni_lessons1', 'teaching_methods_101'
  464. end
  465. elseif week = 4:
  466. *nl
  467. 'Your next class will start at 11:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  468. act 'Go to your Learning Theories 101 class':
  469. if hour = 10: minut += 60 - minut
  470. uni_period['second'] = daystart
  471. gs 'stat'
  472. gt 'uni_lessons1', 'learning_theories_101'
  473. end
  474. end
  475. elseif university['enrolled_in_semester'] = 2:
  476. if $ARGS[1] = 'monday':
  477. $Result = 'Teaching Methods 102 (11:00 to 12:30)'
  478. elseif $ARGS[1] = 'tuesday':
  479. $Result = 'Psychology of a Student 101 (11:00 to 12:30)'
  480. elseif $ARGS[1] = 'wednesday':
  481. $Result = 'Teaching Methods 102 (11:00 to 12:30)'
  482. elseif $ARGS[1] = 'thursday':
  483. $Result = 'Psychology of a Student 101 (11:00 to 12:30)'
  484. elseif week = 1:
  485. *nl
  486. 'Your next class will start at 11:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  487. act 'Go to your Teaching Methods 102 class':
  488. if hour = 10: minut += 60 - minut
  489. uni_period['second'] = daystart
  490. gs 'stat'
  491. gt 'uni_lessons2', 'teaching_methods_102'
  492. end
  493. elseif week = 2:
  494. *nl
  495. 'Your next class will start at 11:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  496. act 'Go to your Psychology of a Student 101 class':
  497. if hour = 10: minut += 60 - minut
  498. uni_period['second'] = daystart
  499. gs 'stat'
  500. gt 'uni_lessons2', 'psychology_of_a_student_101'
  501. end
  502. elseif week = 3:
  503. *nl
  504. 'Your next class will start at 11:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  505. act 'Go to your Teaching Methods 102 class':
  506. if hour = 10: minut += 60 - minut
  507. uni_period['second'] = daystart
  508. gs 'stat'
  509. gt 'uni_lessons2', 'teaching_methods_102'
  510. end
  511. elseif week = 4:
  512. *nl
  513. 'Your next class will start at 11:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  514. act 'Go to your Psychology of a Student 101 class':
  515. if hour = 10: minut += 60 - minut
  516. uni_period['second'] = daystart
  517. gs 'stat'
  518. gt 'uni_lessons2', 'psychology_of_a_student_101'
  519. end
  520. end
  521. elseif university['enrolled_in_semester'] = 3:
  522. if $ARGS[1] = 'monday':
  523. $Result = 'Assessment 201 (11:00 to 12:30)'
  524. elseif $ARGS[1] = 'tuesday':
  525. $Result = 'Learning Theories 201 (11:00 to 12:30)'
  526. elseif $ARGS[1] = 'wednesday':
  527. $Result = 'Assessment 201 (11:00 to 12:30)'
  528. elseif $ARGS[1] = 'thursday':
  529. $Result = 'Learning Theories 201 (11:00 to 12:30)'
  530. elseif week = 1:
  531. *nl
  532. 'Your next class will start at 11:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  533. act 'Go to your Assessment 201 class':
  534. if hour = 10: minut += 60 - minut
  535. uni_period['second'] = daystart
  536. gs 'stat'
  537. gt 'uni_lessons3', 'assessment_201'
  538. end
  539. elseif week = 2:
  540. *nl
  541. 'Your next class will start at 11:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  542. act 'Go to your Learning Theories 201 class':
  543. if hour = 10: minut += 60 - minut
  544. uni_period['second'] = daystart
  545. gs 'stat'
  546. gt 'uni_lessons3', 'learning_theories_201'
  547. end
  548. elseif week = 3:
  549. *nl
  550. 'Your next class will start at 11:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  551. act 'Go to your Assessment 201 class':
  552. if hour = 10: minut += 60 - minut
  553. uni_period['second'] = daystart
  554. gs 'stat'
  555. gt 'uni_lessons3', 'assessment_201'
  556. end
  557. elseif week = 4:
  558. *nl
  559. 'Your next class will start at 11:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  560. act 'Go to your Learning Theories 201 class':
  561. if hour = 10: minut += 60 - minut
  562. uni_period['second'] = daystart
  563. gs 'stat'
  564. gt 'uni_lessons3', 'learning_theories_201'
  565. end
  566. end
  567. elseif university['enrolled_in_semester'] = 4:
  568. if $ARGS[1] = 'monday':
  569. $Result = 'Learning Theories 202 (11:00 to 12:30)'
  570. elseif $ARGS[1] = 'tuesday':
  571. $Result = 'Psychology of a Student 201 (11:00 to 12:30)'
  572. elseif $ARGS[1] = 'wednesday':
  573. $Result = 'Learning Theories 202 (11:00 to 12:30)'
  574. elseif $ARGS[1] = 'thursday':
  575. $Result = 'Psychology of a Student 201 (11:00 to 12:30)'
  576. elseif week = 1:
  577. *nl
  578. 'Your next class will start at 11:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  579. act 'Go to your Learning Theories 202 class':
  580. if hour = 10: minut += 60 - minut
  581. uni_period['second'] = daystart
  582. gs 'stat'
  583. gt 'uni_lessons4', 'learning_theories_202'
  584. end
  585. elseif week = 2:
  586. *nl
  587. 'Your next class will start at 11:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  588. act 'Go to your Psychology of a Student 201 class':
  589. if hour = 10: minut += 60 - minut
  590. uni_period['second'] = daystart
  591. gs 'stat'
  592. gt 'uni_lessons4', 'psychology_of_a_student_201'
  593. end
  594. elseif week = 3:
  595. *nl
  596. 'Your next class will start at 11:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  597. act 'Go to your Learning Theories 202 class':
  598. if hour = 10: minut += 60 - minut
  599. uni_period['second'] = daystart
  600. gs 'stat'
  601. gt 'uni_lessons4', 'learning_theories_202'
  602. end
  603. elseif week = 4:
  604. *nl
  605. 'Your next class will start at 11:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  606. act 'Go to your Psychology of a Student 201 class':
  607. if hour = 10: minut += 60 - minut
  608. uni_period['second'] = daystart
  609. gs 'stat'
  610. gt 'uni_lessons4', 'psychology_of_a_student_201'
  611. end
  612. end
  613. end
  614. end
  615. if $university['enrolled_in'] = 'nursing':
  616. if university['enrolled_in_semester'] = 1:
  617. if $ARGS[1] = 'monday':
  618. $Result = 'Anatomy and Physiology 101 (11:00 to 12:30)'
  619. elseif $ARGS[1] = 'tuesday':
  620. $Result = 'Patient Care 101 (11:00 to 12:30)'
  621. elseif $ARGS[1] = 'wednesday':
  622. $Result = 'Patient Care 101 (11:00 to 12:30)'
  623. elseif $ARGS[1] = 'thursday':
  624. $Result = 'Anatomy and Physiology 101 (11:00 to 12:30)'
  625. elseif week = 1:
  626. *nl
  627. 'Your next class will start at 11:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  628. act 'Go to your Anatomy and Physiology 101 class':
  629. if hour = 10: minut += 60 - minut
  630. uni_period['second'] = daystart
  631. gs 'stat'
  632. gt 'uni_lessons1', 'anatomy_and_physiology_101'
  633. end
  634. elseif week = 2:
  635. *nl
  636. 'Your next class will start at 11:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  637. act 'Go to your Patient Care 101 class':
  638. if hour = 10: minut += 60 - minut
  639. uni_period['second'] = daystart
  640. gs 'stat'
  641. gt 'uni_lessons1', 'patient_care_101'
  642. end
  643. elseif week = 3:
  644. *nl
  645. 'Your next class will start at 11:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  646. act 'Go to your Patient Care 101 class':
  647. if hour = 10: minut += 60 - minut
  648. uni_period['second'] = daystart
  649. gs 'stat'
  650. gt 'uni_lessons1', 'patient_care_101'
  651. end
  652. elseif week = 4:
  653. *nl
  654. 'Your next class will start at 11:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  655. act 'Go to your Anatomy and Physiology 101 class':
  656. if hour = 10: minut += 60 - minut
  657. uni_period['second'] = daystart
  658. gs 'stat'
  659. gt 'uni_lessons1', 'anatomy_and_physiology_101'
  660. end
  661. end
  662. elseif university['enrolled_in_semester'] = 2:
  663. if $ARGS[1] = 'monday':
  664. $Result = 'Anatomy and Physiology 102 (11:00 to 12:30)'
  665. elseif $ARGS[1] = 'tuesday':
  666. $Result = 'Patient Care 102 (11:00 to 12:30)'
  667. elseif $ARGS[1] = 'wednesday':
  668. $Result = 'Patient Care 102 (11:00 to 12:30)'
  669. elseif $ARGS[1] = 'thursday':
  670. $Result = 'Anatomy and Physiology 102 (11:00 to 12:30)'
  671. elseif week = 1:
  672. *nl
  673. 'Your next class will start at 11:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  674. act 'Go to your Anatomy and Physiology 102 class':
  675. if hour = 10: minut += 60 - minut
  676. uni_period['second'] = daystart
  677. gs 'stat'
  678. gt 'uni_lessons2', 'anatomy_and_physiology_102'
  679. end
  680. elseif week = 2:
  681. *nl
  682. 'Your next class will start at 11:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  683. act 'Go to your Patient Care 102 class':
  684. if hour = 10: minut += 60 - minut
  685. uni_period['second'] = daystart
  686. gs 'stat'
  687. gt 'uni_lessons2', 'patient_care_102'
  688. end
  689. elseif week = 3:
  690. *nl
  691. 'Your next class will start at 11:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  692. act 'Go to your Patient Care 102 class':
  693. if hour = 10: minut += 60 - minut
  694. uni_period['second'] = daystart
  695. gs 'stat'
  696. gt 'uni_lessons2', 'patient_care_102'
  697. end
  698. elseif week = 4:
  699. *nl
  700. 'Your next class will start at 11:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  701. act 'Go to your Anatomy and Physiology 102 class':
  702. if hour = 10: minut += 60 - minut
  703. uni_period['second'] = daystart
  704. gs 'stat'
  705. gt 'uni_lessons2', 'anatomy_and_physiology_102'
  706. end
  707. end
  708. elseif university['enrolled_in_semester'] = 3:
  709. if $ARGS[1] = 'monday':
  710. $Result = 'Anatomy and Physiology 201 (11:00 to 12:30)'
  711. elseif $ARGS[1] = 'tuesday':
  712. $Result = 'Patient Care 201 (11:00 to 12:30)'
  713. elseif $ARGS[1] = 'wednesday':
  714. $Result = 'Patient Care 201 (11:00 to 12:30)'
  715. elseif $ARGS[1] = 'thursday':
  716. $Result = 'Anatomy and Physiology 201 (11:00 to 12:30)'
  717. elseif week = 1:
  718. *nl
  719. 'Your next class will start at 11:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  720. act 'Go to your Anatomy and Physiology 201 class':
  721. if hour = 10: minut += 60 - minut
  722. uni_period['second'] = daystart
  723. gs 'stat'
  724. gt 'uni_lessons3', 'anatomy_and_physiology_201'
  725. end
  726. elseif week = 2:
  727. *nl
  728. 'Your next class will start at 11:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  729. act 'Go to your Patient Care 201 class':
  730. if hour = 10: minut += 60 - minut
  731. uni_period['second'] = daystart
  732. gs 'stat'
  733. gt 'uni_lessons3', 'patient_care_201'
  734. end
  735. elseif week = 3:
  736. *nl
  737. 'Your next class will start at 11:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  738. act 'Go to your Patient Care 201 class':
  739. if hour = 10: minut += 60 - minut
  740. uni_period['second'] = daystart
  741. gs 'stat'
  742. gt 'uni_lessons3', 'patient_care_201'
  743. end
  744. elseif week = 4:
  745. *nl
  746. 'Your next class will start at 11:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  747. act 'Go to your Anatomy and Physiology 201 class':
  748. if hour = 10: minut += 60 - minut
  749. uni_period['second'] = daystart
  750. gs 'stat'
  751. gt 'uni_lessons3', 'anatomy_and_physiology_201'
  752. end
  753. end
  754. elseif university['enrolled_in_semester'] = 4:
  755. if $ARGS[1] = 'monday':
  756. $Result = 'Anatomy and Physiology 202 (11:00 to 12:30)'
  757. elseif $ARGS[1] = 'tuesday':
  758. $Result = 'Patient Care 202 (11:00 to 12:30)'
  759. elseif $ARGS[1] = 'wednesday':
  760. $Result = 'Patient Care 202 (11:00 to 12:30)'
  761. elseif $ARGS[1] = 'thursday':
  762. $Result = 'Anatomy and Physiology 202 (11:00 to 12:30)'
  763. elseif week = 1:
  764. *nl
  765. 'Your next class will start at 11:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  766. act 'Go to your Anatomy and Physiology 202 class':
  767. if hour = 10: minut += 60 - minut
  768. uni_period['second'] = daystart
  769. gs 'stat'
  770. gt 'uni_lessons4', 'anatomy_and_physiology_202'
  771. end
  772. elseif week = 2:
  773. *nl
  774. 'Your next class will start at 11:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  775. act 'Go to your Patient Care 202 class':
  776. if hour = 10: minut += 60 - minut
  777. uni_period['second'] = daystart
  778. gs 'stat'
  779. gt 'uni_lessons4', 'patient_care_202'
  780. end
  781. elseif week = 3:
  782. *nl
  783. 'Your next class will start at 11:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  784. act 'Go to your Patient Care 202 class':
  785. if hour = 10: minut += 60 - minut
  786. uni_period['second'] = daystart
  787. gs 'stat'
  788. gt 'uni_lessons4', 'patient_care_202'
  789. end
  790. elseif week = 4:
  791. *nl
  792. 'Your next class will start at 11:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  793. act 'Go to your Anatomy and Physiology 202 class':
  794. if hour = 10: minut += 60 - minut
  795. uni_period['second'] = daystart
  796. gs 'stat'
  797. gt 'uni_lessons4', 'anatomy_and_physiology_202'
  798. end
  799. end
  800. end
  801. end
  802. end
  803. if $ARGS[0] = 'uni_period_third':
  804. !!This arg has two functions. If called with gs without any optional argument, it will make the options to go to class available.
  805. !!Second if called as a function with the additional ARGS[1] of monday, tuesday, wednesday or thursday, it will print on the screen the name of the classe and the time period.
  806. if $university['enrolled_in']= 'teaching_studies':
  807. if university['enrolled_in_semester'] = 1:
  808. if $ARGS[1] = 'monday':
  809. if $university['elective_semester_1_1'] ! '':
  810. $Result = '<<$university[''elective_semester_1_1'']>> (13:15 to 14:45)'
  811. end
  812. elseif $ARGS[1] = 'tuesday':
  813. if $university['elective_semester_1_2'] ! '':
  814. $Result = '<<$university[''elective_semester_1_2'']>> (13:15 to 14:45)'
  815. end
  816. elseif $ARGS[1] = 'wednesday':
  817. $Result = 'Learning Theories 101 (13:15 to 14:45)'
  818. elseif $ARGS[1] = 'thursday' :
  819. if $university['elective_semester_1_3'] ! '':
  820. $Result = '<<$university[''elective_semester_1_3'']>> (13:15 to 14:45)'
  821. end
  822. elseif week = 1 and $university['elective_semester_1_1'] ! '':
  823. *nl
  824. 'Your next class will start at 13:15.'
  825. act 'Go to your elective <<$university[''elective_semester_1_1'']>>':
  826. if hour = 12: minut += 75 - minut
  827. if hour = 13 and minut < 15: minut += 15 - minut
  828. uni_period['third'] = daystart
  829. gs 'stat'
  830. gt 'uni_lessons_electives1', $university['elective_semester_1_1']
  831. end
  832. elseif week = 2 and $university['elective_semester_1_2'] ! '':
  833. *nl
  834. 'Your next class will start at 13:15.'
  835. act 'Go to your elective <<$university[''elective_semester_1_2'']>>':
  836. if hour = 12: minut += 75 - minut
  837. if hour = 13 and minut < 15: minut += 15 - minut
  838. uni_period['third'] = daystart
  839. gs 'stat'
  840. gt 'uni_lessons_electives1', $university['elective_semester_1_2']
  841. end
  842. elseif week = 3:
  843. *nl
  844. 'Your next class will start at 13:15. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  845. act 'Go to your Learning Theories 101 class':
  846. if hour = 12: minut += 75 - minut
  847. if hour = 13 and minut < 15: minut += 15 - minut
  848. uni_period['third'] = daystart
  849. gs 'stat'
  850. gt 'uni_lessons1', 'learning_theories_101'
  851. end
  852. elseif week = 4 and $university['elective_semester_1_3'] ! '':
  853. *nl
  854. 'Your next class will start at 13:15.'
  855. act 'Go to your elective <<$university[''elective_semester_1_3'']>>':
  856. if hour = 12: minut += 75 - minut
  857. if hour = 13 and minut < 15: minut += 15 - minut
  858. uni_period['third'] = daystart
  859. gs 'stat'
  860. gt 'uni_lessons_electives1', $university['elective_semester_1_3']
  861. end
  862. end
  863. elseif university['enrolled_in_semester'] = 2:
  864. if $ARGS[1] = 'monday':
  865. if $university['elective_semester_2_1'] ! '':
  866. $Result = '<<$university[''elective_semester_2_1'']>> (13:15 to 14:45)'
  867. end
  868. elseif $ARGS[1] = 'tuesday':
  869. if $university['elective_semester_2_2'] ! '':
  870. $Result = '<<$university[''elective_semester_2_2'']>> (13:15 to 14:45)'
  871. end
  872. elseif $ARGS[1] = 'wednesday':
  873. $Result = 'Psychology of a Student 101 (13:15 to 14:45)'
  874. elseif $ARGS[1] = 'thursday' :
  875. if $university['elective_semester_2_3'] ! '':
  876. $Result = '<<$university[''elective_semester_2_3'']>> (13:15 to 14:45)'
  877. end
  878. elseif week = 1 and $university['elective_semester_2_1'] ! '':
  879. *nl
  880. 'Your next class will start at 13:15.'
  881. act 'Go to your elective <<$university[''elective_semester_2_1'']>>':
  882. if hour = 12: minut += 75 - minut
  883. if hour = 13 and minut < 15: minut += 15 - minut
  884. uni_period['third'] = daystart
  885. gs 'stat'
  886. gt 'uni_lessons_electives2', $university['elective_semester_2_1']
  887. end
  888. elseif week = 2 and $university['elective_semester_2_2'] ! '':
  889. *nl
  890. 'Your next class will start at 13:15.'
  891. act 'Go to your elective <<$university[''elective_semester_2_2'']>>':
  892. if hour = 12: minut += 75 - minut
  893. if hour = 13 and minut < 15: minut += 15 - minut
  894. uni_period['third'] = daystart
  895. gs 'stat'
  896. gt 'uni_lessons_electives2', $university['elective_semester_2_2']
  897. end
  898. elseif week = 3:
  899. *nl
  900. 'Your next class will start at 13:15. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  901. act 'Go to your Psychology of a Student 101 class':
  902. if hour = 12: minut += 75 - minut
  903. if hour = 13 and minut < 15: minut += 15 - minut
  904. uni_period['third'] = daystart
  905. gs 'stat'
  906. gt 'uni_lessons2', 'psychology_of_a_student_101'
  907. end
  908. elseif week = 4 and $university['elective_semester_2_3'] ! '':
  909. *nl
  910. 'Your next class will start at 13:15'
  911. act 'Go to your elective <<$university[''elective_semester_2_3'']>>':
  912. if hour = 12: minut += 75 - minut
  913. if hour = 13 and minut < 15: minut += 15 - minut
  914. uni_period['third'] = daystart
  915. gs 'stat'
  916. gt 'uni_lessons_electives2', $university['elective_semester_2_3']
  917. end
  918. end
  919. elseif university['enrolled_in_semester'] = 3:
  920. if $ARGS[1] = 'monday':
  921. if $university['elective1'] ! '':
  922. $Result = '<<$university[''elective1'']>> (13:15 to 14:45)'
  923. end
  924. elseif $ARGS[1] = 'tuesday':
  925. if $university['elective2'] ! '':
  926. $Result = '<<$university[''elective2'']>> (13:15 to 14:45)'
  927. end
  928. elseif $ARGS[1] = 'wednesday':
  929. $Result = 'Learning Theories 201 (13:15 to 14:45)'
  930. elseif $ARGS[1] = 'thursday':
  931. if $university['elective3'] ! '':
  932. $Result = '<<$university[''elective3'']>> (13:15 to 14:45)'
  933. end
  934. elseif week = 1 and $university['elective1'] ! '':
  935. !!*nl
  936. !!'Your next class will start at 13:15. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  937. !!act 'Go to your elective class 1':
  938. !! if hour = 12: minut += 75 - minut
  939. !! if hour = 13 and minut < 15: minut += 15 - minut
  940. !! uni_period['third'] = daystart
  941. !! gs 'stat'
  942. !!end
  943. elseif week = 2 and $university['elective2'] ! '':
  944. !!*nl
  945. !!'Your next class will start at 13:15'
  946. !!act 'Go to your elective class 2':
  947. !! if hour = 12: minut += 75 - minut
  948. !! if hour = 13 and minut < 15: minut += 15 - minut
  949. !! uni_period['third'] = daystart
  950. !! gs 'stat'
  951. !!end
  952. elseif week = 3:
  953. *nl
  954. 'Your next class will start at 13:15. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  955. act 'Go to your Learning Theories 201 class':
  956. if hour = 12: minut += 75 - minut
  957. if hour = 13 and minut < 15: minut += 15 - minut
  958. uni_period['third'] = daystart
  959. gs 'stat'
  960. gt 'uni_lessons3', 'learning_theories_201'
  961. end
  962. elseif week = 4 and $university['elective3'] ! '':
  963. !!*nl
  964. !!'Your next class will start at 13:15. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  965. !!act 'Go to your elective clas 3':
  966. !! if hour = 12: minut += 75 - minut
  967. !! if hour = 13 and minut < 15: minut += 15 - minut
  968. !! uni_period['third'] = daystart
  969. !! gs 'stat'
  970. !!end
  971. end
  972. elseif university['enrolled_in_semester'] = 4:
  973. if $ARGS[1] = 'monday':
  974. if $university['elective1'] ! '':
  975. $Result = '<<$university[''elective1'']>> (13:15 to 14:45)'
  976. end
  977. elseif $ARGS[1] = 'tuesday':
  978. if $university['elective2'] ! '':
  979. $Result = '<<$university[''elective2'']>> (13:15 to 14:45)'
  980. end
  981. elseif $ARGS[1] = 'wednesday':
  982. $Result = 'Psychology of a Student 201 (13:15 to 14:45)'
  983. elseif $ARGS[1] = 'thursday':
  984. if $university['elective3'] ! '':
  985. $Result = '<<$university[''elective3'']>> (13:15 to 14:45)'
  986. end
  987. elseif week = 1 and $university['elective1'] ! '':
  988. !!*nl
  989. !!'Your next class will start at 13:15. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  990. !!act 'Go to your elective clas 1':
  991. !! if hour = 12: minut += 75 - minut
  992. !! if hour = 13 and minut < 15: minut += 15 - minut
  993. !! uni_period['third'] = daystart
  994. !! gs 'stat'
  995. !!end
  996. elseif week = 2 and $university['elective2'] ! '':
  997. !!*nl
  998. !!'Your next class will start at 13:15.'
  999. !!act 'Go to your elective clas 2':
  1000. !! if hour = 12: minut += 75 - minut
  1001. !! if hour = 13 and minut < 15: minut += 15 - minut
  1002. !! uni_period['third'] = daystart
  1003. !! gs 'stat'
  1004. !!end
  1005. elseif week = 3:
  1006. *nl
  1007. 'Your next class will start at 13:15. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  1008. act 'Go to your Psychology of a Student 201 class':
  1009. if hour = 12: minut += 75 - minut
  1010. if hour = 13 and minut < 15: minut += 15 - minut
  1011. uni_period['third'] = daystart
  1012. gs 'stat'
  1013. gt 'uni_lessons4', 'psychology_of_a_student_201'
  1014. end
  1015. elseif week = 4 and $university['elective3'] ! '':
  1016. !!*nl
  1017. !!'Your next class will start at 13:15. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  1018. !!act 'Go to your elective clas 3':
  1019. !! if hour = 12: minut += 75 - minut
  1020. !! if hour = 13 and minut < 15: minut += 15 - minut
  1021. !! uni_period['third'] = daystart
  1022. !! gs 'stat'
  1023. !!end
  1024. end
  1025. end
  1026. end
  1027. if $university['enrolled_in']= 'nursing':
  1028. if university['enrolled_in_semester'] = 1:
  1029. if $ARGS[1] = 'monday':
  1030. if $university['elective_semester_1_1'] ! '':
  1031. $Result = '<<$university[''elective_semester_1_1'']>> (13:15 to 14:45)'
  1032. end
  1033. elseif $ARGS[1] = 'tuesday':
  1034. if $university['elective_semester_1_2'] ! '':
  1035. $Result = '<<$university[''elective_semester_1_2'']>> (13:15 to 14:45)'
  1036. end
  1037. elseif $ARGS[1] = 'wednesday':
  1038. $Result = 'Anatomy and Physiology 101 (13:15 to 14:45)'
  1039. elseif $ARGS[1] = 'thursday' :
  1040. if $university['elective_semester_1_3'] ! '':
  1041. $Result = '<<$university[''elective_semester_1_3'']>> (13:15 to 14:45)'
  1042. end
  1043. elseif week = 1 and $university['elective_semester_1_1'] ! '':
  1044. *nl
  1045. 'Your next class will start at 13:15.'
  1046. act 'Go to your elective <<$university[''elective_semester_1_1'']>>':
  1047. if hour = 12: minut += 75 - minut
  1048. if hour = 13 and minut < 15: minut += 15 - minut
  1049. uni_period['third'] = daystart
  1050. gs 'stat'
  1051. gt 'uni_lessons_electives1', $university['elective_semester_1_1']
  1052. end
  1053. elseif week = 2 and $university['elective_semester_1_2'] ! '':
  1054. *nl
  1055. 'Your next class will start at 13:15.'
  1056. act 'Go to your elective <<$university[''elective_semester_1_2'']>>':
  1057. if hour = 12: minut += 75 - minut
  1058. if hour = 13 and minut < 15: minut += 15 - minut
  1059. uni_period['third'] = daystart
  1060. gs 'stat'
  1061. gt 'uni_lessons_electives1', $university['elective_semester_1_2']
  1062. end
  1063. elseif week = 3:
  1064. *nl
  1065. 'Your next class will start at 13:15. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  1066. act 'Go to your Anatomy and Physiology 101 class':
  1067. if hour = 12: minut += 75 - minut
  1068. if hour = 13 and minut < 15: minut += 15 - minut
  1069. uni_period['third'] = daystart
  1070. gs 'stat'
  1071. gt 'uni_lessons1', 'anatomy_and_physiology_101'
  1072. end
  1073. elseif week = 4 and $university['elective_semester_1_3'] ! '':
  1074. *nl
  1075. 'Your next class will start at 13:15.'
  1076. act 'Go to your elective <<$university[''elective_semester_1_3'']>>':
  1077. if hour = 12: minut += 75 - minut
  1078. if hour = 13 and minut < 15: minut += 15 - minut
  1079. uni_period['third'] = daystart
  1080. gs 'stat'
  1081. gt 'uni_lessons_electives1', $university['elective_semester_1_3']
  1082. end
  1083. end
  1084. elseif university['enrolled_in_semester'] = 2:
  1085. if $ARGS[1] = 'monday':
  1086. if $university['elective_semester_2_1'] ! '':
  1087. $Result = '<<$university[''elective_semester_2_1'']>> (13:15 to 14:45)'
  1088. end
  1089. elseif $ARGS[1] = 'tuesday':
  1090. if $university['elective_semester_2_2'] ! '':
  1091. $Result = '<<$university[''elective_semester_2_2'']>> (13:15 to 14:45)'
  1092. end
  1093. elseif $ARGS[1] = 'wednesday':
  1094. $Result = 'Anatomy and Physiology 102 (13:15 to 14:45)'
  1095. elseif $ARGS[1] = 'thursday' :
  1096. if $university['elective_semester_2_3'] ! '':
  1097. $Result = '<<$university[''elective_semester_2_3'']>> (13:15 to 14:45)'
  1098. end
  1099. elseif week = 1 and $university['elective_semester_2_1'] ! '':
  1100. *nl
  1101. 'Your next class will start at 13:15.'
  1102. act 'Go to your elective <<$university[''elective_semester_2_1'']>>':
  1103. if hour = 12: minut += 75 - minut
  1104. if hour = 13 and minut < 15: minut += 15 - minut
  1105. uni_period['third'] = daystart
  1106. gs 'stat'
  1107. gt 'uni_lessons_electives2', $university['elective_semester_2_1']
  1108. end
  1109. elseif week = 2 and $university['elective_semester_2_2'] ! '':
  1110. *nl
  1111. 'Your next class will start at 13:15.'
  1112. act 'Go to your elective <<$university[''elective_semester_2_2'']>>':
  1113. if hour = 12: minut += 75 - minut
  1114. if hour = 13 and minut < 15: minut += 15 - minut
  1115. uni_period['third'] = daystart
  1116. gs 'stat'
  1117. gt 'uni_lessons_electives2', $university['elective_semester_2_2']
  1118. end
  1119. elseif week = 3:
  1120. *nl
  1121. 'Your next class will start at 13:15. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  1122. act 'Go to your Anatomy and Physiology 102 class':
  1123. if hour = 12: minut += 75 - minut
  1124. if hour = 13 and minut < 15: minut += 15 - minut
  1125. uni_period['third'] = daystart
  1126. gs 'stat'
  1127. gt 'uni_lessons2', 'anatomy_and_physiology_102'
  1128. end
  1129. elseif week = 4 and $university['elective_semester_2_3'] ! '':
  1130. *nl
  1131. 'Your next class will start at 13:15.'
  1132. act 'Go to your elective <<$university[''elective_semester_2_3'']>>':
  1133. if hour = 12: minut += 75 - minut
  1134. if hour = 13 and minut < 15: minut += 15 - minut
  1135. uni_period['third'] = daystart
  1136. gs 'stat'
  1137. gt 'uni_lessons_electives2', $university['elective_semester_2_3']
  1138. end
  1139. end
  1140. elseif university['enrolled_in_semester'] = 3:
  1141. if $ARGS[1] = 'monday':
  1142. if $university['elective1'] ! '':
  1143. $Result = '<<$university[''elective1'']>> (13:15 to 14:45)'
  1144. end
  1145. elseif $ARGS[1] = 'tuesday':
  1146. if $university['elective2'] ! '':
  1147. $Result = '<<$university[''elective2'']>> (13:15 to 14:45)'
  1148. end
  1149. elseif $ARGS[1] = 'wednesday':
  1150. $Result = 'Anatomy and Physiology 201 (13:15 to 14:45)'
  1151. elseif $ARGS[1] = 'thursday':
  1152. if $university['elective3'] ! '':
  1153. $Result = '<<$university[''elective3'']>> (13:15 to 14:45)'
  1154. end
  1155. elseif week = 1 and $university['elective1'] ! '':
  1156. !!*nl
  1157. !!'Your next class will start at 13:15. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  1158. !!act 'Go to your elective class 1':
  1159. !! if hour = 12: minut += 75 - minut
  1160. !! if hour = 13 and minut < 15: minut += 15 - minut
  1161. !! uni_period['third'] = daystart
  1162. !! gs 'stat'
  1163. !!end
  1164. elseif week = 2 and $university['elective2'] ! '':
  1165. !!*nl
  1166. !!'Your next class will start at 13:15'
  1167. !!act 'Go to your elective class 2':
  1168. !! if hour = 12: minut += 75 - minut
  1169. !! if hour = 13 and minut < 15: minut += 15 - minut
  1170. !! uni_period['third'] = daystart
  1171. !! gs 'stat'
  1172. !!end
  1173. elseif week = 3:
  1174. *nl
  1175. 'Your next class will start at 13:15. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  1176. act 'Go to your Anatomy and Physiology 201 class':
  1177. if hour = 12: minut += 75 - minut
  1178. if hour = 13 and minut < 15: minut += 15 - minut
  1179. uni_period['third'] = daystart
  1180. gs 'stat'
  1181. gt 'uni_lessons3', 'anatomy_and_physiology_201'
  1182. end
  1183. elseif week = 4 and $university['elective3'] ! '':
  1184. !!*nl
  1185. !!'Your next class will start at 13:15. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  1186. !!act 'Go to your elective clas 3':
  1187. !! if hour = 12: minut += 75 - minut
  1188. !! if hour = 13 and minut < 15: minut += 15 - minut
  1189. !! uni_period['third'] = daystart
  1190. !! gs 'stat'
  1191. !!end
  1192. end
  1193. elseif university['enrolled_in_semester'] = 4:
  1194. if $ARGS[1] = 'monday':
  1195. if $university['elective1'] ! '':
  1196. $Result = '<<$university[''elective1'']>> (13:15 to 14:45)'
  1197. end
  1198. elseif $ARGS[1] = 'tuesday':
  1199. if $university['elective2'] ! '':
  1200. $Result = '<<$university[''elective2'']>> (13:15 to 14:45)'
  1201. end
  1202. elseif $ARGS[1] = 'wednesday':
  1203. $Result = 'Anatomy and Physiology 202 (13:15 to 14:45)'
  1204. elseif $ARGS[1] = 'thursday':
  1205. if $university['elective3'] ! '':
  1206. $Result = '<<$university[''elective3'']>> (13:15 to 14:45)'
  1207. end
  1208. elseif week = 1 and $university['elective1'] ! '':
  1209. !!*nl
  1210. !!'Your next class will start at 13:15. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  1211. !!act 'Go to your elective class 1':
  1212. !! if hour = 12: minut += 75 - minut
  1213. !! if hour = 13 and minut < 15: minut += 15 - minut
  1214. !! uni_period['third'] = daystart
  1215. !! gs 'stat'
  1216. !!end
  1217. elseif week = 2 and $university['elective2'] ! '':
  1218. !!*nl
  1219. !!'Your next class will start at 13:15.'
  1220. !!act 'Go to your elective class 2':
  1221. !! if hour = 12: minut += 75 - minut
  1222. !! if hour = 13 and minut < 15: minut += 15 - minut
  1223. !! uni_period['third'] = daystart
  1224. !! gs 'stat'
  1225. !!end
  1226. elseif week = 3:
  1227. *nl
  1228. 'Your next class will start at 13:15. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  1229. act 'Go to your Anatomy and Physiology 202 class':
  1230. if hour = 12: minut += 75 - minut
  1231. if hour = 13 and minut < 15: minut += 15 - minut
  1232. uni_period['third'] = daystart
  1233. gs 'stat'
  1234. gt 'uni_lessons4', 'anatomy_and_physiology_202'
  1235. end
  1236. elseif week = 4 and $university['elective3'] ! '':
  1237. !!*nl
  1238. !!'Your next class will start at 13:15. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  1239. !!act 'Go to your elective class 3':
  1240. !! if hour = 12: minut += 75 - minut
  1241. !! if hour = 13 and minut < 15: minut += 15 - minut
  1242. !! uni_period['third'] = daystart
  1243. !! gs 'stat'
  1244. !!end
  1245. end
  1246. end
  1247. end
  1248. end
  1249. if $ARGS[0] = 'exam':
  1250. !!This arg has three functions. If called with gs without any optional argument, it will make the options to go to exam availeble.
  1251. !!The second if called as a function with the additional $ARGS[1] = 'schedule', it will print on the screen the name and date of the exams you have left this semester.
  1252. !!The third is if called with $ARGS[1] = 'is_over' and $ARGS[2] the name of the class to no if the time slot for the exam has passed by returning 1. (Only use this during the exam weeks. Outside of the exam week, this is covered by the variable that says whether the semester is passed or not)
  1253. if $university['enrolled_in'] = 'teaching_studies':
  1254. if university['enrolled_in_semester'] = 1:
  1255. if $ARGS[1] = 'schedule':
  1256. if university['exam_week'] = 1:
  1257. if week < 4 or (week = 4 and hour < 9):
  1258. $Result = 'General Education 101 Exam (09:00 to 12:00) Thursday this week. Teaching Methods 101 Exam (09:00 to 12:00) Monday next week. Learning Theories 101 Exam (09:00 to 12:00) Thursday next week.'
  1259. else
  1260. $Result = 'Teaching Methods 101 Exam (09:00 to 12:00) Tuesday next week. Learning Theories 101 Exam (09:00 to 12:00) Thursday next week.'
  1261. end
  1262. elseif university['exam_week'] = 2:
  1263. if week < 2 or (week = 2 and hour < 9):
  1264. $Result = 'Teaching Methods 101 Exam (09:00 to 12:00) Tuesday this week. Learning Theories 101 Exam (09:00 to 12:00) Thursday this week.'
  1265. elseif week < 4 or (week = 4 and hour < 9):
  1266. $Result = 'Learning Theories 101 Exam (09:00 to 12:00) Thursday this week.'
  1267. else
  1268. $Result = 'All your exams are over. Now you just have to wait for your grade to be announced.'
  1269. end
  1270. end
  1271. elseif $ARGS[1] = 'is_over':
  1272. if $ARGS[2] = 'general education 101':
  1273. if university['exam_week'] = 1 and (week < 4 or (week = 4 and hour < 9)):
  1274. Result = 0
  1275. else
  1276. Result = 1
  1277. end
  1278. elseif $ARGS[2] = 'teaching methods 101':
  1279. if university['exam_week'] = 1 or (university['exam_week'] = 2 and (week < 2 or (week = 2 and hour < 9))):
  1280. Result = 0
  1281. else
  1282. Result = 1
  1283. end
  1284. elseif $ARGS[2] = 'learning theories 101':
  1285. if university['exam_week'] = 1 or (university['exam_week'] = 2 and (week < 4 or (week = 4 and hour < 9))):
  1286. Result = 0
  1287. else
  1288. Result = 1
  1289. end
  1290. end
  1291. elseif university['exam_week'] = 1:
  1292. if week = 4:
  1293. *nl
  1294. 'Your General Education 101 exam will start at 09:00 today. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  1295. act 'Go to your General Education 101 exam':
  1296. if hour = 8: minut += 60 - minut
  1297. if hour = 7: minut += 120 - minut
  1298. gs 'stat'
  1299. gt 'uni_exams1', 'general_education_101'
  1300. end
  1301. end
  1302. elseif university['exam_week'] = 2:
  1303. if week = 2:
  1304. *nl
  1305. 'Your Teaching Methods 101 exam will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  1306. act 'Go to your Teaching Methods 101 exam':
  1307. if hour = 8: minut += 60 - minut
  1308. if hour = 7: minut += 120 - minut
  1309. gs 'stat'
  1310. gt 'uni_exams1', 'teaching_methods_101'
  1311. end
  1312. elseif week = 4:
  1313. *nl
  1314. 'Your Learning Theories 101 exam will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  1315. act 'Go to your Learning Theories 101 exam':
  1316. if hour = 8: minut += 60 - minut
  1317. if hour = 7: minut += 120 - minut
  1318. gs 'stat'
  1319. gt 'uni_exams1', 'learning_theories_101'
  1320. end
  1321. end
  1322. end
  1323. elseif university['enrolled_in_semester'] = 2:
  1324. if $ARGS[1] = 'schedule':
  1325. if university['exam_week'] = 1:
  1326. if week < 4 or (week = 4 and hour < 9):
  1327. $Result = 'General Education 102 Exam (09:00 to 12:00) Thursday this week. Teaching Methods 102 Exam (09:00 to 12:00) Monday next week. Psychology of a Student 101 Exam (09:00 to 12:00) Thursday next week.'
  1328. else
  1329. $Result = 'Teaching Methods 102 Exam (09:00 to 12:00) Tuesday next week. Psychology of a Student 101 Exam (09:00 to 12:00) Thursday next week.'
  1330. end
  1331. elseif university['exam_week'] = 2:
  1332. if week < 2 or (week = 2 and hour < 9):
  1333. $Result = 'Teaching Methods 102 Exam (09:00 to 12:00) Tuesday this week. Psychology of a Student 101 Exam (09:00 to 12:00) Thursday this week.'
  1334. elseif week < 4 or (week = 4 and hour < 9):
  1335. $Result = 'Psychology of a Student 101 Exam (09:00 to 12:00) Thursday this week.'
  1336. else
  1337. $Result = 'All your exams are over. Now you just have to wait for your grade to be announced.'
  1338. end
  1339. end
  1340. elseif $ARGS[1] = 'is_over':
  1341. if $ARGS[2] = 'general education 102':
  1342. if university['exam_week'] = 1 and (week < 4 or (week = 4 and hour < 9)):
  1343. Result = 0
  1344. else
  1345. Result = 1
  1346. end
  1347. elseif $ARGS[2] = 'teaching methods 102':
  1348. if university['exam_week'] = 1 or (university['exam_week'] = 2 and (week < 2 or (week = 2 and hour < 9))):
  1349. Result = 0
  1350. else
  1351. Result = 1
  1352. end
  1353. elseif $ARGS[2] = 'Psychology of a Student 101':
  1354. if university['exam_week'] = 1 or (university['exam_week'] = 2 and (week < 4 or (week = 4 and hour < 9))):
  1355. Result = 0
  1356. else
  1357. Result = 1
  1358. end
  1359. end
  1360. elseif university['exam_week'] = 1:
  1361. if week = 4:
  1362. *nl
  1363. 'Your General Education 102 exam will start at 09:00 today. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  1364. act 'Go to your General Education 102 exam':
  1365. if hour = 8: minut += 60 - minut
  1366. if hour = 7: minut += 120 - minut
  1367. gs 'stat'
  1368. gt 'uni_exams2', 'general_education_102'
  1369. end
  1370. end
  1371. elseif university['exam_week'] = 2:
  1372. if week = 2:
  1373. *nl
  1374. 'Your Teaching Methods 102 exam will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  1375. act 'Go to your Teaching Methods exam 102':
  1376. if hour = 8: minut += 60 - minut
  1377. if hour = 7: minut += 120 - minut
  1378. gs 'stat'
  1379. gt 'uni_exams2', 'teaching_methods_102'
  1380. end
  1381. elseif week = 4:
  1382. *nl
  1383. 'Your Psychology of a Student 101 exam will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  1384. act 'Go to your Psychology of a Student 101 exam':
  1385. if hour = 8: minut += 60 - minut
  1386. if hour = 7: minut += 120 - minut
  1387. gs 'stat'
  1388. gt 'uni_exams2', 'psychology_of_a_student_101'
  1389. end
  1390. end
  1391. end
  1392. elseif university['enrolled_in_semester'] = 3:
  1393. if $ARGS[1] = 'schedule':
  1394. if university['exam_week'] = 1:
  1395. if week < 4 or (week = 4 and hour < 9):
  1396. $Result = 'General Education 201 Exam (09:00 to 12:00) Thursday this week. Teaching Methods 102 Exam (09:00 to 12:00) Monday next week. Psychology of a Student 101 Exam (09:00 to 12:00) Thursday next week.'
  1397. else
  1398. $Result = 'Assessment 201 Exam (09:00 to 12:00) Tuesday next week. Psychology of a Student 101 Exam (09:00 to 12:00) Thursday next week.'
  1399. end
  1400. elseif university['exam_week'] = 2:
  1401. if week < 2 or (week = 2 and hour < 9):
  1402. $Result = 'Teaching Methods 102 Exam (09:00 to 12:00) Tuesday this week. Psychology of a Student 101 Exam (09:00 to 12:00) Thursday this week.'
  1403. elseif week < 4 or (week = 4 and hour < 9):
  1404. $Result = 'Learning Theories 201 Exam (09:00 to 12:00) Thursday this week.'
  1405. else
  1406. $Result = 'All your exams are over. Now you just have to wait for your grade to be announced.'
  1407. end
  1408. end
  1409. elseif $ARGS[1] = 'is_over':
  1410. if $ARGS[2] = 'general education 201':
  1411. if university['exam_week'] = 1 and (week < 4 or (week = 4 and hour < 9)):
  1412. Result = 0
  1413. else
  1414. Result = 1
  1415. end
  1416. elseif $ARGS[2] = 'Assessment 201':
  1417. if university['exam_week'] = 1 or (university['exam_week'] = 2 and (week < 2 or (week = 2 and hour < 9))):
  1418. Result = 0
  1419. else
  1420. Result = 1
  1421. end
  1422. elseif $ARGS[2] = 'Learning Theories 201':
  1423. if university['exam_week'] = 1 or (university['exam_week'] = 2 and (week < 4 or (week = 4 and hour < 9))):
  1424. Result = 0
  1425. else
  1426. Result = 1
  1427. end
  1428. end
  1429. elseif university['exam_week'] = 1:
  1430. if week = 4:
  1431. *nl
  1432. 'Your General Education 102 exam will start at 09:00 today. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  1433. act 'Go to your General Education 102 exam':
  1434. if hour = 8: minut += 60 - minut
  1435. if hour = 7: minut += 120 - minut
  1436. gs 'stat'
  1437. gt 'uni_exams3', 'general_education_201'
  1438. end
  1439. end
  1440. elseif university['exam_week'] = 2:
  1441. if week = 2:
  1442. *nl
  1443. 'Your Assessment 201 exam will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  1444. act 'Go to your Assessment 201 exam':
  1445. if hour = 8: minut += 60 - minut
  1446. if hour = 7: minut += 120 - minut
  1447. gs 'stat'
  1448. gt 'uni_exams3', 'assessment_201'
  1449. end
  1450. elseif week = 4:
  1451. *nl
  1452. 'Your Learning Theories 201 exam will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  1453. act 'Go to your Learning Theories 201 exam':
  1454. if hour = 8: minut += 60 - minut
  1455. if hour = 7: minut += 120 - minut
  1456. gs 'stat'
  1457. gt 'uni_exams3', 'learning_theories_201'
  1458. end
  1459. end
  1460. end
  1461. elseif university['enrolled_in_semester'] = 4:
  1462. if $ARGS[1] = 'schedule':
  1463. if university['exam_week'] = 1:
  1464. if week < 4 or (week = 4 and hour < 9):
  1465. $Result = 'General Education 202 Exam (09:00 to 12:00) Thursday this week. Teaching Methods 102 Exam (09:00 to 12:00) Monday next week. Psychology of a Student 201 Exam (09:00 to 12:00) Thursday next week.'
  1466. else
  1467. $Result = 'Learning Theories 202 Exam (09:00 to 12:00) Tuesday next week. Psychology of a Student 201 Exam (09:00 to 12:00) Thursday next week.'
  1468. end
  1469. elseif university['exam_week'] = 2:
  1470. if week < 2 or (week = 2 and hour < 9):
  1471. $Result = 'Learning Theories 202 Exam (09:00 to 12:00) Tuesday this week. Psychology of a Student 201 Exam (09:00 to 12:00) Thursday this week.'
  1472. elseif week < 4 or (week = 4 and hour < 9):
  1473. $Result = 'Psychology of a Student 201 Exam (09:00 to 12:00) Thursday this week.'
  1474. else
  1475. $Result = 'All your exams are over. Now you just have to wait for your grade to be announced.'
  1476. end
  1477. end
  1478. elseif $ARGS[1] = 'is_over':
  1479. if $ARGS[2] = 'general education 202':
  1480. if university['exam_week'] = 1 and (week < 4 or (week = 4 and hour < 9)):
  1481. Result = 0
  1482. else
  1483. Result = 1
  1484. end
  1485. elseif $ARGS[2] = 'Learning Theories 202':
  1486. if university['exam_week'] = 1 or (university['exam_week'] = 2 and (week < 2 or (week = 2 and hour < 9))):
  1487. Result = 0
  1488. else
  1489. Result = 1
  1490. end
  1491. elseif $ARGS[2] = 'Psychology of a Student 201':
  1492. if university['exam_week'] = 1 or (university['exam_week'] = 2 and (week < 4 or (week = 4 and hour < 9))):
  1493. Result = 0
  1494. else
  1495. Result = 1
  1496. end
  1497. end
  1498. elseif university['exam_week'] = 1:
  1499. if week = 4:
  1500. *nl
  1501. 'Your General Education 202 exam will start at 09:00 today. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  1502. act 'Go to your General Education 202 exam':
  1503. if hour = 8: minut += 60 - minut
  1504. if hour = 7: minut += 120 - minut
  1505. gs 'stat'
  1506. gt 'uni_exams4', 'general_education_202'
  1507. end
  1508. end
  1509. elseif university['exam_week'] = 2:
  1510. if week = 2:
  1511. *nl
  1512. 'Your Learning Theories 202 exam will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  1513. act 'Go to your Learning Theories 202 exam':
  1514. if hour = 8: minut += 60 - minut
  1515. if hour = 7: minut += 120 - minut
  1516. gs 'stat'
  1517. gt 'uni_exams4', 'learning_theories_202'
  1518. end
  1519. elseif week = 4:
  1520. *nl
  1521. 'Your Psychology of a Student 201 exam will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  1522. act 'Go to your Psychology of a Student 201 exam':
  1523. if hour = 8: minut += 60 - minut
  1524. if hour = 7: minut += 120 - minut
  1525. gs 'stat'
  1526. gt 'uni_exams4', 'psychology_of_a_student_201'
  1527. end
  1528. end
  1529. end
  1530. end
  1531. end
  1532. if $university['enrolled_in'] = 'nursing':
  1533. if university['enrolled_in_semester'] = 1:
  1534. if $ARGS[1] = 'schedule':
  1535. if university['exam_week'] = 1:
  1536. if week < 4 or (week = 4 and hour < 9):
  1537. $Result = 'Patient Care 101 Exam (09:00 to 12:00) Thursday this week. Anatomy and Physiology 101 Exam (09:00 to 12:00) Monday next week. Examination and Treatment 101 Exam (09:00 to 12:00) Thursday next week.'
  1538. else
  1539. $Result = 'Anatomy and Physiology 101 Exam (09:00 to 12:00) Tuesday next week. Examination and Treatment 101 Exam (09:00 to 12:00) Thursday next week.'
  1540. end
  1541. elseif university['exam_week'] = 2:
  1542. if week < 2 or (week = 2 and hour < 9):
  1543. $Result = 'Anatomy and Physiology 101 Exam (09:00 to 12:00) Tuesday this week. Examination and Treatment 101 Exam (09:00 to 12:00) Thursday this week.'
  1544. elseif week < 4 or (week = 4 and hour < 9):
  1545. $Result = 'Examination and Treatment 101 Exam (09:00 to 12:00) Thursday this week.'
  1546. else
  1547. $Result = 'All your exams are over. Now you just have to wait for your grade to be announced.'
  1548. end
  1549. end
  1550. elseif $ARGS[1] = 'is_over':
  1551. if $ARGS[2] = 'patient care 101':
  1552. if university['exam_week'] = 1 and (week < 4 or (week = 4 and hour < 9)):
  1553. Result = 0
  1554. else
  1555. Result = 1
  1556. end
  1557. elseif $ARGS[2] = 'anatomy and physiology 101':
  1558. if university['exam_week'] = 1 or (university['exam_week'] = 2 and (week < 2 or (week = 2 and hour < 9))):
  1559. Result = 0
  1560. else
  1561. Result = 1
  1562. end
  1563. elseif $ARGS[2] = 'examination and treatment 101':
  1564. if university['exam_week'] = 1 or (university['exam_week'] = 2 and (week < 4 or (week = 4 and hour < 9))):
  1565. Result = 0
  1566. else
  1567. Result = 1
  1568. end
  1569. end
  1570. elseif university['exam_week'] = 1:
  1571. if week = 4:
  1572. *nl
  1573. 'Your Patient Care 101 exam will start at 09:00 today. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  1574. act 'Go to your Patient Care 101 exam':
  1575. if hour = 8: minut += 60 - minut
  1576. if hour = 7: minut += 120 - minut
  1577. gs 'stat'
  1578. gt 'uni_exams1', 'patient_care_101'
  1579. end
  1580. end
  1581. elseif university['exam_week'] = 2:
  1582. if week = 2:
  1583. *nl
  1584. 'Your Anatomy and Physiology 101 exam will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  1585. act 'Go to your Anatomy and Physiology 101 exam':
  1586. if hour = 8: minut += 60 - minut
  1587. if hour = 7: minut += 120 - minut
  1588. gs 'stat'
  1589. gt 'uni_exams1', 'teaching_methods_101'
  1590. end
  1591. elseif week = 4:
  1592. *nl
  1593. 'Your Examination and Treatment 101 exam will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  1594. act 'Go to your Examination and Treatment 101 exam':
  1595. if hour = 8: minut += 60 - minut
  1596. if hour = 7: minut += 120 - minut
  1597. gs 'stat'
  1598. gt 'uni_exams1', 'examination_and_treatment_101'
  1599. end
  1600. end
  1601. end
  1602. elseif university['enrolled_in_semester'] = 2:
  1603. if $ARGS[1] = 'schedule':
  1604. if university['exam_week'] = 1:
  1605. if week < 4 or (week = 4 and hour < 9):
  1606. $Result = 'Patient Care 102 Exam (09:00 to 12:00) Thursday this week. Anatomy and Physiology 102 Exam (09:00 to 12:00) Monday next week. Examination and Treatment 102 Exam (09:00 to 12:00) Thursday next week.'
  1607. else
  1608. $Result = 'Anatomy and Physiology 102 Exam (09:00 to 12:00) Tuesday next week. Examination and Treatment 102 Exam (09:00 to 12:00) Thursday next week.'
  1609. end
  1610. elseif university['exam_week'] = 2:
  1611. if week < 2 or (week = 2 and hour < 9):
  1612. $Result = 'Anatomy and Physiology 102 Exam (09:00 to 12:00) Tuesday this week. Examination and Treatment 102 Exam (09:00 to 12:00) Thursday this week.'
  1613. elseif week < 4 or (week = 4 and hour < 9):
  1614. $Result = 'Examination and Treatment 102 Exam (09:00 to 12:00) Thursday this week.'
  1615. else
  1616. $Result = 'All your exams are over. Now you just have to wait for your grade to be announced.'
  1617. end
  1618. end
  1619. elseif $ARGS[1] = 'is_over':
  1620. if $ARGS[2] = 'patient care 102':
  1621. if university['exam_week'] = 1 and (week < 4 or (week = 4 and hour < 9)):
  1622. Result = 0
  1623. else
  1624. Result = 1
  1625. end
  1626. elseif $ARGS[2] = 'anatomy and physiology 102':
  1627. if university['exam_week'] = 1 or (university['exam_week'] = 2 and (week < 2 or (week = 2 and hour < 9))):
  1628. Result = 0
  1629. else
  1630. Result = 1
  1631. end
  1632. elseif $ARGS[2] = 'examination and treatment 102':
  1633. if university['exam_week'] = 1 or (university['exam_week'] = 2 and (week < 4 or (week = 4 and hour < 9))):
  1634. Result = 0
  1635. else
  1636. Result = 1
  1637. end
  1638. end
  1639. elseif university['exam_week'] = 1:
  1640. if week = 4:
  1641. *nl
  1642. 'Your Patient Care 102 exam will start at 09:00 today. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  1643. act 'Go to your General Education 102 exam':
  1644. if hour = 8: minut += 60 - minut
  1645. if hour = 7: minut += 120 - minut
  1646. gs 'stat'
  1647. gt 'uni_exams2', 'patient_care_102'
  1648. end
  1649. end
  1650. elseif university['exam_week'] = 2:
  1651. if week = 2:
  1652. *nl
  1653. 'Your Anatomy and Physiology 102 exam will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  1654. act 'Go to your Teaching Methods exam 102':
  1655. if hour = 8: minut += 60 - minut
  1656. if hour = 7: minut += 120 - minut
  1657. gs 'stat'
  1658. gt 'uni_exams2', 'anatomy_and_physiology_102'
  1659. end
  1660. elseif week = 4:
  1661. *nl
  1662. 'Your Examination and Treatment 102 exam will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  1663. act 'Go to your Psychology of a Student 101 exam':
  1664. if hour = 8: minut += 60 - minut
  1665. if hour = 7: minut += 120 - minut
  1666. gs 'stat'
  1667. gt 'uni_exams2', 'examination_and_treatment_102'
  1668. end
  1669. end
  1670. end
  1671. elseif university['enrolled_in_semester'] = 3:
  1672. if $ARGS[1] = 'schedule':
  1673. if university['exam_week'] = 1:
  1674. if week < 4 or (week = 4 and hour < 9):
  1675. $Result = 'Patient Care 201 Exam (09:00 to 12:00) Thursday this week. Anatomy and Physiology 201 Exam (09:00 to 12:00) Monday next week. Dosages and Pharmaceuticals 101 Exam (09:00 to 12:00) Thursday next week.'
  1676. else
  1677. $Result = 'Anatomy and Physiology 201 Exam (09:00 to 12:00) Tuesday next week. Dosages and Pharmaceuticals 101 Exam (09:00 to 12:00) Thursday next week.'
  1678. end
  1679. elseif university['exam_week'] = 2:
  1680. if week < 2 or (week = 2 and hour < 9):
  1681. $Result = 'Anatomy and Physiology 201 Exam (09:00 to 12:00) Tuesday this week. Dosages and Pharmaceuticals 101 Exam (09:00 to 12:00) Thursday this week.'
  1682. elseif week < 4 or (week = 4 and hour < 9):
  1683. $Result = 'Dosages and Pharmaceuticals 101 Exam (09:00 to 12:00) Thursday this week.'
  1684. else
  1685. $Result = 'All your exams are over. Now you just have to wait for your grade to be announced.'
  1686. end
  1687. end
  1688. elseif $ARGS[1] = 'is_over':
  1689. if $ARGS[2] = 'patient care 201':
  1690. if university['exam_week'] = 1 and (week < 4 or (week = 4 and hour < 9)):
  1691. Result = 0
  1692. else
  1693. Result = 1
  1694. end
  1695. elseif $ARGS[2] = 'anatomy and physiology 201':
  1696. if university['exam_week'] = 1 or (university['exam_week'] = 2 and (week < 2 or (week = 2 and hour < 9))):
  1697. Result = 0
  1698. else
  1699. Result = 1
  1700. end
  1701. elseif $ARGS[2] = 'dosages and pharmaceuticals 101':
  1702. if university['exam_week'] = 1 or (university['exam_week'] = 2 and (week < 4 or (week = 4 and hour < 9))):
  1703. Result = 0
  1704. else
  1705. Result = 1
  1706. end
  1707. end
  1708. elseif university['exam_week'] = 1:
  1709. if week = 4:
  1710. *nl
  1711. 'Your Patient Care 201 exam will start at 09:00 today. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  1712. act 'Go to your Patient Care 201 exam':
  1713. if hour = 8: minut += 60 - minut
  1714. if hour = 7: minut += 120 - minut
  1715. gs 'stat'
  1716. gt 'uni_exams3', 'patient_care_201'
  1717. end
  1718. end
  1719. elseif university['exam_week'] = 2:
  1720. if week = 2:
  1721. *nl
  1722. 'Your Anatomy and Physiology 201 exam will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  1723. act 'Go to your Anatomy and Physiology 201 exam':
  1724. if hour = 8: minut += 60 - minut
  1725. if hour = 7: minut += 120 - minut
  1726. gs 'stat'
  1727. gt 'uni_exams3', 'anatomy_and_physiology_201'
  1728. end
  1729. elseif week = 4:
  1730. *nl
  1731. 'Your Dosages and Pharmaceuticals 101 exam will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  1732. act 'Go to your Dosages and Pharmaceuticals 101 exam':
  1733. if hour = 8: minut += 60 - minut
  1734. if hour = 7: minut += 120 - minut
  1735. gs 'stat'
  1736. gt 'uni_exams3', 'dosages_and_pharmaceuticals_101'
  1737. end
  1738. end
  1739. end
  1740. elseif university['enrolled_in_semester'] = 4:
  1741. if $ARGS[1] = 'schedule':
  1742. if university['exam_week'] = 1:
  1743. if week < 4 or (week = 4 and hour < 9):
  1744. $Result = 'Patient Care 202 Exam (09:00 to 12:00) Thursday this week. Anatomy and Physiology 202 Exam (09:00 to 12:00) Monday next week. Dosages and Pharmaceuticals 102 Exam (09:00 to 12:00) Thursday next week.'
  1745. else
  1746. $Result = 'Anatomy and Physiology 202 Exam (09:00 to 12:00) Tuesday next week. Dosages and Pharmaceuticals 102 Exam (09:00 to 12:00) Thursday next week.'
  1747. end
  1748. elseif university['exam_week'] = 2:
  1749. if week < 2 or (week = 2 and hour < 9):
  1750. $Result = 'Anatomy and Physiology 202 Exam (09:00 to 12:00) Tuesday this week. Dosages and Pharmaceuticals 102 Exam (09:00 to 12:00) Thursday this week.'
  1751. elseif week < 4 or (week = 4 and hour < 9):
  1752. $Result = 'Dosages and Pharmaceuticals 102 Exam (09:00 to 12:00) Thursday this week.'
  1753. else
  1754. $Result = 'All your exams are over. Now you just have to wait for your grade to be announced.'
  1755. end
  1756. end
  1757. elseif $ARGS[1] = 'is_over':
  1758. if $ARGS[2] = 'patient care 202':
  1759. if university['exam_week'] = 1 and (week < 4 or (week = 4 and hour < 9)):
  1760. Result = 0
  1761. else
  1762. Result = 1
  1763. end
  1764. elseif $ARGS[2] = 'anatomy and physiology 202':
  1765. if university['exam_week'] = 1 or (university['exam_week'] = 2 and (week < 2 or (week = 2 and hour < 9))):
  1766. Result = 0
  1767. else
  1768. Result = 1
  1769. end
  1770. elseif $ARGS[2] = 'dosages and pharmaceuticals 102':
  1771. if university['exam_week'] = 1 or (university['exam_week'] = 2 and (week < 4 or (week = 4 and hour < 9))):
  1772. Result = 0
  1773. else
  1774. Result = 1
  1775. end
  1776. end
  1777. elseif university['exam_week'] = 1:
  1778. if week = 4:
  1779. *nl
  1780. 'Your Patient Care 202 exam will start at 09:00 today. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  1781. act 'Go to your Patient Care 202 exam':
  1782. if hour = 8: minut += 60 - minut
  1783. if hour = 7: minut += 120 - minut
  1784. gs 'stat'
  1785. gt 'uni_exams4', 'patient_care_202'
  1786. end
  1787. end
  1788. elseif university['exam_week'] = 2:
  1789. if week = 2:
  1790. *nl
  1791. 'Your Anatomy and Physiology 202 exam will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  1792. act 'Go to your Anatomy and Physiology 202 exam':
  1793. if hour = 8: minut += 60 - minut
  1794. if hour = 7: minut += 120 - minut
  1795. gs 'stat'
  1796. gt 'uni_exams4', 'anatomy_and_physiology_202'
  1797. end
  1798. elseif week = 4:
  1799. *nl
  1800. 'Your Dosages and Pharmaceuticals 102 exam will start at 09:00. You can go to it now or do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  1801. act 'Go to your Dosages and Pharmaceuticals 102 exam':
  1802. if hour = 8: minut += 60 - minut
  1803. if hour = 7: minut += 120 - minut
  1804. gs 'stat'
  1805. gt 'uni_exams4', 'dosages_and_pharmaceuticals_102'
  1806. end
  1807. end
  1808. end
  1809. end
  1810. end
  1811. end
  1812. --- uni_programs ---------------------------------