rebolek

Red [
    Title: "JSON parser"
    File: %json.red
    Author: "Nenad Rakocevic, Qingtian Xie, Boleslav Březovský"
    License: "BSD-3 - https://github.com/red/red/blob/master/BSD-3-License.txt"
]

json: context [
	quoted-char: charset {"\/bfnrt}
	exponent:	 charset "eE"

rebolek

;do %/c/../tabtest.red										;-- Everything before the Red header is not a comment!!
Red [
	file: %tabtest.red
]

window-actors: object [ 			;-- actors for the window
	on-key: func [face [object!] event [event!]][
		case [
			event/key = #"^-" [
				print "TAB key caught by window face!" 

rebolek

Red [
	Title:   "View Interface Dialect"
	Author:  ["Nenad Rakocevic" "Boleslav Březovský"]
	File: 	 %VID.red
	Tabs:	 4
	Rights:  "Copyright (C) 2014-2016 Nenad Rakocevic. All rights reserved."
	License: {
		Distributed under the Boost Software License, Version 1.0.
		See https://github.com/dockimbel/Red/blob/master/BSL-License.txt
	}

rebolek

Red []

do %json.red

github: context [

; --- internal support functions

decode: function [data] [
	first json/decode third data

rebolek

Red [
    Title: "JSON parser"
    File: %json.red
    Author: "Nenad Rakocevic, Qingtian Xie"
    License: "BSD-3 - https://github.com/red/red/blob/master/BSD-3-License.txt"
]

json: context [
	quoted-char: charset {"\/bfnrt}
	exponent:	 charset "eE"

rebolek

Red [
	Title: "GitHub API implementation"
	Author: "Boleslav Březovský"
	Date: "5-3-2017"
]

do %json.red

map-each: function [
	'word ; NOTE: leaks word

rebolek

Red [
	Title: "Gitter API"
	Author: "Boleslav Březovský"
	File: %gitter-api.red
	Rights: "Copyright (C) 2016 Boleslav Březovský. All rights reserved."
	License: {
		Distributed under the Boost Software License, Version 1.0.
	}
	Date: "23-10-2016"
	Note: {

rebolek

Red [
	Title: "CSV Parser"
	Author: "Boleslav Březovský"
	Date: "21-3-2017"
	Rights:  "Copyright (C) 2017 Boleslav Březovský. All rights reserved."
	License: "BSD-3 - https://github.com/red/red/blob/master/BSD-3-License.txt"
]

load-csv: function [
	data [string! file! url!] "Text CSV data to load"

rebolek

Red [
	Title: "CSV Handling Tools"
	Author: "Brian Hawley"
	File: %csv-tools.r
	Date: "20-Dec-2011"
	Version: 1.1.5
	Purpose: "Loads and formats CSV data, for enterprise or mezzanine use."
	Library: [
		level: 'intermediate
		platform: 'all

rebolek

Red []

convert-codepage: function [
	data
] [
	rule: copy []
	output: copy []
	data: skip data 17
	foreach value data [
		value: split value tab