# Suggestion - Ballon Rising Arm:
# ===============================================================================
#
#
# Description:	This is part of a modular approach to hypnotic script assembly.
#		This sub-script is the extremely common variation of the raise
#		your arm because a balloon is now attached to it.  I have
#		added elements to deal with timing, control, and randomness.
#
#
# Created by:
#			???? please contact me I'll fill in your name
#
# Modifications:
#			Interstel@tampabayadult.net
#
# Revision History:
#			1.0	????
#			1.3	04/20/2005
#			1.5	07/18/2005
#
# Variables Used:
#			 50:		pass variable that records arm up or down
#			100:		random numbers to get total time passage
#			103:		temp name holder assign from %name% or %254%
#			150:		generates random numbers to make decisions
#			151:		random variable left or right arm
#			249:		if "y" present use slave name
#			254:		slave name of subject
#
# Comments:
#			This module makes use of random pause intervals
#			so that complacency and/or defenses can be side
#			stepped.  %100% is an internal sentence pause.
#			While %101% is a longer end of sentence pause.
#
#
# Begin:
#	Test to see if slave name
#
<set 103> %name%
<if 249=> y
<set 103> %254%
#
# setup
#
<set 50> 0
<set 151> left
<rand 1,1000> 150
<if 150>> 500
<set 151> right
#
# begin hand levitation attempt
#
<rand 100,500> 100
<speak> \vol=26000\ \spd=75\ If your eyes are closed open them but remain in a deep deep trance... \pau=%100%\
<rand 1000,2000> 100
<speak> %103% your %151% hand is suddenly very very light.  It feels like a balloon on a string has been tied to your %151% hands wrist.  A balloon full of helium.   \pau=%100%\
<rand 1500,3000> 100
<speak> %103% your %151% hand gives a twitch as your %151% hand begins to raise following the balloon upwards.  Higher and higher. Lighter and lighter.  Rising...   \pau=%100%\
<rand 2000,4000> 100
<speak> \vol=27000\ \spd=110\ %103% the higher your %151% hand floats following the ballon the faster it rises.  Higher and faster.  Faster and higher.   \pau=%100%\
#
# see about extra repetition
#
<rand 2000,4000> 100
<rand 1,100> 150
<if 150>> 70
<speak> \vol=28000\ \spd=110\ %103% the higher your %151% hand floats following the ballon the faster it rises.  Faster and higher.  Higher and faster.   \pau=%100%\
#
# see about extra repetition
#
<rand 2000,4000> 100
<rand 1,100> 150
<if 150>> 70
<speak> \vol=29000\ \spd=120\ %103% lighter and lighter, higher and higher your %151% hand floats following the ballon. Drawing all your attention skyward with it.   \pau=%100%\
#
# continue with final movement
#
<rand 2000,4000> 100
<speak> \vol=28000\ \spd=110\ %103% the higher your %151% hand floats following the ballon the faster it rises.  Higher and faster.  Faster and higher.   \pau=%100%\
<rand 2000,4000> 100
<speak> \vol=24000\ \spd=90\ %103% the moment your %151% hand reaches shoulder height it will \emp\STOP rising...   \pau=%100%\
<speak> \vol=24000\ \spd=100\
#
# Is the ARM UP?
#
<rand 2000,4000> 100
<speak> If your %151% hand is now at shoulder height choose \emp\YES with your mouse otherwise choose \emp\NO...   \pau=%100%\
<yesno> Yes/No?
<if yesno=> no
<gotolabel> EXIT
#
# ARM is UP!
#
<set 50> 1
<speak> Put your %151% hand and arm down right \emp\NOW... \pau=500\
<speak> Put your %151% hand and arm down right \emp\NOW... \pau=500\
<sound> snap.wav
<rand 2000,4000> 100
<speak> Your trance level has just \emp\DOUBLED to twice as deep... \pau=%100%\
<speak> You are now forgetting that your arm was raised.  And obeying me more and more as you forget more and more.   \pau=2000\
#
# load memory forget routine
#
<loadcall> suggestions\Suggestion - Forget What You Were Just Doing.txt
#
# End:
#
EXIT:
<end>
