diff --git a/parts/language/lang_en.lua b/parts/language/lang_en.lua
index 5462e483..e2623ac3 100644
--- a/parts/language/lang_en.lua
+++ b/parts/language/lang_en.lua
@@ -713,6 +713,11 @@ return{
             bgm="BGM",
             arcade="Arcade",
         },
+        app_link={
+            reset="Reset",
+            invis="Invis",
+            fast="Fast",
+        },
         savedata={
             export="Export to clipboard",
             import="Import from clipboard",
diff --git a/parts/language/lang_es.lua b/parts/language/lang_es.lua
index 4de94b99..0f31d4f4 100644
--- a/parts/language/lang_es.lua
+++ b/parts/language/lang_es.lua
@@ -618,6 +618,11 @@ return{
             bgm="BGM",
             arcade="Arcade",
         },
+        app_link={
+            reset="Reiniciar",
+            invis="A ciegas",
+            fast="Rápido",
+        },
         savedata={
             export="Exportar al portapapeles",
             import="Importar de portapapeles",
diff --git a/parts/language/lang_fr.lua b/parts/language/lang_fr.lua
index dddb5629..bef1e603 100644
--- a/parts/language/lang_fr.lua
+++ b/parts/language/lang_fr.lua
@@ -620,6 +620,11 @@ return{
             his="History",
             qq="QQ du créateur",
         },
+        app_link={
+            reset="Réinitialiser",
+            invis="Aveugler",
+            -- fast="Fast",
+        },
         savedata={
             -- export="Export to clipboard",
             -- import="Import from clipboard",
diff --git a/parts/language/lang_pt.lua b/parts/language/lang_pt.lua
index 147c154c..63e20a7e 100644
--- a/parts/language/lang_pt.lua
+++ b/parts/language/lang_pt.lua
@@ -702,6 +702,11 @@ return{
             bgm="BGM",
             -- arcade="Arcade",
         },
+        app_link={
+            reset="Resetar",
+            invis="Cego",
+            -- fast="Fast",
+        },
         savedata={
             -- export="Export to clipboard",
             -- import="Import from clipboard",
diff --git a/parts/language/lang_yygq.lua b/parts/language/lang_yygq.lua
index 4c51f5ef..5817331a 100644
--- a/parts/language/lang_yygq.lua
+++ b/parts/language/lang_yygq.lua
@@ -188,12 +188,30 @@ return{
             revKB="键盘反向",
         },
         app_schulteG={
-            reset="重开",
             rank="尺寸",
             invis="盲",
             disappear="消失",
             tapFX="动画",
         },
+        app_2048={
+            invis="盲",
+            tapControl="点",
+            skip="跳过",
+        },
+        app_ten={
+            next="预览",
+            invis="盲",
+            fast="冲",
+        },
+        app_dtw={
+            color="彩",
+            bgm="曲",
+            arcade="街机",
+        },
+        app_link={
+            invis="盲",
+            fast="冲",
+        },
         savedata={
             export="复制走",
             import="粘贴到",
diff --git a/parts/language/lang_zh.lua b/parts/language/lang_zh.lua
index 02cbf587..f77e00fe 100644
--- a/parts/language/lang_zh.lua
+++ b/parts/language/lang_zh.lua
@@ -714,6 +714,11 @@ return{
             bgm="音乐",
             arcade="街机",
         },
+        app_link={
+            reset="重置",
+            invis="盲打",
+            fast="速打",
+        },
         savedata={
             export="导出到剪切板",
             import="从剪切板导入",
diff --git a/parts/scenes/app_console.lua b/parts/scenes/app_console.lua
index 84d04d3c..d4c2d6c8 100644
--- a/parts/scenes/app_console.lua
+++ b/parts/scenes/app_console.lua
@@ -587,6 +587,11 @@ local commands={}do
                 scene='app_polyforge',
                 description="Polyforge, original by ImpactBlue Studios"
             },
+            {
+                code="link",
+                scene='app_link',
+                description="Simple link game"
+            },
         }
         commands.app={
             code=function(name)
diff --git a/parts/scenes/app_link.lua b/parts/scenes/app_link.lua
new file mode 100644
index 00000000..7d5da03c
--- /dev/null
+++ b/parts/scenes/app_link.lua
@@ -0,0 +1,327 @@
+local ms=love.mouse
+local gc=love.graphics
+local gc_setColor,gc_rectangle=gc.setColor,gc.rectangle
+local int,rnd,abs=math.floor,math.random,math.abs
+local max,min=math.max,math.min
+local ins,rem=table.insert,table.remove
+
+local levels={
+    {c=6,r=3,color=3},
+    {c=6,r=4,color=3},
+    {c=6,r=4,color=4},
+    {c=8,r=5,color=4},
+    {c=8,r=6,color=5},
+    {c=9,r=6,color=5},
+    {c=10,r=6,color=6},
+    {c=12,r=7,color=6},
+    {c=14,r=8,color=7},
+    {c=14,r=9,color=7},
+    {c=15,r=10,color=7},
+    {c=17,r=10,color=8},
+    {c=18,r=11,color=8},
+    {c=20,r=12,color=9},
+    {c=22,r=13,color=9},
+    {c=24,r=14,color=9},
+}
+local colorList={
+    COLOR.lR,
+    COLOR.lB,
+    COLOR.lY,
+    COLOR.lG,
+    COLOR.lM,
+    COLOR.lC,
+    COLOR.H,
+    COLOR.Z,
+    COLOR.lF,
+}
+local sure=0
+local progress,level
+local state
+local invis,fast
+local startTime,time
+local field={
+    x=160,y=30,
+    w=960,h=640,
+    c=16,r=10,
+    remain=0,
+}
+local lines={}
+local selX,selY
+
+local function resetBoard()
+    selX,selY=false,false
+
+    local colors=levels[level].color
+    field.c,field.r=levels[level].c,levels[level].r
+
+    local total=field.r*field.c/2--Total cell count
+    local pool=TABLE.new(int(total/colors),colors)
+    for i=1,total%colors do pool[i]=pool[i]+1 end
+    for i=1,#pool do pool[i]=pool[i]*2 end
+    field.remain=total
+    field.full=true
+    total=total*2
+
+    TABLE.cut(field)
+    for y=1,field.r do
+        field[y]={}
+        for x=1,field.c do
+            local ri=0
+            local rn=rnd(total)
+            while rn>0 do
+                ri=ri+1
+                rn=rn-pool[ri]
+            end
+            total=total-1
+            pool[ri]=pool[ri]-1
+            field[y][x]=ri
+        end
+    end
+    SYSFX.newShade(2,field.x,field.y,field.w,field.h,1,1,1)
+end
+local function newGame()
+    progress={}
+    state=0
+    startTime=TIME()
+    time=0
+    level=1
+    resetBoard()
+end
+local function addPoint(list,x,y)
+    local l=#list
+    if x~=list[l-1]or y~=list[l]then
+        list[l+1]=x
+        list[l+2]=y
+    end
+end
+local function checkLink(x1,y1,x2,y2)
+    --Y-X-Y Check
+    local bestLen,bestLine=1e99,false
+    do
+        if x1>x2 then x1,y1,x2,y2=x2,y2,x1,y1 end
+        local luy,ldy,ruy,rdy=y1,y1,y2,y2
+        while luy>1       and not field[luy-1][x1]do luy=luy-1 end
+        while ldy<field.r and not field[ldy+1][x1]do ldy=ldy+1 end
+        while ruy>1       and not field[ruy-1][x2]do ruy=ruy-1 end
+        while rdy<field.r and not field[rdy+1][x2]do rdy=rdy+1 end
+        for y=max(luy,ruy),min(ldy,rdy)do
+            for x=x1+1,x2-1 do if field[y][x]then goto CONTINUE_nextRow end end
+            do
+                local len=abs(x1-x2)+abs(y-y1)+abs(y-y2)
+                if len<bestLen then
+                    bestLen=len
+                    bestLine={x1,y1}
+                    addPoint(bestLine,x1,y)
+                    addPoint(bestLine,x2,y)
+                    addPoint(bestLine,x2,y2)
+                end
+            end
+            ::CONTINUE_nextRow::
+        end
+    end
+    --X-Y-X Check
+    do
+        if y1>y2 then x1,y1,x2,y2=x2,y2,x1,y1 end
+        local ulx,urx,dlx,drx=x1,x1,x2,x2
+        while ulx>1       and not field[y1][ulx-1]do ulx=ulx-1 end
+        while urx<field.c and not field[y1][urx+1]do urx=urx+1 end
+        while dlx>1       and not field[y2][dlx-1]do dlx=dlx-1 end
+        while drx<field.c and not field[y2][drx+1]do drx=drx+1 end
+        for x=max(ulx,dlx),min(urx,drx)do
+            for y=y1+1,y2-1 do if field[y][x]then goto CONTINUE_nextCol end end
+            do
+                local len=abs(y1-y2)+abs(x-x1)+abs(x-x2)
+                if len<bestLen then
+                    bestLen=len
+                    bestLine={x1,y1}
+                    addPoint(bestLine,x,y1)
+                    addPoint(bestLine,x,y2)
+                    addPoint(bestLine,x2,y2)
+                end
+            end
+            ::CONTINUE_nextCol::
+        end
+    end
+    return bestLine
+end
+local function touch(x,y)
+    if x>=1 and x<=field.c and y>=1 and y<=field.r then
+        if state==0 then
+            state=1
+            startTime=TIME()
+        elseif state==1 then
+            if selX and(x~=selX or y~=selY)and field[y][x]==field[selY][selX]then
+                local line=checkLink(x,y,selX,selY)
+                if line then
+                    ins(lines,{time=0,line=line})
+                    field[y][x]=false
+                    field[selY][selX]=false
+                    field.remain=field.remain-1
+                    field.full=false
+                    if field.remain==0 then
+                        if levels[level+1]then
+                            ins(progress,("%s - %.3fs"):format(level,TIME()-startTime))
+                            level=level+1
+                            resetBoard()
+                            SFX.play('reach')
+                        else
+                            state=2
+                            SFX.play('win')
+                        end
+                    else
+                        SFX.play('clear_1')
+                    end
+                    selX,selY=false,false
+                else
+                    selX,selY=x,y
+                    SFX.play('lock')
+                end
+            else
+                if field[y][x]and(x~=selX or y~=selY)then
+                    selX,selY=x,y
+                    SFX.play('lock')
+                end
+            end
+        end
+    end
+end
+
+local scene={}
+
+function scene.sceneInit()
+    invis,fast=false,false
+    newGame()
+    SYSFX.update(1e99)
+    for i=1,#field do TABLE.cut(field[i])end
+    state=2
+    BGM.play('hang out')
+end
+
+function scene.keyDown(key,isRep)
+    if isRep then return end
+    if key=="r"then
+        if state~=1 or sure>.2 then
+            newGame()
+        else
+            sure=1
+            MES.new('info',"Press again")
+        end
+    elseif key=="z"or key=="x"then
+        love.mousepressed(ms.getPosition())
+    elseif key=="escape"then
+        if state~=1 or sure>.2 then
+            SCN.back()
+        else
+            sure=1
+            MES.new('info',"Press again")
+        end
+    elseif state==0 then
+        if key=="q"then
+            invis=not invis
+        elseif key=="w"then
+            fast=not fast
+        end
+    end
+end
+function scene.mouseDown(x,y,k)
+    if k==1 or k==2 or not k then
+        x=int((x-field.x)/field.w*field.c+1)
+        y=int((y-field.y)/field.h*field.r+1)
+        touch(x,y)
+    end
+end
+function scene.mouseMove(x,y)
+    if fast then
+        scene.mouseDown(x,y)
+    end
+end
+function scene.touchDown(x,y)
+    scene.mouseDown(x,y,1)
+end
+function scene.touchMove(x,y)
+    if fast then
+        scene.mouseDown(x,y)
+    end
+end
+
+function scene.update(dt)
+    if state==1 then
+        time=TIME()-startTime
+    end
+
+    if sure>0 then
+        sure=sure-dt
+    end
+
+    for i=#lines,1,-1 do
+        local L=lines[i]
+        L.time=L.time+dt
+        if L.time>=1 then
+            rem(lines,i)
+        end
+    end
+end
+
+function scene.draw()
+    gc.push('transform')
+        gc.translate(field.x,field.y)
+        gc.scale(field.w/field.c,field.h/field.r)
+
+        --Matrix
+        local mono=state==0 or invis and not field.full
+        if mono then
+            gc_setColor(COLOR.dH)
+            for y=1,field.r do
+                for x=1,field.c do
+                    if field[y][x]then
+                        gc_rectangle('fill',x-1,y-1,1,1)
+                    end
+                end
+            end
+        else
+            for y=1,field.r do
+                for x=1,field.c do
+                    if field[y][x]then
+                        gc_setColor(colorList[field[y][x]])
+                        gc_rectangle('fill',x-1,y-1,1,1)
+                    end
+                end
+            end
+        end
+
+        --Selecting box
+        gc.setLineWidth(.1)
+        if selX then
+            gc_setColor(1,1,1)
+            gc_rectangle('line',selX-1+.05,selY-1+.05,.9,.9)
+        end
+
+        --Clearing lines
+        gc.translate(-.5,-.5)
+        for i=1,#lines do
+            gc_setColor(1,1,1,1-lines[i].time)
+            gc.line(lines[i].line)
+        end
+    gc.pop()
+
+    --Time
+    setFont(30)
+    gc.setColor(COLOR.Z)
+    gc.print(("%.3f"):format(time),1140,20)
+
+    --Progress time list
+    setFont(15)
+    gc.setColor(.6,.6,.6)
+    for i=1,#progress do
+        gc.print(progress[i],1140,35+20*i)
+    end
+end
+
+scene.widgetList={
+    WIDGET.newButton{name="reset",x=80,y=60,w=120,h=60,color='lG',code=pressKey"r",hideF=function()return state==0 end},
+    WIDGET.newSwitch{name="invis",x=100,y=140,disp=function()return invis end,code=pressKey"q",hideF=function()return state==1 end},
+    WIDGET.newSwitch{name="fast", x=100,y=210,disp=function()return fast end,code=pressKey"w",hideF=function()return state==1 end},
+    WIDGET.newButton{name="back",x=1210,y=670,w=100,h=60,fText=TEXTURE.back,code=pressKey"escape"},
+}
+
+return scene