//Rotate Font script by Bravesaturn
//Use is similar to font_angle but keeps all letters readable
//////////////////////////////
//argument0 = x coordinate
//argument1 = y coordinate
//argument2 = angle to draw text at
//argument3 = text to draw
//argument4 = whether to always have the text face the correct way (on angles greater than 90 and less than 270)
//note: place in draw event
//////////////////////////////
msg = string(argument3);
txtLength = string_length(msg);
ang = argument2 mod 360;
for (i = 0; i < txtLength; i += 1)
  {
  //set values of an array to the letters of the text
  letter[i] = string_copy(msg,i+1,1);
  //now set the positions of the letters in an array
  letPosX[i] = argument0+((string_height(letter[i])*i)*cos(degtorad(ang)));
  letPosY[i] = argument1+((string_height(letter[i])*i)*-sin(degtorad(ang)));
  //now to draw the text facing the right direction
  if (argument4 = 1)
    {
    if (ang <= 270) and (ang > 90)
      {
      //draw in reverse so the letters appear right
      draw_text(letPosX[i],letPosY[i],letter[txtLength-i-1]);
      }
    else 
      {
      //draw text correctly
      draw_text(letPosX[i],letPosY[i], letter[i]);
      }
    }
  else
    {
    draw_text(letPosX[i],letPosY[i], letter[i]);
    }
  }