Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- local fTime = 0
- local fTempTimer = 0
- while true do
- for i=1, #Rocks do
- local Rock = Rocks[i]
- local vRock = Rock:GetPlacement():GetVect()
- local vDistance = vRock-vMarker
- local fSwapDistance = 10
- if mthRndF()<0.2 then
- --local fFrontVelocity = Rock:GetFrontVelocity()
- --Rock:SetFrontVelocity(-fFrontVelocity)
- Rock:SetRotationalVelocity(mthVector3f(Rnd(10), Rnd(10), Rnd(10)))
- local fFrontVelocity = Rnd(0.1)
- Rock:SetFrontVelocity(fFrontVelocity)
- end
- if (mthAbsF(vDistance.x)>fSwapDistance or
- mthAbsF(vDistance.y)>fSwapDistance or
- mthAbsF(vDistance.z)>fSwapDistance) then
- local fFrontVelocity = Rock:GetFrontVelocity()
- Rock:SetFrontVelocity(-fFrontVelocity)
- end
- while (fTempTimer < 0.1) do
- fTempTimer=fTempTimer+Wait(CustomEvent("OnStep")):GetTimeStep()
- end
- fTempTimer=fTempTimer-0.1
- fTime=fTime+0.1
- if fTime>=32 and fTime<32.1 then
- worldInfo:StartTextScroll(ptrScrollText, 150);
- end
- if fTime>=152 and fTime<152.1 then
- Letter_01:Appear()
- Letter_01_Particle:Start()
- Letter_01_Sound:PlayOnce()
- Wait(Delay(0.2))
- Letter_02:Appear()
- Letter_02_Particle:Start()
- Letter_02_Sound:PlayOnce()
- Wait(Delay(0.2))
- Letter_03:Appear()
- Letter_03_Particle:Start()
- Letter_03_Sound:PlayOnce()
- Wait(Delay(0.2))
- Letter_04:Appear()
- Letter_04_Particle:Start()
- Letter_04_Sound:PlayOnce()
- Wait(Delay(0.2))
- Letter_05:Appear()
- Letter_05_Particle:Start()
- Letter_05_Sound:PlayOnce()
- Wait(Delay(0.2))
- Letter_06:Appear()
- Letter_06_Particle:Start()
- Letter_06_Sound:PlayOnce()
- Wait(Delay(0.2))
- Letter_07:Appear()
- Letter_07_Particle:Start()
- Letter_07_Sound:PlayOnce()
- Wait(Delay(0.2))
- Letter_08:Appear()
- Letter_08_Particle:Start()
- Letter_08_Sound:PlayOnce()
- Wait(Delay(0.2))
- Letter_09:Appear()
- Letter_09_Particle:Start()
- Letter_09_Sound:PlayOnce()
- Wait(Delay(0.2))
- Letter_10:Appear()
- Letter_10_Particle:Start()
- Letter_10_Sound:PlayOnce()
- Wait(Delay(0.2))
- Letter_11:Appear()
- Letter_11_Particle:Start()
- Letter_11_Sound:PlayOnce()
- Wait(Delay(0.2))
- Letter_12:Appear()
- Letter_12_Particle:Start()
- Letter_12_Sound:PlayOnce()
- Wait(Delay(0.2))
- Letter_13:Appear()
- Letter_13_Particle:Start()
- Letter_13_Sound:PlayOnce()
- end
- if fTime>=168 then
- SignalEvent("End game")
- end
- end
- end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement