YASSE Hitbasic (script)

This is part of the YASSE Combat Package. --Hithrael 03:48, 11 November 2010 (UTC)

#Add more messaging
#Search for the above language to find points in the script were more language is needed.


#Global settings 
set predefined on
setglobalvariable yetarrange [no]
setglobalvariable knife [skinning knife]
setglobalvariable arrangenumber [0]
setglobalvariable skinningknifemessage [wrist sheath]
setglobalvariable skinmax [3]


#Local settings
setvariable spell pd
setvariable mana 15
setvariable targettime 3

#Action calls
action [secondary spell pattern] goto tm
action [You are already] gosub release
action [There is nothing else to face!] gosub foewait
action [At what are you trying to] gosub foewait
action [You aren't close enough to attack] gosub foewait
action [But you are already dodging!] put parry
action [You are already in a position to parry.] put dodge
action [To whom are you speaking?] goto end

#Action calls for combat/critter death
#Add more messaging
action [lifeless mound] gosub loot
action [specify a target] gosub foewait
action [can't cast] gosub foewait

setup:
pause
boxmessage Enter weapon type now. \nClasses include: \n Blunt, Edged, lightedged, thrustedged, Pike, Halberd, Quarterstaff, Shortstaff, Thrown, and TM

getline
setglobalvariable huntingweapon [%righthanditem]
goto %l

MAGIC
tm:
pause
put prep $spell$ $mana$
pausetext 2 You trace
put target
pausetext 2 You begin to wave
pause $targettime$
put cast
pausetext 2 You gesture at
pause
goto tm

release:
put release
put face next
pause
return


BLUNT WEAPONS
blunt:
pause
put feint
waitfor roundtime
pause
put bash
waitfor roundtime
pause
put sweep
waitfor roundtime
pause
put draw
waitfor roundtime
pause
put swing
waitfor roundtime
pause
put dodge
waitfor roundtime
pause
goto blunt


EDGED WEAPONS
lightedged:
pause
put feint
waitfor roundtime
pause
put draw
waitfor roundtime
pause
put slice
waitfor roundtime
pause
put chop
waitfor roundtime
pause
put dodge
waitfor roundtime
pause
goto lightedged

edged:
pause
put feint
waitfor roundtime
pause
put draw
waitfor roundtime
pause
put sweep
waitfor roundtime
pause
put slice
waitfor roundtime
pause
put chop
waitfor roundtime
pause
put parry
waitfor roundtime
pause
goto edged

thrustedged:
pause
put feint
waitfor roundtime
pause
put lunge
waitfor roundtime
pause
put thrust
waitfor roundtime
pause
put jab
waitfor roundtime
pause
put slam
waitfor roundtime
pause
put parry
waitfor roundtime
pause
goto thrustedged


POLE WEAPONS

halberd:
pause
put feint
waitfor roundtime
pause
put draw
waitfor roundtime
pause
put slice
waitfor roundtime
pause
put thrust
waitfor roundtime
pause
put sweep
waitfor roundtime
pause
put chop
waitfor roundtime
pause
goto halberd

pike:
pause
put dodge
waitfor roundtime
pause
put jab
waitfor roundtime
pause
put sweep
waitfor roundtime
pause
put thrust
waitfor roundtime
pause
put lunge
waitfor roundtime
pause
goto pike


STAFF WEAPONS
quarterstaff:
pause
put feint
waitfor roundtime
pause
put draw
waitfor roundtime
pause
put swing
waitfor roundtime
pause
put thrust
waitfor roundtime
pause
put sweep
waitfor roundtime
pause
put chop
waitfor roundtime
pause
goto quarterstaff

shortstaff:
pause
put feint
waitfor roundtime
pause
put draw
waitfor roundtime
pause
put slice
waitfor roundtime
pause
put parry
waitfor roundtime
pause
put thrust
waitfor roundtime
pause
put chop
waitfor roundtime
pause
goto shortstaff

#Action Call Scripts
loot:
setglobalvariable huntingweapon [%righthanditem]
pause
put look
nextroom

skin:
if %youalsosee contains dead 
	begin
		call skin
		pause
	end

lootstuff:
pause
call loot
pause
if %righthanditem contains empty	
	begin
	if $huntingweapon$ contains empty
		return
	pause
	put wield $huntingweapon$
	pause
	end
pause
return

foewait:
pause
put face next
pause
goto loot
pause
if %righthanditem contains empty	
	begin
		put wield $huntingweapon$
		pause
	end
pausetext 30 melee range
pause
return

end:
exit