Instantly share code, notes, and snippets.

View libred.test.r
#!/usr/local/bin/rebview -iqvs
Rebol [
Title: "libRed Test"
Author: "Christopher Ross-Gill"
Date: 19-Dec-2018
]
libred: make object! [
library: load/library %libRed.dylib
View json-server.r
Rebol [
Title: "JSON Server"
Date: 19-Dec-2018
Author: "Christopher Ross-Gill"
]
do http://reb4.me/r/altjson
do http://reb4.me/r/httpd
data: [ ; in lieu of CSV data, from Rebol in Ten Steps
View linkify-face.r
Rebol [
Title: "Link Up"
File: %linkify-face.r
Version: 0.0.1
Home: http://www.ross-gill.com/page/Beyond_Regular_Expressions
Date: 8-Aug-2010
Purpose: "To identify URIs in face/text and overlay with links"
Author: "Christopher Ross-Gill"
]
View gravatar.r
Rebol [
Title: "Get Gravatar"
File: %gravatar.r
Date: 27-Nov-2012
Purpose: "Generate Gravatar Profile Image URLs"
]
gravatar: use [to-md5][
to-md5: func [val [any-string!]][
lowercase enbase/base checksum/method to binary! lowercase trim form val 'md5 16
View scroll.test.r
Rebol [
Title: "Detect Scroller"
Date: 17-Dec-2018
Author: "Christopher Ross-Gill"
]
scroll-handler: make object! [
; SCROLL-* events use OFFSET to determine the direction and amount of
; scrolling to be considered, therefore to ascertain the offset, one needs
; to track the position of the pointer.
View httpc.red
#!/usr/local/bin/red
Red [
Title: "HTTP Console"
Date: 15-Dec-2018
File: %httpc.red
Version: 0.1.2
Author: "Christopher Ross-Gill"
History: [
15-Dec-2018 0.1.2 "Red Version"
View parser.r
#!/usr/local/bin/rebol -qs parser.test.reb
Rebol [
Title: "Parser"
Author: "Christopher Ross-Gill"
Date: 13-Feb-2018
Home: https://github.com/rgchris/Scripts
File: %parser.r
Version: 0.1.0
Purpose: {Incremental Parser}
View parser.reb
Rebol [
Title: "Parser"
Author: "Christopher Ross-Gill"
Date: 13-Feb-2018
Home: https://github.com/rgchris/Scripts
File: %parser.reb
Version: 0.1.0
Purpose: {Incremental Parser}
Rights: http://opensource.org/licenses/Apache-2.0
Type: module
View simf.reb
Rebol [
Title: "Simple IMF Parser"
Author: "Christopher Ross-Gill"
Date: 11-Feb-2018
Home: https://github.com/rgchris/Scripts
File: %simf.reb
Rights: http://opensource.org/licenses/Apache-2.0
Type: module
Name: rgchris.simf
Exports: [load-message]
View httpd-example.reb
#!/usr/local/bin/ren-c
Rebol [
Title: "HTTPd Example"
Date: 7-Feb-2018
Author: "Christopher Ross-Gill"
File: %httpd-example.reb
Rights: http://opensource.org/licenses/Apache-2.0
Needs: [<httpd>]
]