Guest User

Untitled

a guest
Jun 23rd, 2022
241
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. #NoEnv  ; Recommended for performance and compatibility with future AutoHotkey releases.
  2. ; #Warn  ; Enable warnings to assist with detecting common errors.
  3. SendMode Input  ; Recommended for new scripts due to its superior speed and reliability.
  4. SetWorkingDir %A_ScriptDir%  ; Ensures a consistent starting directory.
  5.  
  6. SetKeyDelay, 50 ; 50ms
  7.  
  8. ; EMERGENCY KILL - Press Esc to pause script. Pressing Esc again will not unpause it.
  9. Escape::
  10. Pause, On
  11. Suspend, On
  12. ;Pause, Toggle
  13. Return
  14.  
  15. ; ###VOICES###
  16.  
  17. ;[np:] paul
  18. ;[nb:] betty
  19. ;[nh:] harry
  20. ;[nd:] dennis
  21. ;[nf:] frank
  22. ;[nu:] ursula
  23. ;[nr:] rita
  24. ;[nw:] wendy
  25. ;[nk:] kit
  26. ;[nv:] not sure what this one is since it's not listed on http://www.speechfxinc.com/dectalk.html
  27.  
  28. ;Below are some more voice modifiers which can be used in combination with the voice commands above.
  29. ;The effect of these commands is also permanent, untill you reset the voice.
  30.  
  31. ;[:dv ap 10] half life 1 announcer
  32.  
  33. ;[:dv br 200] slower with bleeps
  34.  
  35. ;[:dv hs 200] extremely LOUD and low voice
  36.  
  37. ;[:dv hs 1] helium voice
  38.  
  39. ;[:dv pr 1] makes the voice monotone
  40.  
  41. ;[:dv sx #] doesn't seem to do anything but is a legit command, because it doesn't say "command error in phoneme".
  42.  
  43. ;[:dv gv 40] will make the voice a lot quieter, but also more like stephen hawking's.
  44.  
  45. ;[:dv gv 100] will make the voice even louder than [:dv hs 200], but it will also bleep more.
  46.  
  47. ;[:rate(number)] ex. [:rate400]
  48. ;Change the speed of the voice
  49. ;The higher the number, the faster the voice will speak
  50.  
  51. ;[:rate200] normal speed
  52. ;[:rate400] double speed
  53. ;[:rate1] sloooooooow mmmmmmoooooooooooooooo
  54.  
  55. ;2spooky4u voice
  56. ;[:nb][:dv pr 1][:dv br 200][:dv gv 40][:dv hs 50][:rate 30]
  57.  
  58. ; ###WAITING###
  59. ;Sleep, 1000  ; 1 second
  60.  
  61. ; ### Censor Sound ###
  62. ::_bleep::
  63. (
  64. [:tone 1000,300]
  65. )
  66. return
  67.  
  68. ;Portal 2 space core
  69. ::_space::
  70. (
  71. [_<1,30>]spayyyyyyyyyyyace
  72. )
  73. return
  74.  
  75. ; Absentee 8-bit part
  76. ::_absentee::
  77. Absentee()
  78. return
  79. Absentee()
  80. {
  81.     Send, [:np][aa<475,22>aa<300,21>aa<300,19>aa<300,17>aa<300,14>aa<300,12>aa<225,10>aa<300,12>aa<700,14>aa]
  82.     Send, {Enter}{Enter}
  83. }
  84.  
  85. ; Still Alive (Portal)
  86. ::_portal::
  87. StillAlive()
  88. return
  89. StillAlive()
  90. {
  91. Send, [:np][thih<200,32>sswaa<120,31>ssah<120,29>tray<200,29>ah<200,31>mmff]{Enter}{Enter}
  92. Sleep, 3800
  93. Send, [ay<200,22>mey<120,32>kkey<120,31>ngah<200,29>now<300,29>thiy<200,31>rr_<300>hxuw<400,27>gsuh<200,29>kkseh<200,22>ss]{Enter}{Enter}
  94. Sleep, 4300
  95. Send, [ih<200,22>ts<90>hxah<300,29>rd<90>tow<200,31>ow<350,32>ver<200,29>stey<300,26>tmay<300,27>sae<350,29>dih<120,22>sfae<120,22>]{Enter}{Enter}
  96. Sleep, 3800
  97. Send, [shaa<200,31>n_<1900>ae<120,32>peh<150,31>cher<120,29>say<150,29>eh<200,31>ns_<1600>wey<200,22>dow<200,32>waa<200,31>t]{Enter}{Enter}
  98. Sleep, 5900
  99. Send, [wey<200,29>mah<500,29>stbey<200,31>kah<500,27>zwey<200,29>kae<500,22>nn]{Enter}{Enter}
  100. Sleep, 3000
  101. Send, [fow<500,29>rthaa<200,31>gah<500,32>daa<200,29>vah<500,26>llaa<200,27>vah<200,29>ss]{Enter}{Enter}
  102. Sleep, 3000
  103. Send, [eh<200,22>kseh<120,27>pthaa<120,29>waa<200,30>ns<80>hxow<200,29>ar<200,27>deh<200,25>dd]{Enter}{Enter}
  104. Sleep, 2300
  105. Send, [bah<200,22>ther<200,23>snow<400,25>seh<400,30>nskray<200,30>ih<200,29>now<200,27>ver<200,25>eh<200,27>vriy<200,25>mih<200,25>s]{Enter}{Enter}
  106. Sleep, 3400
  107. Send, [tey<350,25>kwey<200,22>ll<20>jhah<200,23>stkiy<350,25>paw<350,30>ntray<200,32>ih<200,30>ntih<200,29>llwiy<200,27>rah<200,27>n]{Enter}{Enter}
  108. Sleep, 3150
  109. Send, [aw<200,29>tah<350,30>fkey<350,30>kae<200,32>ndthaa<200,34>say<200,35>eh<200,35>nsgeh<200,34>tsdah<350,32>nnae<200,30>nd]{Enter}{Enter}
  110. Sleep, 3150
  111. Send, [yx<20>uw<200,32>mey<200,34>kah<200,34>niy<350,32>tgah<350,30>nfow<250,27>rthaa<180,25>piy<180,27>pih<180,27>ll<20>hxow<200,30>]{Enter}{Enter}
  112. Sleep, 3000
  113. Send, [ar<350,29>stih<200,29>ll<20>ah<200,31>llay<500,31>vv]{Enter}{Enter}
  114.  
  115. Send, {Enter}
  116. }
  117.  
  118. ;Spooky Scary Skeletons:
  119. ::_skeletons::
  120. skeletons()
  121. return
  122. skeletons()
  123. {
  124. Send, [spuh<300,19>kiy<300,19>skeh<300,18>riy<300,18>skeh<300,11>lleh<175,14>tih<200,11>ns]
  125. Send, {Enter}{Enter}
  126. Sleep, 300*5 + 175 + 200
  127. Sleep, 600
  128. Send, [seh<300,11>nd][shih<100,19>ver<500,19>sdaw<300,18>nyur<300,18>spay<300,11>n]
  129. Send, {Enter}{Enter}
  130. Sleep, 300 + 100 + 500 + 300 + 300 + 300
  131. Sleep, 600
  132. Send, [shriy<300,19>kiy<300,19>ng][skow<300,18>swih<300,18>ll][shah<300,11>kyur<300,14>sow<300,11>ll]
  133. Send, {Enter}{Enter}
  134. Sleep, 300*7
  135. Sleep, 500
  136. Send, [ahn<300,14>siy<300,14>llyur<300,16>duh<300,13>mtuh<300,14>nay<300,11>t]
  137. Send, {Enter}
  138. }
  139.  
  140. ; Test
  141. ::_test::
  142. (
  143. [:np][dah<200,34>,dah<4000,34>]
  144. )
  145. return
  146.  
  147. ; 2001 A Space Odyssey Opening
  148. ::_2001::
  149. SprachZarathustra()
  150. return
  151. SprachZarathustra()
  152. {
  153.  
  154.     Send, [:nf][buh<15500,13>m]{Enter}{Enter}
  155.     Send, [:nf][buh<15500,1>m]{Enter}{Enter}
  156.     Sleep, 2000
  157.     Send, [:nh][dah<2500,25>][dah<2500,32>][dah<8200,37>]{Enter}{Enter}
  158.     Sleep, 9000
  159.  
  160.     Send, [:np][dah<200,34>,dah<4000,34>]{Enter}{Enter}
  161.     Send, [:np][dah<200,32>,dah<4000,32>]{Enter}{Enter}
  162.     Send, [:np][dah<200,29>,dah<4000,28>]{Enter}{Enter}
  163.     Send, [:np][dah<200,25>,dah<4000,25>]{Enter}{Enter}
  164.     Send, [:np][dah<200,22>,dah<4000,22>]{Enter}{Enter}
  165.     Send, [:np][dah<200,17>,dah<4000,16>]{Enter}{Enter}
  166.     Send, [:np][dah<200,13>,dah<4000,13>]{Enter}{Enter}
  167.  
  168.     Sleep, 2500
  169.     Send, [:nf][buh<2300,13>m]{Enter}{Enter}
  170.     Sleep, 2000
  171.     Send, [:np][buh<200,13>m][_<50,1>][buh<200,8>m]{Enter}{Enter}
  172.     Sleep, 800
  173.     Send, [:np][buh<200,13>m][_<50,1>][buh<200,8>m]{Enter}{Enter}
  174.     Sleep, 800
  175.     Send, [:np][buh<200,13>m][_<50,1>][buh<200,8>m]{Enter}{Enter}
  176.     Sleep, 800
  177.     Send, [:np][buh<200,13>m][_<50,1>][buh<200,8>m]{Enter}{Enter}
  178.     Sleep, 800
  179.     Send, [:np][buh<200,13>m][_<50,1>][buh<200,8>m]{Enter}{Enter}
  180.     Sleep, 800
  181.     Send, [:np][buh<200,13>m][_<150,1>][buh<200,8>m]{Enter}{Enter}
  182.     Sleep, 1000
  183.  
  184.  
  185.     Send, [:np][buh<200,13>m]{Enter}{Enter}
  186.     Send, [:nf][buh<13500,13>m]{Enter}{Enter}
  187.     Send, [:nf][buh<13500,1>m]{Enter}{Enter}
  188.     Send, [:np][dah<2500,25>][dah<2500,32>][dah<8200,37>]{Enter}{Enter}
  189.     Sleep, 9000
  190.  
  191.     Send, [:np][dah<200,32>,dah<4000,32>]{Enter}{Enter}
  192.     Send, [:np][dah<200,20>,dah<4000,25>]{Enter}{Enter}
  193.     Send, [:np][dah<200,28>,dah<4000,29>]{Enter}{Enter}
  194.     Send, [:np][dah<200,25>,dah<4000,25>]{Enter}{Enter}
  195.     Send, [:np][dah<200,22>,dah<4000,22>]{Enter}{Enter}
  196.     Send, [:np][dah<200,16>,dah<4000,17>]{Enter}{Enter}
  197.     Send, [:np][dah<200,8>,dah<4000,13>]{Enter}{Enter}
  198.  
  199.     Sleep, 2500
  200.     Send, [:nf][buh<2300,13>m]{Enter}{Enter}
  201.     Sleep, 2000
  202.     Send, [:np][buh<200,13>m][_<50,1>][buh<200,8>m]{Enter}{Enter}
  203.     Sleep, 800
  204.     Send, [:np][buh<200,13>m][_<50,1>][buh<200,8>m]{Enter}{Enter}
  205.     Sleep, 800
  206.     Send, [:np][buh<200,13>m][_<50,1>][buh<200,8>m]{Enter}{Enter}
  207.     Sleep, 800
  208.     Send, [:np][buh<200,13>m][_<50,1>][buh<200,8>m]{Enter}{Enter}
  209.     Sleep, 800
  210.     Send, [:np][buh<200,13>m][_<50,1>][buh<200,8>m]{Enter}{Enter}
  211.     Sleep, 800
  212.     Send, [:np][buh<200,13>m][_<150,1>][buh<200,8>m]{Enter}{Enter}
  213.     Sleep, 1000
  214.  
  215.     Send, [:np][buh<200,13>m]{Enter}{Enter}
  216.     Send, [:nf][buh<16500,13>m]{Enter}{Enter}
  217.     Send, [:nf][buh<16500,1>m]{Enter}{Enter}
  218.     Send, [:np][dah<2500,25>][dah<2500,32>][dah<4200,37>]{Enter}{Enter}
  219.     Sleep, 9000
  220.  
  221.     Send, [:np][dah<200,29>,dah<3000,34>]{Enter}{Enter}
  222.     Send, [:np][dah<200,32>,dah<3000,30>]{Enter}{Enter}
  223.     Send, [:np][dah<200,29>,dah<3000,30>]{Enter}{Enter}
  224.     Send, [:np][dah<200,25>,dah<3000,30>]{Enter}{Enter}
  225.     Send, [:np][dah<200,20>,dah<3000,25>]{Enter}{Enter}
  226.     Send, [:np][dah<200,20>,dah<3000,18>]{Enter}{Enter}
  227.     Send, [:np][dah<200,13>,dah<3000,6>]{Enter}{Enter}
  228.     Sleep, 3600
  229.  
  230.     Send, [:np][dah<220,34>,dah<220,36>,dah<2000,37>]{Enter}{Enter}
  231.     Send, [:np][dah<220,30>,dah<220,32>,dah<2000,34>]{Enter}{Enter}
  232.     Send, [:np][dah<220,25>,dah<220,25>,dah<2000,25>]{Enter}{Enter}
  233.     Send, [:np][dah<220,22>,dah<220,24>,dah<2000,25>]{Enter}{Enter}
  234.     Send, [:np][dah<220,18>,dah<220,20>,dah<2000,22>]{Enter}{Enter}
  235.     Send, [:np][dah<220,6>,dah<220,8>,dah<2000,10>]{Enter}{Enter}
  236.     Send, [:np][dah<220,6>,dah<220,6>,dah<2000,6>]{Enter}{Enter}
  237.     Sleep, 3000
  238.  
  239.     Send, [:np][dah<1300,37>]{Enter}{Enter}
  240.     Send, [:np][dah<1300,34>]{Enter}{Enter}
  241.     Send, [:np][dah<1300,30>]{Enter}{Enter}
  242.     Send, [:np][dah<1300,27>]{Enter}{Enter}
  243.     Send, [:np][dah<1300,25>]{Enter}{Enter}
  244.     Send, [:np][dah<1300,15>]{Enter}{Enter}
  245.     Sleep, 1200
  246.  
  247.     Send, [:np][dah<7000,37>]{Enter}{Enter}
  248.     Send, [:np][dah<7000,25>]{Enter}{Enter}
  249.     Send, [:np][dah<7000,13>]{Enter}{Enter}
  250.     Send, [:np][dah<7000,1>]{Enter}{Enter}
  251.  
  252.     Send, [:np][dah<320,29>,dah<370,30>,dah<6000,32>]{Enter}{Enter}
  253.     Send, [:np][dah<320,25>,dah<370,27>,dah<6000,29>]{Enter}{Enter}
  254.     Send, [:np][dah<320,17>,dah<370,18>,dah<6000,20>]{Enter}{Enter}
  255.     Sleep, 1550
  256.  
  257.     Send, [:np][dah<320,32>,dah<370,32>,dah<420,29>]{Enter}{Enter}
  258.     Send, [:np][dah<320,29>,dah<370,25>,dah<420,20>]{Enter}{Enter}
  259.     Send, [:np][dah<320,17>,dah<370,13>,dah<420,8>]{Enter}{Enter}
  260.     Send, [:np][dah<320,29>,dah<370,25>,dah<420,20>]{Enter}{Enter}
  261.     Send, [:np][dah<320,17>,dah<370,13>,dah<420,8>]{Enter}{Enter}
  262.     Sleep, 1550
  263.  
  264.     Send, [:np][dah<1000,32>]{Enter}{Enter}
  265.     Send, [:np][dah<1000,17>]{Enter}{Enter}
  266.     Send, [:np][dah<1000,5>]{Enter}{Enter}
  267.     Sleep, 550
  268.  
  269.     Send, [:np][dah<320,29>,dah<320,30>,dah<600,32>]{Enter}{Enter}
  270.     Send, [:np][dah<320,25>,dah<320,27>,dah<600,29>]{Enter}{Enter}
  271.     Send, [:np][dah<320,17>,dah<320,18>,dah<600,20>]{Enter}{Enter}
  272.     Sleep, 800
  273.  
  274.     Send, [:np][dah<600,30>]{Enter}{Enter}
  275.     Send, [:np][dah<600,13>]{Enter}{Enter}
  276.     Send, [:np][dah<600,1>]{Enter}{Enter}
  277.     Sleep, 2800
  278.  
  279.     Send, [:np][dah<2000,34>]{Enter}{Enter} ; 36 37
  280.     Send, [:np][dah<2000,29>]{Enter}{Enter} ; 32 32
  281.     Send, [:np][dah<2000,25>]{Enter}{Enter} ; 27 29
  282.     Send, [:np][dah<2000,24>]{Enter}{Enter} ; 22 20
  283.     Send, [:np][dah<2000,22>]{Enter}{Enter} ; 24 25
  284.     Send, [:np][dah<2000,10>]{Enter}{Enter} ; 8 13
  285.     Sleep, 2000
  286.  
  287.     Send, [:np][dah<2000,36>]{Enter}{Enter}
  288.     Send, [:np][dah<2000,32>]{Enter}{Enter}
  289.     Send, [:np][dah<2000,27>]{Enter}{Enter}
  290.     Send, [:np][dah<2000,24>]{Enter}{Enter}
  291.     Send, [:np][dah<2000,22>]{Enter}{Enter}
  292.     Send, [:np][dah<2000,8>]{Enter}{Enter}
  293.     Sleep, 2000
  294.  
  295.     Send, [:np][dah<8000,37>]{Enter}{Enter}
  296.     Send, [:np][dah<8000,32>]{Enter}{Enter}
  297.     Send, [:np][dah<8000,29>]{Enter}{Enter}
  298.     Send, [:np][dah<8000,25>]{Enter}{Enter}
  299.     Send, [:np][dah<8000,20>]{Enter}{Enter}
  300.     Send, [:np][dah<8000,13>]{Enter}{Enter}
  301.     Sleep, 8200
  302.  
  303.     Send, [:np]Command Error in Phoneme{Enter}{Enter}
  304.     Send, {Enter} ; End
  305. }
Advertisement
Add Comment
Please, Sign In to add comment