simple: every time u press ctrl it plays a random sound. it only works with the newest version (beta one for now)
But this after your scripted tiles, if u dont have the atack sub:
Sub OnAttack(index)
'********************************
Dim randomiser
Dim max
Dim note
Dim player_weapon
Dim weapon_slot
weapon_slot=Int(getplayerweaponslot(index))
player_weapon=Int(Getplayerinvitemnum(index, Int(weapon_slot) ) )
Select Case player_weapon
Case 1
max = Getvar("scripts\guitarsounds.ini", "index", "total_sounds")
randomiser = Int((Int(max) + 1) * Rnd) + 0
If randomiser = 0 Then
randomiser = 1
End If
note = GetVar("scripts\guitarsounds.ini", "sounds", Int(randomiser))
Call PlaySound(index, note)
End Select
End sub
in red is the number of the intrument itemnow create a ini called guitarsounds.ini and put this on:
[INDEX]
total_sounds=6
[SOUNDS]
1=do.wav
2=dosus.wav
3=re.wav
4=resus.wav
5=mi.wav
6=fa.wav
7=fasus.wav
8=sol.wav
9=solsus.wav
10=la.wav
11=lasus.wav
12=si.wav
13=slide.wav
i think its easy to understand: total_sounds are the total of sounds u have in ur SFX folder and u want be able to play.
For each sound u have a number, and write the name of the sound, with the .wav or .midi thing.
for having more than one intrument, edit the case to get the file names from other .ini.
i based in baron's talking weapons script, so hail him
sound effects: u can use mine:
http://www.megaupload.com/pt/?d=IXW9E9AUput them in the SFX folder.
btw, those sounds were made with guitar pro. they are just power chords (most used technique in rock music). but when i get a new guitar cable, ill do some better sounds. :D