common code that people use are in here
some code: define smooth goto (x) (y) (time) set (rpt1) to [0] set (prevx) to (x position) set (prevy) to (y position) repeat ((time) *[30]) change (rpt1) by ([3] / (time)) go to x: ((prevx) + (((x)-(prevx))*([sin]of(rpt1)))) y: ((prevy) + (((y)-(prevy))*([sin]of(rpt1)))) end define set pen color to (red) (green) (blue) set pen color to ((((red) * (65536)) + ((green) * (256))) + (blue)) when gf clicked reset timer forever set (fps) to (round((1) / ((timer) - (prev)))) set (prev) to (timer) end code :: grey if <<touching [mouse]> and <mouse down>> then code if the sprite is clicked :: grey wait until <not <mouse down>> end code :: grey when gf clicked delete all of (people who can view :: list) add (person who can view your project :: grey) to (people who can view :: list) add (another person who can view your project :: grey) to (people who can view :: list) add (another person who can view your project :: grey) to (people who can view :: list) this can go on for as long as you like :: grey if <(item # of (username) in (people who can view :: list)) = [0]> then code notifying that they are not supposed to view the project :: grey stop [all] end when gf clicked delete all of (banned people :: list) add (banned person :: grey) to (banned people :: list) add (banned person :: grey) to (banned people :: list) add (banned person :: grey) to (banned people :: list) this can go on for as long as you like :: grey if <not <(item # of (username) in (banned people :: list)) = [0]>> then code notifying that they are not supposed to view the project :: grey stop [all] end
