mirror of
https://github.com/moparisthebest/rswiki-book
synced 2024-11-25 10:32:17 -05:00
Update MediaWiki page '135 Protocol'
This commit is contained in:
parent
1883251d2f
commit
33cc15c434
@ -62,12 +62,27 @@ This page refers to the RSC #135 client revision.
|
||||
(.put-int64 l5)
|
||||
(.end-packet))))
|
||||
|
||||
;; Opcode: 26
|
||||
(defn add-friend [stream name] ; name is string represenation of username
|
||||
(doto stream
|
||||
(.begin-packet 26)
|
||||
(.put-int64 (Util/long-for-name name)
|
||||
(.end-packet)))
|
||||
|
||||
;; Opcode: 27
|
||||
(defn remove-from-friends-list [stream name] ; name is long represenation of username (i.e Util/long-for-name username)
|
||||
(defn remove-friend [stream name] ; name is long represenation of username (i.e Util/long-for-name username)
|
||||
(doto stream
|
||||
(.begin-packet 27)
|
||||
(.put-int64 name)
|
||||
(.end-packet)))
|
||||
|
||||
;; Opcode: 29
|
||||
(defn add-ignore [stream username] ; username is string representation of username
|
||||
(let [name (Util/name-for-long username)]
|
||||
(doto stream
|
||||
(.begin-packet 29)
|
||||
(.put-int64 name)
|
||||
(.end-packet))))
|
||||
</pre>
|
||||
|
||||
<table border="1" cellpadding="3" cellspacing="3">
|
||||
|
Loading…
Reference in New Issue
Block a user