Turbulenssin tärinät takapuoleen

(1/3) > >>

Makoy:
Kyselin aikoinaan miten tuo olis mahdollista toteuttaa, vastaus on lua-scripti ( ei minun tekemä). Ihan eri fiilis kun pilvissä alkaa penkki jytisemään, ennen oli jotenkin oudon tasaista menoa. Tossa scripissä oli sellainen ongelma, että tärinä ei koskaan lakannut laskeutuessa ja jatkoi niin kauan kun täristimen sammutti. Tappelin sen kanssa jonkun aikaa ja onnistuin vahingossa ratkaisemaan sen. Pitää vielä testata ettei se vaikuta muihin Scriptin ääniin, mutta nyt tutinat loppuu kun pilvestä tulee alemmaksi. Pilvien yläpuolella ei ongelmaa ollutkaan. Mulla on tää lua yhdellä clientillä, jossa on ainoastaan kiinni täristin, ei kajareita. Ajatus on laittaa samalla scriptillä toiselle clientille sit kajareilla täristys äänet, bling blingit, ja kuuluutukset. Laitan scriptin tähän, jos lua-guruilla löytyy korjattavaa tai jotain muuta mitä tulee mieleen.t-Marco


------------------------------------------------------------------------------
-- Turbulence looping sound -- Seat Belts Messages -- ATC Radio Chatter
-- Initializing flags --
sndflg=0 -- turbulence sound flag
seatfl=0 -- seat belt flag
ref=0

-- Function to play sound if and until turbulence is detected --

function turbulence(offset,value)
        ground=ipc.readUW(0x0366)
        if (value > 0) and (sndflg == 0) and (ground == 0) then
                ref=sound.playloop("C:\\WideClient\\Sounds\\Turbulence.wav")
                sndflg=1
                ipc.sleep(1000)
                if (seatfl == 2) or (seatfl == 4) then
                        sound.play("C:\\WideClient\\Sounds\\nattend.wav")
                        ipc.sleep(1000)
                end
                sound.play("C:\\WideClient\\Sounds\\nattend.wav")
        end
        if (value == 0) and (sndflg == 1) then
                sound.stop(ref)
                sndflg=0
                if (seatfl == 2) or (seatfl ==4) then
                        sound.play("C:\\WideClient\\Sounds\\nattend.wav")
                        ipc.sleep(1000)
                        sound.play("C:\\WideClient\\Sounds\\nattend.wav")
                end
        end
end


-- Function to manage messages when seat belts sign changes - welcome on board -- descent --- on cruise ---- parked at the arrival gate

function seatbelt(offset,value)
        if (value == 1) and (seatfl == 0) then
                sound.play("C:\\WideClient\\Sounds\\nattend.wav")
                ipc.sleep(1000)
                sound.play("C:\\WideClient\\Sounds\\welcomeonboard.wav")
                seatfl=1
        end
        if (value == 1) and (seatfl == 2) then
                sound.play("C:\\WideClient\\Sounds\\nattend.wav")
                ipc.sleep(1000)
                sound.play("C:\\WideClient\\Sounds\\descent.wav")
                seatfl=3
        end
        if (value == 0) and (seatfl == 1) then
                sound.play("C:\\WideClient\\Sounds\\nattend.wav")
                ipc.sleep(1000)
                sound.play("C:\\WideClient\\Sounds\\levelautobelt.wav")
                seatfl=2
        end
        if (value == 0) and (seatfl == 3) then
                sound.play("C:\\WideClient\\Sounds\\nattend.wav")
                ipc.sleep(1000)
                sound.play("C:\\WideClient\\Sounds\\atgate.wav")
                seatfl=4
        end
end     

-- Function to play ATC chatter - COM2 freqs 118.10 and 118.20 - 70 wavs for each freq - y var to make the frequency of chat random - x var to make the messages random

function ATC_Radio()

-- Radio squelch if a valid freq is selected

        n = ipc.readUW(0x3118)
        if (n == 0x1810) or (n == 0x1820) then
                if (n1 ~= n) then
                        sound.play("C:\\WideClient\\Sounds\\Radio.wav")
                        n1=n
                end
        end

  -- Radio chatter play routine

        y= math.random(1,5)
        if (y == 2) or (y == 4) then
                if (n == 0x1810) then
                        x=math.random (1,70)
                        suono = "C:\\WideClient\\Sounds\\chatter1.wav"
                        sound.play(suono)
                end
                if (n == 0x1820) then
                        x=math.random (1,70)
                        suono = "C:\\WideClient\\Sounds\\chatter2.wav"
                        sound.play(suono)
                end
        end
end

-- FSUIPC LUA calls for the different events -- timer to exec the ATC function every 1 min
event.offset(0x0E88,"UW","turbulence")
event.offset(0x0E98,"UW","turbulence")
event.offset(0x341D,"UB","seatbelt")
event.timer(60000,"ATC_Radio")
------------------------------------------------------------------------

TA:
Tuo vaikuttaa vähintäänkin kokeilemisen arvoiselta. Ei vaan tuo LUA ole tuttu, eli taas on uuden asian opiskelu edessä 

Juhak:
LUA vaikuttaa aika mielenkiintoiselta, olen sitä ohimennen vähän katsellut 
Imeekö tuo scripti tiedon turbulenssistä FSUIPC:n kautta? Ts. missä osassa tuota scriptiä tutkitaan onko turbulenssia vai ei?
Juha

vipu:
Moro,

Mistäs tuo Turbulence.wav -tiedosto löytyy?

Makoy:
Quote

LUA vaikuttaa aika mielenkiintoiselta, olen sitä ohimennen vähän katsellut 
Imeekö tuo scripti tiedon turbulenssistä FSUIPC:n kautta? Ts. missä osassa tuota scriptiä tutkitaan onko turbulenssia vai ei?
Juha


Fsuipc:n kautta toimii, scripti on ihan alkupuolella siinä missä on mainittu turbulence sound.
Tossa on vissiin kaksi offsettiä siihen tarkoitukseen.

Navigation

Up one level

Next page