├── README.md
├── .gitignore
├── Scheme撸鸭编
    └── 1.simple-edit.ss
└── LICENSE


/README.md:
--------------------------------------------------------------------------------
1 | # duck-lab
2 | 教程
3 | 


--------------------------------------------------------------------------------
/.gitignore:
--------------------------------------------------------------------------------
1 | *.ss~
2 | *.ss#*
3 | .#*.ss
4 | 
5 | *.scm~
6 | *.scm#*
7 | .#*.scm
8 | 


--------------------------------------------------------------------------------
/Scheme撸鸭编/1.simple-edit.ss:
--------------------------------------------------------------------------------
 1 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 2 | ;;Copyright 2016-2080 evilbinary.
 3 | ;作者:evilbinary on 11/11/18.
 4 | ;邮箱:rootdebug@163.com
 5 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 6 | (import  (scheme)
 7 | 	 (glfw glfw)
 8 | 	 (gui duck)
 9 | 	 (gui window)
10 | 	 (gui widget)
11 | 	 (gui layout)
12 | 	 )
13 | 
14 | (define window '() )
15 | (define width 800)
16 | (define height 700)
17 | 
18 | 
19 | (define (duck-app)
20 |   (set! window (window-create width height "hello鸭子"))
21 |    (widget-add (edit 200.0 100.0 "最简单的编辑器 鸭编"))
22 |   
23 |   ;;run
24 |   (window-loop window)
25 |   (window-destroy window)
26 |   )
27 | 
28 | (duck-app)
29 | 


--------------------------------------------------------------------------------
/LICENSE:
--------------------------------------------------------------------------------
 1 | MIT License
 2 | 
 3 | Copyright (c) 2019 evilbinary
 4 | 
 5 | Permission is hereby granted, free of charge, to any person obtaining a copy
 6 | of this software and associated documentation files (the "Software"), to deal
 7 | in the Software without restriction, including without limitation the rights
 8 | to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 9 | copies of the Software, and to permit persons to whom the Software is
10 | furnished to do so, subject to the following conditions:
11 | 
12 | The above copyright notice and this permission notice shall be included in all
13 | copies or substantial portions of the Software.
14 | 
15 | THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
16 | IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
17 | FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
18 | AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
19 | LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
20 | OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
21 | SOFTWARE.
22 | 


--------------------------------------------------------------------------------