auto_include.ms

proc(_GetIP, @player,
	@ba = byte_array()
	ba_put_string(@ba, 'IP')
	#broadcast(colorize('&bUsing this as decoded string: ('.@ba')'),devtest)
	send_plugin_message(@player, 'BungeeCord', @ba)
)

proc(_PlayerCount, @server,
	@ba = byte_array()
	ba_put_string(@ba, 'PlayerCount')
	ba_put_string(@ba, @server)
	#broadcast(colorize('&bUsing this as decoded string: ('.@ba')'),devtest)
	send_plugin_message(@player, 'BungeeCord', @ba)
)

proc(_PlayerList, @server,
	@ba = byte_array()
	ba_put_string(@ba, 'PlayerList')
	ba_put_string(@ba, @server)
	#broadcast(colorize('&bUsing this as decoded string: ('.@ba')'),devtest)
	send_plugin_message(@player, 'BungeeCord', @ba)
)

proc(_GetServers,
	@ba = byte_array()
	ba_put_string(@ba, 'GetServers')
	#broadcast(colorize('&bUsing this as decoded string: ('.@ba')'),devtest)
	send_plugin_message(@player, 'BungeeCord', @ba)
)
 
proc(_Message, @playername, @message,
	@ba = byte_array()
	ba_put_string(@ba, 'Message')
	ba_put_string(@ba, @playername)
	ba_put_string(@ba, @message)
	#broadcast(colorize('&bUsing this as decoded string: ('.@ba')'),devtest)
	send_plugin_message(@player, 'BungeeCord', @ba)
)

proc(_GetServerName,
	@ba = byte_array()
	ba_put_string(@ba, 'GetServer')
	#broadcast(colorize('&bUsing this as decoded string: ('.@ba')'),devtest)
	send_plugin_message(@player, 'BungeeCord', @ba)
)

proc(_Broadcast, @channel, @message,
	@ba = byte_array()
	ba_put_string(@ba, 'Forward')
	ba_put_string(@ba, 'ALL')
	ba_put_string(@ba, @channel)
	ba_put_string(@ba, @message)
	#broadcast(colorize('&bUsing this as decoded string: ('.@ba')'),developer)
	send_plugin_message(@player, 'BungeeCord', @ba)
)

BungeeMessageChannel.msa
*:/GetIP [$player='jakecline'] = >>>
if(!has_permission(devtest),die())

#broadcast(colorize('&cCalling procedure: _GetIP('.$player')'),devtest)
_GetIP($player)
<<<

*:/PlayerCount [$server='skyprison'] = >>>
if(!has_permission(devtest),die())

#broadcast(colorize('&cCalling procedure: _PlayerCount('.$server.')'),devtest)
_PlayerCount($server)
<<<

*:/PlayerList [$server='skyprison'] = >>>
if(!has_permission(devtest),die())

#broadcast(colorize('&cCalling procedure: _PlayerList('.$server.')'),devtest)
_PlayerList($server)
<<<

*:/GetServers [$server='skyprison'] = >>>
if(!has_permission(devtest),die())

#broadcast(colorize('&cCalling procedure: _GetServers('.$server.')'),devtest)
_GetServers($server)
<<<

*:/gmessage [$player='jakecline'] [$message='test'] = >>>
if(!has_permission(devtest),die())

#broadcast(colorize('&cCalling procedure: _Message('.$player.','.$message.')'),devtest)
_Message($player,$message)
<<<

*:/GetServerName = >>>
if(!has_permission(devtest),die())

#broadcast(colorize('&cCalling procedure: _GetServerName()'),devtest)
_GetServerName($server)
<<<

*:/gbroadcast [$channel='Developer'] [$=' '] = >>>
if(!has_permission(devtest),die())
if ((!$),die())
broadcast(colorize('&cCalling procedure: _Broadcast('.'ALL'.','.$channel.','.$.'&c)'),devtest)
_Broadcast('ALL',$channel,$)
<<<

*:/d [$=' '] = >>>
if(!has_permission(developer),die())
if ((!$),die())
  console(colorize('CHAT: &e(&eDEV&e) &4'.trim(player()).'&f : &r&b'.$))
  broadcast(colorize('&e(&eDEV&e) &4'.trim(player()).'&f : &r&b'.$),developer)
_Broadcast('Developer','&e[&eDEV-&bOcean&e] &4'.trim(player()).' &f: &r&b'.$)
<<<

main.ms
if (!is_channel_registered('BungeeCord'), register_channel('BungeeCord'))
 
bind(plugin_message_received,  null, null, @event,

@debug=false # turn debug on or off

if (@debug,
	broadcast('Array Keys in event [plugin_message_recieved]: '.array_keys(@event),jwtest)
	broadcast('Channel: '.@event[channel],jwtest)
	broadcast('event_type: '.@event[event_type],jwtest)
	broadcast('macrotype: '.@event[macrotype],jwtest)
	broadcast('player: '.@event[player],jwtest)
	broadcast('Event Bytes undecoded: '.@event[bytes],jwtest)
)
)

bind(plugin_message_received,  null, array(Channel: 'BungeeCord'), @event,

@debug=false # turn debug on or off

if (@debug,
	console('Array Keys in event [plugin_message_recieved]: ',array_keys(@event))
	broadcast('Array Keys in event [plugin_message_recieved]: '.array_keys(@event),devtest)
	
	console('Channel: '.@event[channel])
	broadcast('Channel: '.@event[channel],devtest)
	
	console('event_type: '.@event[event_type])
	broadcast('event_type: '.@event[event_type],devtest)
	
	console('macrotype: '.@event[macrotype])
	broadcast('macrotype: '.@event[macrotype],devtest)
	
	console('player: '.@event[player])
	broadcast('player: '.@event[player],devtest)
	
	console('Event Bytes undecoded: '.@event[bytes])
	broadcast('Event Bytes undecoded: '.@event[bytes],devtest)
)

	@ba=byte_array()
	@ba=@event[bytes]
	ba_rewind(@ba)
	@request=ba_get_string(@ba)

#	console('Request: '.@request)
#	broadcast('Request: '.@request,devtest)
	
	switch (@request,
		'IP',  #get the real ip from the player
			@ipofplayer=ba_get_string(@event[bytes])
			@portofplayer=ba_get_int(@event[bytes])
			console('IP: '.@ipofplayer.':'.@portofplayer)
			broadcast('IP: '.@ipofplayer.':'.@portofplayer,devtest)
			die,
		'PlayerCount', #shows the player count of server
			@server=ba_get_string(@ba)
			@playercount=ba_get_int(@ba)
			console('server: '.@server)
			broadcast('server: '.@server,devtest)

			console('NumberOfPlayers: '.@playercount)
			broadcast('NumberOfPlayers: '.@playercount,devtest)
			die,
		'PlayerList', #shows every player in the server
			@server=ba_get_string(@ba)
			@players=split(',',ba_get_string(@ba))
			console('server: '.@server)
			broadcast('server: '.@server,devtest)

			console('players: '.@players)
			broadcast('players: '.@players,devtest)
			die,
		'GetServers', #shows all servers
			@servers=split(',',ba_get_string(@ba))
			console('Servers: '.@servers)
			broadcast('Servers: '.@servers,devtest)
			die,
		'GetServer', #shows current server
			@servername=ba_get_string(@ba)
			console('Servername: '.@servername)
			broadcast('Servername: '.@servername,devtest)
			die,
		'Forward', #recieve incoming message		
			@channel=ba_get_string(@event[bytes])
			@message=ba_get_string(@event[bytes])
			console('Channel: '.@channel)
			broadcast('Channel: '.@channel,devtest)

			console('Message: '.@message)
			broadcast('Message: '.@message,devtest)
			die,
		'Developer', #recieve incoming message		
			@message=ba_get_string(@event[bytes])
			console(colorize('CHAT: '.@message))
			broadcast(colorize(@message),developer)
			die,
		'UUID',  #shows Unique User ID of currentplayer
			@UUID=ba_get_string(@event[bytes])
			console('UUID: '.@UUID)
			broadcast('UUID: '.@UUID,devtest)
			die,
		'UUIDOther',  #shows Unique User ID of otherplayer	
			@uuidplayer=ba_get_string(@event[bytes])
			@uuid=ba_get_string(@event[bytes])
			console('UUID of player: '.@uuidplayer.' = '.@uuid)
			broadcast('UUID of player: '.@uuidplayer.' = '.@uuid,devtest)
			die,
		, # nothing found, throw exception
			throw(PluginInternalException,'No correct request found, are you sure BungeeCord did not change the plugin msg format?')
	)
)

oh and for another server (our freebuild) it is a little bit different because of othername in staff chat

in BungeeMessageChannel.msa
*:/d [$=' '] = >>>
		if(!has_permission(developer),die())
		if ((!$),die())
  		console(colorize('CHAT: &e(&eDEV&e) &4'.trim(player()).'&f : &r&b'.$))
  		broadcast(colorize('&e(&eDEV&e) &4'.trim(player()).'&f : &r&b'.$),developer)
		_Broadcast('Developer','&e[&eDEV-&2Build&e] &4'.trim(player()).' &f: &r&b'.$)
<<<