mirror of
https://github.com/moparisthebest/rswiki-book
synced 2024-11-26 02:52:18 -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)
|
(.put-int64 l5)
|
||||||
(.end-packet))))
|
(.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
|
;; 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
|
(doto stream
|
||||||
(.begin-packet 27)
|
(.begin-packet 27)
|
||||||
(.put-int64 name)
|
(.put-int64 name)
|
||||||
(.end-packet)))
|
(.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>
|
</pre>
|
||||||
|
|
||||||
<table border="1" cellpadding="3" cellspacing="3">
|
<table border="1" cellpadding="3" cellspacing="3">
|
||||||
|
Loading…
Reference in New Issue
Block a user