# SgrupDisco
!{ Change log
March 25, 2016
Fixed coach''s name
}
gs 'stat'
$textgrup = ''
$textgrup2 = ''
i = 0
:markgruploop
i += 1

if grupTipe[i] = 1:$textgrup += '
' + $npcGo[i]

if grupTipe[i] = 4:$textgrup2 += '
' + $npcGo[i]

if i < 47:jump 'markgruploop'

'Dancing on the dance floor <<$textgrup>>'
''
'In one corner stand <<$textgrup2>>'

if hour >= 21 and hour < 23 and week=5: 'At the entrance stands <a href="exec:GT ''VolleyTrenerSpeak''">Coach Mikhail Nikolayevich</a>'

act 'Move away':gt $loc, $metka

--- SgrupDisco ---------------------------------

