X N /t\9zmGdZAX d ( @ = = &= DA `{ y= ]= = -m Φզ#3v= = ? [
--/57Gi G = = = P#Ԧ!צ'զ+ئ175+ ^ = = V =
s ˦Ҧ զ#צ'զ+ڦ/=Ѥi h ? = 0 = uĝ Ӧɦ˦Ҧ զ#צ'զ+ئ1C|Y a = = = % æʦ
ɦ˦Ҧ զ#֦%զ+=y a Y U = = = Z= t= lҦƦȦʦ
ɦ˦Ҧ Ԧ!-¦p u
q j E = c = ni } ĥ ƦȦʦ
ɦ˦Ӧ Ԧ!/ r s
s
w
h = = v ̏ s ĥ ƦȦʦ
ɦܦ#m l s
s
s
u
= =
= { y ơ ɦ˦ɦ ڦu s
s
s
w
Q = 5 = ,& y ) o s
u
x
f = y D u u { q oU P L M L M P U = = = e q u { s s
r m p B = [= <= <= 2= = _ ٵo o u { { r s
u
f = r = P= m o u { C l s
s
u
= = = k o o y _ o u
s
w
L = , = = d ߕM U 1 r c f c = = = o= = = = = = D = ` ߨ_ a k k q o p = = = m ٦ڦ ) = = ( = [ a g k s Q m u
l = = 3@Φ
ѦԦצ -V = = = A# Y [ a g k u + m w
U = @ =
d ƦȦʦ
ɦϦҦ )q = = Q МO Q W [ a e k g q
r o = = = =
= ơ ƦȦʦ
ɦ˦ߦ!ҦI = N = &i K K Q W [ a e o 5 ^ u pZ ] = 7Н ĥ ƦȦʦ
ɦ˦% = = 9 G K Q W [ a a n | q | ĥ ƦȦʦ
ɦ!:= o = Q יE G K Q W _ } k a q u { ? / Õ ĥ Ʀæt= = U{ E I M S C e ? i k o u y x c ЦÕ = = = s { 3 9 S u _ _ g k o u y g v ۛ ؝ ܣ ֦P = ! = = '= := J= _= 8Q ɦ[ [ a e k o u y = a X d
o ЂP = 8 = ?| Y [ _ g k o w { u = = = =
= = M W [ a e k w / = = = [ ߩW Y ] a k K = = & = We { ; M 5 = = D ? Drew Banyai & IsmAvatar Eo@ SleepinJohnnyFish:
created entire example, and then some >.<
IsmAvatar:
scripts have been considerably shortened, and I added documentation to just about everything. I also trimmed down the sprites to 4 sprites with 4 subimages each and slightly modified sprite handling.
spr_A1_W_D
xu?HaƯ?jA75IS{K6X8:
KKA4HStx{}ݫTSVEv^(lͮH+X2 >:t8L#Wc1Za$_Ds$xUA^O >m5P:SEӼ/OrX/Fpw0Z3hr3% 0L>?xo|^J0ʫBML8Rӂ^ bxP"LC2xi2$U#E/ ۞!IJb+]X
PSPStcIהg`?s2Lh ҿ 'iC9<e!xȐ3[.҂ĈSEㅞ-n2zۋ-s0}} 6ڡR*wE:>v'բ(,z1, B^VR#z,ztFWHN9'yM5__@ aQU* %HxRI^0YXv¡'d(, 'c d%cJG L
:48ɑ5=}w
xu?HaƯ?jA75IS{K6X8:
KKA4HStx{}ݫTSVEv^(lͮH+X2 >:t8L#Wc1Za$_Ds$xUA^O >m5P:SEӼ/OrX/Fpw0Z3hr3% 0L>?xo|^J0ʫBML8Rӂ^ bxP"LC2xi2$U#E/ ۞!IJb+]X
PSPStcIהg`?s2Lh ҿ 'iC9<e!xȐ3[.҂ĈSEㅞ-n2zbkm']q|p-`>gB5y|MY5oq<]y7!dd{q! t>*B?"mͣEC|ƪ;ʶ HʰIiz*'[ Iy#*M<|]) ȫv bT@Gqq>u5p[` bl>PW6Xm
߷0ahW0W^-+W*3 u
x!L16 d$$ )2P jfj
OHq $@L $3BBB&qrD۟[tc%u9O炗DP Bi8t I[t"wF٨pRť eYX ٢땽2`OZy2 /~bkm']q|p-`>gB5y|MY5oq<]y7!dd{q! t>*B?"mͣEC|ƪ;ʶ HʰIiz*'[ Iy#*M<|]) ȫv bT@Gqq>u5p[` bl>PW6Xm
߷0ahW0W^-+W*3 u
x/L13F)ȑ p jfj
OHq rbdIbbK21!SdbAM N.& s|mwIecYDqb00%;BzL%0E!HH/4XEһ9y`;JbbЁζ
B"?00/=-\ ڼ]< O8Si9Ȁa šf'%WTXK B༕/ԇ%@ֺGOs}@ynĂIY,uRz͞rdS^@"Id
a ^9P) y*OqI 5X ɳy#ۂ-x,ζlxvK #yەY0z;]Hu{;3- j19_o
spr_A1_W_U
x xK@cڱ
ED* rD'qrqꢻCqG.B (Nر8f_ ߅]N6A50c6&B ^L#4mi_y4 imUbI7xy]^Ik^iheuв@G|ˋ 0E+{*9 0 GQfR`ɰ^ p= v Z/! *00>"$ipY*IB\1ذXp-KX(UrO{U'(ٖ OX?-^
y?W$bEV- 6aRB$ypME oji1f<c%36:jk,x-B.~B`Ygj|+帜&S/ ;G0^! W7|{ >ͨ6P 3EK @M;C!`+H3 I> #ye 6, $'v_JXnI'W|C#NJ/ 8
H1̺'LشN l]Yji4#}j}/l0v6`mAM2ͤX}Z
x xK@cڱ
ED* rD'qrqꢻCqG.B (Nر8f_ ߅]N6A50c6&B ^L#4mi_y4 imUbI7xy]^Ik^iheuв@G|ˋ 0E+{*9 0 GQfR`ɰ^ p= v Z/! *00>"$ipY*IB\1ذXp-KX(UrO{U'(ٖ OX?-^
y?W$bEV- 6aRB$ypME oji1f<0N1`'di7Ǡ]
spr_A1_W_R
x=HPc c+(UT*$թ8u]P c.BG \]\DCp8vxk4 ~w䴼 לui&{I:-n甈>Ŧ R?gFl|k0ٟ. ʓ '3:Z{A8,ǣP
^ͣRsxߵ$VY3OZq%DZuGz|&4|blshvЩ^o8H4[Z(Daw'$ ?)j0JYy4L%|Zyyi
ϕsvoUY-}v,iT.o;EC`)a%D 9oI~T# bgJx}gbnrW N54 mϧzK J ]\$-AJ(
g&LϿmh
x=HPc c+(UT*$թ8u]P c.BG \]\DCp8vxk4 ~w䴼 לui&{I:-n甈>Ŧ R?gFl|k0ٟ. ʓ '3:Z{A8,ǣP
^ͣRsxߵ$VY3OZq%DZuGz|&4|blshvЩ^o8H4[Z(Daw'$ ?)j0JYy4L%|Zyyi
ϕsvoUY-}v,iT.o;EC`)a%D 9oI~T# bgJx}gbnrW'q W=TlbXZ'@~6!PLDo(%> OJ|%|Ω )fFn)DوO2yT O;2ɌBrb]< >W97͗E
FT\m`ZR6/}~yݧOB ;K' W?2\
o[Ր bg_White
xر@ EA.': oFvB~vsq8˗ܞ4/~j>ĿV' ~:' ~ROc'H=SO)?eL2SO)?eL2SO)?eL2SO)?eL2SO)?eL2SO)?eL2SO)?eL2SO)?eL2SO)?eL2SO)?eL2SO)?eL2SO)?eL2SO)?eL2SO)?e^ PO٣f+߿ nhYed^?`zo LC俽
scr_MapSet ///////////
//Set Key//
///////////
var kk;
kk = keyboard_lastkey
if kd[kk] != "" { //make sure the key has a name
draw_mapped = kd[kk] //set the drawing name to the name
execute_string(mapped_var+" = "+string(kk)) //set the variable to the key
Mapping = false
} scr_MapNames //////////////////////////
//define each key's name//
//////////////////////////
/*
This is pretty much just a collection of names for the keys.
This way, the user knows what key each thing is set to.
*/
var m;
for (m = 0; m <= 255; m += 1) { //set all keys to nameless
kd[m] = "" //only named keys can pass
}
kd[8] = "Backspace"
kd[13] = "Enter Key"
kd[16] = "Shift Key"
kd[17] = "Control Key"
kd[18] = "Alt Key"
kd[19] = "Pause/Break"
kd[27] = "Escape Key"
kd[32] = "Space Key"
kd[33] = "Page Up"
kd[34] = "Page Down"
kd[35] = "End Key"
kd[36] = "Home Key"
kd[37] = "Left Arrow"
kd[38] = "Up Arrow"
kd[39] = "Right Arrow"
kd[40] = "Down Arrow"
kd[45] = "Insert Key"
kd[46] = "Delete Key"
for (m = 65; m <= 90; m += 1) { //the letter keys
kd[m] = chr(m)+" Key" //"A Key", "Z Key"
}
for (m = 96; m <= 105; m += 1) { //the numpad keys
kd[m] = "Numpad "+string(m) //"Numpad 0", "Numpad 9"
}
kd[106] = "Multiply Key"
kd[107] = "Add Key"
kd[109] = "Subtract Key"
kd[110] = "Decimal Key"
kd[111] = "Divide Key"
for (m = 112; m <= 123; m += 1) { //the F keys
kd[m] = "F"+string(m-1)+" Key" //"F1 Key", "F12 Key"
}
obj_Player
[ # image_speed = 0 //don't animate yet 0 0 0 0 0 0 0 [ //handle movement
//notice how it checks each key based on variable
//check the room creation code to see these variables initialized
//the variables are reset (remapped) using scr_MapSet - the execute string
if keyboard_check(global.DownKey) {
//move; set sprite; animate sprite
y += 4; sprite_index=spr_A1_W_D; image_speed = .4
}
if keyboard_check(global.LeftKey) {
x -= 4; sprite_index=spr_A1_W_L; image_speed = .4
}
if keyboard_check(global.RightKey) {
x += 4; sprite_index=spr_A1_W_R; image_speed = .4
}
if keyboard_check(global.UpKey) {
y -= 4; sprite_index=spr_A1_W_U; image_speed = .4
}
//if he's not moving
if !keyboard_check(global.DownKey) && !keyboard_check(global.LeftKey)
&& !keyboard_check(global.RightKey) && !keyboard_check(global.UpKey) {
image_index = 0 //place on first frame of sprite (standing)
image_speed = 0 //stop animation
//image_single is no longer supported
} 0 0 0 0 0 0 0
obj_MapKey
[ Mapping = false
scr_MapNames()
//you cannot use the variable "kd"
//if you want to use it, change the variable name in the scripts
//don't forget to check each of my instances' creation codes.
//go to the room I'm in, and ctrl+RightClick one of my instances.
//then click "Creation Code." You can see a few of my variables there.
//This is so each instance of me has different variable values. 0 0 0 0 0 0 0 [ F //only this key is mapping
obj_MapKey.Mapping = false
Mapping = true 0 0 0 0 0 0 0 [ , draw_set_halign(fa_center)
draw_sprite(sprite_index,-1,x,y) //draw the box
draw_text(x-48,y+8,draw_string) //draw the description
draw_text(x+112,y+8,draw_mapped) //draw the key
draw_set_halign(fa_left)
//draw an outline
draw_line(x-96,y,x+160,y)
draw_line(x-96,y,x-96,y+32)
draw_line(x-96,y+32,x+160,y+32)
draw_line(x+160,y,x+160,y+32)
//if waiting for remap, draw remap info
if Mapping {
draw_background(bg_White,272,238)
draw_set_halign(fa_center)
draw_text(400,260,"Press Desired Key for Action:")
draw_text(400,276,draw_string)
} 0 0 0 0 0 0 0 [ 6 if Mapping {
scr_MapSet() //remap the key pressed
} 0 0 0 0 0 0 0 rm_Main 4 SleepinJohnnyFish's & IsmAvatar's KeyMapping Example d global.UpKey = vk_up
global.DownKey = vk_down
global.LeftKey = vk_left
global.RightKey = vk_right ` P L H N draw_string = "Move Up"
draw_mapped = "Up Arrow"
mapped_var = "global.UpKey" P I T draw_string = "Move Down"
draw_mapped = "Down Arrow"
mapped_var = "global.DownKey" J T draw_string = "Move Left"
draw_mapped = "Left Arrow"
mapped_var = "global.LeftKey" K W draw_string = "Move Right"
draw_mapped = "Right Arrow"
mapped_var = "global.RightKey" L y X Game InformationX {\rtf1\ansi\ansicpg1252\deff0\deflang1033{\fonttbl{\f0\fnil\fcharset0 Times New Roman;}}
\viewkind4\uc1\pard\b\f0\fs24
\par }
Sprites spr_Map
spr_A1_W_D
spr_A1_W_L
spr_A1_W_R
spr_A1_W_U Sounds Backgrounds bg_White Paths Scripts
scr_MapSet scr_MapNames Fonts
Time Lines Objects
obj_MapKey
obj_Player Rooms rm_Main
Game Information Global Game Settings