1
0

pav_disco_classmates.qsrc 9.4 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344
  1. # pav_disco_classmates
  2. !2021/05/02
  3. if $ARGS[0] = 'classmates':
  4. if hour < 20: gt 'pav_disco'
  5. *clr & cla
  6. $loc_arg = ''
  7. $loc = 'pav_disco'
  8. $location_type = 'public_indoors'
  9. $menu_loc = 'pav_disco_coolkids'
  10. $menu_arg = 'classmates'
  11. if music_on = 1:
  12. $track_loop = 'sound/komb.mp3'
  13. volume = 80
  14. music_loop = 1
  15. pl '<a href="exec: music_on = 0 & gt $loc">Turn off the music</a>'
  16. else
  17. music_loop = 0
  18. close all
  19. pl '<a href="exec: music_on = 1 & gt $loc">Play music</a>'
  20. end
  21. menu_off = 1
  22. gs 'themes', 'food_menu'
  23. if atdisco['day'] ! daystart or atdisco['hour'] ! hour:
  24. atdisco['day'] = daystart
  25. atdisco['hour'] = hour
  26. gs 'pav_disco_classmates', 'atdisco'
  27. end
  28. '<center><b><font color="maroon">Disco</font></b></center>'
  29. '<center><table><tr><td colspan = 8>Most of the cool kids and jocks are gathered around some tables and couches near the dance floor while the others dance. Some of the other students are hanging around near them or are out dancing.</td></tr>'
  30. i = 1
  31. i2 = 0
  32. :discopop_loop
  33. if (npc_grupTipe['A<<i>>'] = 1 or $npc_nickname['A<<i>>'] = 'Natasha') and discoenable['A<<i>>'] = 1 and discobloc['A<<i>>'] ! daystart:
  34. if i2 = 0: '<tr>'
  35. i2 += 1
  36. '<td width =12.5%><table bgcolor=#FFF8DC><tr><td align=center><a href="exec: i = <<i>> & gt ''pav_disco_classmates'', ''cool_list''"><img height="100" src="images/characters/shared/headshots_main/<<i>>.jpg"></a></td></tr><tr><td align=center><<$npc_firstname[''A<<i>>'']>></td></tr></table></td>'
  37. if i2 mod 8 = 0: i2 = 0 & '</tr>'
  38. end
  39. i += 1
  40. if i <= aarraynumber:jump 'discopop_loop'
  41. i = 1
  42. :discojock_loop
  43. if npc_grupTipe['A<<i>>'] = 2 and discoenable['A<<i>>'] = 1 and discobloc['A<<i>>'] ! daystart:
  44. if i2 = 0: '<tr>'
  45. i2 += 1
  46. '<td width =12.5%><table bgcolor=#FFF8DC><tr><td align=center><a href="exec: i = <<i>> & gt ''pav_disco_classmates'', ''jocks_list''"><img height="100" src="images/characters/shared/headshots_main/<<i>>.jpg"></a></td></tr><tr><td align=center><<$npc_firstname[''A<<i>>'']>></td></tr></table></td>'
  47. if i2 mod 8 = 0: i2 = 0 & '</tr>'
  48. end
  49. i += 1
  50. if i <= aarraynumber:jump 'discojock_loop'
  51. if i2 mod 8 <> 0:
  52. :disco_loopi21
  53. i2 += 1
  54. '<td></td>'
  55. if i2 mod 8 = 0:
  56. i2 = 0
  57. '</tr>'
  58. else
  59. jump 'disco_loopi21'
  60. end
  61. end
  62. '<tr><td colspan=8>The gopniks are lounging in the darkest corner of the hall. They''re mostly keeping to themselves, but a few of them are out dancing.</td></tr>'
  63. i = 1
  64. :discogop_loop
  65. if npc_grupTipe['A<<i>>'] = 4 and discoenable['A<<i>>'] = 1 and discobloc['A<<i>>'] ! daystart:
  66. $loopname = $npc_nickname['A<<i>>']
  67. $loopname = $lcase($loopname)
  68. if i2 = 0: '<tr>'
  69. i2 += 1
  70. '<td width =12.5%><table bgcolor=#FFF8DC><tr><td align=center><a href="exec: i = <<i>> & gt ''pav_disco_classmates'', ''gop_list''"><img height="100" src="images/characters/shared/headshots_main/<<i>>.jpg"></a></td></tr><tr><td align=center><<$npc_firstname[''A<<i>>'']>></td></tr></table></td>'
  71. if i2 mod 8 = 0: i2 = 0 & '</tr>'
  72. end
  73. if i = 144:
  74. if i2 mod 8 <> 0:
  75. :disco_loopi22
  76. i2 += 1
  77. '<td></td>'
  78. if i2 mod 8 = 0:
  79. i2 = 0
  80. '</tr>'
  81. else
  82. jump 'disco_loopi22'
  83. end
  84. end
  85. end
  86. i += 1
  87. if i <= aarraynumber:jump 'discogop_loop'
  88. if i2 mod 8 <> 0:
  89. :disco_loopi23
  90. i2 += 1
  91. '<td></td>'
  92. if i2 mod 8 = 0:
  93. i2 = 0
  94. '</tr>'
  95. else
  96. jump 'disco_loopi23'
  97. end
  98. end
  99. if soniaPS > 0 and discoenable['A25'] = 1 and discobloc['A25'] ! daystart:
  100. '<tr><td><table bgcolor=#FFF8DC><tr><td align=center><a href="exec:gt ''pav_disco_coolkids'', ''sonia_outcast'' "><img height="100" src="images/characters/shared/headshots_main/25.jpg"></a></td></tr><tr><td align=center><<$npc_firstname[''A25'']>></td></tr></table></td><td colspan=7></td></tr>'
  101. end
  102. if hour >= 21 and hour < 23 and week=5:
  103. '<tr><td bgcolor=#FFF8DC align=left width=12.5%><a href="exec: gt ''VolleyTrenerSpeak''"><img height="100" src="images/characters/shared/headshots_main/69.jpg"></a></td><td valign=bottom align=left bgcolor=white colspan=7>Coach Mikhail Nikolayevich stands at the enterance of the hall.</td></tr>'
  104. end
  105. '</table></center>'
  106. *nl
  107. !!display of their headshots in a table like the above $args has.
  108. !!if you click the head shot it goes to there args for the disco to interact with them.
  109. !!also a more advanced version of the above, can we not only give them a chance to be present, but split the images in two. One them sitting around and one of the ones dancing? SO something like this.
  110. !! 'Most the cool kids and a few of the jocks are mostly gathered around some tables and couches near the dance floor.'
  111. !!display of their headshots in a table like the above $args has of those sitting around
  112. !! 'While several of the cool kids and jocks are out on the dance floor dancing.'
  113. !!display of their headshots in a table like the above $args has of those dancing
  114. !! 'Gopniks are lounging in the darkest corner of the room, mostly keeping to themselves.'
  115. !!display of their headshots in a table like the above $args has of those sitting around
  116. !! 'While a few of the gopniks are out on the dance floor dancing.'
  117. !!display of their headshots in a table like the above $args has of those dancing
  118. !! 'Occasionally you see some of your other classmates here'
  119. !!Natasha and Sonia_outcast are the only ones that can show up here
  120. act 'Move away': gt $loc, $loc_arg
  121. end
  122. if $ARGS[0] = 'jocks_list':
  123. $listname = $npc_nickname['A<<i>>']
  124. $listname = $lcase($listname)
  125. gt 'pav_disco_jocks', $listname
  126. end
  127. if $ARGS[0] = 'cool_list':
  128. $listname = $npc_nickname['A<<i>>']
  129. $listname = $lcase($listname)
  130. gt 'pav_disco_coolkids', $listname
  131. end
  132. if $ARGS[0] = 'gop_list':
  133. $listname = $npc_nickname['A<<i>>']
  134. $listname = $lcase($listname)
  135. gt 'pav_disco_gopniks', $listname
  136. end
  137. if $ARGS[0] = 'atdisco':
  138. !!Dimka
  139. if igor_DimaNos_day = daystart:
  140. discoenable['A1'] = 0
  141. else
  142. gs 'pav_disco_classmates', 'atdisco10', 1
  143. end
  144. !!Igor
  145. if igor_DimaNos_day = daystart:
  146. discoenable['A4'] = 0
  147. else
  148. gs 'pav_disco_classmates', 'atdisco10', 4
  149. end
  150. !!Mefodiy
  151. gs 'pav_disco_classmates', 'atdisco4', 148
  152. !!Marcus
  153. gs 'pav_disco_classmates', 'atdisco10', 146
  154. !!Andrey
  155. gs 'pav_disco_classmates', 'atdisco10', 147
  156. !!Katja
  157. gs 'pav_disco_classmates', 'atdisco10', 14
  158. !!Viktoriya
  159. gs 'pav_disco_classmates', 'atdisco10', 15
  160. !!Irina
  161. gs 'pav_disco_classmates', 'atdisco10', 17
  162. !!Bella
  163. gs 'pav_disco_classmates', 'atdisco10', 22
  164. !!Lizaveta
  165. gs 'pav_disco_classmates', 'atdisco10', 140
  166. !!Stasya
  167. if discoenable['A147'] = 1: discoenable['A139'] = 1
  168. !!Sonia
  169. if soniaPS > 0:
  170. gs 'pav_disco_classmates', 'atdisco4i', 25
  171. else
  172. gs 'pav_disco_classmates', 'atdisco10', 25
  173. end
  174. !!Lazar
  175. if week = 5:
  176. gs 'pav_disco_classmates', 'atdisco3i', 149
  177. else
  178. gs 'pav_disco_classmates', 'atdisco10', 149
  179. end
  180. !!Fedor
  181. if week = 5:
  182. gs 'pav_disco_classmates', 'atdisco3i', 5
  183. else
  184. gs 'pav_disco_classmates', 'atdisco4', 5
  185. end
  186. !!Svyatoslav
  187. if week = 5:
  188. gs 'pav_disco_classmates', 'atdisco3i', 8
  189. else
  190. gs 'pav_disco_classmates', 'atdisco10', 8
  191. end
  192. !!Vanya
  193. gs 'pav_disco_classmates', 'atdisco4', 165
  194. !!Lariska
  195. if week = 5:
  196. gs 'pav_disco_classmates', 'atdisco3i', 13
  197. else
  198. gs 'pav_disco_classmates', 'atdisco4', 13
  199. end
  200. !!Albina
  201. if week = 5:
  202. gs 'pav_disco_classmates', 'atdisco5i', 23
  203. else
  204. gs 'pav_disco_classmates', 'atdisco4i', 23
  205. end
  206. !!Christina
  207. if week = 5:
  208. gs 'pav_disco_classmates', 'atdisco3i', 18
  209. else
  210. gs 'pav_disco_classmates', 'atdisco4', 18
  211. end
  212. !!Lina
  213. if week = 5:
  214. gs 'pav_disco_classmates', 'atdisco3i', 19
  215. else
  216. gs 'pav_disco_classmates', 'atdisco4', 19
  217. end
  218. !!Ivan
  219. if week = 5:
  220. discoenable['A3'] = 0
  221. else
  222. gs 'pav_disco_classmates', 'atdisco10i', 3
  223. end
  224. !!Erast
  225. if week = 5:
  226. discoenable['A150'] = 0
  227. else
  228. gs 'pav_disco_classmates', 'atdisco5i', 150
  229. end
  230. !!Natasha
  231. gs 'pav_disco_classmates', 'atdisco3i', 16
  232. !!Vitek
  233. gs 'pav_disco_classmates', 'atdisco10', 9
  234. !!Dan
  235. if discoenable['A9'] = 1: discoenable['A10'] = 1
  236. !!Vasily
  237. if discoenable['A9'] = 1: discoenable['A11'] = 1
  238. !!Roman
  239. gs 'pav_disco_classmates', 'atdisco4', 157
  240. !!Radomir
  241. gs 'pav_disco_classmates', 'atdisco4', 154
  242. !!Valentin
  243. gs 'pav_disco_classmates', 'atdisco4', 158
  244. !!Arkadi
  245. gs 'pav_disco_classmates', 'atdisco4', 156
  246. !!Nikolai
  247. gs 'pav_disco_classmates', 'atdisco4', 185
  248. !!Lavrenti
  249. gs 'pav_disco_classmates', 'atdisco10', 155
  250. !!Lena
  251. gs 'pav_disco_classmates', 'atdisco4', 20
  252. !!Lera
  253. if discoenable['A20'] = 1: discoenable['A21'] = 1
  254. !!Pauline
  255. gs 'pav_disco_classmates', 'atdisco4', 24
  256. !!Anushka
  257. gs 'pav_disco_classmates', 'atdisco4', 144
  258. !!Alyona
  259. gs 'pav_disco_classmates', 'atdisco2', 143
  260. !!Ronnie
  261. discoenable['A141'] = 0
  262. !!Katyusha
  263. discoenable['A145'] = 0
  264. end
  265. if $ARGS[0] = 'atdisco2':
  266. i = args[1]
  267. if rand(1,2) ! 2:
  268. discoenable['A<<i>>'] = 1
  269. else
  270. discoenable['A<<i>>'] = 0
  271. end
  272. end
  273. if $ARGS[0] = 'atdisco3i':
  274. i = args[1]
  275. if rand(1,3) = 1:
  276. discoenable['A<<i>>'] = 1
  277. else
  278. discoenable['A<<i>>'] = 0
  279. end
  280. end
  281. if $ARGS[0] = 'atdisco4':
  282. i = args[1]
  283. if rand(1,4) ! 4:
  284. discoenable['A<<i>>'] = 1
  285. else
  286. discoenable['A<<i>>'] = 0
  287. end
  288. end
  289. if $ARGS[0] = 'atdisco4i':
  290. i = args[1]
  291. if rand(1,4) = 1:
  292. discoenable['A<<i>>'] = 1
  293. else
  294. discoenable['A<<i>>'] = 0
  295. end
  296. end
  297. if $ARGS[0] = 'atdisco5i':
  298. i = args[1]
  299. if rand(1,5) = 1:
  300. discoenable['A<<i>>'] = 1
  301. else
  302. discoenable['A<<i>>'] = 0
  303. end
  304. end
  305. if $ARGS[0] = 'atdisco10':
  306. i = args[1]
  307. if rand(1,10) ! 10:
  308. discoenable['A<<i>>'] = 1
  309. else
  310. discoenable['A<<i>>'] = 0
  311. end
  312. end
  313. if $ARGS[0] = 'atdisco10i':
  314. i = args[1]
  315. if rand(1,10) = 1:
  316. discoenable['A<<i>>'] = 1
  317. else
  318. discoenable['A<<i>>'] = 0
  319. end
  320. end
  321. --- pav_disco_classmates ---------------------------------