TAKARA Sim
forked from TRAIN Simulation (diff: 415)
http://www.minimalcomps.com/documentation/com/bit101/components/Component.html http://www40.atwiki.jp/spellbound/pages/97.html ↑参考
ActionScript3 source code
/**
* Copyright YAZUMA ( http://wonderfl.net/user/YAZUMA )
* MIT License ( http://www.opensource.org/licenses/mit-license.php )
* Downloaded from: http://wonderfl.net/c/4jdMw
*/
//http://www.minimalcomps.com/documentation/com/bit101/components/Component.html
//http://www40.atwiki.jp/spellbound/pages/97.html
//↑参考
package {
import flash.ui.Mouse;
import flash.display.*;
import flash.text.*;
import flash.events.*;
import fl.controls.*;
import flash.utils.Timer;
import mx.collections.ArrayCollection;
import com.bit101.components.Window;
import com.bit101.components.InputText;
import com.bit101.components.PushButton;
import com.bit101.components.Meter;
import com.bit101.components.HSlider;
import com.bit101.components.VSlider;
import com.bit101.components.HUISlider;
import com.bit101.components.VUISlider;
import com.bit101.components.Text;
import com.bit101.components.RadioButton;
import com.bit101.components.Panel;
import com.bit101.components.NumericStepper;
import com.bit101.components.Style;
[SWF(backgroundColor=0xcccccc,frameRate=60)]
public class sp extends Sprite {
public var Money:int = 100000000;
public function sp():void{
Style.embedFonts = false;
Style.fontName = "メイリオ";
Style.fontSize = 15;
var T1:Takara = new Takara();
for(var i:int = 0;i < Money / 300; i++){
T1.buy();
}
var t:Text = new Text(this, 0, 0);
t.height = 125;
t.text = "購入金額:"+Money+"円\n当選金額:"+T1.getMoney+"円\n回収率:"+T1.getMoney *100/ Money+"%\n"
+"1等:"+T1.numbers[0]+" 2等:"+T1.numbers[1]+" 3等:"+T1.numbers[2]+" \n4等:"+T1.numbers[3]+" 5等:"+T1.numbers[4]+" 6等:"+T1.numbers[5];
}
}
}
class Takara{
private var OpenCheck:Array = new Array(101);
private var number1_class:int;
private var number2_class:int;
private var number1_number:int;
private var number2_number:int;
private var number3_number:Array = new Array(100);
private var number4_number:int;
private var number5_number:int;
private var number6_number:int;
private var opened:int = 0;
public var pay:int = 0;
public var numbers:Array = [0,0,0,0,0,0];
public var getMoney:int = 0;
public function Takara():void{
for(var i:int = 1; i <= 100; i++){
OpenCheck[i] = new Array(10000000);
}
//if(OpenCheck_class[1][0] == null)OpenCheck_class[1][10] = 1;
number1_class = Math.floor(Math.random() * (100 - 1))+1;
number2_class = Math.floor(Math.random() * (100 - 1))+1;
number1_number = Math.floor(Math.random() * (9999999 - 0));
number2_number = Math.floor(Math.random() * (9999999 - 0));
number4_number = Math.floor(Math.random() * (999 - 0));
number5_number = Math.floor(Math.random() * (99 - 0));
number6_number = Math.floor(Math.random() * (9 - 0));
for(i = 0; i < 100; i++)number3_number[i] = Math.floor(Math.random() * (9999999 - 0));
}
public function Open(_class:int, _number:int):int{
var n:int = 0;
if(OpenCheck[_class][_number] == null){
OpenCheck[_class][_number] = true;
opened++;
n = Check(_class, _number);
pay += 300;
getMoney += n;
}else{
Open(kuji_class(), kuji_number());
}
return n;
}
private function Check(_class:int, _number:int):int{
var GET:int = 0;
if(number1_class == _class && number1_number == _number){
GET = 200000000;
numbers[0]++;
return GET;
}
if(number2_class == _class && number2_number == _number){
GET = 100000000;
numbers[1]++;
return GET;
}
for(var N:int = 0;N < 100; N++){
if(number3_number[N] == _number){
GET = 1000000;
numbers[2]++;
return GET;
}
}
if((_number - number4_number) % 1000 == 0){
GET = 10000;
numbers[3]++;
return GET;
}
if((_number - number5_number) % 100 == 0){
GET = 3000;
numbers[4]++;
return GET;
}
if((_number - number6_number) % 10 == 0){
GET = 300;
numbers[5]++;
return GET;
}
return GET;
}
private function kuji_class():int{
return (Math.floor(Math.random()*(100 - 1))+1);
}
private function kuji_number():int{
return Math.floor(Math.random()*(9999999 - 0));
}
public function buy():void{
Open(kuji_class(), kuji_number());
}
}
