Text only | Text with Images

newLISP Fan Club

Forum => Anything else we might add? => Topic started by: xytroxon on November 06, 2008, 07:10:00 AM

Title: weblisp
Post by: xytroxon on November 06, 2008, 07:10:00 AM
In the effort to design "hands on" newLISP web demonstrations, here's "WebLisp.net - An Online Interpreter for the WebLisp Programming Language"

//http://weblisp.net/



And for Weblisp's efforts, the requisite reddit Lisp/Scheme naysayers ;)

//http://www.reddit.com/r/programming/comments/7bpbn/weblispnet_an_online_interpreter_for_the_weblisp/



The interesting thing with the Weblisp demo, is the "canvas" tab...



Highlight the left edit area and delete. Click the "canvas" tab, scroll down and copy the code (below e.g.) over to the left edit area and click "run program".



-- xytroxon
Title:
Post by: Kazimir Majorinc on November 06, 2008, 09:14:43 AM
Great.



Here is one program for Weblisp.


Code Select
(gfx-reset)

(define (P a b r)
        (gfx-line a b r r)
        (gfx-line a b r (- 100 r))  
        (gfx-line a b (- 100 r) r)
        (gfx-line a b (- 100 r) (- 100 r)))  

(define (Q r)
        (P 0 0 r)
        (P 0 100 r)
        (P 100 0 r)
        (P 100 100 r))

(define (drawy r)
        (if (> r 0)
            (begin (Q r)
                   (drawy (- r 2)))))
                   
(drawy 50)

The result is on canvas.
Title:
Post by: cormullion on November 06, 2008, 09:28:21 AM
great work! It's really clever.



Looks like newLISP has got some serious competition... :)
Title:
Post by: Kazimir Majorinc on November 06, 2008, 02:35:45 PM
Two interesting canvases.



1.(//%3C/s%3E%3CURL%20url=%22http://www.instprog.com/canvas.png%22%3Ehttp://www.instprog.com/canvas.png%3C/URL%3E%3Ce%3E)2.(//%3C/s%3E%3CURL%20url=%22http://www.instprog.com/canvas2.png%22%3Ehttp://www.instprog.com/canvas2.png%3C/URL%3E%3Ce%3E)




Code Select
(gfx-reset)

(define (P a b r)
        (gfx-line a b r r)
        (gfx-line a b r (- 100 r))
        (gfx-line a b (- 100 r) r)
        (gfx-line a b (- 100 r) (- 100 r)))

(define (Q r)
        (P 0 0 r)
        (P 0 5000 r)
        (P 100 0 r)
        (P 100 5000 r))

(define (drawy r)
        (if (> r 0)
            (begin (Q r)
                   (drawy (- r 1.01)))))
                   
(drawy 50)

Code Select
(gfx-reset)

(define (P a b r)
        (gfx-line a b r r)
        (gfx-line a b r (- 100 r))
        (gfx-line a b (- 100 r) r)
        (gfx-line a b (- 100 r) (- 100 r)))

(define (Q r)
        (P 0 0 r)
        (P 0 5000 r)
        (P 5000 0 r)
        (P 5000 5000 r))

(define (drawy r)
        (if (> r 0)
            (begin (Q r)
                   (drawy (- r 1.33333)))))
                   
(drawy 50)
Title:
Post by: unixtechie on November 07, 2008, 01:22:18 PM
Oh, that's nice.
Title:
Post by: newdep on November 08, 2008, 12:45:19 AM
Thats a quick canas weblisp is using... nice...
Title:
Post by: cormullion on November 08, 2008, 01:37:29 AM
Nice pictures, Kazimir! I love this algorithmic-drawing stuff - there's a lot of good stuff out there too: //http://www.azarask.in/blog/post/contextfreejs-algorithm-ink-making-art-with-javascript/
Title:
Post by: Kazimir Majorinc on November 08, 2008, 01:40:33 AM
xytroxon,



where is it evaluated, on your server on on my client, I missed that piece of information.
Title:
Post by: Kazimir Majorinc on November 08, 2008, 02:10:07 AM
Thanx cormullion, amazing site on the link you posted (for those who didn't noticed, follow the first link in that blog. )
Title:
Post by: Lutz on November 08, 2008, 03:37:09 AM
Everybody interested to make Art in newLISP should also go here:



http://www.newlisp.org/index.cgi?Postscript



also linked from: http://www.newlisp.org/index.cgi?Art



The advantage of the Postscript approach is, that graphics and files created are scalable vector graphics.



On Mac OS X you are ready to go with the postscript module. On Win32 or Linux, you also have to install a postscript viewer, i.e. Ghostscript.



Here is one of the pictures similar to the stuff at the www.azarask.in site:



http://www.newlisp.org/postscript/recursion.gif



and here the source:



http://www.newlisp.org/syntax.cgi?postscript/recursion-lsp.txt
Title:
Post by: xytroxon on November 08, 2008, 12:21:46 PM
Quote from: "Kazimir Majorinc"xytroxon,



where is it evaluated, on your server on on my client, I missed that piece of information.


Here is Christoph Dietze's post on his weblisp at Google Web Tools:

An Interpreter running inside the Browser using GWT (//http)
Quote
Hello,



I just put the first version of a project online. Since it heavily

relies on GWT and uses it to do some advanced stuff, I thought it is

worth to put up a post about it here.



It is an interpreter that runs completely inside the browser. The

language that it interprets is a new LISP dialect that I created for

it, called WebLisp. It is a functional and imperative programming

language. There is also some documentation about it on the site.



If you're interested, you can find it here:



http://weblisp.net



Enjoy,

Christoph


So it is a "new LISP" and not "newLISP" :(



----



And for others interest, Kazimir's weblisp post... (//http)



-- xytroxon
Title:
Post by: cormullion on November 08, 2008, 03:03:20 PM
Although I use PostScript (and newLISP) a lot (eg here (//http) ), I'm still fascinated by the idea of higher-level (more coordinate-free...) type of computer art, where you just sort of set a few things up and watch what unfolds. The algorithmic art procedures are short and simple - and interactive too - one day there will be a newLISP one, perhaps, but not just yet!
Text only | Text with Images