Post your Code Snippets

[Sudnep]

Since this forum is now mostly dead because of the separation of Gamemaker Questions and Game Design I figured this would probably be a useful thread for posting interesting/easy to implement code.

Alternative way to post: https://klazen.com/gm/

I'll start:

parShooterBoss - A simple parent that can be assigned to an object to give it the attributes of a generic shooter boss.

[klazen108]

irandom_excluding script to pick a random number from 0 to some upper limit, skipping one number in the range

blast_shape script to blast a shape in cherries, including triangles, squares and stars

Triple Jump how to add triple jump to your game (shows exact edits for YoYoYo Engine, but the concept applies to all engines)

array_shuffle script to take an array and shuffle its elements

draw_rotated draw any sprite as if it were rotated into/out of the screen.

[Zurai]

Move and Stop - Maybe more a beginner thingy but always useful.

[Derf]

Move and Stop - Maybe more a beginner thingy but always useful.

Boy I'm gonna need to see some indenting and semi-colon line termination or else it's gonna be a ticket.

(srs though it's a nice simple code that pretty much anyone can benefit from)

[lawatson]

Rainbowness!

(click to show/hide)

In draw event:

col=make_color_hsv(hue,255,255);
image_blend=col;
hue+=1;

end draw event

Make sure to use it on black and white sprites for the most effect.

[WetWookie]

Wookie's Bugs.

Give them a small sprite (I used 7x7) with the origin in the center and uncheck "visible" in the object. Place the bug anywhere on the screen and on startup it will find a random block, place itself there, turn itself visible and start wandering around.

(click to show/hide)

iangle = irandom_range(0,360);
NotPlaced = 1;

(click to show/hide)

if NotPlaced == 1
{
    NotPlaced = 0;
    bnum = irandom_range(1,instance_number(block)-2);
    cnt = 0;
    with block
    {
        other.cnt = other.cnt + 1;
        if other.cnt == other.bnum
        {
            other.x = x + 16;
            other.y = y + 16;
        }
    }
    visible = true;
}
ContAction = ContAction - 1;
if ContAction <= 0
{
    baction = choose(0,1);
    ContAction = irandom_range(10, 50);
    LastChange = choose(-10,-5,0,5,10,LastChange);
    iangle = iangle + LastChange;
    SpinDir = choose(-10,10);
}
if baction == 0
{
    direction = iangle;
    speed = 0;
}
if baction == 1
{
    speed = 1;
    if place_empty(x + hspeed,y + vspeed)
    {

        direction = direction + SpinDir;
        speed = 0;
       
    }
}

(click to show/hide)

image_angle = iangle;
draw_self();

Known issues: Crawls onto invisible objects (triggers)

[Derf]

Super cheap day/night cycle I'm using in one of my latest games. Works best over a background of clouds.

Create:

Code: [Select]

c1 = make_color_rgb(29,68,73);
c2 = make_color_rgb(89,146,199);
c3 = make_color_rgb(237,189,104);
c4 = make_color_rgb(150,222,219);
c5 = make_color_rgb(70,42,100);
c6 = make_color_rgb(242,95,52);
c7 = make_color_rgb(83,12,0);
c8 = make_color_rgb(14,19,38);
c9 = make_color_rgb(1,2,6);
c0 = make_color_rgb(45,37,78);
col1 = c1;
col2 = c3;
con = 0;
pha = 0;
inc = 0.125/2;

Step:

Code: [Select]

switch(pha){
     case 0:
          col1 = merge_color(c1,c2,con/100);
          col2 = merge_color(c3,c4,con/100);
     break;

     case 1:
          col1 = merge_color(c2,c5,con/100);
          col2 = merge_color(c4,c6,con/100);
     break;

     case 2:
          col1 = merge_color(c5,c7,con/100);
          col2 = merge_color(c6,c8,con/100);
     break;

     case 3:
          col1 = merge_color(c7,c9,con/100);
          col2 = merge_color(c8,c0,con/100);
     break;

     case 4:
          col1 = merge_color(c9,c1,con/100);
          col2 = merge_color(c0,c3,con/100);
     break;
}

con += inc;

if(con == 100){
     con = 0;
     pha += 1;
}

if(pha >= 5){
    pha = 0;
}

Draw:

Code: [Select]

draw_set_blend_mode_ext(bm_src_color,bm_src_color);
draw_set_alpha(0.5);
draw_rectangle_color(0,0room_width,room_height,col1,col1,col2,col2,0);
draw_set_blend_mode(bm_normal);
draw_set_alpha(1);

Free to use; don't care about credit. I would appreciate changing the colours + increment so the effects aren't completely identical but either way I'm not really too bothered. :~)

[Sudnep]

This was made more for myself than other people but I'm sure people can find a use for it / edit it for their own personal use.

Orbiting Objects: Used for making an 'objProjectile' orbit about a point or another object. I'll update the link if I find any bugs with it.

updated dec 11, 2015

[patrickgh3]

fontSetup - Shortcut for typing out several draw_set_somethings

oscillate - Modular script for making objects bob up and down, and similar effects

[RandomFangamer]

Found this nice site called GMLScripts
It has several scripts that allow you do to many things with instances, sprites, etc.
Link: https://www.gmlscripts.com

[zaphod77]

This is for I wanna Be The Studio Engine YoYoYo Edition.

I've created a cherry that will after a number of ticks that you can assign after creation, aim itself at the player, and that will repeat the action a defined number of times. It can optionally change speed when it does this, and then change speed again each time after.

(click to show/hide)

Information about object: objCherryRetargetPlayer
Sprite: sprCherry
Solid: false
Visible: true
Depth: 0
Persistent: false
Parent: objCherry
Children:
Mask:

No Physics Object
Create Event:

execute code:

event_inherited();
/// this cherry will aim itself at the player a certain time AFTER it's spawned.
homedelay=0;  ///number of ticks to wait before each direction change.
homeretargets=0; /// how many times to change directions
hometimer=0; ///internal variable
changespeed=false; /// whether or not it should change speed when it changes direction.
newspeed=16; ///  speed after first direction change, if changespeed=true.
speeddelta=0; /// amount to add or subtract from the speed above after each change, if changespeed=true. use negative values to slow it down.

Step Event:

execute code:

hometimer+=1;
if (hometimer>homedelay && homeretargets>0 && homedelay>0)
{
homeretargets-=1;
hometimer=0;
if (instance_exists(objPlayer)) /// only aim for Kid if he's alive.
{
direction=point_direction(x,y,objPlayer.x,objPlayer.y); ///aim for kid
}
if (changespeed=true)
{
speed=newspeed; ///change the speed
newspeed=newspeed+speeddelta; ///and adjust the speed for the next change
}
}

I modifed scrCreateShapes for testing this.  you can, of course, make colored versions of this object easily enough.

There are many things you can do with this object.

1) make a shape that expands, then aims all it's cherries at you.
2) make a shot that curves towards you for a bit and accelerates
3) place a mine that speeds off in your direction a while later.

making versions of other/random colors is left as an exercise to the reader.

[WetWookie]

Someone asked me for my water droplet code so here ya go. Object drips down blocks and slides along the edges of spikes.

(click to show/hide)

Code: [Select]

Stat = 0; // 0 = flowing, 1 = falling
VSpd = 0.5;
HSpd = 0;
LastVC = 0;
LastHC = 0;
HStep = 0
NotPlaced = 0;

(click to show/hide)

Code: [Select]

if NotPlaced == 1
{
    NotPlaced = 0;
    bnum = irandom_range(1,instance_number(objBlock)-2);
    cnt = 0;
    with objBlock
    {
        other.cnt = other.cnt + 1;
        if other.cnt == other.bnum
        {
            other.x = x + 16;
            other.y = y + 16;
        }
    }
    visible = true;
}

if Stat == 0
{
    x = x + HSpd;
    y = y + VSpd;
    if place_empty(x,y)
    {
        VSpd = 0;
        if place_empty(x - 1,y) == false {x -= 1;}
        if place_empty(x + 1,y) == false {x += 1;}
        HSpd = 0;
    }
    if place_empty(x,y)
    {
        VSpd = 0;
        if place_empty(x - 2,y) == false {x -= 2;}
        if place_empty(x + 2,y) == false {x += 2;}
        HSpd = 0;
    }
    if place_empty(x,y)
    {
        Stat = 1;
        HSpd = 0;
    } else {
        LastVC = choose(-VSpd,-VSpd / 2, LastVC, LastVC,0.05,0.1);
        VSpd += LastVC;
        if HStep <= 0
        {
            HStep = irandom_range(25,150);
            HSpd = random_range(-0.05,0.05);
        } else {
            HStep -= 1;
        }
       
        if VSpd > 10
        {
            HSpd = 0;
            VSpd = choose(0,1);
        }
        if VSpd < 0 {VSpd = 0;}
    }
} else {
    VSpd += 0.3;
    y += VSpd;
    x += HSpd;
    if place_meeting(x, y, objBlock) || place_meeting(x, y, objPlayerKiller) || place_meeting(x, y, objPlayer)
    {
        VSpd = VSpd / 4;
        HSpd = 0;
        Stat = 0;
        HStep = 0;
    }
}


(click to show/hide)

Code: [Select]

y = 1;
x = irandom_range(100,room_width - 100);

[Smartkin]

People probably already made this thousands of times but decided to write this myself. This is a code that let's you make the object fade in and out, or just fade in, or just fade out - scrAlphaFade

Oh, yeah if you work in Studio you should have currentFade variable defined in the creation code of every object that will use this script.

Edit: I decided to go even further and created a script that will let you mess with fading any variable you want to - scrValFade

[MrSlick]

https://klazen.com/gm/AjN
All credit goes to YoYo for this script. I only added too it.
The description says what it does and all the arguments are documented.

ADMIN EDIT: snippet edit panel was showing, be more careful next time.

[patrickgh3]

I made a pretty nice pushable block that feels smooth, drops into 32px gaps, and is configurable. PM if you find any issues.

https://klazen.com/gm/eEq

EDIT: Updated version here: https://tinyurl.com/zx9ra6h