Advertisement
Guest User

Untitled

a guest
Dec 14th, 2017
60
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.23 KB | None | 0 0
  1. MapText(mob/PC/Player/M, client/C, StartX, StartY, TexttoPrint, LAYER, TAG, SRC, PY, PX)
  2. if((!C) || (!M)) {world << "\red <b>ERROR: NO CLIENT([C]) OR NO MOB ([M]): [SRC]."; return}
  3. if(!TAG) {world << "\red <b>ERROR: NO TAG: [SRC]."; return}
  4. if((!StartX) || (!StartY)) {world << "\red <b>ERROR: NO STARTX ([StartX]) OR NO STARTY ([StartY]): [SRC]."; return}
  5. if(!LAYER) {world << "\red <b>ERROR: NO LAYER SET: [SRC]."; return}
  6. //Setting Vars//
  7. var/pix_offset = 0
  8. var/piy_offset = 0 // Create breaks in the vertical spacing.
  9. if(PY) piy_offset = PY
  10. var/tmpX = StartX //TmpX keeps track of length of sentence.
  11. var/LengthX = 0
  12. var/LX = 14
  13. TexttoPrint = TexttoPrint + " " //To prevent cut offs.
  14. for(var/i = length(TexttoPrint),i > 1, i--)
  15. var/Char = Left(TexttoPrint,i) //Best proc ever.
  16. pix_offset += 16
  17. if(pix_offset >= 32) {tmpX += 1; LengthX += 1; pix_offset = 0}
  18. //moves tmpX over. Resets pixel X.
  19.  
  20. if(LengthX >= LX) {StartY -= 1; LengthX = 0; tmpX = StartX} // LX HERE
  21. pix_offset = pix_offset + PX
  22. if(Char == " ") continue // Skip spaces.
  23. else if(Char == "-")
  24. var/path = text2path("/obj/OnScreen/Alphabet/hyphen")
  25. new path(C, tmpX, StartY, pix_offset, piy_offset,TAG, LAYER, SRC)
  26. else if(Char == ".")
  27. var/path = text2path("/obj/OnScreen/Alphabet/period")
  28. new path(C, tmpX, StartY, pix_offset, piy_offset,TAG, LAYER, SRC)
  29. else if(Char == "'")
  30. var/path = text2path("/obj/OnScreen/Alphabet/apostrophy")
  31. new path(C, tmpX, StartY, pix_offset, piy_offset,TAG, LAYER, SRC)
  32. else if(Char == ",")
  33. var/path = text2path("/obj/OnScreen/Alphabet/comma")
  34. new path(C, tmpX, StartY, pix_offset, piy_offset,TAG, LAYER, SRC)
  35. else if(Char == "!")
  36. var/path = text2path("/obj/OnScreen/Alphabet/exclaimation")
  37. new path(C, tmpX, StartY, pix_offset, piy_offset,TAG, LAYER, SRC)
  38. else if(Char == "(")
  39. var/path = text2path("/obj/OnScreen/Alphabet/lbrace")
  40. new path(C, tmpX, StartY, pix_offset, piy_offset,TAG, LAYER, SRC)
  41. else if(Char == ")")
  42. var/path = text2path("/obj/OnScreen/Alphabet/rbrace")
  43. new path(C, tmpX, StartY, pix_offset, piy_offset,TAG, LAYER, SRC)
  44. else if(Char == "?")
  45. var/path = text2path("/obj/OnScreen/Alphabet/question")
  46. new path(C, tmpX, StartY, pix_offset, piy_offset,TAG, LAYER, SRC)
  47. else if(Char == "/")
  48. var/path = text2path("/obj/OnScreen/Alphabet/slash")
  49. new path(C, tmpX, StartY, pix_offset, piy_offset,TAG, LAYER, SRC)
  50. else if(Char == "~")
  51. var/path = text2path("/obj/OnScreen/Alphabet/tilde")
  52. new path(C, tmpX, StartY, pix_offset, piy_offset,TAG, LAYER, SRC)
  53. else if(Char == ":")
  54. var/path = text2path("/obj/OnScreen/Alphabet/colon")
  55. new path(C, tmpX, StartY, pix_offset, piy_offset,TAG, LAYER, SRC)
  56. else if(Char == "1"||Char == "2"||Char == "3"|| Char == "4"||Char == "5"||Char == "6"|| Char == "7"||Char == "8"||Char == "9"||Char == "0")
  57. var/path = text2path("/obj/OnScreen/Alphabet/A[Char]")
  58. new path(C, tmpX, StartY, pix_offset, piy_offset,TAG, LAYER, SRC)
  59. else
  60. var/path = text2path("/obj/OnScreen/Alphabet/[Char]")
  61. new path(C, tmpX, StartY, pix_offset, piy_offset,TAG, LAYER, SRC)
  62. return 1
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement