Skip to content

Instantly share code, notes, and snippets.

View Oldes's full-sized avatar

Oldes Huhuman Oldes

58 followers · 13 following
  • Freelancer
  • Brno
View GitHub Profile
@Oldes
Oldes / SoundRAW
Last active October 14, 2020 03:41
SoundRAW loop
package core
{
import display.TimelineMemoryBlock;
import flash.events.SampleDataEvent;
import flash.media.Sound;
import avm2.intrinsics.memory.*;
/**
* ...
* @author Oldes
@Oldes
Oldes / wav-reader-test.reds
Created September 14, 2015 14:23
Experimental WAV file parser
Red/System [
Title: "Red/System stream-io test - WAV reader"
Author: "Oldes"
]
#define handle! [pointer! [integer!]]
#define GENERIC_WRITE 40000000h
#define GENERIC_READ 80000000h
#define FILE_SHARE_READ 00000001h
@Oldes
Oldes / qi-dyn.red
Created October 5, 2015 15:50 — forked from iArnold/qi-dyn.red
A try to see a line being drawn on the canvas
Red [
Needs: 'View
]
system/view/debug?: off
win: make face! [
type: 'window text: "Board View Test" offset: 500x500 size: 800x800
@Oldes
Oldes / Filelog-camera-startup
Last active October 13, 2015 09:28
This file has been truncated, but you can view the full file.
"Time of Day","Process Name","PID","Operation","Path","Result","Detail"
"11:26:46.3075485 AM","view-test.exe","24980","Process Start","","SUCCESS","Parent PID: 25076, Command line: ""C:\dev\GIT\Red\view-test.exe"" , Current directory: c:\dev\GIT\Red\, Environment:
"11:26:46.3075545 AM","view-test.exe","24980","Thread Create","","SUCCESS","Thread ID: 8356"
"11:26:46.3082616 AM","view-test.exe","24980","Load Image","C:\dev\GIT\Red\view-test.exe","SUCCESS","Image Base: 0x400000, Image Size: 0x7e000"
"11:26:46.3083157 AM","view-test.exe","24980","Load Image","C:\Windows\System32\ntdll.dll","SUCCESS","Image Base: 0x77170000, Image Size: 0x1a9000"
"11:26:46.3084198 AM","view-test.exe","24980","Load Image","C:\Windows\SysWOW64\ntdll.dll","SUCCESS","Image Base: 0x77350000, Image Size: 0x180000"
"11:26:46.3085213 AM","view-test.exe","24980","CreateFile","C:\Windows\Prefetch\VIEW-TEST.EXE-AB20D2ED.pf","NAME NOT FOUND","Desired Access: Generic Read, Disposition: Open, Options: Synchronous IO Non-Alert, Attributes: n/a
@Oldes
Oldes / m_fleda.r
Last active November 4, 2015 13:21
REBOL [
Title: "M_fleda"
Date: 6-Jan-2005/18:46:29+1:00
Author: "oldes"
require: [
;rs-project 'brno_kalendar
]
]
init-misto "fleda"
@Oldes
Oldes / tb.red
Last active December 18, 2015 16:03
Drag and drop issue test
Red [
"Drag and Drop test"
filename: %tb.red
author: "Oldes"
version: 0.6.0
date: "18-Dec-2015"
Needs: 'View
]
system/view/debug?: no
@Oldes
Oldes / SQLite3.reds
Last active April 12, 2017 20:09
SQLite3 Red/System binding
Red/System [
Title: "Red/System SQLite3 binding"
Author: "Oldes"
File: %SQLite3.reds
Rights: "Copyright (C) 2017 David 'Oldes' Oliva. All rights reserved."
License: "BSD-3 - https:;//github.com/red/red/blob/master/BSD-3-License.txt"
]
#switch OS [
@Oldes
Oldes / julia.reds
Last active June 9, 2017 14:26
Red/System libjulia binding
Red/System [
Title: "Red/System libjulia binding"
Author: "Oldes"
File: %Julia.reds
Tabs: 4
Rights: "Copyright (C) 2017 Oldes. All rights reserved."
License: {
Distributed under the Boost Software License, Version 1.0.
See https://github.com/red/red/blob/master/BSL-License.txt
}
@Oldes
Oldes / typed-array.reds
Created September 8, 2017 15:09
typed-array
Red/System [
title: "Typed array"
purpose: "Low level struct for holding typed data"
]
#enum typed-array-types! [
TYPE_FLOAT32!: 1
]
typed-array!: alias struct! [
@Oldes
Oldes / StringCache.c
Created February 27, 2019 16:46
StringCache
https://gitter.im/blend2d/b2d?at=5c76b021e8ea143737842e2f
struct StringCache {
#define ENTRY(ID, NAME, CONTENT) \
struct NAME { \
enum { kId = ID }; \
char str[sizeof(CONTENT)] = CONTENT; \
}
ENTRY(0, id, "id");
};