; miscellaneous group arms lore / begging / camping / cartography / forensics / item identification / taste identification
; combat anatomy / archery / fencing / focus / healing / mace fighting / parrying / swordsmanship / tactics / throwing / wrestling
; trade skills alchemy / blacksmithing / fletching / carpentry / cooking / inscription / lumberjacking / mining / tailoring / tinkering
; magic bushido / chivalry / eval intelligence / imbuing / magery / meditation / mysticism / necromancy / ninjitsu / resisting spells / spellweaving / spirit speak
; wilderness animal lore / animal taming / fishing / herding / tracking / veterinary
; thievery detecting hidden / hiding / lock picking / poisoning / remove trap / snooping / stealing / stealth
; bard discordance / musicianship / peacemaking / provocation
; so example set %transmisscelanous ( add the id of the book here )
set %transmiscellaneous
set %transcombat
set %transtradeskills
set %transmagic
set %transwilderness
set %transthievery
set %transbard
set %psmiscellaneous ORIQWUD
set %pscombat ORIQWUD
set %pstradeskills ORIQWUD
set %psmagic ORIQWUD
set %pswilderness ORIQWUD
set %psthievery ORIQWUD
set %psbard ORIQWUD
set %alacmiscellaneous
set %alaccombat
set %alactradeskills
set %alacmagic
set %alacwilderness
set %alacthievery
set %alacbard
ignoreitem reset
gosub sortscrolls
display ok all done, halting!
halt
;------------------------------------
sub sortscrolls
pinksloop:
finditem TVH C_
IF #FINDKIND <> -1
{
event property #findid
if transcendence in #property
{
if arms , #spc , lore in #property || begging in #property || camping in #property || cartography in #property || forensics in #property || item , #spc , identification in #property || taste , #spc , identification in #property
{
exevent drag #findid #findstack
exevent dropc %transmiscellaneous
wait 20
ignoreitem #findid
goto pinksloop
}
if anatomy in #property || archery in #property || fencing in #property || focus in #property || healing in #property || mace , #spc , fighting in #property || parrying in #property || swordsmanship in #property || tactics in #property || throwing in #property || wrestling in #property
{
exevent drag #findid #findstack
exevent dropc %transcombat
wait 20
ignoreitem #findid
goto pinksloop
}
if alchemy in #property || blacksmithing in #property || fletching in #property || carpentry in #property || cooking in #property || inscription in #property || lumberjacking in #property || mining in #property || tailoring in #property || tinkering in #property
{
exevent drag #findid #findstack
exevent dropc %transtradeskills
wait 20
ignoreitem #findid
goto pinksloop
}
if bushido in #property || chivalry in #property || eval , #spc , intelligence in #property || imbuing in #property || magery in #property || meditation in #property || mysticism in #property || necromancy in #property || ninjitsu in #property || resisting , #spc , spells in #property || spellweaving in #property || spirit , #spc , speak in #property
{
exevent drag #findid #findstack
exevent dropc %transmagic
wait 20
ignoreitem #findid
goto pinksloop
}
if animal , #spc , lore in #property || animal , #spc , taming in #property || fishing in #property || herding in #property || tracking in #property || veterinary in #property
{
exevent drag #findid #findstack
exevent dropc %transwilderness
wait 20
ignoreitem #findid
goto pinksloop
}
if detecting , #spc , hidden in #property || hiding in #property || lock , #spc , picking in #property || poisoning in #property || remove , #spc , trap in #property || snooping in #property || Stealing in #property || Stealth in #property
{
exevent drag #findid #findstack
exevent dropc %transthievery
wait 20
ignoreitem #findid
goto pinksloop
}
if discordance in #property || musicianship in #property || peacemaking in #property || provocation in #property
{
exevent drag #findid #findstack
exevent dropc %transbard
wait 20
ignoreitem #findid
goto pinksloop
}
}
if exalted in #property || mythical in #property || legendary in #property
{
if arms , #spc , lore in #property || begging in #property || camping in #property || cartography in #property || forensics in #property || item , #spc , identification in #property || taste , #spc , identifcation in #property
{
exevent drag #findid #findstack
exevent dropc %psmiscellaneous
wait 20
ignoreitem #findid
goto pinksloop
}
if anatomy in #property || archery in #property || fencing in #property || focus in #property || healing in #property || mace , #spc , fighting in #property || parrying in #property || swordsmanship in #property || tactics in #property || throwing in #property || wrestling in #property
{
exevent drag #findid #findstack
exevent dropc %pscombat
wait 20
ignoreitem #findid
goto pinksloop
}
if alchemy in #property || blacksmithing in #property || fletching in #property || carpentry in #property || cooking in #property || inscription in #property || lumberjacking in #property || mining in #property || tailoring in #property || tinkering in #property
{
exevent drag #findid #findstack
exevent dropc %pstradeskills
wait 20
ignoreitem #findid
goto pinksloop
}
if bushido in #property || chivalry in #property || eval , #spc , intelligence in #property || imbuing in #property || magery in #property || meditation in #property || mysticism in #property || necromancy in #property || ninjitsu in #property || resisting , #spc , spells in #property || spellweaving in #property || spirit , #spc , speak in #property
{
exevent drag #findid #findstack
exevent dropc %psmagic
wait 20
ignoreitem #findid
goto pinksloop
}
if animal , #spc , lore in #property || animal , #spc , taming in #property || fishing in #property || herding in #property || tracking in #property || veterinary in #property
{
exevent drag #findid #findstack
exevent dropc %pswilderness
wait 20
ignoreitem #findid
goto pinksloop
}
if detecting , #spc , hidden in #property || hiding in #property || lock , #spc , picking in #property || poisoning in #property || remove , #spc , trap in #property || snooping in #property || Stealing in #property || Stealth in #property
{
exevent drag #findid #findstack
exevent dropc %psthievery
wait 20
ignoreitem #findid
goto pinksloop
}
if discordance in #property || musicianship in #property || peacemaking in #property || provocation in #property
{
exevent drag #findid #findstack
exevent dropc %psbard
wait 20
ignoreitem #findid
goto pinksloop
}
}
if alacrity in #property
{
if arms , #spc , lore in #property || begging in #property || camping in #property || cartography in #property || forensics in #property || item , #spc , identification in #property || taste , #spc , identification in #property
{
exevent drag #findid #findstack
exevent dropc %alacmiscellaneous
wait 20
ignoreitem #findid
goto pinksloop
}
if anatomy in #property || archery in #property || fencing in #property || focus in #property || healing in #property || mace , #spc , fighting in #property || parrying in #property || swordsmanship in #property || tactics in #property || throwing in #property || wrestling in #property
{
exevent drag #findid #findstack
exevent dropc %alaccombat
wait 20
ignoreitem #findid
goto pinksloop
}
if alchemy in #property || blacksmithing in #property || fletching in #property || carpentry in #property || cooking in #property || inscription in #property || lumberjacking in #property || mining in #property || tailoring in #property || tinkering in #property
{
exevent drag #findid #findstack
exevent dropc %alactradeskills
wait 20
ignoreitem #findid
goto pinksloop
}
if bushido in #property || chivalry in #property || eval , #spc , intelligence in #property || imbuing in #property || magery in #property || meditation in #property || mysticism in #property || necromancy in #property || ninjitsu in #property || resisting , #spc , spells in #property || spellweaving in #property || spirit , #spc , speak in #property
{
exevent drag #findid #findstack
exevent dropc %alacmagic
wait 20
ignoreitem #findid
goto pinksloop
}
if animal , #spc , lore in #property || animal , #spc , taming in #property || fishing in #property || herding in #property || tracking in #property || veterinary in #property
{
exevent drag #findid #findstack
exevent dropc %alacwilderness
wait 20
ignoreitem #findid
goto pinksloop
}
if detecting , #spc , hidden in #property || hiding in #property || lock , #spc , picking in #property || poisoning in #property || remove , #spc , trap in #property || snooping in #property || Stealing in #property || Stealth in #property
{
exevent drag #findid #findstack
exevent dropc %alacthievery
wait 20
ignoreitem #findid
goto pinksloop
}
if discordance in #property || musicianship in #property || peacemaking in #property || provocation in #property
{
exevent drag #findid #findstack
exevent dropc %alacbard
wait 20
ignoreitem #findid
goto pinksloop
}
}
}
return