SgrupDisco.qsrc 1.7 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465
  1. # SgrupDisco
  2. *clr & cla
  3. gs 'themes', 'food_menu'
  4. gs 'stat'
  5. act 'Move away':gt $loc, $metka
  6. '<center><b><font color="maroon">Disco</font></b></center>'
  7. gs 'gschool_lessons', 'npc_data'
  8. !! First string for popular kids
  9. $textgrup = ''
  10. count1 = 0
  11. i = 1
  12. '<center><table cellspacing="3">'
  13. :gruploop
  14. if count1 = 6 : $textgrup += '<tr>'
  15. if grupTipe[i] = 1 and discoenable[i] = 1:
  16. count1 += 1
  17. $textgrup += '' + '<td bgcolor=<<$bcolor2>> align="center"><img height="100" src="images/pc/npc_headshots/<<i>>.jpg"><br>' + $npcGo[i]
  18. end
  19. if count1< 6 and grupTipe[i] = 1:
  20. $textgrup += '</td>'
  21. elseif count1 = 6 and grupTipe[i] = 1:
  22. $textgrup +='</td></tr><tr>' & count1 = 0
  23. end
  24. i += 1
  25. if i <= maxnpcs:jump 'gruploop'
  26. !! Force new line for gopniks
  27. $textgrup +='</td></tr><tr>'
  28. !! Second string for gopniks
  29. $textgrup2 = ''
  30. count1 = 0
  31. i = 1
  32. '<center><table cellspacing="3">'
  33. :gruploop2
  34. if count1 = 6 : $textgrup2 += '<tr>'
  35. if grupTipe[i] = 4 and discoenable[i] = 1:
  36. count1 += 1
  37. $textgrup2 += '' + '<td bgcolor=<<$bcolor2>> align="center"><img height="100" src="images/pc/npc_headshots/<<i>>.jpg"><br>' + $npcGo[i]
  38. end
  39. if count1< 6 and grupTipe[i] = 4:
  40. $textgrup2 += '</td>'
  41. elseif count1 = 6 and grupTipe[i] = 4:
  42. $textgrup2 +='</td></tr><tr>' & count1 = 0
  43. end
  44. i += 1
  45. if i <= maxnpcs:jump 'gruploop2'
  46. '<<$textgrup>>'
  47. *nl
  48. '<<$textgrup2>>'
  49. '<center>Most the cool kids are dancing, while the gopnics are standing in the corner of the room, keeping to themselves.</center>'
  50. if hour >= 21 and hour < 23 and week=5: '<center>At the entrance of the disco hall stands <a href="exec:gt ''VolleyTrenerSpeak''">Coach Mikhail Nikolayevich</a></center>'
  51. '</table><center>'
  52. --- SgrupDisco ---------------------------------