抽獎軟體源碼

A. 用html5+js 做一個轉盤抽獎怎麼做，求源碼！

5分給你個程序。。。
自己參考改吧

<input type="button" value="開始旋轉" onclick="spin();" style="float: left;" />
<meta http-equiv="Content-Type" content="text/html;charset=utf-8" />

<canvas id="wheelcanvas" width="500" height="500"></canvas>
<script type="application/javascript">
var colors = ["#B8D430", "#3AB745", "#029990", "#3501CB",
"#2E2C75", "#673A7E", "#CC0071", "#F80120",
"#F35B20", "#FB9A00", "#FFCC00", "#FEF200"];
var restaraunts = ["北京", "上海", "天津", "南京",
"杭州", "深圳", "武漢", "濟南",
"重慶", "大連", "合肥", "鄭洲"];

var startAngle = 0;
var arc = Math.PI / 6;
var spinTimeout = null;

var spinArcStart = 10;
var spinTime = 0;
var spinTimeTotal = 0;

var ctx;

function draw() {
drawRouletteWheel();
}

function drawRouletteWheel() {
var canvas = document.getElementById("wheelcanvas");
if (canvas.getContext) {
var outsideRadius = 200;
var textRadius = 160;
var insideRadius = 125;

ctx = canvas.getContext("2d");
ctx.clearRect(0,0,500,500);

ctx.strokeStyle = "black";
ctx.lineWidth = 2;

ctx.font = 'bold 12px sans-serif';

for(var i = 0; i < 12; i++) {
var angle = startAngle + i * arc;
ctx.fillStyle = colors[i];

ctx.beginPath();
ctx.arc(250, 250, outsideRadius, angle, angle + arc, false);
ctx.arc(250, 250, insideRadius, angle + arc, angle, true);
ctx.stroke();
ctx.fill();

ctx.save();
ctx.shadowOffsetX = -1;
ctx.shadowOffsetY = -1;
ctx.shadowBlur = 0;
ctx.shadowColor = "rgb(220,220,220)";
ctx.fillStyle = "black";
ctx.translate(250 + Math.cos(angle + arc / 2) * textRadius, 250 + Math.sin(angle + arc / 2) * textRadius);
ctx.rotate(angle + arc / 2 + Math.PI / 2);
var text = restaraunts[i];
ctx.fillText(text, -ctx.measureText(text).width / 2, 0);
ctx.restore();
}

//Arrow
ctx.fillStyle = "black";
ctx.beginPath();
ctx.moveTo(250 - 4, 250 - (outsideRadius + 5));
ctx.lineTo(250 + 4, 250 - (outsideRadius + 5));
ctx.lineTo(250 + 4, 250 - (outsideRadius - 5));
ctx.lineTo(250 + 9, 250 - (outsideRadius - 5));
ctx.lineTo(250 + 0, 250 - (outsideRadius - 13));
ctx.lineTo(250 - 9, 250 - (outsideRadius - 5));
ctx.lineTo(250 - 4, 250 - (outsideRadius - 5));
ctx.lineTo(250 - 4, 250 - (outsideRadius + 5));
ctx.fill();
}
}

function spin() {
spinAngleStart = Math.random() * 10 + 10;
spinTime = 0;
spinTimeTotal = Math.random() * 3 + 4 * 1000;
rotateWheel();
}

function rotateWheel() {
spinTime += 30;
if(spinTime >= spinTimeTotal) {
stopRotateWheel();
return;
}
var spinAngle = spinAngleStart - easeOut(spinTime, 0, spinAngleStart, spinTimeTotal);
startAngle += (spinAngle * Math.PI / 180);
drawRouletteWheel();
spinTimeout = setTimeout('rotateWheel()', 30);
}

function stopRotateWheel() {
clearTimeout(spinTimeout);
var degrees = startAngle * 180 / Math.PI + 90;
var arcd = arc * 180 / Math.PI;
var index = Math.floor((360 - degrees % 360) / arcd);
ctx.save();
ctx.font = 'bold 30px sans-serif';
var text = restaraunts[index]
ctx.fillText(text, 250 - ctx.measureText(text).width / 2, 250 + 10);
ctx.restore();
}

function easeOut(t, b, c, d) {
var ts = (t/=d)*t;
var tc = ts*t;
return b+c*(tc + -3*ts + 3*t);
}

draw();
</script>

B. 易語言抽獎源碼

置隨機數種子()
.局部變數 結果
賦值(結果,取隨機數(1,100))
.局部變數 msg
.如果真(小於(結果,50))'三等獎50
賦值(msg,3)
.如果真結束
.如果真(大於(結果,50) 且 小於(結果,75))'2等獎25
賦值(msg,2)
.如果真結束
.如果真(大於(結果,75) 且 小於(結果,85))'2等獎10
賦值(msg,1)
.如果真結束
信息框(msg)

C. 誰有 九宮格抽獎的源碼 注意:是可以設置抽獎概率的

• 你是什麼用途？

  
  

• a.如果抽獎內容價值比較大，得考慮到演算法的安全性，保證絕對的概率，也就是能彩票一樣，如果是100W的大獎，不能重復出現好幾次。計算機的隨機概率是不穩定的，所以需要一套完整的演算法來保持概率，進行矯正和干預。上面說道的是隨機概率。

• b.如果是獎池形的，就需要用維護獎池的演算法來實現，比如1等獎10個二等獎100個三等獎1000個，10W的不中獎，這就形成了你的獎池，你每次抽獎是從這個池中取到一個號碼，為了維護中獎率，你需要再拿走一個號碼以後再給獎池補充一個新的號碼。

• c.總之這是一個非常復雜的過程，建議你使用國家的開獎中心的數據來維護你自己的抽獎內容，抽獎中心給的內容演算法是完整的，你取到她們算出的結果當作你們計算的依據。

  
  

• 如果是簡單實現，不考慮後果的話，你可以去前端源碼下載站就能輕松找到源碼

  
  

• 以上是我個人觀點，如果錯誤，敬請原諒。

  
  

• 這個拍版好難用

D. 你好，我想自己用易語言做一個抽獎軟體

沒有現成的！要的話，可以教你怎麼寫！
晚上閑著沒事，給你寫了個簡單的！還有一個版本，要的話HI我！
.版本 2

.程序集 窗口程序集1
.程序集變數 位數, 整數型

.子程序 _按鈕1_被單擊

編輯框2.內容 ＝ 「」
.如果 (編輯框1.內容 ＝ 「」)
位數 ＝ 取隨機數 (1, 10)
.否則
位數 ＝ 到整數 (編輯框1.內容)
.如果結束
.計次循環首 (位數, )
編輯框2.加入文本 (到文本 (取隨機數 (0, 9)))
延時 (100)
.計次循環尾 ()

E. 怎麼用易語言做一個超級簡單的抽獎軟體

需要的材料：主窗口，標簽（可以是一個，也可以是多個），按鈕（開始、停止、關閉），時鍾1個，聲音（可有可無），皮膚插件（可有可無）。
===================================================================
下面這個是0-199數字隨機，可以自己改改，不難~！
===================================================================

.
.版本 2
.程序集 窗口程序集1
.子程序 __啟動窗口_創建完畢
載入皮膚 (26) ' 皮膚的東西，可以刪掉
載入Aero特效 () ' 皮膚特效，可以刪掉
.子程序 _時鍾1_周期事件
標簽1.標題 ＝ 到文本 (取隨機數 (0, 1))
標簽2.標題 ＝ 到文本 (取隨機數 (0, 9))
標簽3.標題 ＝ 到文本 (取隨機數 (0, 9))
.子程序 _按鈕1_被單擊
時鍾1.時鍾周期 ＝ 0
' 播放音樂 (#lala, ) '播放聲音文件，可有可無，主要是襯托氣氛
信息框 (「恭喜這位」 ＋ 到文本 (標簽1.標題 ＋ 標簽2.標題 ＋ 標簽3.標題) ＋ 「的朋友中獎~！！！」, 0, 「大家鼓掌！」)
.子程序 _按鈕2_被單擊
時鍾1.時鍾周期 ＝ 5
.子程序 _按鈕3_被單擊
信息框 (「感謝您的使用！」, 0, )
結束 ()

F. 求一個用易語言寫的抽獎軟體（源碼）。

.版本 2

.程序集 窗口程序集1

.子程序 _按鈕1_被單擊
.局部變數 a, 整數型, , "0"
.局部變數 計次變數, 整數型
.局部變數 b, 整數型

編輯框1.內容 ＝ 「」
.計次循環首 (35, 計次變數)
加入成員 (a, 計次變數)
.計次循環尾 ()
.計次循環首 (7, )
b ＝ 取隨機數 (1, 取數組成員數 (a))
編輯框1.內容 ＝ 編輯框1.內容 ＋ 到文本 (a [b]) ＋ 「 」
刪除成員 (a, b, 1)
.計次循環尾 ()

G. 求大神指教如何製作一個易語言抽獎軟體

這是我給別人寫的一個收費抽簽軟體，原理和抽獎一樣，稍微改下就行了。