Skip to content

Commit

Permalink
send ARUP on area change
Browse files Browse the repository at this point in the history
  • Loading branch information
sD committed Feb 14, 2020
1 parent 5a12661 commit 3480f5a
Showing 1 changed file with 3 additions and 7 deletions.
10 changes: 3 additions & 7 deletions main.pb
Original file line number Diff line number Diff line change
Expand Up @@ -975,20 +975,16 @@ Procedure SwitchChannels(*usagePointer.Client,narea$,apass$)
Else
SendTarget(Str(*usagePointer\ClientID),"BN#"+Channels(*usagePointer\area)\bg+"#%",Server)
EndIf
If *usagePointer\type>=#AOTWO
SendTarget(Str(*usagePointer\ClientID),"OA#"+narea$+"#0#%",Server)

This comment has been minimized.

Copy link
@oldmud0

oldmud0 Feb 17, 2020

wait... the OA packet used to exist?

This comment has been minimized.

Copy link
@stonedDiscord

stonedDiscord Feb 17, 2020

Owner

i think it's a VNO packet

This comment has been minimized.

Copy link
@oldmud0

oldmud0 Feb 19, 2020

yikes

send$="TA"
send$="ARUP#0"
For carea=0 To ChannelCount
send$ = send$ + "#"+Str(Channels(carea)\players)
Next
send$ = send$ + "#%"
SendTarget("*",send$,Server)
Else
WriteLog("Switched Area to "+GetAreaName(*usagePointer),*usagePointer)
SendTarget(Str(*usagePointer\ClientID),"CT#$HOST#area "+Str(*usagePointer\area)+" selected#%",Server)
SendTarget(Str(*usagePointer\ClientID),"HP#1#"+Str(Channels(*usagePointer\area)\good)+"#%",Server)
SendTarget(Str(*usagePointer\ClientID),"HP#2#"+Str(Channels(*usagePointer\area)\evil)+"#%",Server)
EndIf
Else
If *usagePointer\type>=#AOTWO
SendTarget(Str(*usagePointer\ClientID),"OA#"+narea$+"#1#%",Server)
Expand Down Expand Up @@ -2822,8 +2818,8 @@ CompilerEndIf

End
; IDE Options = PureBasic 5.31 (Windows - x86)
; CursorPosition = 2497
; FirstLine = 2275
; CursorPosition = 987
; FirstLine = 963
; Folding = ------
; EnableUnicode
; EnableXP

0 comments on commit 3480f5a

Please sign in to comment.