; Made by Silver
;
; This script will make a music list and play music based on the amount of GP you give. Maximum songs are 33 and 
; maximum play time is 11 minutes. The more GP you give the more choice you have and the longer the music will play.
;
; If you put this in your own world you'll have to change the midi names in the menu cookies and you have to change those
; names in the MUSIC commands. After that they'll all work. ^_^
;
; This scene will look best with a background of an old disco. The scene is also a shop at the same time for HP/ MP 
; restoring items. Actor 1 should have some dance clothes on, the Jukebox actor should look like an old jukebox.
; Actor 2, frame 2 and 3 should be a working Jukebox, lightly moving every time the actor changes his pose and the 4th frame
; should be the jukebox when it's turned off.
;

SCENE 3198, geonosisshop,SCENE,"Creative Minds",0,0
    IF T302,@t302
    IF T301,@t301
    @t302

	ACTOR 1, "mr. Jackson", jackson, 4,35,80
	ACTOR 2, "Jukebox",jukebox, 4,15,70
    ACTOR 3, "",silversign,0,90,100

	COUNTDOWN 0
	MUSIC "#silence"
	THEME 0

	SEL 1
	POSE 1,4,2

	COMPARE #<backjuke>, "1"
	IF= @beenbefore

	1: Hi #<str.name>, welcome to my place.
	1: Would you care to play a hand of blackjack sir?
	GAME 4
	H: Does that old Jukebox over there still work?
	1: Just throw some coins at it and if you give it enough it'll make a list of songs you can pick.
	1: The more money you give it the more choice you have and the longer this Jukebox will play.
	1: Once the music starts to play a countdown will appear with the remaining play time on it.
	SET backjuke, "1"
	H: Sounds easy enough.
	END
@beenbefore
	1: Welcome back #<str.name>.
	GAME 4
	END
@eventActorClick1
	1: If you want to make the Jukebox play a song you'll have to throw some coins into it.
	END
@eventActorAttack1
	1: Hey hey!
	1: No reason for getting hostile.
; nice cruel weapon stealing trick, optional to put in.
;	HOST_TAKE I#<item.id>
;	1: To prevent you attack me more I stole your weapon.
	END	
@eventActorSpell1
	1: Please stop tickling me.
	HOST_GIVE M#<spell.price>
	END
@eventActorGive1
	COMPARE #<item.id>, "0"
	IF> @gaveitem
	1: You should give your GP to the Jukebox and not to me.
	HOST_GIVE G#<item.goldGiven>
	END
@gaveitem
	1: Thank you for this #<item.name> but I don't have an idea what I have to do with it...
	1: You can have it back.
	HOST_GIVE I#<item.id>
	END
@eventActorAttack2
	1: Hey don't damage that Jukebox!
	1: I think it's time you should leave...
	WAIT 4.0
	GOTO EXIT
@eventActorSpell2
	1: What are you doing?
	1: Try giving some coins to the Jukebox...
	HOST_GIVE M#<spell.price>
	END
@eventActorClick2
	2: Please insert GP to let me play a song.
	END
@eventActorGive2
	COMPARE #<item.id>, "0"
	IF> @gaveitem2
	GOTO @jukeboxscript
@gaveitem2
	1: I don't think that will work.
	1: Here, take your #<item.name> back.
	HOST_GIVE I#<item.id>
	1: Try giving it coins instead.
	END
;
; The Jukebox script.
;
@jukeboxscript
	SOUND "kaching.wav"
	COMPARE #<item.goldGiven>, "6600"
	IF> @tomuchgiven
	COMPARE #<item.goldGiven>,  "1000"
	IF< @tolittlegiven
	2: Thank you.
	SET juketime, "#<item.goldGiven>"
	GOTO @jukescriptcontinue
@tomuchgiven
	2: Many thanks.
	SET jukerandom, #<item.goldGiven>
	DIV jukerandom,  "100"
	SET jukerandom2, "100"
	SUB jukerandom2, #<jukerandom>
	IF R#<jukerandom2>, @jukerefund
	SET juketime, "6600"
	GOTO @jukescriptcontinue
@jukerefund
	SET jukerefund, #<item.goldGiven>
	SUB jukerefund, "6600"
	SET juketime,   "6600"
	SOUND "kaching.wav"
	HOST_GIVE G#<jukerefund>
	N: You got lucky and received #<jukerefund> GP back from the Jukebox!
	GOTO @jukescriptcontinue
@tolittlegiven
	2: I'm sorry but you gave me to little coins.
	SOUND "kaching.wav"
	HOST_GIVE G#<item.goldGiven>
	END

@jukescriptcontinue
	WAIT 2.0
	SET jukelist, #<juketime>
	DIV jukelist, "200"
	SET jukeplay, #<juketime>
	DIV jukeplay, "10"

	SET menu1, "0"
	SET menu2, "0"
	SET menu3, "0"

	SET midi1, "0"
	SET midi2, "0"
	SET midi3, "0"
	SET midi4, "0"
	SET midi5, "0"
	SET midi6, "0"
	SET midi7, "0"
	SET midi8, "0"
	SET midi9, "0"
	SET midi10, "0"
	SET midi11, "0"
	SET midi12, "0"
	SET midi13, "0"
	SET midi14, "0"
	SET midi15, "0"
	SET midi16, "0"
	SET midi17, "0"
	SET midi18, "0"
	SET midi19, "0"
	SET midi20, "0"
	SET midi21, "0"
	SET midi22, "0"
	SET midi23, "0"
	SET midi24, "0"
	SET midi25, "0"
	SET midi26, "0"
	SET midi27, "0"
	SET midi28, "0"
	SET midi29, "0"
	SET midi30, "0"
	SET midi31, "0"
	SET midi32, "0"
	SET midi33, "0"
	
	COMPARE #<jukelist>, "0"
	IF= @jukefulllist
	SUB jukelist, "1"
	SET midi1, "Republic Theme=@midi1"

	COMPARE #<jukelist>, "0"
	IF= @jukefulllist
	SUB jukelist, "1"
	SET midi2, "Hoth Battle=@midi2"

	COMPARE #<jukelist>, "0"
	IF= @jukefulllist
	SUB jukelist, "1"
	SET midi3, "The Struggle=@midi3"

	COMPARE #<jukelist>, "0"
	IF= @jukefulllist
	SUB jukelist, "1"
	SET midi4, "Cantina Jam=@midi4"

	COMPARE #<jukelist>, "0"
	IF= @jukefulllist
	SUB jukelist, "1"
	SET midi5, "Ewok Village=@midi5"

	COMPARE #<jukelist>, "0"
	IF= @jukefulllist
	SUB jukelist, "1"
	SET midi6, "Yoda's Wisdom=@midi6"

	COMPARE #<jukelist>, "0"
	IF= @jukefulllist
	SUB jukelist, "1"
	SET midi7, "Empire Theme=@midi7"

	COMPARE #<jukelist>, "0"
	IF= @jukefulllist
	SUB jukelist, "1"
	SET midi8, "Death Star Battle=@midi8"

	SET menu1, "Next=@jukefulllist2"

	COMPARE #<jukelist>, "0"
	IF= @jukefulllist
	SUB jukelist, "1"
	SET midi9, "Rise of the Empire=@midi9"

	COMPARE #<jukelist>, "0"
	IF= @jukefulllist
	SUB jukelist, "1"
	SET midi10, "Wicket's Theme=@midi10"

	COMPARE #<jukelist>, "0"
	IF= @jukefulllist
	SUB jukelist, "1"
	SET midi11, "Celebration at Endor=@midi11"

	COMPARE #<jukelist>, "0"
	IF= @jukefulllist
	SUB jukelist, "1"
	SET midi12, "X-Wing Attack=@midi12"

	COMPARE #<jukelist>, "0"
	IF= @jukefulllist
	SUB jukelist, "1"
	SET midi13, "Empire Strikes Back=@midi13"

	COMPARE #<jukelist>, "0"
	IF= @jukefulllist
	SUB jukelist, "1"
	SET midi14, "AT-AT March=@midi14"

	COMPARE #<jukelist>, "0"
	IF= @jukefulllist
	SUB jukelist, "1"
	SET midi15, "Han and Leia's Song=@midi15"

	COMPARE #<jukelist>, "0"
	IF= @jukefulllist
	SUB jukelist, "1"
	SET midi16, "Duel of Fates=@midi16"

	SET menu2, "Next=@jukefulllist3"

	COMPARE #<jukelist>, "0"
	IF= @jukefulllist
	SUB jukelist, "1"
	SET midi17, "Hidden Strength=@midi17"

	COMPARE #<jukelist>, "0"
	IF= @jukefulllist
	SUB jukelist, "1"
	SET midi18, "Gungan's Pride=@midi18"

	COMPARE #<jukelist>, "0"
	IF= @jukefulllist
	SUB jukelist, "1"
	SET midi19, "Star Wars Main Theme=@midi19"

	COMPARE #<jukelist>, "0"
	IF= @jukefulllist
	SUB jukelist, "1"
	SET midi20, "Medal Ceremony=@midi20"

	COMPARE #<jukelist>, "0"
	IF= @jukefulllist
	SUB jukelist, "1"
	SET midi21, "Desperate Battle=@midi21"

	COMPARE #<jukelist>, "0"
	IF= @jukefulllist
	SUB jukelist, "1"
	SET midi22, "Luke and Leia's Song=@midi22"

	COMPARE #<jukelist>, "0"
	IF= @jukefulllist
	SUB jukelist, "1"
	SET midi23, "The Force=@midi23"

	COMPARE #<jukelist>, "0"
	IF= @jukefulllist
	SUB jukelist, "1"
	SET midi24, "Jedi Rocks=@midi24"

	SET menu3, "Next=@jukefulllist4"

	COMPARE #<jukelist>, "0"
	IF= @jukefulllist
	SUB jukelist, "1"
	SET midi25, "To The Races=@midi25"

	COMPARE #<jukelist>, "0"
	IF= @jukefulllist
	SUB jukelist, "1"
	SET midi26, "Celes Mix=@midi26"

	COMPARE #<jukelist>, "0"
	IF= @jukefulllist
	SUB jukelist, "1"
	SET midi27, "Star Wars Rap=@midi27"

;	COMPARE #<jukelist>, "0"
;	IF= @jukefulllist
;	SUB jukelist, "1"
;	SET midi28, "Beatnik=@midi28"

;	COMPARE #<jukelist>, "0"
;	IF= @jukefulllist
;	SUB jukelist, "1"
;	SET midi29, "We are the champions=@midi29"

;	COMPARE #<jukelist>, "0"
;	IF= @jukefulllist
;	SUB jukelist, "1"
;	SET midi30, "It's my Life=@midi30"

;	COMPARE #<jukelist>, "0"
;	IF= @jukefulllist
;	SUB jukelist, "1"
;	SET midi31, "Oath to Mi=@midi31"

;	COMPARE #<jukelist>, "0"
;	IF= @jukefulllist
;	SUB jukelist, "1"

;	SET midi32, "Enclosure=@midi32"

;	COMPARE #<jukelist>, "0"
;	IF= @jukefulllist
;	SUB jukelist, "1"
;	SET midi33, "Blow it all!=@midi33"

@jukefulllist
	MENU #<midi1>, #<midi2>, #<midi3>, #<midi4>, #<midi5>, #<midi6>, #<midi7>, #<midi8>,#<menu1> 
	GOTO @jukefulllist
@jukefulllist2
	MENU #<midi9>, #<midi10>, #<midi11>, #<midi12>, #<midi13>, #<midi14>, #<midi15>, #<midi16>,"Back=@jukefulllist",#<menu2>
	GOTO @jukefulllist2
@jukefulllist3
	MENU #<midi17>, #<midi18>, #<midi19>, #<midi20>, #<midi21>, #<midi22>, #<midi23>, #<midi24>,"Back=@jukefulllist2",#<menu3>
	GOTO @jukefulllist3
@jukefulllist4
	MENU #<midi25>, #<midi26>, #<midi27>, #<midi28>, #<midi29>, #<midi30>, #<midi31>, #<midi32>,#<midi33>,"Back=@jukefulllist3"
	GOTO @jukefulllist4

@midi1
	MUSIC Alderaan.mid
	GOTO @jukeplaytime
@midi2
	MUSIC battle.mid
	GOTO @jukeplaytime
@midi3
	MUSIC Bespin.mid
	GOTO @jukeplaytime
@midi4
	MUSIC cantina.mid
	GOTO @jukeplaytime
@midi5
	MUSIC Coruscant.mid
	GOTO @jukeplaytime
@midi6
	MUSIC Dagobah.mid
	GOTO @jukeplaytime
@midi7
	MUSIC "Death Star.mid"
	GOTO @jukeplaytime
@midi8
	MUSIC deathstarbattle.mid
	GOTO @jukeplaytime
@midi9
	MUSIC emperor-arrives.mid
	GOTO @jukeplaytime
@midi10
	MUSIC Endor.mid
	GOTO @jukeplaytime
@midi11
	MUSIC ewokwon.mid
	GOTO @jukeplaytime
@midi12
	MUSIC fighterattack.mid
	GOTO @jukeplaytime
@midi13
	MUSIC "Galaxy Map.mid"
	GOTO @jukeplaytime
@midi14
	MUSIC Hoth.mid
	GOTO @jukeplaytime
@midi15
	MUSIC leia.mid
	GOTO @jukeplaytime
@midi16
	MUSIC Naboo.mid
	GOTO @jukeplaytime
@midi17
	MUSIC "Rebel Base.mid"
	GOTO @jukeplaytime
@midi18
	MUSIC Tatooine.mid
	GOTO @jukeplaytime
@midi19
	MUSIC title.mid
	GOTO @jukeplaytime
@midi20
	MUSIC won.mid
	GOTO @jukeplaytime
@midi21
	MUSIC "Yavin IV.mid"
	GOTO @jukeplaytime
@midi22
	MUSIC yoda.mid
	GOTO @jukeplaytime
@midi23
	MUSIC ending.mid
	GOTO @jukeplaytime
@midi24
	MUSIC jedirocks.mid
	GOTO @jukeplaytime
@midi25
	MUSIC podracer.mid
	GOTO @jukeplaytime
@midi26
	MUSIC CelesMix.mid
	GOTO @jukeplaytime
@midi27
	SOUND starwarsrap.wav
	GOTO @jukeplaytime
;@midi28
;	MUSIC Beatnik.mid
;	GOTO @jukeplaytime
;@midi29
;	MUSIC Queen-We_are_the_champions.mid
;	GOTO @jukeplaytime
;@midi30
;	MUSIC Bon_Jovi-Its_my_life.mid
;	GOTO @jukeplaytime
;@midi31
;	MUSIC eed.mid
;	GOTO @jukeplaytime
;@midi32
;	MUSIC enclosure.mid
;	GOTO @jukeplaytime
;@midi33
;	MUSIC allsaints.mid
;	GOTO @jukeplaytime
;
@jukeplaytime
	SEL 2
	POSE 2,3
	COUNTDOWN #<jukeplay>
@jukeplaytime2
	WAIT 1.0
	IF XP, @endjuke
	GOTO @jukeplaytime2
@endjuke
	SEL 2
	POSE 4
	MUSIC "#silence"
	WAIT 3.0
	2: Please insert more coins.
	END

@t301
H: So... this must be the place.
H: Now to find him...
H: He looks suspicious, I'll question him.
WAIT 1.0
SOUND blaster.wav
WAIT 1.0
H: Guess he doesn't want to talk.
WAIT 1.0
FIGHT 76
IF WON,@toast
END
@toast
HOST_GIVE T302
HOST_GIVE I28
END

; Comment: Let the music be your guidance. =P