Advertisement
SmileyS

How to make calculator

Nov 19th, 2021
68
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.77 KB | None | 0 0
  1.  
  2. function PressedOne()
  3. script.Parent.Question.Text = script.Parent.Question.Text.. "1"
  4. end
  5. function PressedTwo()
  6. script.Parent.Question.Text = script.Parent.Question.Text.. "2"
  7. end
  8. function PressedThree()
  9. script.Parent.Question.Text = script.Parent.Question.Text.. "3"
  10. end
  11. function PressedFour()
  12. script.Parent.Question.Text = script.Parent.Question.Text.. "4"
  13. end
  14. function PressedFive()
  15. script.Parent.Question.Text = script.Parent.Question.Text.. "5"
  16. end
  17. function PressedSix()
  18. script.Parent.Question.Text = script.Parent.Question.Text.. "6"
  19. end
  20. function PressedSeven()
  21. script.Parent.Question.Text = script.Parent.Question.Text.. "7"
  22. end
  23. function PressedEight()
  24. script.Parent.Question.Text = script.Parent.Question.Text.. "8"
  25. end
  26. function PressedNine()
  27. script.Parent.Question.Text = script.Parent.Question.Text.. "9"
  28. end
  29. function PressedZero()
  30. script.Parent.Question.Text = script.Parent.Question.Text.. "0"
  31. end
  32. function SelectedAddition()
  33. if string.find(script.Parent.Question.Text, " - ") or string.find(script.Parent.Question.Text, " + ") or string.find(script.Parent.Question.Text, " x ") or string.find(script.Parent.Question.Text, " ÷ ") then
  34. return
  35. else
  36. script.Parent.Question.Text = script.Parent.Question.Text.. " + "
  37. end
  38. end
  39. function SelectedSubtraction()
  40. if string.find(script.Parent.Question.Text, " - ") or string.find(script.Parent.Question.Text, " + ") or string.find(script.Parent.Question.Text, " x ") or string.find(script.Parent.Question.Text, " ÷ ") then
  41. return
  42. else
  43. script.Parent.Question.Text = script.Parent.Question.Text.. " - "
  44. end
  45. end
  46. function SelectedMultiplication()
  47. if string.find(script.Parent.Question.Text, " - ") or string.find(script.Parent.Question.Text, " + ") or string.find(script.Parent.Question.Text, " x ") or string.find(script.Parent.Question.Text, " ÷ ") then
  48. return
  49. else
  50. script.Parent.Question.Text = script.Parent.Question.Text.. " x "
  51. end
  52. end
  53. function SelectedDivision()
  54. if string.find(script.Parent.Question.Text, " - ") or string.find(script.Parent.Question.Text, " + ") or string.find(script.Parent.Question.Text, " x ") or string.find(script.Parent.Question.Text, " ÷ ") then
  55. return
  56. else
  57. script.Parent.Question.Text = script.Parent.Question.Text.. " ÷ "
  58. end
  59. end
  60. function FindAnswer()
  61. local Question = script.Parent.Question.Text
  62. local split = Question:split(' ')
  63. local e1 = split[1]
  64. local s = split[2]
  65. local e2 = split[3]
  66. wait(0.1)
  67. if s == "+" then
  68. script.Parent.Question.Text = e1 + e2
  69. else
  70. if s == "-" then
  71. script.Parent.Question.Text = e1 - e2
  72. else
  73. if s == "x" then
  74. script.Parent.Question.Text = e1 * e2
  75. else
  76. if s == "÷" then
  77. script.Parent.Question.Text = e1 / e2
  78. end
  79. end
  80. end
  81. end
  82. end
  83. function ClearQuestion()
  84. script.Parent.Question.Text = ""
  85. end
  86. script.Parent.Zero.MouseButton1Click:Connect(PressedZero)
  87. script.Parent.One.MouseButton1Click:Connect(PressedOne)
  88. script.Parent.Two.MouseButton1Click:Connect(PressedTwo)
  89. script.Parent.Three.MouseButton1Click:Connect(PressedThree)
  90. script.Parent.Four.MouseButton1Click:Connect(PressedFour)
  91. script.Parent.Five.MouseButton1Click:Connect(PressedFive)
  92. script.Parent.Six.MouseButton1Click:Connect(PressedSix)
  93. script.Parent.Seven.MouseButton1Click:Connect(PressedSeven)
  94. script.Parent.Eight.MouseButton1Click:Connect(PressedEight)
  95. script.Parent.Nine.MouseButton1Click:Connect(PressedNine)
  96. script.Parent.Add.MouseButton1Click:Connect(SelectedAddition)
  97. script.Parent.Subtract.MouseButton1Click:Connect(SelectedSubtraction)
  98. script.Parent.Multiply.MouseButton1Click:Connect(SelectedMultiplication)
  99. script.Parent.Divide.MouseButton1Click:Connect(SelectedDivision)
  100. script.Parent.Equal.MouseButton1Click:Connect(FindAnswer)
  101. script.Parent.Cancel.MouseButton1Click:Connect(ClearQuestion)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement