/[suikacvs]/markup/slide/implementation/slide-show-winie.css
Suika

Contents of /markup/slide/implementation/slide-show-winie.css

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.3 - (hide annotations) (download) (as text)
Sat Apr 23 11:38:55 2005 UTC (19 years, 6 months ago) by wakaba
Branch: MAIN
Changes since 1.2: +5 -7 lines
File MIME type: text/css
*** empty log message ***

1 wakaba 1.1
2     /* s|slides */
3     slides {
4     position: absolute;
5     overflow: hidden;
6     height: 100%;
7     width: 100%;
8     left: 0; right: 0;
9     top: 0; bottom: 0;
10     margin: 0;
11     border-width: 0;
12     padding: 0;
13     font-family: "MS Gothic", "Arial", sans-serif;
14 wakaba 1.2 behavior: expression(function (element) {
15     element.currentSlide = 0;
16    
17     // h|head { display : none }
18     var head = element.getElementsByTagName ('head')[0];
19     head.style.display = 'none';
20    
21     document.onkeydown = function () {
22     var slide = getSlideList ();
23     if (event.keyCode == 13 || event.keyCode == 39) {
24     element.currentSlide++;
25     if (element.currentSlide >= slide.length) element.currentSlide = 0;
26     showSlide (element.currentSlide);
27     event.returnValue = false;
28     } else if (event.keyCode == 8 || event.keyCode == 37) {
29     element.currentSlide--;
30     if (element.currentSlide < 0) element.currentSlide = slide.length - 1;
31     showSlide (element.currentSlide);
32     event.returnValue = false;
33     }
34     } /* keydown */
35    
36 wakaba 1.3 element.ondblclick = function () {
37 wakaba 1.2 var slide = getSlideList ();
38 wakaba 1.3 element.currentSlide++;
39     if (element.currentSlide >= slide.length) element.currentSlide = 0;
40     showSlide (element.currentSlide);
41     event.returnValue = false;
42 wakaba 1.2 }
43    
44     function showSlide (n) {
45     var slide = getSlideList ();
46     for (var i = 0; i < slide.length; i++) {
47     slide[i].runtimeStyle.display = (i == n) ? 'block' : 'none';
48     }
49     }
50    
51     function getSlideList () {
52     return window.document.getElementsByTagName ('slide');
53     }
54    
55     runtimeStyle.behavior = 'none';
56     } (this)); /* NOTE: See also slide-style-winie.css */
57 wakaba 1.1 }
58    
59     /* s|slide */
60     slide {
61 wakaba 1.2 width: 100%;
62     height: 100%;
63     border: groove 1px #C0C0C0;
64     font-size: 200%;
65 wakaba 1.1 }

admin@suikawiki.org
ViewVC Help
Powered by ViewVC 1.1.24