New Pirate Code Commented

// Purpose of script is to change comms messages job indicator and words from english to pirate
// written by xIAMTHELAWx
// 19MAY2019
// currently doesnt change message words to pirate words

def process_signal(sig) {

// load the word changing base into pword
$pword = "ai/Navigator#are/argh#arrest/blow the man down#arrested/hung from the Yard Arm#ashwalker/native#ashwalkers/natives#assistant/scallywag#atmos/gunpowder#atmospherics/gunpowder#bar/Rum Wagon#bartender/grog master#bathroom/head#baton/cutlass#batonning/cutlassing#beepsky/Jack Ketch#blob/Terror of the Deep#bomb/ordnance#botanist/rum runner#botanists/rum runners#braindead/taking a caulk#bridge/Quarterdeck#brig/gangplank#brigged/was made to walk the plank#call/Oye!#captain/Cap'n#cash/booty#ce/chief sailmaker#chapel/scuttlebutt#chaplain/seadog#chef/galley cook#chefs/galley cooks#chemist/gunner#chemistry/gunners well#chemists/gunners#clean/swab#cleaning/swabbing#clone/show a leg#cloned/shown a leg#clown/Scurvy Dog#cmo/chief surgeon#come/git#cook/galley cook#cooks/galley cooks#credits/booty#crew/mateys#crewmember/mate#curator/bookey#dead/at davy jones locker#detective/snitch#die/go to davy jones locker#dieing/going to davy jones locker#disease/scurvy#doc/Surgeon#docs/surgeons#doctor/surgeon#doctors/surgeons#door/hatch#dude/lad#engi/Sailmaker#engie/Sailmaker#engine/sails#engineer/sailmaker#engineering/Main Mast#engineers/sailmakers#escape/the poop deck#execute/keelhaul#executed/keelhauled#fix/overhaul#fixed/overhauled#floor/deck#food/grub#friend/matey#genetecist/Ol Cranky#genetecists/Ol Crankys#get/git#girl/lassie#gun/blunderbuss#guy/lad#hallway/passageway#harm-batoned/ran me through with a Cutlass#harm-batonning/running me through with a Cutlass#heaven/davy jones' locker#hello/Ahoy Matey!#hello/Yo Ho Ho#help/Blimey pick me up!#hey/Arr!#hi/Yo Ho Ho#hit/flog#hitting/floggin#hop/Crewmaster#hos/first mate#hydro/distillery#hydroponics/distillery#i/aye#is/ish#janitor/swabber#janitors/swabbers#kill/run em through#kitchen/galley#laser/blunderbuss#law/pirates code#law2/Ye Gotta#lawyer/Hornswaggler#library/Gamblin Den#lie/gundeck#lieing/gundecking#lier/gundecker#ling/interloper#maintenance/bilge#medbay/Chop Shop#medical/Chop Shop#mime/shark bait#mine/pillage#miner/boatswain#minerals/booty#miners/boatswains#mining/Jacob's Ladder#money/treasure#mop/swab#mopping/swabbing#my/meh#ninja/privateer#operative/Sail Ho!#operatives/Sails Ho!#order/pillage#paramedic/boarder#paramedics/boarders#plasma/gunpowder#psychiatrist/Ol Kooky#qm/Quartermaster#quiet/becalmed#rd/chief gunners mate#release/parley#released/parleyed#rev/mutineer#revolution/mutiny#revs/mutineers#robotics/tinkerers workshop#robotocist/tinkerer#robotocists/tinkerers#scientist/gunners mate#scientists/gunners mates#sec/shore patrol#security/shore patrol#shuttle/Cockboat#shuttle/scuttle the ship#signal/lookout#sling/demon#slings/demons#slip/run a rig#slipped/ran a rig#slipping/running a rig#space/sea#spaced/marooned#station/Jolly Roger#steal/plunder#stealing/plundering#stole/plundered#stolen/plundered#stop/Avast!#stuff/booty#sure/aye#syndicate/british#syndicates/the British#taser/blunderbuss#tasered/blunderbussed#tcomms/Lookout Nest#telecomms/Lookouts Nest#this/tis#toilet/head#toilets/head#tourist/landlubber#toxin/gunpowder#toxins/gunwell#traitor/son of a biscuit eater#trick/run a rig#tricked/ran a rig#turret/cannon#turrets/cannons#valid/has a letter of marque#vault/booty#virologist/bilge rat#virus/scurvy#wall/bulkhead#wanted/a picaroon#warden/Ol Salty#wizard/scourge of the seven seas#woah/Blimey!#wow/shiver me timbers#yeah/yarh#yep/aye aye#yes/aye aye#you/ye#" ;

// load the job changing base into pjob
$pjob = "AI/Navigator#Assistant/Scallywag#Atmospheric Technician/Powder Monkey#Bartender/Grog Master#Botanist/Rum Runner#Captain/Cap'n#Cargo Technician/Cabin Boy#Chaplain/Seadog#Chef/Galley Cook#Chemist/Gunner#Chief Engineer/Chief Sailmaker#Chief Medical Officer/Chief Surgeon#Clown/Scurvy Dog#Cook/Galley Cook#Curator/Bookey#Detective/Snitch#Genetecist/Ol Cranky#Head of Personnel/Crewmaster#Head of Security/First Mate#Janitor/Swabber#Lawyer/Hornswaggler#Medical Doctor/Surgeon#Mime/Shark Bait#Paramedic/Boarder#Psychiatrist/Ol Kooky#Research Director/Chief Gunners Mate#Robotocist/Tinkerer#Scientist/Gunners Mate#Security Officer/Shore Patrol#Shaft Miner/Boatswain#Signal Technician/Lookout#Station Engineer/Sailmaker#Tourist/Landlubber#Virologist/Bilge rat#Warden/Ol Salty#" ;

sig.content = lower(sig.content) ;

// explode the message content into expsc array and set message change controllers to default
$expsc = explode(sig.content, " ");
$expscn = 1 ;
$pwstop = 1 ;
$pwordn = 1 ;

// explode pword string into the exppw array
$exppw = explode($pword, "#") ;

// explode pjob string into the exppj array and set job change controllers to default
$pjobn = 1 ;
$pjobstop = 1 ;
$exppj = explode($pjob, "#") ;

// job change loop, currently works just fine
while($pjobn < length($exppj)) {
$exppji = explode($exppj[$pjobn], "/") ;
	if($exppji[1] == sig.job ) {
	sig.job = $exppji[2] ;
	}
$pjobn = $pjobn + 1 ;
}

// word change loop, currently doesnt change the entries in expsc[$expscn] to pirate words
while($expscn <= length($expsc)) {
$exppwi = explode($exppw[$pwordn], "/") ;
	if($exppwi[1] == $expsc[$expscn]) {
	$expsc[$expscn] = $exppwi[2] ;
	$expscn = $expscn + 1 ;
	$pwordn = 1 ;
	}
	if($pwordn > length($exppw)) {
	$expscn = $expscn + 1 ;
	$pwordn = 1 ;
	}
$pwordn = $pwordn + 1 ;
}

// message content builder loop, currently builds out the original message
$expscn = 1 ;
$sp = " " ;
sig.content = "" ;
while($expscn <= length($expsc)) {
sig.content = sig.content + $expsc[$expscn] + $sp ;
$expscn = $expscn + 1 ;
}


// add job indicator and return content
sig.source = sig.source + " (" + sig.job + ")" ;
sig.content = proper(sig.content) ;
return(sig);
}