2017年10月24日 星期二

整理問卷客製化工具

Input:
Sort out:

原始碼:
<div>
    Input:
    <br />
    <textarea id="rowdata" cols="40" rows="10" onclick="select()"></textarea>
</div>
<div>
    Sort out:
    <br />
    <textarea id="sortout" cols="40" rows="10" onclick="select()"></textarea>
</div>
<script type="text/javascript">
    var timer = 0;
    var compute = function () {
        if (timer) clearTimeout(timer);
        timer = setTimeout(function () {
            var sum = 0;
            var items = document.getElementById("rowdata").value.split("\n");
            var sort = document.getElementById("sortout");
            sort.value = "";
            var i = 0;
            for (i=1;i<items.length;i++) {
                var nums = items[i].match(/[0-9]/gi);
                var ans = "未填";
                if(nums) {
                    nums.sort(function(a, b) {
                        return a > b;
                    });
                    ans = nums.reduce(function(sum, value) {
                        return sum + "," + value;
                    });
                }
                var text = items[i].replace(/[0-9]/gi, '');
                sort.value += ans + "\t" + text + "\n";
            }
        }, 100);
    };
    document.getElementById("rowdata").onkeyup = compute;
    compute();
</script>


後記:
手工將問卷轉成數位時使用,
假設複選1、3,並且有備註文字,
則在Excel選項打成『13備註文字』,
整欄打完後透過此工具可整理為兩欄資料,
第一欄為選項『1,3』第二欄為『備註文字』,
如此一來貼回去Excel整理時會快上很多,
一次請複製一整欄,第一列會自動排除掉。

2017年6月29日 星期四

逐行整數加總工具

Input:
Sort out:
Sum:


後記:
由於Word表格加總太麻煩,單純是用來複製貼上算錢的工具。

2017年4月19日 星期三

Slideshare圖片下載腳本



原始碼:
// ==UserScript==
// @name          Slideshare DownloadBoxy
// @description   Slideshare Download URL Generator
// @auther        https://toolboxy.blogspot.com/
// @include       https://www.slideshare.net/*
// @version       0.2
// ==/UserScript==
function $(id) {
    var i = 0;
    var j = 0;
    var elems = document.body.getElementsByTagName('*');
    var target = id.substr(1);
    var result=[];
    for(i=0;j=elems[i];i++) {
        if(j.getAttribute("class")) {
            if(j.getAttribute("class").indexOf(target)!=-1) {
                result.push(j);
            }
        }
    }
    return result;
}

function slideshareboxy() {
    var e = $('.slide_container')[0].getElementsByTagName('img');
    var o = "";
    for(var key=0;key<e.length;key+=1) {
        if(e[key].attributes['data-full']) {
            var url = e[key].attributes['data-full'].value;
            a = document.createElement("a");
            a.target = "blank";
            a.download = "download";
            a.href = url;
            a.click();
        }
    }
}

function downloadboxy() {
    var btn = document.createElement("button");
    btn.onclick = function() {
        slideshareboxy();
    };
    btn.innerHTML = "Download Images";
    $('.playerWrapper')[0].appendChild(btn);
}
downloadboxy();
下載:https://greasyfork.org/zh-TW/scripts/29080-slideshare-downloadboxy
後記:
剛剛想下載某人的PPT卻捉不下來,
所以就乾脆捉圖片下來合=.=