/[opencvs]/eyes/avar.sno
ViewVC logotype

Contents of /eyes/avar.sno

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.3 - (show annotations)
Thu Jun 23 05:07:56 2011 UTC (7 years, 3 months ago) by hib
Branch: MAIN
CVS Tags: HEAD
Changes since 1.2: +1 -1 lines
adding stuff - ben ,arissa partially done.  Havent started stephanie.
Kelly and vikroia are shipped - did a demo of edition 2 of enlightenment
and building first version of japan
.
1
2 hex = span('0123456789abcdef')
3 ext = &alphabet
4 ext '.' = ''
5 exts = span(ext)
6
7 line = hex . thehex ' *./' arbno(any(&alphabet)) . rest '.' exts . theext rpos(0)
8
9 &anchor = 1
10 loop x = input :f(endd)
11 x line :f(error)
12 t2ext = theext
13 theext 'JPG' = 'jpg'
14 theext 'jpeg' = 'jpg'
15 theext 'jpe' = 'jpg'
16 output = 'ln "' rest '.' t2ext '" i/' thehex '.' theext
17 :(loop)
18
19 error output = '#error ' x
20 :(loop)
21
22 endd
23
24 end

  ViewVC Help
Powered by ViewVC 1.1.5