﻿Choice.dudazan
{ dudazanStart }
dudazanStart
{
    "\t\0\s[%(sus+3)]\f[name,%(zitai)]鐚在吟唱了一阵魔法之后，\w9一个球形的保护圈包围着身体，\w9下一秒，\w9便来到深海之中\x"
    --
    "\![sound,loop,mp3\はなＰ\,こおろぎ - ほたるこい.ogg,--volume=50]"
    --
    dudazantia = ghostuptime+15+(getBouou*2)    //计算时间
    waleiflag++    //第几次进入海底
    saida = 0    //位置，前
    saitu = 0    //位置，后
    kukau = 0    //位置，深度
    getMono = 0    //初始化宝物
    monolist = IARRAY    //初始化宝物
    Onzanku
}
Onzanku
{
    if dudazantia-ghostuptime > 0 {
    dudazanMid
    }else{
    dudazanEnd
    }
}
dudazanMid
{
    "\t\c\0\s[%(sus+3)]\f[name,%(zitai)]/
    \_q剩余探索时间：%(dudazantia-ghostuptime)秒，当前位置：(%(saida),%(saitu),%(kukau))%(宝物1)/
    \n\n%(前方)%(后方)/
    \n%(深处)/
    \n\n\![*]\q[返回甲板,dudazanend]\_q/
    \_w[1000]\![raise,Onzanku]"
}
dudazanMidMono
{
    "\t\c\0\s[%(sus+3)]\f[name,%(zitai)]/
    \_q剩余探索时间：%(dudazantia-ghostuptime)秒，当前位置：(%(saida),%(saitu),%(kukau))%(宝物1)/
    \n\n%(前方)%(后方)/
    \n%(深处)\q[！,获得宝物]/
    \n\n\![*]\q[返回甲板,dudazanend]\_q/
    \_w[1000]\![raise,Onzanku]"
}
前方
{ if saida < 5 ; "\q[往前游,zankud]" }
后方
{ if saitu < 5 ; "\_l[80,-]\q[往后游,zankut]" }
深处
{ if kukau < 10 ; "\q[往深处游,zankuk]\_l[80,-]" ; else ; "\q[往浅处游,zankuku]\_l[80,-]" }


Choice.zankud
{
    if saitu > 0 ; saitu--
    elseif saida < 5 ; saida++
    if dudazantia-ghostuptime > 0 {
        if RAND() > 60 ; dudazanMidMono
        else ; dudazanMid
    }else{
        dudazanEnd
    }
}
Choice.zankut
{
    if saida > 0 ; saida--
    elseif saitu < 5 ; saitu++
    if dudazantia-ghostuptime > 0 {
        if RAND() > 60 ; dudazanMidMono
        else ; dudazanMid
    }else{
        dudazanEnd
    }
}
Choice.zankuk
{
    if kukau < 10 ; kukau++
    if dudazantia-ghostuptime > 0 {
        if RAND() > 60 ; dudazanMidMono
        else ; dudazanMid
    }else{
        dudazanEnd
    }
}
Choice.zankuku
{
    if kukau > 0 ; kukau--
    if dudazantia-ghostuptime > 0 {
        if RAND() > 60 ; dudazanMidMono
        else ; dudazanMid
    }else{
        dudazanEnd
    }
}
Choice.获得宝物
{
getMono = 1
monolist = (saida,saitu,kukau)
dudazanMid
}
Choice.dudazanend
{ dudazanEnd }
dudazanEnd
{
    playerhead
    --
    "\t\0\s[%(sus+3)]\f[name,%(zitai)]回到甲板上，\w9保护圈如同泡沫一般，\w9啪的一声消失了。\x"
    --
    "\![set,choicetimeout,0]第%(waleiflag)次探索\n\n"
    --
    if getMono ; "\![*]\q[查看探索到的宝物。,mieMono]"
    else ; "\![*]\q[返回甲板,paseli]"
}
宝物1
{ if getMono ; "，已探索到宝物"}
Choice.mieMono
{
_flag1 = (monolist[0] == 4)
_flag2 = (monolist[1] == 5)
_flag3 = (monolist[2] == 6)
_flag4 = (monolist[2] == 10)
getBouou++
"\0\s[%(sus+3)]\f[name,%(zitai)]\![set,choicetimeout,0]"
--
if _flag1 && _flag4 {
    if !asraliaMono ; asraliaMono = 1
    "获得深海四照花"
}elseif (_flag2 && _flag3) && snLiaflag == 1 {
    if !baleibwMono ; baleibwMono = 1
    "获得蝴蝶胸针"
}elseif RAND() > 60 {
    goldBouou++
    "获得一堆黄金"
}elseif RAND() > 60 {
    diamondBouou++
    "获得一堆钻石"
}elseif RAND() > 60 {
    timanlaBouou++
    "获得沉重的炮弹"
}elseif RAND() > 60 {
    satelliteBouou++
    "获得卫星定位器"
}else {
    NazaluBouou++
    "获得发动机残骸"
}
--
"\n\n\![*]\q[返回甲板,paseli]"
}