<html>

    <meta http-equiv="content-type" content="text/html; charset=UTF-8" />

    <head>

        <title></title>

<script type="text/javascript">

function Reader(content, cID, stopID, continueID) {

    this.conLoad = document.getElementById(cID);

    this.stopBtn = document.getElementById(stopID);

    this.continueBtn = document.getElementById(continueID);

    this.content = content;

    this.index = 0;

    var t = this;

    this.stopBtn.onclick = (

        function () {

        return function () {

            t.stopReader(t);

        };

    })(t);

    this.continueBtn.onclick = (

        function () {

        return function () {

            t.continueReader(t);

        };

    })(t);

}

Reader.prototype = {

    startReader : function () {

        var t = this;

        t.toId = setInterval(function () {

                if (t.content[t.index]) {

                    t.conLoad.innerHTML += t.content[t.index];

                }

                t.index++;

                if (t.content.length == t.index) {

                    clearInterval(t.toId);

                    t.conLoad.innerHTML += "【未完待续】";

                }

            }, 200);

    },

    stopReader : function (t) {

        t.flag = true;

        clearInterval(t.toId);

    },

    continueReader : function (t) {

        if (t.flag)

            t.startReader();

        t.flag = false;

    }

};

var content = "蒙古亲王僧格林沁慓悍勇猛，他率领的军队向来号称能征惯战，八旗兵、绿营他都看不上眼，更何况那些临时招募的练勇。可偏偏就是这些他眼中的乌合之众，这些年来在江南战果累累，最终攻下了江宁，夺得了对太平军作战的全胜。" +

    "相反地，他的蒙古铁骑在与捻军的角逐中常常打败仗，相形之下，昔日的声威锐减。这个一代天骄的后裔，对曾氏兄弟和湘军窝着一肚皮无名怒火。" +

    　　 "湘军进江宁后，打劫财富，屠城纵火，又放走幼天王，朝野谤讟四起，物议沸腾，僧格林沁听了十分得意，赶紧打发富明阿以视察满城为由，去江宁实地了解。谁料曾国荃一吓一贿征服了富明阿，江宁将军回去后向僧格林沁作了假汇报。";

//页面加载完成之后执行。

window.onload = function () {

    new Reader(content, "content", "btnStop", "btnContinue").startReader();

};

</script>

<body>

   <div id='content'></div>

   <div id='operate'><input type='button' id='btnStop' value='stop'/><input type='button' id='btnContinue' value='continue'/></div>

</body>  

</html>

用javascript写了一个模拟阅读小说的程序的更多相关文章

  1. JavaScript写的一个带AI的井字棋

    最近有一门课结束了,需要做一个井字棋的游戏,我用JavaScript写了一个.首先界面应该问题不大,用html稍微写一下就可以.主要是人机对弈时的ai算法,如何使电脑方聪明起来,是值得思考一下的.开始 ...

  2. Javascript写的一个可拖拽排序的列表

    自己常试写了一个可拖拽进行自定义排序的列表,可能写的不太好,欢迎提供意见. 我的思路是将列表中的所有项都放进一个包裹层,将该包裹层设为相对定位,每当点击一个项时,将该项脱离文档并克隆一份重新添加到文档 ...

  3. Javascript写了一个2048的游戏

    去年2048很火, 本来我也没玩过, 同事说如果用JS写 只要100多行代码: PS(iWeb峰会暨攻城师嘉年华2015嘉年华要来啦, 在文章结尾有具体的地址和时间): 今天试了一下, 逻辑也不复杂, ...

  4. 闲来无事，用javascript写了一个简单的轨迹动画

    <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/ ...

  5. 一个模拟"显示桌面.scf"程序的JS小函数

    有时候我们或许有这样的一个需求,用JS模拟这样一个动作,同时按下组合快捷键:Windows旗帜键+D键,下面这个函数就可以帮到我们了. function f_ToggleDesktop() { var ...

  6. 用Go写了一个相似Proxy的小程序,能够用来訪问goolge个人使用还是能够的.

    package main import ( "fmt" "io" "net/http" ) func main() { http.Handl ...

  7. JavaScript写一个连连看的游戏

    天天看到别人玩连连看, 表示没有认真玩过, 不就把两个一样的图片连接在一起么, 我自己写一个都可以呢. 使用Javascript写了一个, 托管到github, 在线DEMO地址查看:打开 最终的效果 ...

  8. 今天写了一个简单的新浪新闻RSS操作类库

    今天,有位群友问我如何获新浪新闻列表相关问题,我想,用正则表达式网页中取显然既复杂又不一定准确,现在许多大型网站都有RSS集合,所以我就跟他说用RSS应该好办一些. 一年前我写过一个RSS阅读器,不过 ...

  9. 写了一个hiero中添加自定义Token的脚本

    Hiero自带Token往往不够用,shotname中自带版本号的情况下要升级版本会很麻烦,比如Shot_0001_v001这样一个序列名,要升级为Shot_0001_v002就必须把_v001之前的 ...

随机推荐

  1. linux(05) 编译安装py3

    一.编译安装python3 https://www.cnblogs.com/pyyu/p/9015317.html 1.下载python3的源码 cd /opt yum install wget -y ...

  2. zookeper分布式搭建1

    1.zookeper的下载与安装,见:https://www.cnblogs.com/wanerhu/p/11144815.html 2.准备三台centos,进入etc/hosts 3.编辑内容 映 ...

  3. 怎么解决禅道启动服务mysqlzt时的端口失败

    打开Windows任务管理器 查看服务是否有MySQL正在运行,停止服务 启动mysqlzt服务 重新启动禅道

  4. Tkinter 鼠标键盘事件（二）

    一个Tkinter主要跑在mainloop进程里.Events可能来自多个地方,比如按键,鼠标,或是系统事件. Tkinter提供了丰富的方法来处理这些事件.对于每一个控件Widget,你都可以为其绑 ...

  5. BZOJ练习记

    决定从头到尾干一波BZOJ!可能会写没几题就停下吧,但还是想学学新姿势啦. 1001. [BeiJing2006]狼抓兔子 即求 $(1, 1)$ 到 $(n, m)$ 的最小割.跑 dinic 即可 ...

  6. luoguP4213 【模板】杜教筛（Sum）杜教筛

    链接 luogu 思路 为了做hdu来学杜教筛. 杜教筛模板题. 卡常数,我加了register居然跑到不到800ms. 太深了. 代码 // luogu-judger-enable-o2 #incl ...

  7. Spring Cloud组件使用/配置小记

    仅使用,无多少技术含量,权记于此以备忘. 微服务架构下的主要组件 服务注册组件:Consul.Etcd等 网关:Zuul.Spring Cloud Gateway等 容错框架:Hystrix 负载均衡 ...

  8. [LeetCode] 235. Lowest Common Ancestor of a Binary Search Tree 二叉搜索树的最小共同父节点

    Given a binary search tree (BST), find the lowest common ancestor (LCA) of two given nodes in the BS ...

  9. [LeetCode] 204. Count Primes 质数的个数

    Count the number of prime numbers less than a non-negative number, n. Example: Input: 10 Output: 4 E ...

  10. [LeetCode] 119. Pascal's Triangle II 杨辉三角之二

    Given a non-negative index k where k ≤ 33, return the kth index row of the Pascal's triangle. Note t ...