***Beggining of install script*** inst *bubble maker new: simp 2 13 32 "bubble game" 8 0 1 attr 20 tran 1 0 mvto 7219 957 *arrow firer new: simp 2 13 33 "bubble game" 8 8 0 attr 20 mvto 6903 934 tran 0 0 pose 1 endm ***End of install script*** ***Beggining of event script*** *fire bubble script scrp 2 13 32 1 frat 4 anim [0 1 2 3 2 1 255] sndc "bubl" wait rand 10 75 inst stpc doif pose = 0 pose 4 elif pose = 1 pose 5 elif pose = 2 pose 6 elif pose = 3 pose 7 endi new: simp 2 13 34 "bubble game" 5 30 0 attr 192 frat 3 anim [0 1 2 255] aero 2 accg 0.1 seta va09 targ targ ownr doif pose = 4 targ va09 mvto 7258 967 velo 0 -15 elif pose = 5 targ va09 mvto 7238 967 velo -5 -10 elif pose = 6 targ va09 mvto 7219 977 velo -10 -5 elif pose = 7 targ va09 mvto 7219 1007 velo -15 0 endi targ ownr slow wait 10 setv va00 pose subv va00 4 pose va00 endm *activate script for the dart launcher scrp 2 13 33 1 *turn the timer on doif ov00 = 0 setv ov00 1 * take aim tick 1 elif ov00 = 1 clac -1 * fire inst sndc "plgn" doif pose = 0 gsub upon elif pose = 1 gsub uptw elif pose = 2 gsub upth elif pose = 3 gsub bott endi targ ownr tick 0 wait 10 setv ov00 0 slow clac 0 * fire at top 1 subr upon inst new: simp 2 13 35 "bubble game" 1 16 0 pupt -1 40 4 mvto 6946 934 attr 7 * (43,0) setv vely -40 setv velx 20 seta va50 targ new: simp 2 13 36 "blnk" 1 0 9000 attr 39 tick 1 frel va50 mvto 6986 938 * mesg wrt+ va50 256 targ 0 0 targ ownr pose 4 slow retn * fire at top, down 1 subr uptw inst new: simp 2 13 35 "bubble game" 1 17 0 pupt -1 53 15 mvto 6986 929 attr 7 * (83,-5) setv vely -25 setv velx 25 seta va50 targ new: simp 2 13 36 "blnk" 1 0 0 attr 39 tick 1 frel va50 mvto 7039 944 * mesg wrt+ va50 256 targ 0 0 targ ownr pose 5 slow retn * fire at top, down 2 subr upth inst new: simp 2 13 35 "bubble game" 1 18 0 pupt -1 59 31 mvto 7003 972 attr 7 * (100,38) setv vely -12 setv velx 40 seta va50 targ new: simp 2 13 36 "blnk" 1 0 9000 attr 39 tick 1 frel va50 mvto 7062 1003 * mesg wrt+ va50 256 targ 0 0 targ ownr pose 6 slow retn * fire at bottom subr bott inst new: simp 2 13 35 "bubble game" 1 19 0 pupt -1 62 49 mvto 7014 998 attr 7 * (111,64) setv vely 2 setv velx 55 seta va50 targ new: simp 2 13 36 "blnk" 1 0 9000 attr 39 tick 1 frel va50 mvto 7076 1047 * mesg wrt+ va50 256 targ 0 0 targ ownr pose 7 slow retn endi endm *timer script for the dart launcher scrp 2 13 33 9 *track the mouse pointer doif mopx > 6803 and mopx < 6943 and mopy > 980 and mopy < 1009 pose 3 elif mopx > 6803 and mopx < 6943 and mopy >= 1010 and mopy < 1038 pose 2 elif mopx > 6803 and mopx < 6943 and mopy >= 1039 and mopy < 1067 pose 1 elif mopx > 6803 and mopx < 6943 and mopy >= 1068 and mopy < 1096 pose 0 endi endm *kill the arrow on collision scrp 2 13 35 6 rtar 2 13 36 kill targ kill ownr endm *check if it hits a bubble scrp 2 13 36 9 lock inst etch 2 13 34 doif targ <> null * kill the sound when a hit is made rtar 2 13 33 stpc rtar 2 13 34 mesg wrt+ targ 256 0 0 0 targ ownr tick 0 endi next slow unlk endm *bubble animation for popping, then kill it scrp 2 13 34 6 lock anim [3 4] over snde "popp" kill ownr unlk endm * arrow popping it script scrp 2 13 34 256 lock inst setv va00 posx setv va01 posy setv va02 rand 1 4 doif va02 = 1 setv va02 0 elif va02 = 2 setv va02 5 elif va02 = 3 setv va02 10 elif va02 = 4 setv va02 15 endi *Fixed by Doringo *now norns can eat it new: simp 2 23 3 "sweets" 5 va02 100 attr 199 elas 10 emit 8 0.5 bhvr 48 accg 5 clik 4 5 -1 velo rand -15 15 rand -5 -15 mvto va00 va01 frat 3 anim [0 1 2 3 255] targ ownr anim [3 4] over snde "popp" * rtar 2 14 56 * mesg wrt+ targ 256 0 0 0 kill ownr unlk endm scrp 2 23 3 6 pose 4 endm * sweets scrp 2 23 3 12 snde "chmp" targ from driv 3 -0.2 kill ownr endm ***End of event script*** ***Beggining of remove script*** rscr enum 2 13 32 kill targ next enum 2 23 3 kill targ next enum 2 13 33 kill targ next enum 2 13 34 kill targ next enum 2 13 35 kill targ next scrx 2 13 32 1 endm ***End of remove script***