uni_programs.qsrc 21 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477
  1. # uni_programs
  2. !!This is the file containing the variabels and actions for handeling the different program the player can attend at the university.
  3. !!The follwoing vaiables are improtat.
  4. !! university['student'] is set to 1 in 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
  6. !! university['enrolled_in_semester'] is the semester the player enrolled in starting fom 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. end
  12. if $ARGS[0] = 'uni_period_first':
  13. !!This arg have two functions. If called with gs without any optional argument it will make the cations to go to class availeble.
  14. !!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.
  15. if $university['enrolled_in'] = 'teaching_studies':
  16. if university['enrolled_in_semester'] = 1:
  17. if $ARGS[1] = 'monday':
  18. $Result = 'General Education 101 (9:00 to 10:30)'
  19. elseif $ARGS[1] = 'tuesday':
  20. $Result = 'General Education 101 (9:00 to 10:30)'
  21. elseif $ARGS[1] = 'wednesday':
  22. $Result = 'General Education 101 (9:00 to 10:30)'
  23. elseif $ARGS[1] = 'thursday':
  24. $Result = 'Teaching Methods 101 (9:00 to 10:30)'
  25. elseif week = 1:
  26. *nl
  27. 'Your next class will start at 9:00. You can go to it now or go do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  28. act 'Go to your General Education 101 class':
  29. if hour = 8: minut += 60 - minut
  30. if hour = 7: minut += 120 - minut
  31. uni_period['first'] = daystart
  32. gs 'stat'
  33. gt 'uni_lessons1', 'general_education_101'
  34. end
  35. elseif week = 2:
  36. *nl
  37. 'Your next class will start at 9:00. You can go to it now or go do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  38. act 'Go to your General Education 101 class':
  39. if hour = 8: minut += 60 - minut
  40. if hour = 7: minut += 120 - minut
  41. uni_period['first'] = daystart
  42. gs 'stat'
  43. gt 'uni_lessons1', 'general_education_101'
  44. end
  45. elseif week = 3:
  46. *nl
  47. 'Your next class will start at 9:00. You can go to it now or go do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  48. act 'Go to your General Education 101 class':
  49. if hour = 8: minut += 60 - minut
  50. if hour = 7: minut += 120 - minut
  51. uni_period['first'] = daystart
  52. gs 'stat'
  53. gt 'uni_lessons1', 'general_education_101'
  54. end
  55. elseif week = 4:
  56. *nl
  57. 'Your next class will start at 9:00. You can go to it now or go do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  58. act 'Go to your Teaching Methods 101 class':
  59. if hour = 8: minut += 60 - minut
  60. if hour = 7: minut += 120 - minut
  61. uni_period['first'] = daystart
  62. gs 'stat'
  63. gt 'uni_lessons1', 'teaching_methods_101'
  64. end
  65. end
  66. elseif university['enrolled_in_semester'] = 2:
  67. if $ARGS[1] = 'monday':
  68. $Result = 'General Education 102 (9:00 to 10:30)'
  69. elseif $ARGS[1] = 'tuesday':
  70. $Result = 'General Education 102 (9:00 to 10:30)'
  71. elseif $ARGS[1] = 'wednesday':
  72. $Result = 'General Education 102 (9:00 to 10:30)'
  73. elseif $ARGS[1] = 'thursday':
  74. $Result = 'Teaching Methods 102 (9:00 to 10:30)'
  75. elseif week = 1:
  76. *nl
  77. 'Your next class will start at 9:00. You can go to it now or go do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  78. act 'Go to your General Education 102 class':
  79. if hour = 8: minut += 60 - minut
  80. if hour = 7: minut += 120 - minut
  81. uni_period['first'] = daystart
  82. gs 'stat'
  83. gt 'uni_lessons2', 'general_education_102'
  84. end
  85. elseif week = 2:
  86. *nl
  87. 'Your next class will start at 9:00. You can go to it now or go do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  88. act 'Go to your General Education 102 class':
  89. if hour = 8: minut += 60 - minut
  90. if hour = 7: minut += 120 - minut
  91. uni_period['first'] = daystart
  92. gs 'stat'
  93. gt 'uni_lessons2', 'general_education_102'
  94. end
  95. elseif week = 3:
  96. *nl
  97. 'Your next class will start at 9:00. You can go to it now or go do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  98. act 'Go to your General Education 102 class':
  99. if hour = 8: minut += 60 - minut
  100. if hour = 7: minut += 120 - minut
  101. uni_period['first'] = daystart
  102. gs 'stat'
  103. gt 'uni_lessons2', 'general_education_102'
  104. end
  105. elseif week = 4:
  106. *nl
  107. 'Your next class will start at 9:00. You can go to it now or go do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  108. act 'Go to your Teaching Methods 102 class':
  109. if hour = 8: minut += 60 - minut
  110. if hour = 7: minut += 120 - minut
  111. uni_period['first'] = daystart
  112. gs 'stat'
  113. gt 'uni_lessons2', 'teaching_methods_102'
  114. end
  115. end
  116. end
  117. end
  118. end
  119. if $ARGS[0] = 'uni_period_second':
  120. !!This arg have two functions. If called with gs without any optional argument it will make the options to go to class availeble.
  121. !!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.
  122. if $university['enrolled_in']= 'teaching_studies':
  123. if university['enrolled_in_semester'] = 1:
  124. if $ARGS[1] = 'monday':
  125. $Result = 'Teaching Methods 101 (11:00 to 12:30)'
  126. elseif $ARGS[1] = 'tuesday':
  127. $Result = 'Lerning Theories 101 (11:00 to 12:30)'
  128. elseif $ARGS[1] = 'wednesday':
  129. $Result = 'Teaching Methods 101 (11:00 to 12:30)'
  130. elseif $ARGS[1] = 'thursday':
  131. $Result = 'Lerning Theories 101 (11:00 to 12:30)'
  132. elseif week = 1:
  133. *nl
  134. 'Your next class will start at 11:00. You can go to it now or go do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  135. act 'Go to your Teaching Methods 101 class':
  136. if hour = 10: minut += 60 - minut
  137. uni_period['second'] = daystart
  138. gs 'stat'
  139. gt 'uni_lessons1', 'teaching_methods_101'
  140. end
  141. elseif week = 2:
  142. *nl
  143. 'Your next class will start at 11:00. You can go to it now or go do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  144. act 'Go to your Lerning Theories 101 Class':
  145. if hour = 10: minut += 60 - minut
  146. uni_period['second'] = daystart
  147. gs 'stat'
  148. gt 'uni_lessons1', 'learning_theories_101'
  149. end
  150. elseif week = 3:
  151. *nl
  152. 'Your next class will start at 11:00. You can go to it now or go do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  153. act 'Go to your Teaching Methods 101 class':
  154. if hour = 10: minut += 60 - minut
  155. uni_period['second'] = daystart
  156. gs 'stat'
  157. gt 'uni_lessons1', 'teaching_methods_101'
  158. end
  159. elseif week = 4:
  160. *nl
  161. 'Your next class will start at 11:00. You can go to it now or go do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  162. act 'Go to your Lerning Theories 101 Class':
  163. if hour = 10: minut += 60 - minut
  164. uni_period['second'] = daystart
  165. gs 'stat'
  166. gt 'uni_lessons1', 'learning_theories_101'
  167. end
  168. end
  169. elseif university['enrolled_in_semester'] = 2:
  170. if $ARGS[1] = 'monday':
  171. $Result = 'Teaching Methods 102 (11:00 to 12:30)'
  172. elseif $ARGS[1] = 'tuesday':
  173. $Result = 'Phsychology of a Student 101 (11:00 to 12:30)'
  174. elseif $ARGS[1] = 'wednesday':
  175. $Result = 'Teaching Methods 102 (11:00 to 12:30)'
  176. elseif $ARGS[1] = 'thursday':
  177. $Result = 'Phsychology of a Student 101 (11:00 to 12:30)'
  178. elseif week = 1:
  179. *nl
  180. 'Your next class will start at 11:00. You can go to it now or go 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 Teaching Methods 102 class':
  182. if hour = 10: minut += 60 - minut
  183. uni_period['second'] = daystart
  184. gs 'stat'
  185. gt 'uni_lessons2', 'teaching_methods_102'
  186. end
  187. elseif week = 2:
  188. *nl
  189. 'Your next class will start at 11:00. You can go to it now or go do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  190. act 'Go to your Phsychology of a Student 101 Class':
  191. if hour = 10: minut += 60 - minut
  192. uni_period['second'] = daystart
  193. gs 'stat'
  194. gt 'uni_lessons2', 'psychology_of_a_student_101'
  195. end
  196. elseif week = 3:
  197. *nl
  198. 'Your next class will start at 11:00. You can go to it now or go do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  199. act 'Go to your Teaching Methods 102 class':
  200. if hour = 10: minut += 60 - minut
  201. uni_period['second'] = daystart
  202. gs 'stat'
  203. gt 'uni_lessons2', 'teaching_methods_102'
  204. end
  205. elseif week = 4:
  206. *nl
  207. 'Your next class will start at 11:00. You can go to it now or go do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  208. act 'Go to your Phsychology of a Student 101 Class':
  209. if hour = 10: minut += 60 - minut
  210. uni_period['second'] = daystart
  211. gs 'stat'
  212. gt 'uni_lessons2', 'psychology_of_a_student_101'
  213. end
  214. end
  215. end
  216. end
  217. end
  218. if $ARGS[0] = 'uni_period_third':
  219. !!This arg have two functions. If called with gs without any optional argument it will make the options to go to class availeble.
  220. !!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.
  221. if $university['enrolled_in']= 'teaching_studies':
  222. if university['enrolled_in_semester'] = 1:
  223. if $ARGS[1] = 'monday' and $university['elective1'] ! '':
  224. $Result = '<<$university[''elective1'']>> (13:15 to 14:45)'
  225. elseif $ARGS[1] = 'tuesday' and $university['elective2'] ! '':
  226. $Result = '<<$university[''elective2'']>> (13:15 to 14:45)'
  227. elseif $ARGS[1] = 'wednesday':
  228. $Result = 'Lerning Theories 101 (13:15 to 14:45)'
  229. elseif $ARGS[1] = 'thursday' and $university['elective3'] ! '':
  230. $Result = '<<$university[''elective3'']>> (13:15 to 14:45)'
  231. elseif week = 1 and $university['elective1'] ! '':
  232. !!*nl
  233. !!'Your next class will start at 13:15. You can go to it now or go 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 elective clas 1':
  235. !! if hour = 12: minut += 75 - minut
  236. !! if hour = 13 and minut < 15: minut += 15 - minut
  237. !! uni_period['third'] = daystart
  238. !! gs 'stat'
  239. !!end
  240. elseif week = 2 and $university['elective2'] ! '':
  241. !!*nl
  242. !!'Your next class will start at 13:15'
  243. !!act 'Go to your elective clas 2':
  244. !! if hour = 12: minut += 75 - minut
  245. !! if hour = 13 and minut < 15: minut += 15 - minut
  246. !! uni_period['third'] = daystart
  247. !! gs 'stat'
  248. !!end
  249. elseif week = 3:
  250. *nl
  251. 'Your next class will start at 13:15. You can go to it now or go do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  252. act 'Go to your Lerning Theories 101 Class':
  253. if hour = 12: minut += 75 - minut
  254. if hour = 13 and minut < 15: minut += 15 - minut
  255. uni_period['third'] = daystart
  256. gs 'stat'
  257. gt 'uni_lessons1', 'learning_theories_101'
  258. end
  259. elseif week = 4 and $university['elective3'] ! '':
  260. !!*nl
  261. !!'Your next class will start at 13:15. You can go to it now or go do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  262. !!act 'Go to your elective clas 3':
  263. !! if hour = 12: minut += 75 - minut
  264. !! if hour = 13 and minut < 15: minut += 15 - minut
  265. !! uni_period['third'] = daystart
  266. !! gs 'stat'
  267. !!end
  268. end
  269. elseif university['enrolled_in_semester'] = 2:
  270. if $ARGS[1] = 'monday' and $university['elective1'] ! '':
  271. $Result = '<<$university[''elective1'']>> (13:15 to 14:45)'
  272. elseif $ARGS[1] = 'tuesday' and $university['elective2'] ! '':
  273. $Result = '<<$university[''elective2'']>> (13:15 to 14:45)'
  274. elseif $ARGS[1] = 'wednesday':
  275. $Result = 'Phsychology of a Student 101 (13:15 to 14:45)'
  276. elseif $ARGS[1] = 'thursday' and $university['elective3'] ! '':
  277. $Result = '<<$university[''elective3'']>> (13:15 to 14:45)'
  278. elseif week = 1 and $university['elective1'] ! '':
  279. !!*nl
  280. !!'Your next class will start at 13:15. You can go to it now or go do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  281. !!act 'Go to your elective clas 1':
  282. !! if hour = 12: minut += 75 - minut
  283. !! if hour = 13 and minut < 15: minut += 15 - minut
  284. !! uni_period['third'] = daystart
  285. !! gs 'stat'
  286. !!end
  287. elseif week = 2 and $university['elective2'] ! '':
  288. !!*nl
  289. !!'Your next class will start at 13:15'
  290. !!act 'Go to your elective clas 2':
  291. !! if hour = 12: minut += 75 - minut
  292. !! if hour = 13 and minut < 15: minut += 15 - minut
  293. !! uni_period['third'] = daystart
  294. !! gs 'stat'
  295. !!end
  296. elseif week = 3:
  297. *nl
  298. 'Your next class will start at 13:15. You can go to it now or go do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  299. act 'Go to your Phsychology of a Student 101 Class':
  300. if hour = 12: minut += 75 - minut
  301. if hour = 13 and minut < 15: minut += 15 - minut
  302. uni_period['third'] = daystart
  303. gs 'stat'
  304. gt 'uni_lessons2', 'psychology_of_a_student_101'
  305. end
  306. elseif week = 4 and $university['elective3'] ! '':
  307. !!*nl
  308. !!'Your next class will start at 13:15. You can go to it now or go do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  309. !!act 'Go to your elective clas 3':
  310. !! if hour = 12: minut += 75 - minut
  311. !! if hour = 13 and minut < 15: minut += 15 - minut
  312. !! uni_period['third'] = daystart
  313. !! gs 'stat'
  314. !!end
  315. end
  316. end
  317. end
  318. end
  319. if $ARGS[0] = 'exam':
  320. !!This arg have three functions. If called with gs without any optional argument it will make the options to go to exam availeble.
  321. !!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.
  322. !!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 in the the exam weeks, out side the exam week this is covered of the variabels that tell wether the semeter is passed or not.
  323. if $university['enrolled_in'] = 'teaching_studies':
  324. if university['enrolled_in_semester'] = 1:
  325. if $ARGS[1] = 'schedule':
  326. if university['exam_week'] = 1:
  327. if week < 4 or (week = 4 and hour < 9):
  328. $Result = 'General Education 101 Exam (9:00 to 12:00) Thursday this week. Teaching Methods 101 Exam (9:00 to 12:00) Monday next week. Lerning Theories 101 Exam (9:00 to 12:00) Thursday next week.'
  329. else
  330. $Result = 'Teaching Methods 101 Exam (9:00 to 12:00) Tuesday next week. Learning Theories 101 Exam (9:00 to 12:00) Thursday next week.'
  331. end
  332. elseif university['exam_week'] = 2:
  333. if week < 2 or (week = 2 and hour < 9):
  334. $Result = 'Teaching Methods 101 Exam (9:00 to 12:00) Tuesday this week. Lerning Theories 101 Exam (9:00 to 12:00) Thursday this week.'
  335. elseif week < 4 or (week = 4 and hour < 9):
  336. $Result = 'Learning Theories 101 Exam (9:00 to 12:00) Thursday this week.'
  337. else
  338. $Result = 'All your exams are over. Now it is just waiting to the grade is announced.'
  339. end
  340. end
  341. elseif $ARGS[1] = 'is_over':
  342. if $ARGS[2] = 'general education 101':
  343. if university['exam_week'] = 1 and (week < 4 or (week = 4 and hour < 9)):
  344. Result = 0
  345. else
  346. Result = 1
  347. end
  348. elseif $ARGS[2] = 'teaching methods 101':
  349. if university['exam_week'] = 1 or (university['exam_week'] = 2 and (week < 2 or (week = 2 and hour < 9))):
  350. Result = 0
  351. else
  352. Result = 1
  353. end
  354. elseif $ARGS[2] = 'learning theories 101':
  355. if university['exam_week'] = 1 or (university['exam_week'] = 2 and (week < 4 or (week = 4 and hour < 9))):
  356. Result = 0
  357. else
  358. Result = 1
  359. end
  360. end
  361. elseif university['exam_week'] = 1:
  362. if week = 4:
  363. *nl
  364. 'Your General Education 101 exam will start at 9:00 today. You can go to it now or go do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  365. act 'Go to your General Education 101 exam':
  366. if hour = 8: minut += 60 - minut
  367. if hour = 7: minut += 120 - minut
  368. gs 'stat'
  369. gt 'uni_exams1', 'general_education_101'
  370. end
  371. end
  372. elseif university['exam_week'] = 2:
  373. if week = 2:
  374. *nl
  375. 'Your Teaching Methods 101 exam will start at 9:00. You can go to it now or go do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  376. act 'Go to your Teaching Methods 101 exam':
  377. if hour = 8: minut += 60 - minut
  378. if hour = 7: minut += 120 - minut
  379. gs 'stat'
  380. gt 'uni_exams1', 'teaching_methods_101'
  381. end
  382. elseif week = 4:
  383. *nl
  384. 'Your Lerning Theories 101 exam will start at 9:00. You can go to it now or go do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  385. act 'Go to your Lerning Theories 101 exam':
  386. if hour = 8: minut += 60 - minut
  387. if hour = 7: minut += 120 - minut
  388. gs 'stat'
  389. gt 'uni_exams1', 'learning_theories_101'
  390. end
  391. end
  392. end
  393. elseif university['enrolled_in_semester'] = 2:
  394. if $ARGS[1] = 'schedule':
  395. if university['exam_week'] = 1:
  396. if week < 4 or (week = 4 and hour < 9):
  397. $Result = 'General Education 102 Exam (9:00 to 12:00) Thursday this week. Teaching Methods 102 Exam (9:00 to 12:00) Monday next week. Phsychology of a Student 101 Exam (9:00 to 12:00) Thursday next week.'
  398. else
  399. $Result = 'Teaching Methods 102 Exam (9:00 to 12:00) Tuesday next week. Phsychology of a Student 101 Exam (9:00 to 12:00) Thursday next week.'
  400. end
  401. elseif university['exam_week'] = 2:
  402. if week < 2 or (week = 2 and hour < 9):
  403. $Result = 'Teaching Methods 102 Exam (9:00 to 12:00) Tuesday this week. Phsychology of a Student 101 Exam (9:00 to 12:00) Thursday this week.'
  404. elseif week < 4 or (week = 4 and hour < 9):
  405. $Result = 'Phsychology of a Student 101 Exam (9:00 to 12:00) Thursday this week.'
  406. else
  407. $Result = 'All your exams are over. Now it is just waiting to the grade is announced.'
  408. end
  409. end
  410. elseif $ARGS[1] = 'is_over':
  411. if $ARGS[2] = 'general education 102':
  412. if university['exam_week'] = 1 and (week < 4 or (week = 4 and hour < 9)):
  413. Result = 0
  414. else
  415. Result = 1
  416. end
  417. elseif $ARGS[2] = 'teaching methods 102':
  418. if university['exam_week'] = 1 or (university['exam_week'] = 2 and (week < 2 or (week = 2 and hour < 9))):
  419. Result = 0
  420. else
  421. Result = 1
  422. end
  423. elseif $ARGS[2] = 'Phsychology of a Student 101':
  424. if university['exam_week'] = 1 or (university['exam_week'] = 2 and (week < 4 or (week = 4 and hour < 9))):
  425. Result = 0
  426. else
  427. Result = 1
  428. end
  429. end
  430. elseif university['exam_week'] = 1:
  431. if week = 4:
  432. *nl
  433. 'Your General Education 102 exam will start at 9:00 today. You can go to it now or go do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  434. act 'Go to your General Education 102 exam':
  435. if hour = 8: minut += 60 - minut
  436. if hour = 7: minut += 120 - minut
  437. gs 'stat'
  438. gt 'uni_exams2', 'general_education_102'
  439. end
  440. end
  441. elseif university['exam_week'] = 2:
  442. if week = 2:
  443. *nl
  444. 'Your Teaching Methods 102 exam will start at 9:00. You can go to it now or go do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  445. act 'Go to your Teaching Methods exam 102':
  446. if hour = 8: minut += 60 - minut
  447. if hour = 7: minut += 120 - minut
  448. gs 'stat'
  449. gt 'uni_exams2', 'teaching_methods_102'
  450. end
  451. elseif week = 4:
  452. *nl
  453. 'Your Lerning Theories exam will start at 9:00. You can go to it now or go do other things first, but you need to be at the university plaza before it starts if you want to attend it.'
  454. act 'Go to your Phsychology of a Student 101 exam':
  455. if hour = 8: minut += 60 - minut
  456. if hour = 7: minut += 120 - minut
  457. gs 'stat'
  458. gt 'uni_exams2', 'phsychology_of_a_student_101'
  459. end
  460. end
  461. end
  462. end
  463. end
  464. end
  465. --- uni_programs ---------------------------------