rgchris

#!/usr/local/bin/ren-c

Rebol [
    Title: "Minimal HTTPD 404 Server"
    Date: 17-Mar-2017
]

sys/make-scheme [
    title: "Minimal 404 Server"
    name: 'httpd

rgchris

Rebol [
	Title: "XML Parser/Object Model for Rebol 3"
	Author: "Christopher Ross-Gill"
	Date: 22-Oct-2009
	Home: http://www.ross-gill.com/page/XML_and_REBOL
	File: %xml.reb
	Version: 0.5.0
	Purpose: "XML handler for Rebol v3"
	Rights: http://opensource.org/licenses/Apache-2.0
	Type: module

rgchris

#!/usr/local/bin/ren-c

Rebol [
    Title: "CGI Tester"
    Date: 21-May-2017
    Author: "Christopher Ross-Gill"
]

import <httpd>

rgchris

Rebol [
    Title: "JSON Parser for Rebol 3"
    Author: "Christopher Ross-Gill"
    Date: 18-Sep-2015
    Home: http://www.ross-gill.com/page/JSON_and_Rebol
    File: %altjson.r
    Version: 0.3.6.1
    Purpose: "Convert a Rebol block to a JSON string"
    Rights: http://opensource.org/licenses/Apache-2.0
    ; Type: 'module

rgchris

Rebol [
    Title: "Screen Independent"
    Date: 26-Jun-2017
    Author: "Mennohexo"
]

probe base-size: system/view/screen-face/size / 2

vs: use [base][ ; VS named after VW/VH CSS convention
    probe base: reduce [base-size/x / 100 base-size/y / 100]

rgchris

#!/usr/local/bin/ren-c

Rebol [
    Title: "Fetch Commits"
    Date: 19-May-2017
    Index: http://metaeducation.s3.amazonaws.com
]

; import <xml>
import https://raw.githubusercontent.com/rgchris/Scripts/master/experimental/altxml.reb

rgchris

#!/usr/local/bin/red

Red [
    Title: "Contrived FSM Example"
    Date: 21-Jul-2017
    Author: "Christopher Ross-Gill"
]

state: mark: none

rgchris

Red [
    Title: "Similarity Of"
    Author: "Christopher Ross-Gill"
    Date: 25-Aug-2017
    File: %similarity-of.red
    Purpose: "Calculate the similarity (%) of two strings."
    Rights: http://opensource.org/licenses/Apache-2.0
]

do %simplediff.red

rgchris

#!/usr/local/bin/red

Red [
    Title: "Red Logos Example"
    Date:  7-Sep-2017
    Author: "Christopher Ross-Gill"
    File: %logos.red
]

view [

rgchris

#!/usr/local/bin/ren-c

Rebol []

do %html-entities.reb

test-strings: [
    {FOO>BAR} ["gt;" "62"]
    {FOO&gtBAR} ["gt" "62"]
    {FOO&gt BAR} ["gt" "62"]