123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477 |
- # uni_programs
- !!This is the file containing the variabels and actions for handeling the different program the player can attend at the university.
- !!The follwoing vaiables are improtat.
- !! university['student'] is set to 1 in the player is enrolled in a university program.
- !! $university['enrolled_in'] is the name of the university program the player is enrolled in, there is the following progams: teaching_studies
- !! 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.
- if $ARGS[0] = 'program_name':
- if $university['enrolled_in']= 'teaching_studies':
- $RESULT = 'teaching studies'
- end
- end
- if $ARGS[0] = 'uni_period_first':
- !!This arg have two functions. If called with gs without any optional argument it will make the cations to go to class availeble.
- !!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.
- if $university['enrolled_in'] = 'teaching_studies':
- if university['enrolled_in_semester'] = 1:
- if $ARGS[1] = 'monday':
- $Result = 'General Education 101 (9:00 to 10:30)'
- elseif $ARGS[1] = 'tuesday':
- $Result = 'General Education 101 (9:00 to 10:30)'
- elseif $ARGS[1] = 'wednesday':
- $Result = 'General Education 101 (9:00 to 10:30)'
- elseif $ARGS[1] = 'thursday':
- $Result = 'Teaching Methods 101 (9:00 to 10:30)'
- elseif week = 1:
- *nl
- '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.'
- act 'Go to your General Education 101 class':
- if hour = 8: minut += 60 - minut
- if hour = 7: minut += 120 - minut
- uni_period['first'] = daystart
- gs 'stat'
- gt 'uni_lessons1', 'general_education_101'
- end
- elseif week = 2:
- *nl
- '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.'
- act 'Go to your General Education 101 class':
- if hour = 8: minut += 60 - minut
- if hour = 7: minut += 120 - minut
- uni_period['first'] = daystart
- gs 'stat'
- gt 'uni_lessons1', 'general_education_101'
- end
- elseif week = 3:
- *nl
- '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.'
- act 'Go to your General Education 101 class':
- if hour = 8: minut += 60 - minut
- if hour = 7: minut += 120 - minut
- uni_period['first'] = daystart
- gs 'stat'
- gt 'uni_lessons1', 'general_education_101'
- end
- elseif week = 4:
- *nl
- '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.'
- act 'Go to your Teaching Methods 101 class':
- if hour = 8: minut += 60 - minut
- if hour = 7: minut += 120 - minut
- uni_period['first'] = daystart
- gs 'stat'
- gt 'uni_lessons1', 'teaching_methods_101'
- end
- end
- elseif university['enrolled_in_semester'] = 2:
- if $ARGS[1] = 'monday':
- $Result = 'General Education 102 (9:00 to 10:30)'
- elseif $ARGS[1] = 'tuesday':
- $Result = 'General Education 102 (9:00 to 10:30)'
- elseif $ARGS[1] = 'wednesday':
- $Result = 'General Education 102 (9:00 to 10:30)'
- elseif $ARGS[1] = 'thursday':
- $Result = 'Teaching Methods 102 (9:00 to 10:30)'
- elseif week = 1:
- *nl
- '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.'
- act 'Go to your General Education 102 class':
- if hour = 8: minut += 60 - minut
- if hour = 7: minut += 120 - minut
- uni_period['first'] = daystart
- gs 'stat'
- gt 'uni_lessons2', 'general_education_102'
- end
- elseif week = 2:
- *nl
- '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.'
- act 'Go to your General Education 102 class':
- if hour = 8: minut += 60 - minut
- if hour = 7: minut += 120 - minut
- uni_period['first'] = daystart
- gs 'stat'
- gt 'uni_lessons2', 'general_education_102'
- end
- elseif week = 3:
- *nl
- '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.'
- act 'Go to your General Education 102 class':
- if hour = 8: minut += 60 - minut
- if hour = 7: minut += 120 - minut
- uni_period['first'] = daystart
- gs 'stat'
- gt 'uni_lessons2', 'general_education_102'
- end
- elseif week = 4:
- *nl
- '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.'
- act 'Go to your Teaching Methods 102 class':
- if hour = 8: minut += 60 - minut
- if hour = 7: minut += 120 - minut
- uni_period['first'] = daystart
- gs 'stat'
- gt 'uni_lessons2', 'teaching_methods_102'
- end
- end
- end
- end
- end
- if $ARGS[0] = 'uni_period_second':
- !!This arg have two functions. If called with gs without any optional argument it will make the options to go to class availeble.
- !!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.
- if $university['enrolled_in']= 'teaching_studies':
- if university['enrolled_in_semester'] = 1:
- if $ARGS[1] = 'monday':
- $Result = 'Teaching Methods 101 (11:00 to 12:30)'
- elseif $ARGS[1] = 'tuesday':
- $Result = 'Lerning Theories 101 (11:00 to 12:30)'
- elseif $ARGS[1] = 'wednesday':
- $Result = 'Teaching Methods 101 (11:00 to 12:30)'
- elseif $ARGS[1] = 'thursday':
- $Result = 'Lerning Theories 101 (11:00 to 12:30)'
- elseif week = 1:
- *nl
- '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.'
- act 'Go to your Teaching Methods 101 class':
- if hour = 10: minut += 60 - minut
- uni_period['second'] = daystart
- gs 'stat'
- gt 'uni_lessons1', 'teaching_methods_101'
- end
- elseif week = 2:
- *nl
- '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.'
- act 'Go to your Lerning Theories 101 Class':
- if hour = 10: minut += 60 - minut
- uni_period['second'] = daystart
- gs 'stat'
- gt 'uni_lessons1', 'learning_theories_101'
- end
- elseif week = 3:
- *nl
- '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.'
- act 'Go to your Teaching Methods 101 class':
- if hour = 10: minut += 60 - minut
- uni_period['second'] = daystart
- gs 'stat'
- gt 'uni_lessons1', 'teaching_methods_101'
- end
- elseif week = 4:
- *nl
- '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.'
- act 'Go to your Lerning Theories 101 Class':
- if hour = 10: minut += 60 - minut
- uni_period['second'] = daystart
- gs 'stat'
- gt 'uni_lessons1', 'learning_theories_101'
- end
- end
- elseif university['enrolled_in_semester'] = 2:
- if $ARGS[1] = 'monday':
- $Result = 'Teaching Methods 102 (11:00 to 12:30)'
- elseif $ARGS[1] = 'tuesday':
- $Result = 'Phsychology of a Student 101 (11:00 to 12:30)'
- elseif $ARGS[1] = 'wednesday':
- $Result = 'Teaching Methods 102 (11:00 to 12:30)'
- elseif $ARGS[1] = 'thursday':
- $Result = 'Phsychology of a Student 101 (11:00 to 12:30)'
- elseif week = 1:
- *nl
- '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.'
- act 'Go to your Teaching Methods 102 class':
- if hour = 10: minut += 60 - minut
- uni_period['second'] = daystart
- gs 'stat'
- gt 'uni_lessons2', 'teaching_methods_102'
- end
- elseif week = 2:
- *nl
- '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.'
- act 'Go to your Phsychology of a Student 101 Class':
- if hour = 10: minut += 60 - minut
- uni_period['second'] = daystart
- gs 'stat'
- gt 'uni_lessons2', 'psychology_of_a_student_101'
- end
- elseif week = 3:
- *nl
- '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.'
- act 'Go to your Teaching Methods 102 class':
- if hour = 10: minut += 60 - minut
- uni_period['second'] = daystart
- gs 'stat'
- gt 'uni_lessons2', 'teaching_methods_102'
- end
- elseif week = 4:
- *nl
- '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.'
- act 'Go to your Phsychology of a Student 101 Class':
- if hour = 10: minut += 60 - minut
- uni_period['second'] = daystart
- gs 'stat'
- gt 'uni_lessons2', 'psychology_of_a_student_101'
- end
- end
- end
- end
- end
- if $ARGS[0] = 'uni_period_third':
- !!This arg have two functions. If called with gs without any optional argument it will make the options to go to class availeble.
- !!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.
- if $university['enrolled_in']= 'teaching_studies':
- if university['enrolled_in_semester'] = 1:
- if $ARGS[1] = 'monday' and $university['elective1'] ! '':
- $Result = '<<$university[''elective1'']>> (13:15 to 14:45)'
- elseif $ARGS[1] = 'tuesday' and $university['elective2'] ! '':
- $Result = '<<$university[''elective2'']>> (13:15 to 14:45)'
- elseif $ARGS[1] = 'wednesday':
- $Result = 'Lerning Theories 101 (13:15 to 14:45)'
- elseif $ARGS[1] = 'thursday' and $university['elective3'] ! '':
- $Result = '<<$university[''elective3'']>> (13:15 to 14:45)'
- elseif week = 1 and $university['elective1'] ! '':
- !!*nl
- !!'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.'
- !!act 'Go to your elective clas 1':
- !! if hour = 12: minut += 75 - minut
- !! if hour = 13 and minut < 15: minut += 15 - minut
- !! uni_period['third'] = daystart
- !! gs 'stat'
- !!end
- elseif week = 2 and $university['elective2'] ! '':
- !!*nl
- !!'Your next class will start at 13:15'
- !!act 'Go to your elective clas 2':
- !! if hour = 12: minut += 75 - minut
- !! if hour = 13 and minut < 15: minut += 15 - minut
- !! uni_period['third'] = daystart
- !! gs 'stat'
- !!end
- elseif week = 3:
- *nl
- '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.'
- act 'Go to your Lerning Theories 101 Class':
- if hour = 12: minut += 75 - minut
- if hour = 13 and minut < 15: minut += 15 - minut
- uni_period['third'] = daystart
- gs 'stat'
- gt 'uni_lessons1', 'learning_theories_101'
- end
- elseif week = 4 and $university['elective3'] ! '':
- !!*nl
- !!'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.'
- !!act 'Go to your elective clas 3':
- !! if hour = 12: minut += 75 - minut
- !! if hour = 13 and minut < 15: minut += 15 - minut
- !! uni_period['third'] = daystart
- !! gs 'stat'
- !!end
- end
- elseif university['enrolled_in_semester'] = 2:
- if $ARGS[1] = 'monday' and $university['elective1'] ! '':
- $Result = '<<$university[''elective1'']>> (13:15 to 14:45)'
- elseif $ARGS[1] = 'tuesday' and $university['elective2'] ! '':
- $Result = '<<$university[''elective2'']>> (13:15 to 14:45)'
- elseif $ARGS[1] = 'wednesday':
- $Result = 'Phsychology of a Student 101 (13:15 to 14:45)'
- elseif $ARGS[1] = 'thursday' and $university['elective3'] ! '':
- $Result = '<<$university[''elective3'']>> (13:15 to 14:45)'
- elseif week = 1 and $university['elective1'] ! '':
- !!*nl
- !!'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.'
- !!act 'Go to your elective clas 1':
- !! if hour = 12: minut += 75 - minut
- !! if hour = 13 and minut < 15: minut += 15 - minut
- !! uni_period['third'] = daystart
- !! gs 'stat'
- !!end
- elseif week = 2 and $university['elective2'] ! '':
- !!*nl
- !!'Your next class will start at 13:15'
- !!act 'Go to your elective clas 2':
- !! if hour = 12: minut += 75 - minut
- !! if hour = 13 and minut < 15: minut += 15 - minut
- !! uni_period['third'] = daystart
- !! gs 'stat'
- !!end
- elseif week = 3:
- *nl
- '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.'
- act 'Go to your Phsychology of a Student 101 Class':
- if hour = 12: minut += 75 - minut
- if hour = 13 and minut < 15: minut += 15 - minut
- uni_period['third'] = daystart
- gs 'stat'
- gt 'uni_lessons2', 'psychology_of_a_student_101'
- end
- elseif week = 4 and $university['elective3'] ! '':
- !!*nl
- !!'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.'
- !!act 'Go to your elective clas 3':
- !! if hour = 12: minut += 75 - minut
- !! if hour = 13 and minut < 15: minut += 15 - minut
- !! uni_period['third'] = daystart
- !! gs 'stat'
- !!end
- end
- end
- end
- end
- if $ARGS[0] = 'exam':
- !!This arg have three functions. If called with gs without any optional argument it will make the options to go to exam availeble.
- !!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.
- !!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.
- if $university['enrolled_in'] = 'teaching_studies':
- if university['enrolled_in_semester'] = 1:
- if $ARGS[1] = 'schedule':
- if university['exam_week'] = 1:
- if week < 4 or (week = 4 and hour < 9):
- $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.'
- else
- $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.'
- end
- elseif university['exam_week'] = 2:
- if week < 2 or (week = 2 and hour < 9):
- $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.'
- elseif week < 4 or (week = 4 and hour < 9):
- $Result = 'Learning Theories 101 Exam (9:00 to 12:00) Thursday this week.'
- else
- $Result = 'All your exams are over. Now it is just waiting to the grade is announced.'
- end
- end
- elseif $ARGS[1] = 'is_over':
- if $ARGS[2] = 'general education 101':
- if university['exam_week'] = 1 and (week < 4 or (week = 4 and hour < 9)):
- Result = 0
- else
- Result = 1
- end
- elseif $ARGS[2] = 'teaching methods 101':
- if university['exam_week'] = 1 or (university['exam_week'] = 2 and (week < 2 or (week = 2 and hour < 9))):
- Result = 0
- else
- Result = 1
- end
- elseif $ARGS[2] = 'learning theories 101':
- if university['exam_week'] = 1 or (university['exam_week'] = 2 and (week < 4 or (week = 4 and hour < 9))):
- Result = 0
- else
- Result = 1
- end
- end
- elseif university['exam_week'] = 1:
- if week = 4:
- *nl
- '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.'
- act 'Go to your General Education 101 exam':
- if hour = 8: minut += 60 - minut
- if hour = 7: minut += 120 - minut
- gs 'stat'
- gt 'uni_exams1', 'general_education_101'
- end
- end
- elseif university['exam_week'] = 2:
- if week = 2:
- *nl
- '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.'
- act 'Go to your Teaching Methods 101 exam':
- if hour = 8: minut += 60 - minut
- if hour = 7: minut += 120 - minut
- gs 'stat'
- gt 'uni_exams1', 'teaching_methods_101'
- end
- elseif week = 4:
- *nl
- '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.'
- act 'Go to your Lerning Theories 101 exam':
- if hour = 8: minut += 60 - minut
- if hour = 7: minut += 120 - minut
- gs 'stat'
- gt 'uni_exams1', 'learning_theories_101'
- end
- end
- end
- elseif university['enrolled_in_semester'] = 2:
- if $ARGS[1] = 'schedule':
- if university['exam_week'] = 1:
- if week < 4 or (week = 4 and hour < 9):
- $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.'
- else
- $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.'
- end
- elseif university['exam_week'] = 2:
- if week < 2 or (week = 2 and hour < 9):
- $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.'
- elseif week < 4 or (week = 4 and hour < 9):
- $Result = 'Phsychology of a Student 101 Exam (9:00 to 12:00) Thursday this week.'
- else
- $Result = 'All your exams are over. Now it is just waiting to the grade is announced.'
- end
- end
- elseif $ARGS[1] = 'is_over':
- if $ARGS[2] = 'general education 102':
- if university['exam_week'] = 1 and (week < 4 or (week = 4 and hour < 9)):
- Result = 0
- else
- Result = 1
- end
- elseif $ARGS[2] = 'teaching methods 102':
- if university['exam_week'] = 1 or (university['exam_week'] = 2 and (week < 2 or (week = 2 and hour < 9))):
- Result = 0
- else
- Result = 1
- end
- elseif $ARGS[2] = 'Phsychology of a Student 101':
- if university['exam_week'] = 1 or (university['exam_week'] = 2 and (week < 4 or (week = 4 and hour < 9))):
- Result = 0
- else
- Result = 1
- end
- end
- elseif university['exam_week'] = 1:
- if week = 4:
- *nl
- '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.'
- act 'Go to your General Education 102 exam':
- if hour = 8: minut += 60 - minut
- if hour = 7: minut += 120 - minut
- gs 'stat'
- gt 'uni_exams2', 'general_education_102'
- end
- end
- elseif university['exam_week'] = 2:
- if week = 2:
- *nl
- '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.'
- act 'Go to your Teaching Methods exam 102':
- if hour = 8: minut += 60 - minut
- if hour = 7: minut += 120 - minut
- gs 'stat'
- gt 'uni_exams2', 'teaching_methods_102'
- end
- elseif week = 4:
- *nl
- '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.'
- act 'Go to your Phsychology of a Student 101 exam':
- if hour = 8: minut += 60 - minut
- if hour = 7: minut += 120 - minut
- gs 'stat'
- gt 'uni_exams2', 'phsychology_of_a_student_101'
- end
- end
- end
- end
- end
- end
- --- uni_programs ---------------------------------
|