Eydis
Neuankömmling
Ich bräuchte immernoch Hilfe bei diesem Skript, da die Lieder, die abgespielt werden, per Zufall ausgesucht werden, und nicht die sind, die eigentlich durch das Skript gespielt werden sollten.
Was müsste ich bei dem Skript ändern, damit die ausgewählten Lieder abgespielt werden?
Liebe Grüße,
Eydis
Code:
Scn AAAMusikWürfelScript
Short Choosing
short button
Begin onActivate player
if Choosing == 0
set Choosing to -1
endif
end
Begin onEquip player
if Choosing == 0
set Choosing to -1
endif
end
Begin gameMode
If (Choosing == -1)
MessageBox "Was möchtet ihr tun?", "Nehmen", "Musik auswählen", "Fertig"
set Choosing to 1
return
elseif (Choosing == 1)
set button to GetButtonPressed
if (button== -1)
return
elseif (button == 0)
Activate
Set Choosing to 0
elseif (button == 1)
Set Choosing to -2
elseif (button == 2)
Set Choosing to 0
endif
Endif
If (Choosing == -2)
MessageBox "Welche Musik möchtet ihr hören?", "Lied 1", "Lied 2", "Lied 3", "Lied 4", "Lied 5", "Zurück", "Abbrechen"
set Choosing to 2
return
elseif (Choosing == 2)
set button to GetButtonPressed
if (button == -1)
return
elseif (button == 5)
Set Choosing to -1
elseif (button == 6)
Set Choosing to 0
else
StreamMusic random
set Choosing to 3
return
endif
elseif (Choosing == 3)
if (button == 0)
StreamMusic "Data\Music\Eydis\Lied_1.mp3"
elseif (button == 1)
StreamMusic "Data\Music\Eydis\Lied_2.mp3"
elseif (button == 2)
StreamMusic "Data\Music\Eydis\Lied_3.mp3"
elseif (button == 3)
StreamMusic "Data\Music\Eydis\Lied_4.mp3"
elseif (button == 4)
StreamMusic "Data\Music\Eydis\Lied_5.mp3"
endif
set Choosing to 0
Endif
End
Begin menuMode
If (Choosing == -1)
MessageBox "Was möchtet ihr tun?", "Ablegen", "Musik auswählen", "Fertig"
set Choosing to 1
return
elseif (Choosing == 1)
set button to GetButtonPressed
if (button== -1)
return
elseif (button == 0)
Set Choosing to 0
DropMe
elseif (button == 1)
Set Choosing to -2
elseif (button == 2)
Set Choosing to 0
endif
Endif
If (Choosing == -2)
MessageBox "Welche Musik möchtet ihr hören?", "Lied 1", "Lied 2", "Lied 3", "Lied 4", "Lied 5", "Zurück", "Abbrechen"
set Choosing to 2
return
elseif (Choosing == 2)
set button to GetButtonPressed
if (button == -1)
return
elseif (button == 5)
Set Choosing to -1
elseif (button == 6)
Set Choosing to 0
else
StreamMusic random
set Choosing to 3
return
endif
elseif (Choosing == 3)
if (button == 0)
StreamMusic "Data\Music\Eydis\Lied_1.mp3"
elseif (button == 1)
StreamMusic "Data\Music\Eydis\Lied_2.mp3"
elseif (button == 2)
StreamMusic "Data\Music\Eydis\Lied_3.mp3"
elseif (button == 3)
StreamMusic "Data\Music\Eydis\Lied_4.mp3"
elseif (button == 4)
StreamMusic "Data\Music\Eydis\Lied_5.mp3"
endif
set Choosing to 0
Endif
End
Liebe Grüße,
Eydis