Scripting Helpers is winding down operations and is now read-only. More info→

My Music Will play But it wont play Fully.. Whats the Problem?

Asked by

11 years ago

Ok I made this script and the music wont play fully.. It just moves on to the next one. Whats the problem.. Heres the script

01gw=game.Workspace
02 
03function message(text,time)
04    local oldmsg=gw:FindFirstChild("Hint")
05    if oldmsg then
06        oldmsg.Parent=nil
07    end
08    local spacenumber=time*120
09    local msg=Instance.new("Hint")
10    msg.Parent=gw
11 
12 
13    msg.Text=text
14    wait(1)
15    msg.Parent=nil
16end
17 
18last=""
19lastlast=""
20while true do
21    wait(.1)
22    local tracks=script:GetChildren()
23    local rn=math.random(1,#tracks)
24    local track=tracks[rn]
25    if track~=nil then
26        if track.className=="Sound" and track.Name~=last and track.Name~=lastlast then
27            lastlast=last
28            last=track.Name
29            message(track.Name,5)
30            track:play()
31            wait(120)
32            track:pause()
 View all 32 lines...

1 end

2 end

end

2 answers

Answered by

Dummiez 360

11 years ago

Not sure, try to see if this works.

01print('Music player started!')
02 
03local ws = Workspace
04local last1 = ""
05local last2 = ""
06 
07function dispHint(text, len)
08    print("Display hint.")
09    local ph = ws:GetChildren()
10 
11    for i = 1, #ph do
12        if ph[i]:IsA("Hint") then ph:Destroy() 
13    end end
14 
15    local holding = (120 * len)
16 
17    local nh = Instance.new("Hint",Workspace)
18    nh.Text = text
19    game:GetService("Debris"):AddItem(nh,2)
20 
21end
22 
23while true do wait()
24    print("Running loop.")
25    local st = script:GetChildren()
26    local rt = math.random(1, #st)
27    local ct = st[rt]
28 
29    if (ct and ct:IsA("Sound") and ct.Name ~= last1 and ct.Name ~= last2) then
30        print("Change the track.")
31        last2 = last1;
32        last = ct.Name
33        dispHint("Now playing "..last..".", 5)
34        ct:Play()
35        wait(120)
36        ct:Pause()
37    end
38 
39end
 View all 39 lines...

Thanks Worked :D MicrobeBlox 5 — 11y

Make sure to accept as an answer. :P Dummiez 360 — 11y

Answered by

DDDropTheBase 0

11 years ago

1 music? Then put the script in the music.

1while true do
2script.Parent:Play()
3end

My Music Will play But it wont play Fully.. Whats the Problem?

2 answers

Answer this question