賣魔獸換寶位置flash（更新版）

這是之前那篇
賣魔獸換寶位置flash
的程式修改更新
之前那個我原本就很不滿意美化問題
所以在我準備更新我的月曆之前我就先拿這個測試測試畢竟這個比較不重要
那你還弄好幾個小時囧

主要是新練習了
1個函數
_visible
1個事件
on (keyPress"")
先自首在FLASH裡是不是這樣稱呼我根本不知道
這兩個我VB都有基礎了所以只是把他找出來的問題
C++沒用過圖像介面所以不知
_visible
主要就是在控制是否顯示出來
寫法
物件._visible＝ 1 or 0
我從MP3播放器那直接抄的有沒有別的寫法不知
on (keyPress"")
另外這個事件
顧名思義是當鍵盤按下某個鍵時執行
寫法同一般事件
不過比較要注意的
測試的時候必須停止使用快速鍵
不然像enter等按了也沒反應

再來是成品的位置
一樣是放在那個快關得google page話說我英文單字怎麼都沒背這麼順

以下為部份更新的原始碼（有程式碼恐懼症的可以離開勒）

每個滑鼠移到魔獸後的程式碼（只貼一個其他差不多）
on(rollOver){
a1._xscale+=10
a1._yscale+=10
a1b1._visible = 1
d._visible = 1
}
on(rollOut){
a1._xscale-=10
a1._yscale-=10

a1b1._visible = 0
d._visible = 0
}
全新增加的功能
查詢デネブ的商店位置
先附上出現位置參考在最下面

on (rollOver) {
h = "在特定地點賣L形魔獸商店將會多出商品按我輸入日期可知道我在哪";
}
on (rollOut) {
h = " ";
}
on (press) {
if (day._visible == 1) {
day._visible = 0;
} else {
day._visible = 1;
}
eor._visible = 0;
d1._visible = 0;
d3._visible = 0;
d5._visible = 0;
d7._visible = 0;
d9._visible = 0;
d11._visible = 0;
d13._visible = 0;
d15._visible = 0;
d17._visible = 0;
d19._visible = 0;
d21._visible = 0;
d23._visible = 0;
d25._visible = 0;
}
on (keyPress "<Enter>") {
if (day.text == "1" or day.text == "2") {
d1._visible = 1;
} else {
d1._visible = 0;
}
if (day.text == "3" or day.text == "4") {
d3._visible = 1;
} else {
d3._visible = 0;
}
if (day.text == "5" or day.text == "6") {
d5._visible = 1;
} else {
d5._visible = 0;
}
if (day.text == "7" or day.text == "8") {
d7._visible = 1;
} else {
d7._visible = 0;
}
if (day.text == "9" or day.text == "10") {
d9._visible = 1;
} else {
d9._visible = 0;
}
if (day.text == "11" or day.text == "12") {
d11._visible = 1;
} else {
d11._visible = 0;
}
if (day.text == "13" or day.text == "14") {
d13._visible = 1;
} else {
d13._visible = 0;
}
if (day.text == "15" or day.text == "16") {
d15._visible = 1;
} else {
d15._visible = 0;
}

if (day.text == "17" or day.text == "18") {
d17._visible = 1;
} else {
d17._visible = 0;
}
if (day.text == "19" or day.text == "20") {
d19._visible = 1;
} else {
d19._visible = 0;
}
if (day.text == "21" or day.text == "22") {
d21._visible = 1;
} else {
d21._visible = 0;
}
if (day.text == "23" or day.text == "24") {
d23._visible = 1;
} else {
d23._visible = 0;
}
if (day.text == "25") {
d25._visible = 1;
} else {
d25._visible = 0;
}
if (day.text>25) {
eor._visible = 1;
} else {
eor._visible = 0;
}
}
好了這次一樣是懶人暴力寫法
畢竟這跟VB不同沒人會幫我增加我的函數列表
所以就利用複製貼上來減少麻煩