Advertisement
tabnation

ai 2

Feb 26th, 2021
59
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.74 KB | None
  1. StringCaseSense, off
  2. f1::
  3. ;-----------grab info from email-----------
  4. clipboard=
  5. send ^a
  6. sleep 250
  7. Send ^c
  8. ;-----------check if owe money-----------
  9. varfrom:=SubStr(Clipboard,1,InStr(Clipboard,"`n")-1)
  10. StringReplace, varfrom, varfrom, From, , All
  11. StringReplace, varfrom, varfrom, `r, , All
  12. FileRead, varowemoney, C:\Users\Thom\Desktop\owe us money.txt
  13. varfrom=%varfrom%
  14. IfInString, varowemoney, %varfrom%
  15. {
  16. msgbox, This person owes money do not take order
  17. Return
  18. }
  19.  
  20. StringReplace, Clipboard, Clipboard, subject, , All
  21. StringReplace, Clipboard, Clipboard, can, , All
  22. StringReplace, Clipboard, Clipboard, i, , All
  23. StringReplace, Clipboard, Clipboard, buy, , All
  24. StringReplace, Clipboard, Clipboard, some, , All
  25. If clipboard Contains goats
  26. {
  27. Msgbox, This is for the Animal dept. 100 percent chance
  28. send ^n
  29. send {right}
  30. send {enter}
  31. sleep 300
  32. clipboard=Yes I will get your order in right away
  33. send ^v
  34. return
  35. }
  36.  
  37. AIguess=0
  38. If clipboard Contains g
  39. {
  40. AIguess++
  41. }
  42. If clipboard Contains o
  43. {
  44. AIguess++
  45. }
  46. If clipboard Contains a
  47. {
  48. AIguess++
  49. }
  50. If clipboard Contains t
  51. {
  52. AIguess++
  53. }
  54. If clipboard Contains s
  55. {
  56. AIguess++
  57. }
  58. varpercent:= 100/5
  59. varpercent:= AIguess*20
  60. IfGreaterOrEqual, AIguess , 4
  61. {
  62. Msgbox, This is for the Animal dept. AI=%varpercent% percent chance
  63. send ^n
  64. send {right}
  65. send {enter}
  66. sleep 300
  67. clipboard=Yes I will get your order in right away
  68. send ^v
  69. return
  70. }
  71. IfGreaterOrEqual, AIguess , 3
  72. {
  73. Msgbox, This is for the Animal dept. AI=%varpercent% percent chance
  74. send ^n
  75. send {right}
  76. send {enter}
  77. sleep 300
  78. clipboard=Yes I will get your order in right away
  79. send ^v
  80. return
  81. }
  82. else
  83. {
  84. Msgbox, Im not sure where this should go
  85. }
  86.  
Advertisement
RAW Paste Data Copied
Advertisement