This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Red [ title: "A simple tooltip for buttons, field, etc." ] | |
| __tooltip: context [ | |
| get-absolute-offset: function [face][ | |
| offset-adjust: [ 6x6 8x31 6x26 8x51 ] | |
| adjust-index: 1 | |
| adjustment: 0 | |
| results: face/offset | |
| target: face/parent | |
| until [ |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Red [ | |
| Title: "Red's Draw vs Direct Pixel Performance" | |
| Needs: 'View | |
| ] | |
| system/view/auto-sync?: off ; <-- TO MAKE PIXEL MANIPULATION ON IMAGE FASTER!!! | |
| w: 80 | |
| h: 80 | |
| blk: copy [] |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| ; + this support both positional and named args + refinements | |
| ; + type validation working properly accodring to the function definition | |
| ; + better error information | |
| ; note: a collab with Red/Sensei | |
| nfunc: func [spc bdy /local groups pos-names][ | |
| groups: collect [ | |
| current: copy [] | |
| stop: false | |
| parse spc [ |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Red [ | |
| Title: "Mandelbrot (Optimized)" | |
| Author: "hinjolicious" | |
| Note: { | |
| * Adapted from Red's showcase code. | |
| * Added interactivity: zoom/un-zoom, changing colors, smooth colors, etc. | |
| * Assistance from Gemini AI | |
| } | |
| Needs: 'View | |
| Tabs: 4 |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Red [ | |
| title: "FILTER - Filter a list based on a condition" | |
| author: "hinjolicious" | |
| usage: { | |
| a: [1 2 3 4 5 6 7 8 9 10] | |
| print mold filter a [[x] x % 2 = 0] | |
| a: [[1 2] [3 6] [5 6] [7 14] [9 10]] | |
| print mold filter a [[x y] (x * 2) = y] | |
| print mold a || [[x y] (x * 2) = y] |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Red [ | |
| title: "Piping (Pipelining) and Mapping for Red" | |
| author: "hinjolicious" | |
| resource: "Gemini AI" | |
| ] | |
| #include %dev.red | |
| ; == PIPE / PIPELINING |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Red [] | |
| ; Color conversion utility based on Processing | |
| ; Collaborator: Gemini AI | |
| hsb-to-rgb: func [ | |
| "Converts p5.js HSB values (H: 0-360, S: 0-100, B: 0-100) to a Red tuple!" | |
| h [number!] ; hue 0-360 | |
| s [number!] ; saturation 0-255 | |
| b [number!] ; brightness 0-255 | |
| /local c x m r g b-val |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Red [ | |
| ; custom structure to allow a c-style for-loop in Red | |
| ] | |
| ; do-for loop: | |
| ; usage: | |
| ; do for [cond][while][step][ | |
| ; body | |
| ; ] |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Red [] | |
| ; pass by reference | |
| incr: func ['x][set x (get x) + 1] | |
| decr: func ['x][set x (get x) - 1] | |
| increment: :incr | |
| decrement: :decr | |
| ++: :incr | |
| --: :decr | |
| set-val: function ['var val][set var :val] |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Red [ | |
| title: "Tourbillon Watch Desktop Widget for Windows 8+" | |
| author: "hinjolicious" | |
| note: { | |
| Idea: @hiiamboris work on "Cellestial Clock". | |
| Collaborator: Gemini AI | |
| Tested: on Red Toolchain v0.66 in Windows 11 | |
| June 13th, 2026 | |
| } | |
| needs: 'view |
NewerOlder