A Common Lisp framework for the creation of electronic art, visual design, game prototyping, game making, computer graphics, exploration of human-computer interaction, and more.
License: MIT License
It would be useful if you could specify the default window dimensions globally, for when you want to create windows that are not 400x400, without explicitly adding bindings to every DEFSKETCH form.
cffi does not admit the possibility of libffi.so.8
One fix is to add to line 34 ~quicklisp/dists/quicklisp/software/cffi_0.24.1/libffi/libffi.lisp
(:unix (:or "libffi.so.8" "libffi.so.7" "libffi32.so.7" "libffi.so.6" "libffi32.so.6" "libffi.so.5" "libffi32.so.5"))
Reporting it here as I discovered it trying to get sketch to run on ArchLinux where the libffi is installed via pacman.
I am a lisp noob. Appreciate comments on a better fix than editing the source code of some quicklisp installed package.
Should be fixed once this this pull request to cffi makes into the quicklisp version cffi/cffi#191
POINT seems to be always drawing a 1x1 rectangle:
(defun point (x y)
(declare (type real x y))
(with-pen (make-pen :fill (pen-stroke (env-pen *env*)))
(rect x y 1 1)))What if I wanted to increase the thickness of my points instead? I know I can replace all my calls to POINT with RECT, but what if POINT used the current PEN's weight to figure out how big the rectangle should be?
(defun point (x y)
(declare (type real x y))
(let ((weight (or (pen-weight (env-pen *env*)) 1)))
(with-pen (make-pen :fill (pen-stroke (env-pen *env*)))
(rect (- x (floor weight 2))
(- y (floor weight 2))
weight
weight))))I am happy to open an PR if there is interest in this.
Hello,
I'm trying to make a standalone executable of an app made with sketch. I tried to look at qelt, since it has binaries here (itch.io), but I haven't been able to find a solution.
How can I define a main function? Just doing (make-instance 'app) doesn't work - main thread is closed immediately and the application is close just after starting up.
Hello
I wanted to check out this project, installed the dependencies and i got this:
(ql:quickload :sketch-examples)
To load "sketch-examples":
Load 1 ASDF system:
sketch-examples
; Loading "sketch-examples"
(:SKETCH-EXAMPLES)
(make-instance 'sketch-examples:sinewave)
debugger invoked on a SDL2::SDL-RC-ERROR in thread
#<THREAD "SDL2 Main Thread" RUNNING {1001CA72C3}>:
SDL Error (-1): That operation is not supported
The current thread is not at the foreground,
SB-THREAD:RELEASE-FOREGROUND has to be called in #<SB-THREAD:THREAD "main thread" RUNNING {1004DE01F3}>I don't know what to do from here :(
Hello,
Is there any way to make a sketch resizable?
I tried to use sdl2:sdl-set-window-resizable, but the app wasn't able to adapt to resize properly.
It seems that the current transform/matrix facility scales both the shape itself and the pen. Is there a nice way to scale the geometry of line sketches but maintain line thickness?
If this has to be done manually for now, would a patch that provides pen-preserving transformation be desirable? (I think to do that we need to do calculation in the drawing primitives instead of delegating to the OpenGL side).
I've just installed sbcl via brew and installed quicklisp package manager. I load the library and load the example, but when the window is drawn the program crashes.
SDL2 ttf is version 2.0.14, image is 2.0.3, and SDL2 is 2.0.8.
: [~] > sbcl
This is SBCL 1.4.11, an implementation of ANSI Common Lisp.
More information about SBCL is available at <http://www.sbcl.org/>.
SBCL is free software, provided as is, with absolutely no warranty.
It is mostly in the public domain; some portions are provided under
BSD-style licenses. See the CREDITS and COPYING files in the
distribution for more information.
* (ql:quickload :sketch)
To load "sketch":
Load 1 ASDF system:
sketch
; Loading "sketch"
..........
(:SKETCH)
* (ql:quickload :sketch-examples)
To load "sketch-examples":
Load 1 ASDF system:
sketch-examples
; Loading "sketch-examples"
(:SKETCH-EXAMPLES)
* (make-instance 'sketch-examples:hello-world)
#<SKETCH-EXAMPLES:HELLO-WORLD {1003462033}>
* 2018-09-07 19:32:44.626 sbcl[38221:6484905] *** Terminating app due to uncaught exception 'NSInternalInconsistencyException', reason: 'nextEventMatchingMask should only be called from the Main Thread!'
*** First throw call stack:
(
0 CoreFoundation 0x00007fffaa0522cb __exceptionPreprocess + 171
1 libobjc.A.dylib 0x00007fffbee6c48d objc_exception_throw + 48
2 AppKit 0x00007fffa823de82 -[NSApplication(NSEvent) _nextEventMatchingEventMask:untilDate:inMode:dequeue:] + 4480
3 SDL2 0x0000000002a225f5 SDL2 + 140789
4 SDL2 0x0000000002a0c8dd SDL2 + 51421
5 ??? 0x0000000022a6b721 0x0 + 581351201
6 ??? 0x0000000022ae2d8e 0x0 + 581840270
)
libc++abi.dylib: terminating with uncaught exception of type NSException
fatal error encountered in SBCL pid 38221(tid 0xb0000000):
SIGABRT received.
Welcome to LDB, a low-level debugger for the Lisp runtime environment.
ldb>
Not sure if this is more glkit related but anyway, here we go:
Link Log:
WARNING: Output of vertex shader 'f_pos' not read by fragment shader
[Condition of type SIMPLE-ERROR]
Restarts:
0: [*CONTINUE] Return to the SDL2 main loop.
1: [ABORT] Abort, quitting SDL2 entirely.
2: [ABORT] abort thread (#<THREAD "SDL2 Main Thread" RUNNING {1006331B33}>)
Backtrace:
0: (KIT.GL.SHADER:COMPILE-AND-LINK-PROGRAM NIL :VERTEX-SHADER " ..)
1: (KIT.GL.SHADER::PROCESS-SOURCE #<KIT.GL.SHADER::SHADER-DICTIONARY-DEFINITION {1005D5A683}> #<KIT.GL.SHADER::PROGRAM-SOURCE :FILL-SHADER> #<KIT.GL.SHADER:PROGRAM {10063419B3}>)
2: ((:METHOD KIT.GL.SHADER:COMPILE-SHADER-DICTIONARY (KIT.GL.SHADER::SHADER-DICTIONARY-DEFINITION)) #<KIT.GL.SHADER::SHADER-DICTIONARY-DEFINITION {1005D5A683}>) [fast-method]
3: (SKETCH::INITIALIZE-ENVIRONMENT #<SKETCH-EXAMPLES:HELLO-WORLD {10063319B3}>)
4: ((:METHOD INITIALIZE-INSTANCE :AFTER (SKETCH:SKETCH)) #<SKETCH-EXAMPLES:HELLO-WORLD {10063319B3}>) [fast-method]
5: ((SB-PCL::EMF INITIALIZE-INSTANCE) #<unused argument> #<unused argument> #<SKETCH-EXAMPLES:HELLO-WORLD {10063319B3}>)
6: ((LAMBDA NIL :IN INITIALIZE-INSTANCE))
7: (SDL2::HANDLE-MESSAGE (#<CLOSURE (LAMBDA NIL :IN INITIALIZE-INSTANCE) {1006331D2B}> . #S(TRIVIAL-CHANNELS:CHANNEL :QUEUE #S(TRIVIAL-CHANNELS.QUEUE:QUEUE :HEAD NIL :TAIL NIL) :Q-CONDITION #<SB-THREAD:W..
8: (SDL2::GET-AND-HANDLE-MESSAGES)
9: (KIT.SDL2::MAIN-LOOP-FUNCTION #<SDL2-FFI:SDL-EVENT {#X0062CA90}> NIL)
10: (KIT.SDL2::MAIN-LOOP)
11: ((LAMBDA NIL :IN KIT.SDL2:START))
12: (SDL2::HANDLE-MESSAGE (#<FUNCTION (LAMBDA NIL :IN KIT.SDL2:START) {1005B3C73B}>))
13: (SDL2::SDL-MAIN-THREAD)
14: ((LAMBDA NIL :IN BORDEAUX-THREADS::BINDING-DEFAULT-SPECIALS) #<unavailable lambda list>)
15: ((FLET #:WITHOUT-INTERRUPTS-BODY-1002 :IN SB-THREAD::INITIAL-THREAD-FUNCTION-TRAMPOLINE))
16: ((FLET SB-THREAD::WITH-MUTEX-THUNK :IN SB-THREAD::INITIAL-THREAD-FUNCTION-TRAMPOLINE))
17: ((FLET #:WITHOUT-INTERRUPTS-BODY-335 :IN SB-THREAD::CALL-WITH-MUTEX))
18: (SB-THREAD::CALL-WITH-MUTEX #<CLOSURE (FLET SB-THREAD::WITH-MUTEX-THUNK :IN SB-THREAD::INITIAL-THREAD-FUNCTION-TRAMPOLINE) {B24DCFB}> #<SB-THREAD:MUTEX "thread result lock" owner: #<SB-THREAD:THREAD "..
19: (SB-THREAD::INITIAL-THREAD-FUNCTION-TRAMPOLINE #<SB-THREAD:THREAD "SDL2 Main Thread" RUNNING {1006331B33}> NIL #<CLOSURE (LAMBDA NIL :IN BORDEAUX-THREADS::BINDING-DEFAULT-SPECIALS) {1006331ADB}> (#<SB..
--more--
This happens under OSX El Capitain with SBCL 1.3 or CCL 1.11 and an Intel Iris Pro GPU for all examples. If you need any more information, or feel that this should be reported to glkit, please let me know.
When writing via TEXT, any newline in there will be shown as a box.
Being able to embed newlines in a text string would be nice.
Thank you for the quick response ;) !
Hello,
I am trying to get sketch working on Artix Linux (Arch Linux without systemd) with sbcl 2.1.1-1. I am having an issue while loading sketch with quicklisp. Here is what the error looks like:
compile-file-error while compiling
#<cl-source-file "cl-opengl" "gl" "funcs-gl-glcore-gles2">
[Condition of type uiop/lisp-build:compile-file-error]
Restarts:
0: [retry] Retry compiling #<cl-source-file "cl-opengl" "gl" "funcs-gl-glcore-gles2">.
1: [accept] Continue, treating compiling #<cl-source-file "cl-opengl" "gl" "funcs-gl-glcore-gles2"> as having been successful.
2: [retry] Retry ASDF operation.
3: [clear-configuration-and-retry] Retry ASDF operation after resetting the configuration.
4: [retry] Retry ASDF operation.
5: [clear-configuration-and-retry] Retry ASDF operation after resetting the configuration.
--more--
Backtrace:
0: (uiop/lisp-build:check-lisp-compile-results nil t t "~/asdf-action::format-action/" ((#<asdf/lisp-action:compile-op > . #<asdf/lisp-action:cl-source-file "cl-opengl" "gl" "funcs-gl-glcore-gles2">)))
1: ((sb-pcl::emf asdf/action:perform) #<unused argument> #<unused argument> #<asdf/lisp-action:compile-op > #<asdf/lisp-action:cl-source-file "cl-opengl" "gl" "funcs-gl-glcore-gles2">)
2: ((lambda nil :in asdf/action:call-while-visiting-action))
3: ((:method asdf/action:perform-with-restarts :around (t t)) #<asdf/lisp-action:compile-op > #<asdf/lisp-action:cl-source-file "cl-opengl" "gl" "funcs-gl-glcore-gles2">) [fast-method]
4: ((:method asdf/plan:perform-plan (t)) #<asdf/plan:sequential-plan {10147ADC63}>) [fast-method]
5: ((flet sb-c::with-it :in sb-c::%with-compilation-unit))
6: ((:method asdf/plan:perform-plan :around (t)) #<asdf/plan:sequential-plan {10147ADC63}>) [fast-method]
7: ((:method asdf/operate:operate (asdf/operation:operation asdf/component:component)) #<asdf/lisp-action:load-op > #<asdf/system:system "sketch"> :plan-class nil :plan-options nil) [fast-method]
8: ((sb-pcl::emf asdf/operate:operate) #<unused argument> #<unused argument> #<asdf/lisp-action:load-op > #<asdf/system:system "sketch"> :verbose nil)
9: ((lambda nil :in asdf/operate:operate))
10: ((:method asdf/operate:operate :around (t t)) #<asdf/lisp-action:load-op > #<asdf/system:system "sketch"> :verbose nil) [fast-method]
11: ((sb-pcl::emf asdf/operate:operate) #<unused argument> #<unused argument> asdf/lisp-action:load-op "sketch" :verbose nil)
12: ((lambda nil :in asdf/operate:operate))
13: ((:method asdf/operate:operate :around (t t)) asdf/lisp-action:load-op "sketch" :verbose nil) [fast-method]
14: (asdf/session:call-with-asdf-session #<function (lambda nil :in asdf/operate:operate) {10147A8F7B}> :override t :key nil :override-cache t :override-forcing nil)
15: ((lambda nil :in asdf/operate:operate))
16: (asdf/session:call-with-asdf-session #<function (lambda nil :in asdf/operate:operate) {101479DF6B}> :override nil :key nil :override-cache nil :override-forcing nil)
17: ((:method asdf/operate:operate :around (t t)) asdf/lisp-action:load-op "sketch" :verbose nil) [fast-method]
18: (asdf/operate:load-system "sketch" :verbose nil)
19: (quicklisp-client::call-with-macroexpand-progress #<function (lambda nil :in quicklisp-client::apply-load-strategy) {101479DD3B}>)
--more--
I think I have all of the dependencies installed needed (I went through 1-by-1 to make sure i have them installed). Is my problem a dependency problem?
Thank you for any help you are able to offer!
Currently, I use the following code to achieve the custom font:
(set-font
(make-font
:face (make-instance 'sketch::typeface :filename "/tmp/my-stupid-font.ttf")))I basically know nothing about SDL, and know very little about Common Lisp.
And the code above used something like sketch::typeface, which makes me feel inelegant. Since the double colons (::) tell me that you do not want me to use it.
So I am wondering:
Is this the proper way to set a custom font?
If not, what should I do?
Thank you very much for creating sketch, I enjoyed it very much.
If any error executed (in game-logic for example), sketch becomes red and speechless about whats wrong. Maybe there is some way to debug these errors, but i'm can't get it.
It will be very handy to see what kind of error i have.
Trying the hello-world-example yields the following, while other examples seem to work just fine:
The 'ffi_prep_cif' libffi call failed for function "TTF_RenderUTF8_Blended".
[Condition of type CFFI::SIMPLE-LIBFFI-ERROR]
Restarts:
0: [CONTINUE] Return to the SDL2 main loop.
1: [ABORT] Abort, quitting SDL2 entirely.
2: [ABORT] abort thread (#<THREAD "SDL2 Main Thread" RUNNING {1006605D53}>)
Backtrace:
0: ((FLET "H0" :IN KIT.SDL2:RENDER) #<CFFI::SIMPLE-LIBFFI-ERROR "The 'ffi_prep_cif' libffi call failed for function ~S." {1007DC13B3}>)
1: (SB-KERNEL::%SIGNAL #<CFFI::SIMPLE-LIBFFI-ERROR "The 'ffi_prep_cif' libffi call failed for function ~S." {1007DC13B3}>)
2: (ERROR CFFI::SIMPLE-LIBFFI-ERROR :FUNCTION-NAME "TTF_RenderUTF8_Blended" :FORMAT-CONTROL "The 'ffi_prep_cif' libffi call failed for function ~S." :FORMAT-ARGUMENTS ("TTF_RenderUTF8_Blended"))
3: (CFFI::LIBFFI-ERROR "TTF_RenderUTF8_Blended" "The 'ffi_prep_cif' libffi call failed for function ~S." "TTF_RenderUTF8_Blended")
4: (CFFI::MAKE-LIBFFI-CIF "TTF_RenderUTF8_Blended" :POINTER (:POINTER :POINTER (:STRUCT SDL2-TTF::SDL-COLOR)) :DEFAULT-ABI)
5: (SDL2-TTF::%SDL-RENDER-UTF8-BLENDED #.(SB-SYS:INT-SAP #X00BA7930) "ERROR" (SDL2-TTF::R 255 SDL2-TTF::G 255 SDL2-TTF::B 255 ...))
6: (SDL2-TTF:RENDER-UTF8-BLENDED #<SDL2-FFI:TTF-FONT {#X00BA7930}> "ERROR" 255 255 255 255)
7: (SKETCH:TEXT-LINE-IMAGE "ERROR")
Locals:
LINE = "ERROR"
8: (SKETCH:TEXT "ERROR ..)
Locals:
FONT = #<SKETCH::FONT {1002CBCDC3}>
HEIGHT = NIL
PREVIOUS-PEN = #S(SKETCH:PEN :FILL NIL :STROKE NIL :WEIGHT 1 :CURVE-STEPS 100)
TEXT-STRING = "ERROR\n---\nThe 'ffi_prep_cif' libffi call failed for function \"TTF_RenderUTF8_Blended\".\n---\nClick for restarts."
TOP = 0
WIDTH = NIL
X = 20
Y = 20
9: ((:METHOD KIT.SDL2:RENDER (SKETCH:SKETCH)) #<SKETCH-EXAMPLES:HELLO-WORLD {1007D90313}>) [fast-method]
10: ((SB-PCL::EMF KIT.SDL2:RENDER) #<unused argument> #<unused argument> #<SKETCH-EXAMPLES:HELLO-WORLD {1007D90313}>)
11: ((LAMBDA NIL :IN KIT.SDL2:RENDER))
12: ((SB-PCL::EMF KIT.SDL2:WINDOW-EVENT) #<unused argument> #<unused argument> #<SKETCH-EXAMPLES:HELLO-WORLD {1007D90313}> :EXPOSED 156704 0 0)
13: (KIT.SDL2::MAIN-LOOP-FUNCTION #<SDL2-FFI:SDL-EVENT {#X02D08C60}> NIL)
14: (KIT.SDL2::MAIN-LOOP)
15: ((LAMBDA NIL :IN KIT.SDL2:START))
16: (SDL2::HANDLE-MESSAGE (#<CLOSURE (LAMBDA NIL :IN KIT.SDL2:START) {1002762DBB}>))
17: (SDL2::SDL-MAIN-THREAD)
18: ((LAMBDA NIL :IN BORDEAUX-THREADS::BINDING-DEFAULT-SPECIALS))
19: ((FLET SB-UNIX::BODY :IN SB-TH
It seems I'm generally able to use Sketch, but any attempts at text cause the same error to appear.. I didn't know Sketch was supposed to show that nice red screen with errors because that has failed before with the above error.. :D
Running on Windows.
OS: Windows 10
Implementation: SBCL 2.0.0 AMD64
When trying to use a sketch with (text) such as the hello-world example, the following error is generated:
The 'ffi_prep_cif' libffi call failed for function "TTF_RenderUTF8_Blended".
I used the windows installation method outlined in the README. The other sketch-examples (sinewave, brownian, life) work correctly.
When trying to load and render any PNG image, the image comes out as a garbled mess. I have, quite literally, 1 week of experience with common lisp, so my understanding of why this is happening is a bit limited.
Minimal-ish example:
(asdf:load-system :cffi)
(cffi:define-foreign-library libffi ; Required for loading sketch.
(t (:default "libffi-7")))
(cffi:use-foreign-library libffi)
(ql:quickload :sketch)
(defpackage :stickies (:use :cl :sketch))
(in-package :stickies)
...
(defsketch app
((title "Stickies") (width 600) (height 400)
(save-icon (load-resource "..\\assets\\StickiesSaveIcon.png")))
(image save-icon 0 0))
(defun main ()
(make-instance 'app))
(main)
The image I'm trying to draw to the screen:
What I'm getting:
My operating system is Windows 10, and I've been using SBCL 2.2.10.
When I try to run the Brownian example, I get the following error:
* (make-instance 'sketch-examples:brownian)
debugger invoked on a SDL2::SDL-RC-ERROR in thread
#<THREAD "SDL2 Main Thread" RUNNING {1004CF4B43}>:
SDL Error (#<SDL-WINDOW {#X00000000}>): Couldn't find matching GLX visual
I am running SBCL 1.2.14 on Ubuntu 15.10, with Intel HD Graphics 5500. I guess there's a good chance this is something to do with the Intel graphics drivers.
Commenting out these lines seems to solve the problem, but I cannot say I know why.
Setting :y-axis :up works properly, except that when you draw text with (text ... everything is flipped vertically, which can be kind of hard to read. This also includes the text on the debug screen. :)
Hi!
As mentioned before in this issue(#33), initforms of custom bindings in defsketch macro are evaluated twice. (@inconvergent wrote that it seemed to be fixed. Unfortunately, I still observe this issue using both quicklisp version and this repo version.)
Here is my simple example:
(ql:quickload :sketch)
(use-package :sketch)
(defparameter *result* ())
(defsketch double-evaluation ((hi (push "world" *result*)))
(text (format nil "~a" *result*) 100 100))
(make-instance 'double-evaluation)This will display a text (world world) instead of just (world).
As a more complicated example - it seems that Qelt doesn't run properly with current version of sketch because of that.
I think that I have found when this issue was introduced - 19fe205:
implementation of make-custom-slots-setf function changed from
(defun make-custom-slots-setf (sketch bindings)
`(setf ,@(mapcan (lambda (binding)
`((,(binding-accessor sketch binding) instance) ,(car binding)))
bindings)))to
(defun make-custom-slots-setf (sketch bindings)
`(setf ,@(mapcan (lambda (binding)
`((slot-value instance ',(car binding)) ,(cadr binding)))
bindings)))Notice that second argument changed from (car binding), which refers to the binding name, to (cadr binding), which refers to the binding initform.
So, the patch proposed in this comment (#33 (comment)) should be the solution to this issue.
It moved to https://github.com/sjl/coding-math/
Best,
Hi!
I'm trying to render a 2d array of pixels and it seems there is no simple way of doing this.
I'm looking for something similar to canvas or p5 / processing
cc -m64 -o /home/silver/.cache/common-lisp/sbcl-1.3.11-1.4-suse-linux-x64/home/silver/quicklisp/dists/quicklisp/software/cffi_0.18.0/libffi/libffi-types__grovel-tmpGHU3ALSV -I/home/silver/quicklisp/dists/quicklisp/software/cffi_0.18.0/ /home/silver/.cache/common-lisp/sbcl-1.3.11-1.4-suse-linux-x64/home/silver/quicklisp/dists/quicklisp/software/cffi_0.18.0/libffi/libffi-types__grovel.c
with command ("cc" "-m64" "-o"
"/home/silver/.cache/common-lisp/sbcl-1.3.11-1.4-suse-linux-x64/home/silver/quicklisp/dists/quicklisp/software/cffi_0.18.0/libffi/libffi-types__grovel-tmpGHU3ALSV"
"-I/home/silver/quicklisp/dists/quicklisp/software/cffi_0.18.0/"
"/home/silver/.cache/common-lisp/sbcl-1.3.11-1.4-suse-linux-x64/home/silver/quicklisp/dists/quicklisp/software/cffi_0.18.0/libffi/libffi-types__grovel.c")
exited with error code 1
[Condition of type CFFI-GROVEL:GROVEL-ERROR]
Getting the following error when trying to ql:quickload sketch. Running openSuse Tumbleweed, tried it with sbcl 1.3.11 and CCL 1.12 and got the same error.
Tried starting swank in emacs and separately and clearing out the common lisp cache so it had a fresh try each time.
Hello,
If you try to redefine sketch which was either created with different from default size, or if you redefine size itself, it will stop rendering properly.
(Example: redefined from (width 400) to (width 800))
Adding method for window-event :resize as in #59 fixes this problem.
Getting the following:
Assumption is that sdl2 lib is in /opt/homebrew/lib insteade of /usr/local/lib which might cause the issue.
Is there anyway to check closer?
COMPILE-FILE-ERROR while
compiling #<CL-SOURCE-FILE "sdl2" "autowrap">
[Condition of type UIOP/LISP-BUILD:COMPILE-FILE-ERROR]
Restarts:
0: [RETRY] Retry compiling #<CL-SOURCE-FILE "sdl2" "autowrap">.
1: [ACCEPT] Continue, treating compiling #<CL-SOURCE-FILE "sdl2" "autowrap"> as having been successful.
2: [RETRY] Retry ASDF operation.
3: [CLEAR-CONFIGURATION-AND-RETRY] Retry ASDF operation after resetting the configuration.
4: [RETRY] Retry ASDF operation.
5: [CLEAR-CONFIGURATION-AND-RETRY] Retry ASDF operation after resetting the configuration.
--more--
Backtrace:
0: (UIOP/LISP-BUILD:CHECK-LISP-COMPILE-RESULTS NIL T T "~/asdf-action::format-action/" ((#<ASDF/LISP-ACTION:COMPILE-OP > . #<ASDF/LISP-ACTION:CL-SOURCE-FILE "sdl2" "autowrap">)))
1: ((SB-PCL::EMF ASDF/ACTION:PERFORM) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "sdl2" "autowrap">)
2: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
3: ((:METHOD ASDF/ACTION:PERFORM-WITH-RESTARTS :AROUND (T T)) #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "sdl2" "autowrap">) [fast-method]
4: ((:METHOD ASDF/PLAN:PERFORM-PLAN (T)) #<ASDF/PLAN:SEQUENTIAL-PLAN {700EF204B3}>) [fast-method]
5: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT))
6: ((:METHOD ASDF/PLAN:PERFORM-PLAN :AROUND (T)) #<ASDF/PLAN:SEQUENTIAL-PLAN {700EF204B3}>) [fast-method]
7: ((:METHOD ASDF/OPERATE:OPERATE (ASDF/OPERATION:OPERATION ASDF/COMPONENT:COMPONENT)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "sketch"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method]
8: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "sketch"> :VERBOSE NIL)
9: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
10: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "sketch"> :VERBOSE NIL) [fast-method]
11: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> ASDF/LISP-ACTION:LOAD-OP "sketch" :VERBOSE NIL)
12: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
13: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "sketch" :VERBOSE NIL) [fast-method]
14: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {700EF203AB}> :OVERRIDE T :KEY NIL :OVERRIDE-CACHE T :OVERRIDE-FORCING NIL)
15: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
16: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {700EF202DB}> :OVERRIDE NIL :KEY NIL :OVERRIDE-CACHE NIL :OVERRIDE-FORCING NIL)
17: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "sketch" :VERBOSE NIL) [fast-method]
18: (ASDF/OPERATE:LOAD-SYSTEM "sketch" :VERBOSE NIL)
19
All dependencies installed. This issue affects cl-sdl2 as well. Any clue how to get around this?
% sbcl
This is SBCL 2.1.3, an implementation of ANSI Common Lisp.
More information about SBCL is available at <http://www.sbcl.org/>.
SBCL is free software, provided as is, with absolutely no warranty.
It is mostly in the public domain; some portions are provided under
BSD-style licenses. See the CREDITS and COPYING files in the
distribution for more information.
* (ql:quickload 'sketch)
To load "sketch":
Load 1 ASDF system:
sketch
; Loading "sketch"
...
debugger invoked on a LOAD-FOREIGN-LIBRARY-ERROR in thread
#<THREAD "main thread" RUNNING {1004AE81C3}>:
Unable to find framework OpenGL
Type HELP for debugger help, or (SB-EXT:EXIT) to exit from SBCL.
restarts (invokable by number or by possibly-abbreviated name):
0: [RETRY ] Try loading the foreign library again.
1: [USE-VALUE ] Use another library instead.
2: [TRY-RECOMPILING ] Recompile library and try loading it again
3: [RETRY ] Retry
loading FASL for #<CL-SOURCE-FILE "cl-opengl" "gl" "library">.
4: [ACCEPT ] Continue, treating
loading FASL for #<CL-SOURCE-FILE "cl-opengl" "gl" "library">
as having been successful.
5: Retry ASDF operation.
6: [CLEAR-CONFIGURATION-AND-RETRY] Retry ASDF operation after resetting the
configuration.
7: Retry ASDF operation.
8: Retry ASDF operation after resetting the
configuration.
9: [ABORT ] Give up on "sketch"
10: [REGISTER-LOCAL-PROJECTS ] Register local projects and try again.
11: Exit debugger, returning to top level.
(CFFI::FL-ERROR "Unable to find framework ~A" "OpenGL")
source: (ERROR 'LOAD-FOREIGN-LIBRARY-ERROR :FORMAT-CONTROL CONTROL
:FORMAT-ARGUMENTS ARGUMENTS)
0]
Hello,
I am accessing sketch from a Windows laptop via VNC to a CentOS server (no graphics card on server).
I cannot run Sketch examples from Emacs/slime, so I am trying to debug the issue by first running the examples in sbcl running from a Gnome terminal.
I was able to run CL-SDL2 example in that sbcl.
Back to Sketch. After setting the SDL_VIDEO_X11-VISUALID to 0x210, I get a black window with error SDL error: could not generate GLX context.
Two questions:
I realize that these issues are Lisp and Sketch unrelated, but I am hoping someone has them figured out. I also understand that this topic is quite complex, and this forum may not be the right place to look for answers.
Thanks,
Mirko
Hi
I have a problem when it comes to creating objects with their own state when using the defsketch macro.
Here is simple (and quite pointless) example:
#!/usr/bin/sbcl --script
(load "~/quicklisp/setup.lisp")
(ql:quickload "sketch")
(in-package :sketch)
(defun change-state (a)
(setf (gethash 'v a) 1)
a)
(defsketch nier ((title "weir")
(width 1000)
(a (make-hash-table :test #'equal))
(b (change-state a))
(height 1000))
; expect this to print (:A 1 :B 1)
; but it prints (:A NIL :B 1), so a has not been altered.
(print (list :a (gethash 'v a) :b (gethash 'v b)))
(background (gray 0.1)))
(defun main ()
; can i pass variables here somehow instead?
; i've tried eg. (make-instance 'nier :a 3), but this does not
; affect the value of a inside defsketch
(make-instance 'nier)
(sleep 100))
(main)
So I'm wondering if this is expected behaviour? (I sort of assume it is.) And what is the preferred way of initialising multiple interdependent things inside defsketch, where those things have an internal state?
As a sidenote, evaluating the following code has the behaviour i'm expecting
(let* ((a (make-hash-table :test #'equal))
(b (change-state a)))
(print (list :a (gethash 'v a) :b (gethash 'v b))))
I see that there is a setup method in sketch, but i haven't found any documentation or examples anywhere. Perhaps this is the correct approach? If so, could someone provide an example, please?
Thank you for this library either way, it is precisely what i need!
Best
Anders
I tried to run it using ccl with SDL2 installed and I recieve the following error:
Error: Unknown field :WINDOW for foreign-record type:
> #<FOREIGN-RECORD ANON-TYPE-7768 #x302001A7FDCD>
> Valid fields:
> :HDC (SDL2-FFI:HDC)
>
> While executing: #<STANDARD-METHOD PLUS-C::BUILD-REF (SYMBOL AUTOWRAP:FOREIGN-RECORD T T)>, in process listener(1).
> Type :POP to abort, :R for a list of available restarts.
> Type :? for other options.
This is on CCL64 BTW, I also tried running SDL2 to only arrive the same error.
Not a bug, but and update too anyone interested Sketch seems run fine on macOS 13.1 using Clozure CL.
Steps I took, to the best of my recollection. Install Clozure CL 1.12.1 from MacPorts. (I haven't tested with SBCL, yet).
sudi port install cclInstall Quicklisp, enter the ccl64 REPL run the setup.
curl -O https://beta.quicklisp.org/quicklisp.lisp
ccl64 --load quicklisp.lisp
(quicklisp-quickstart:install)
# If you are using Emacs and SLIME
(ql:quickload "quicklisp-slime-helper")
# Add this to your init.el
(load (expand-file-name "~/quicklisp/slime-helper.el"))
(setq inferior-lisp-program "ccl64")Open a REPL in Emacs M-x slime and load Sketch.
CL-USER> (ql:quickload :sketch)Now install the SDL2 external/foreign dependencies.
sudo port install libsdl2
sudo port install libsdl2_image
sudo port install libsdl2_ttfdNow it should be possible to load the examples.
CL-USER> (ql:quickload :sketch-examples)
CL-USER> (make-instance 'sketch-examples:hello-world)
CL-USER> (make-instance 'sketch-examples:sinewave)
CL-USER> (make-instance 'sketch-examples:brownian)
CL-USER> (make-instance 'sketch-examples:life)| macOS | 13.1 (Intel 64) |
| GNU Emacs | 30.0.50 |
| SLIME | 2.27 |
| Sketch | 20221106 |
| ccl | 1.12.1 |
| libsdl2 | 2.26.2 |
| libsdl2image | 2.6.2 |
| libsdl2ttf | 2.20.1 |
Test program:
(defsketch test
((title "test") (width 640) (height 640))
(let ((size 48))
(scale (/ size 2))
(translate 4 4)
(with-pen (make-pen :stroke +white+ :weight (/ 2 size))
#+nil (line 0.4 0.4 1 1)
#+nil (line 1 1 0.4 0.4)
(polyline 0.8 0.8 -1 -1 -0.8 -0.8))))
Problem:
polyline is wrong, it flies outside the screen.
line has different position. When composing larger algorithms I find geometry gets put in wrong positions everywhere.This works, draws random black circles on a white background:
(defsketch bug
((width 800)
(height 600)
(copy-pixels t)
(pen (make-pen :fill +black+)))
(with-pen pen
(circle (random width) (random height) (random 10))))
(defmethod setup ((instance bug) &key &allow-other-keys)
(background +white+))
But if you change both the width & height to 400, for example, then the background goes black. It also seems like an initial window comes up, then gets closed and a new one opens up with the desired dimensions. I'm on Linux and have Intel graphics hardware, if that makes a difference.
edit: My guess is that sketch restarts the window in order to initialise it with the proper dimensions, but then doesn't call setup afterwards. I'm not sure why this behaviour is dependent on the width and height, though.
Sketch currently does not compile on SBCL 2.1.*, since in 2.1.0 sb-vm::make-ea has been removed.
Sometimes the polygon function seems to break and spew lots of strange output.
If you clone down http://github.com/sjl/coding-math and check out commit 3d6ba7a35004215b185674032cbba9b2d4a2e452 you can see an example. Run with:
(ql:quickload 'coding-math)
(in-package #:coding-math.2d.demo)
(defparameter *demo* (make-instance 'cm))
I'm drawing a couple of stars onto the screen. Each star has a list of points, which I draw the circles at. I also draw lines between the points:
(defun draw-star (star)
(draw-particle (getf star :center))
; (draw-polygon (getf star :points))
(iterate
(with points = (getf star :points))
(for (p1 . p2) :pairs-of-list points)
(draw-circle p1 3)
(draw-line p1 p2)))If you uncomment the draw-polygon call there it should fail with something like this:
I am trying to use images in Sketch on Linux and the rectangle fill renders out weird. I am looking for clues as to what might be causing this issue from anyone here in the community.
Code:
(defsketch tutorial
((title "line")
(width 400)
(height 400))
(background +orange+)
(with-pen (make-pen :stroke +red+ :weight 1 :fill (load-resource "mia.png"))
(rect 50 30 200 113)))
Here is what Sketch renders:
Here is the source image:
Details:
I tried creating a rectangle of the same size as the image @ 200 x 113 px but the weird artifacting still happens regardless.
This happens on Linux machines with AMD and Intel gpus.
I am using latest Debian everything and latest Sketch pull.
Does anyone have any thought son why this might be happening? What might be the fix?
Thanks.
Dear Dev,
first, let me thank you for this fantastic library. At the risk of asking something potentially trivial, I would like to know whether it is possible to save sketches as static images e.g. png. I am a researcher and I am very interested in using Sketch to programatically generate diagrams and graphics to (i) share my research results; and (ii) teach some Computer Science modules. I am new to Lisp, and so, again, I might be asking something very basic. Unfortunately, I could not find an answer to my question by looking at Sketch's source code. Or maybe this is not a correct use case for Sketch?
I will be very happy if you could give me some pointers.
Thanks for your efforts.
Nery
Any idea about how hard it can be to construct graph functions on top of that to draw graphs
After running the tutorial sketch, it opened blank windows until my computer froze (On a related note how do I kill something like this quickly?). The windows had two different titles, "Sketch", and "SDL2 Window". I'm not sure if this is relevant, but I installed cl-sdl2 manually from git, because the quicklisp version didn't have the sdl2-ffi:sdl-point.
Hi I load sketch and sketch-example,
first my machine OSX EL Capitan description, slime and roswell:
CL-USER> (lisp-implementation-type)
"Clozure Common Lisp"
CL-USER> (lisp-implementation-version)
"Version 1.11-r16635 (DarwinX8664)"
when I load sketch it works and also when samples are working
CL-USER> (ql:quickload :sketch-examples)
To load "sketch-examples":
Load 1 ASDF system:
sketch-examples
; Loading "sketch-examples"
(:SKETCH-EXAMPLES)
CL-USER> (make-instance 'sketch-examples:hello-world)
#<SKETCH-EXAMPLES:HELLO-WORLD #x30200289FC0D>
also the other examples work well
but when I try teh sample tutorial in the readme:
CL-USER> (ql:quickload :sketch)
To load "sketch":
Load 1 ASDF system:
sketch
; Loading "sketch"
(:SKETCH)
CL-USER> (in-package :sketch)
#<Package "SKETCH">
SKETCH> (defsketch tutorial ())
gives the sldb output:
(TUTORIAL
NIL) can't be destructured against the lambda list (SKETCH-NAME
WINDOW-OPTIONS
SLOT-BINDINGS
&BODY
BODY), because it does not contain at least 3 elements.
[Condition of type CCL::SIMPLE-PROGRAM-ERROR]
Restarts:
0: [*ABORT] Return to SLIME's top level.
1: [ABORT-BREAK] Reset this thread
2: [ABORT] Kill this thread
Backtrace:
0: (CCL::PREPARE-TO-DESTRUCTURE (TUTORIAL NIL) (SKETCH-NAME WINDOW-OPTIONS SLOT-BINDINGS &BODY BODY) 3 NIL)
1: (DEFSKETCH (DEFSKETCH TUTORIAL NIL) NIL)
2: (FUNCALL #<Compiled-function DEFSKETCH Macroexpander #x30200255E35F> (DEFSKETCH TUTORIAL NIL) NIL)
3: (MACROEXPAND-1 (DEFSKETCH TUTORIAL NIL) NIL)
4: (CCL::CHEAP-EVAL-MACROEXPAND-1 (DEFSKETCH TUTORIAL NIL) NIL)
5: (CCL::CHEAP-EVAL-IN-ENVIRONMENT (DEFSKETCH TUTORIAL NIL) NIL)
6: (CCL::CHEAP-EVAL (DEFSKETCH TUTORIAL NIL))
7: (SWANK::%EVAL-REGION "(defsketch tutorial ())\n")
8: ((:INTERNAL SWANK::%LISTENER-EVAL))
9: (SWANK-REPL::TRACK-PACKAGE #<CCL:COMPILED-LEXICAL-CLOSURE (:INTERNAL SWANK::%LISTENER-EVAL) #x3020027C54EF>)
10: (SWANK::CALL-WITH-BUFFER-SYNTAX NIL #<CCL:COMPILED-LEXICAL-CLOSURE (:INTERNAL SWANK::%LISTENER-EVAL) #x3020027C552F>)
11: (SWANK::%LISTENER-EVAL "(defsketch tutorial ())\n")
12: (CCL::CALL-CHECK-REGS SWANK-REPL:LISTENER-EVAL "(defsketch tutorial ())\n")
13: (CCL::CHEAP-EVAL (SWANK-REPL:LISTENER-EVAL "(defsketch tutorial ())\n"))
14: (SWANK:EVAL-FOR-EMACS (SWANK-REPL:LISTENER-EVAL "(defsketch tutorial ())\n") "SKETCH" 84)
15: (SWANK::PROCESS-REQUESTS NIL)
16: ((:INTERNAL SWANK::HANDLE-REQUESTS))
17: ((:INTERNAL SWANK::HANDLE-REQUESTS))
18: (SWANK/BACKEND:CALL-WITH-DEBUGGER-HOOK #<Compiled-function SWANK:SWANK-DEBUGGER-HOOK #x302000A1F26F> #<CCL:COMPILED-LEXICAL-CLOSURE (:INTERNAL SWANK::HANDLE-REQUESTS) #x302000BFD3BF>)
19: (SWANK::CALL-WITH-BINDINGS ((*STANDARD-INPUT* . #<SWANK/GRAY::SLIME-INPUT-STREAM #x302000BFC58D>) (*STANDARD-OUTPUT* . #<SWANK/GRAY::SLIME-OUTPUT-STREAM #x302000BFC21D>) ..))) #<CCL:COMPILED-LEXICAL-C..
20: (SWANK::HANDLE-REQUESTS #<MULTITHREADED-CONNECTION #x302000AA3DFD> NIL)
21: (CCL::RUN-PROCESS-INITIAL-FORM #<PROCESS repl-thread(13) [Active] #x302000BEB46D> (#<CCL:COMPILED-LEXICAL-CLOSURE (:INTERNAL CCL::%PROCESS-RUN-FUNCTION) #x302000BEB1FF>))
22: ((:INTERNAL (CCL::%PROCESS-PRESET-INTERNAL (CCL:PROCESS))) #<PROCESS repl-thread(13) [Active] #x302000BEB46D> (#<CCL:COMPILED-LEXICAL-CLOSURE (:INTERNAL CCL::%PROCESS-RUN-FUNCTION) #x302000BEB1FF>))
23: ((:INTERNAL CCL::THREAD-MAKE-STARTUP-FUNCTION))
So I d not know if this is an error in the tutorial, of course the main problem is that I do not know enouch common lisp and sketch particullary
Thanks in advance
I tried this:
(DEFSKETCH xxx (...)
((x-left 1.0d0)
(x-right 1.0d0)
(x-step (/ (- x-right x-left) width))
...))
but that fails with "unbound variable". Can/should that be similar to LET*, perhaps?
Hi,
I would love to give sketch a try, but I can't seem to get it to load. When I call (ql:quickload "sketch") quicklisp complains that it cannot find system "sdl2-image". Any idea of why that happens?
I'm using CCL 1.11 on OS X.
Thanks a lot!
In the guide here http://onrendering.blogspot.no/2011/10/buffer-object-streaming-in-opengl.html it shows that after orphaning the buffer you need to reset your vao. In sketch currently it is only rebound.
instead something like this should be added to glkit
(defun reinit-vao (vao)
(with-slots ((vao-type type) id vbos vertex-count) vao
(with-slots (groups) vao-type
(loop for group across groups
as vbo-offset = 0 then (+ vbo-offset vbo-count)
as vbo-count = (vao-vbo-count group)
as vbo-subset = (make-array vbo-count :displaced-to vbos
:displaced-index-offset vbo-offset)
as attr-offset = 0 then (+ attr-offset attr-count)
as attr-count = (vao-attr-count group)
do (loop for i from 0 below (vao-attr-count group)
do (%gl:enable-vertex-attrib-array (+ i attr-offset)))
(vao-set-pointers group attr-offset vertex-count vbo-subset)))))
and this be called from start-draw, as in:
(defun start-draw ()
(%gl:bind-buffer :array-buffer 1)
(%gl:buffer-data :array-buffer *buffer-size* (cffi:null-pointer) :stream-draw)
(setf (env-buffer-position *env*) 0)
(kit.gl.vao:vao-bind (env-vao *env*))
(kit.gl.vao::reinit-vao (env-vao *env*)))
This has been working but I think only because there is only one vao.
In Arch Linux, SBCL 1.3.6. Installed SDL2 successfully. Get errors in the hello-world examples:
Any help? Thank you. ;-)
It seems defsketch is doing a bunch of wrong stuff. If I define a window width/height, it will emit warnings for unused variables. This is because the code expands to a LET* with 2 width and 2 height bindings, as well as a needless WITH-SLOTS form binding them, when WITH-ACCESSORS does the same thing prior. This is madness ha
I currently in the process of learning a bit about processing.
I started with :trivial-gamekit. However, I disliked the idea of refreshing the screen at every draw.
Especially for simple programs like random walker, wouldn't be much better if the program continuously draw, instead of keeping a list of objects drawn.
So is there a way to achieve this?
Very interesting project, sadly I cannot make use of it because my hardware only supports OpenGL 2.1 not 3.3, and it's not something that my current situation really allows me to change anytime soon.
I don't really know how hard of an issue this would be to solve. I understand if it is unfeasible, I just figured I'd at least let you know that there are people that would appreciate wider OpenGL support.
Hi maintainers, thank you very much for this project! I'm having one issue on my machines with the hello-world example, specifically with the text rendering. This is what I'm seeing on my arch linux machine and also on another 2019 MacBook Pro machine.
If I try rendering some text other than "Hello, world!". This is what I see:
5 a's (i.e. "aaaaa"):
6 a/s (i.e. "aaaaaa"):
7 a's (i.e. "aaaaaaa"):
I'm still learning more about computer graphics and the GPU so I don't quite know how to troubleshoot this issue. It'll be really appreciated if you can help me to troubleshoot this.
I have the lastest master of lispgames/cl-sdl2 and lispgames/sdl2kit in my local-projects directory. Here's my opengl version information:
$ glxinfo | grep OpenGL
OpenGL vendor string: Intel
OpenGL renderer string: Mesa Intel(R) HD Graphics 520 (SKL GT2)
OpenGL core profile version string: 3.3 (Core Profile) Mesa 22.1.2
OpenGL core profile shading language version string: 3.30
OpenGL core profile context flags: (none)
OpenGL core profile profile mask: core profile
OpenGL core profile extensions:
OpenGL version string: 3.3 (Compatibility Profile) Mesa 22.1.2
OpenGL shading language version string: 3.30
OpenGL context flags: (none)
OpenGL profile mask: compatibility profile
OpenGL extensions:
OpenGL ES profile version string: OpenGL ES 3.2 Mesa 22.1.2
OpenGL ES profile shading language version string: OpenGL ES GLSL ES 3.20
OpenGL ES profile extensions:
The sineweave example starts but dies after a second or so with the following error if I run it from SLIME. If I run it from the SBCL command prompt directly, everything works.
free(): invalid pointer
fatal error encountered in SBCL pid 19874(tid 0x7f16ba2af700):
SIGABRT received.
Error opening /dev/tty: No such device or address
Welcome to LDB, a low-level debugger for the Lisp runtime environment.
ldb> backtrace
Backtrace:
0: Foreign function gsignal, pc = 0x7f16e018fed7, fp = 0x7f16ba2ae5f0
ldb>
When there is many dynamic lines:
https://gist.github.com/honix/e94f42eb24e62a2ade8cbb45ab8b9df1
Sketch becomes little laggy because of GC hard work. So, for now i down *shape-cache-capacity* to zero and have smooth animation. I think it needs to rethink caches somehow..
I have installed SDL2, SDL2_image and SDL2_ttf into /Library/Frameworks but for some reason ccl can't find it... However, SBCL can find it but of course sbcl has issues with the rendering.
If I load a PNG-file, instead of red the color blue is rendered.
(defsketch image ((title "image") (width 500) (height 600)) (image (load-resource "png/my-image.png") 100 50)
React
A declarative, efficient, and flexible JavaScript library for building user interfaces.
🖖 Vue.js is a progressive, incrementally-adoptable JavaScript framework for building UI on the web.
Typescript
TypeScript is a superset of JavaScript that compiles to clean JavaScript output.
An Open Source Machine Learning Framework for Everyone
Django
The Web framework for perfectionists with deadlines.
Laravel
A PHP framework for web artisans
Bring data to life with SVG, Canvas and HTML. 📊📈🎉
JavaScript (JS) is a lightweight interpreted programming language with first-class functions.
Some thing interesting about web. New door for the world.
A server is a program made to process requests and deliver data to clients.
Machine learning is a way of modeling and interpreting data that allows a piece of software to respond intelligently.
Some thing interesting about visualization, use data art
Some thing interesting about game, make everyone happy.
Facebook
We are working to build community through open source technology. NB: members must have two-factor auth.
Microsoft
Open source projects and samples from Microsoft.
Google
Google ❤️ Open Source for everyone.
Alibaba
Alibaba Open Source for everyone
D3
Data-Driven Documents codes.
Tencent
China tencent open source team.