0 YieaUq0i?QQQQQQQQQݽQQQQQQQQQQQQQQQQQQ "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" ""am ""@D "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" ""am ""@D "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" ""am ""@D "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" ""am ""D "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" ""aff ""D "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" ""33 "" "" "" "" "" "" ""am ""D "" "" "" "" "" "" "" "" "" "" 3"" a DD@ QQQQQQQQQQQQQQQQQQQQQQQQQQQQ "" "" "" "" "" "" "" "" "" "" "" "" "" "" ""am "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" ""a "" "" "" "" "" "" "" "" "" "" ""am "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" ""a "" "" "" "" "" "" "" "" "" "" ""am "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" ""a "" "" "" "" "" "" "" "" "" "" ""am "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" ""aff "" "" "" "" "" "" "" "" "" "" ""aff "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" ""a "" "" "" "" "" "" "" "" "" "" ""am "" "" "" "" "" "" "" "" "" "" "" "" "" a a QQQQQQQQQQQQQQQQQQQQQQQQQQQamam "" "" "" "" "" "" "" "" "" "" "" "" "" ""@ "" "" "" "" "" "" "" "" "" "" "" "" ""amam "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" ""amam "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" ""amam "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" ""affaff "" "" "" "" "" "" "" "" "" "" "" "" "" ""DL "" "" "" "" "" "" "" "" "" "" "" "" ""amam "" "" "" "" "" "" "" "" "" "" "" "" "" ""@ "" "" "" "" "" "" "" "" "" "" "" "" ""aa DD QQQQQQQQQQQQQQQQQQݽQQQ QQQQQQ ""am "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" ""Q "" "" "" "" "" "" ""am "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" ""Q "" "" "" "" "" "" ""am "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" ""am "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" ""aff "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" ""UU "" "" "" "" "" "" ""am "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" ""33 "" "" "" "" "" "" "" "" "" a 3"" PUU QݭQQQQQQQQQQQQQQQQQQQQQQQQQݽ "" "" "" "" "" "" "" "" "" "" "" "" "" "" ""am "" ""@ "" "" "" "" "" "" "" "" "" ""r "" "" "" "" "" "" "" "" "" "" "" "" "" ""am "" "" "" "" "" "" "" "" "" "" "" ""r "" "" "" "" "" "" "" "" "" "" "" "" "" ""am "" "" "" "" "" "" "" "" "" "" "" ""r "" "" "" "" "" "" "" "" "" "" "" "" "" ""am "" "" "" "" "" "" "" "" "" "" "" ""rww "" "" "" "" "" "" "" "" "" "" "" "" "" ""aff "" ""DL "" "" "" "" "" "" "" "" "" ""r"" "" "" "" "" "" "" "" "" "" "" "" "" "" ""am "" ""@ "" "" "" "" "" "" "" "" ""33 "r a DD 3""QQQQQQQݽQ QQQQQQQQQQQQQQQQQ "" "" "" "" "" "" "" ""Q "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" "" ""am "" "" "" "" "" "" "" ""Q "" "" "" ""a ""a "" "" "" "" "" "" "" "" "" "" "" ""am "" "" "" "" "" "" "" "" "" "" "" ""a ""a "" "" "" "" "" "" "" "" "" "" "" ""am "" "" "" "" "" "" "" "" "" "" "" ""a ""a "" "" "" "" "" "" "" "" "" "" "" ""am "" "" "" "" "" "" "" ""UU "" "" "" ""aff ""aff "" "" "" "" "" "" "" "" "" "" "" ""aff "" "" "" "" "" "" ""33 "" "" "" "" ""a ""a "" "" "" "" "" "" "" "" "" "" "" ""am 3"" PUU a a aݭQQQQQQQQ QQ QQQQQQQQQQQ "" "" "" "" "" "" "" ""amQ@D "" ""Q ""am "" "" "" "" "" ""am "" "" ""@ ""@Dr "" "" "" "" "" "" "" ""amQ@D "" ""Q ""am "" "" "" "" "" ""am "" "" "" ""@Dr "" "" "" "" "" "" "" ""am @D "" "" ""am "" "" "" "" "" ""am "" "" "" ""@Dr "" "" "" "" "" "" "" ""amD "" "" ""am "" "" "" "" "" ""am "" "" "" ""Drww "" "" "" "" "" "" "" ""affUUD "" ""UU ""aff "" "" "" "" "" ""aff "" "" ""DL ""Dr"" "" "" "" "" "" "" "" ""amD "" "" ""am "" "" "" "" "" ""am "" "" ""@ ""D"r aPUUDD@ PUU a a DD DD@ݽݽݽQݭQQQQQݽQQQݭQQamam̸ ""@D@ amƧ "" ""@D ""@ "" "" "" "" ""am "" ""am@D@Damaamaƃ ""@Damr "" ""@D "" "" "" "" "" ""ram "" ""am@D@Damaamaƃ ""@Damr "" ""@D "" "" "" "" "" ""ram "" ""am@D@Damaamaƃ ""Damr "" ""D "" "" "" "" "" ""ram "" ""amDDaffaffaffaffƃ ""DDLaffrww "" ""D ""DL "" "" "" "" ""rwwaff "" ""affDDamaamaƃ333333 ""D@amr"" "" ""D ""@ "" ""33 "" "" ""r""am "" ""amDDaaaa3""3""3"" DD@DDa"r DD@ DD 3"" "ra aDD@DD@ ݭݽ  ݽQݽ QݽQݽݭQQ amQam@DamQ@ Q@ @ ""Q@ "" ""amƸamƧ "" ""amQ@ amQram@D샻amQQݔ݃ ""QaƔ "" ""amƃamr "" ""amQam ram@D샻am  ͔̓ "" aƔ "" ""amƃamr "" ""am amramDăam΃ ""a "" ""amƃamr "" ""amaffUUrwwaffDăaffUUDLUUDLDL ""UUaffDL "" ""affƃaffrww "" ""affUUDLamr""amDă33am@@@33 ""33a@ ""33 ""amƃ33amr"" "" ""am@aPUU"raDD@3""aPUUDDPUUDDDD3"" 3""PUUaDD 3"" a3""a"r aPUUDDݽݽݽ  ݭݽQݽݭݭ̸@ @ @ @ amQQ@ @D@ am@D ""@ @D@ @D@ @ aƃaƔݔ݃ݔamaQQ@Dr݃am@D ""@D샻rr@Dݔ݃aƃaƔ͔͔̓ama  @Dr̓am@D ""@D샻rr@D͔̓aƃa΃amaDr΃amD ""DărrD΃affƃaffDLDLDLDLaffaffUUUUDLDrwwDLaffD ""DLDăDLrwwrwwDDLDL33aƃ33a@@33@@ama@Dr""@33amD ""@Dă33@r""r""D@@3""a3""aDDDD3""DDDDaaPUUPUUDDDD@"rDD3""aDD@ DDDD@3""DD"r"rDD@DDDDݭݭݽݽ  ݭ  ݽ Q̧@DQ@DQQQ@DQ@D@ ""@ am@Dam@D@D@D@D@Drar@D샻Q@DQrQQ@D샻Q@D ""am@Dam@D@D@Da@Daa@Drar@D샻 @D r  @D샻 @D ""am@Dam@D@D@Da@Daa@DrarDăDrDăD ""amDamDDDaDaaDrwwaffrwwDăUUDUUrwwUUUUDăUUDDL ""DLaffDaffDDDaffDaffaffDr""ar""Dă3333Dr""Dă33D@ ""@amDamDDDaDaaD"ra"rDD@3""3""PUUDD@PUU"rPUUPUUDD@3""PUUDD@DD DDaDD@aDD@DD@DD@aDD@aaDD@ݭݭݭ ݽݭݭݭݭݭ Qݭ ݽݭ ݭݽݽamƧ@DQ@D@Ḑ̧Q ""@ QQ@ @ rramr@DQ@D샻@DarrrrarQ ""rQrQraƔ݃rramr@D @D샻@Darrrrar ""r r raƔ̓rramrDDăDarrrrar ""rrra΃rwwrwwaffrwwDUUDăDaffrwwrwwrwwrwwaffrwwUU ""rwwDLUUrwwUUrwwaffDLDLr""r""amr""DDă33Dar""r""r""r""ar"" ""r""@33r""r""33a@33@"r"ra"rDD@PUUDD@3""DD@a"r"r"r"ra"rPUU "rDDPUU3"""rPUU"r3""aDD3""DDݽݭݭ ݭ ݭ  ݭ ݽ   ݽݽݭݽ@DQ@DQQQ@ Q@D̸amQ@ QQ̸amƃrra@DQr@DQrQQraQ@DaƃamQQQaƃramƃrra@D r@D r  ra @Daƃam   aƃramƃrraDrDrraDaƃamaƃramƃrwwrwwaffDUUrwwDUUrwwUUUUDLrwwaffUUDaffƃaffUUDLUUUUaffƃrwwaffƃ33r""r""aDr""Dr""@r""aDaƃ33am@33aƃ33r""33am3"""r"raDD@PUU"rDD@PUU"rPUUPUUDD"raPUUDD@a3""aPUUDDPUUPUU3""a3"""r3""a ݭݽݭݭݽݽ ݽ Q@ am@ @ @D@ @Damamam@D@D@ QamQQaƔramƔrraƔ@D݃@Damamam@D샻@DaƔaQaamQa aƔramƔrraƔ@D̓@Damamam@D샻@DaƔa aam aaramrraD΃DamamamDăDaaaamaUUaffDLrwwaffDLrwwrwwaffDLDDLDaffaffaffDăDaffDLaffUUaffaffUUaffa@r""33am@r""r""a@D@33DamamamDă33Da@a33aamaPUUaDD"r3""aDD"r"raDDDD@DD3""DD@aaaDD@3""DD@aDDaPUU3""aaPUUa  ݭ ݭݽ ݽݭ ݽݭݭݭ  @DQQamamƧQ@ am@ amƸQ@ amƧQ@ ̧@D@ QQ@DQQamamrQaƔramƔamƃQ݃amrQrar@DrQQ@D  amamr aƔramƔamƃ ̓amr rar@Dr  Damamraramamƃ΃amrrarDrDUUUUaffaffrwwUUaffDLrwwaffDLaffƃUUDLaffrwwUUrwwDLaffrwwDDLrwwUUUUDamamr""a@r""am@amƃ33@33amr""33r""@ar""D@r""DD@PUUPUUaa"rPUUaDD"raDDa3""PUUDD3""a"rPUU3"""rDDa"rDD@DD"rPUUPUUݭݽݽݽݽݭݭݽ  ݽݽ amƧ@DamƸ@D̸@ @ @ @ ̸QQ@D̸̸Qamamr@Damƃ@DaƃaƔrraƔaƃQQ@DaƃaaƃQamamr@Damƃ@DaƃaƔrraƔaƃ  @Daƃaaƃ amamrDamƃDaƃarraaƃDaƃaaƃamaffrwwDaffƃDaffƃaffDLrwwDLrwwDLaffDLaffƃUUUUDaffƃaffaffƃUUaffamr""33Damƃ3333Daƃ33a@r""@r""@a@aƃ33Daƃ33aaƃ33ama"r3""DD@a3""3""DD@a3""aDD"rDD"rDDaDDa3""PUUPUUDD@a3""aa3""PUUaݽ ݭݽݭݭݽݭ   ݽ am@D̸Q@ @ am@D@ @ @ amƧ@ Qam@DamQ@ QamƸQam@DaƃQݔam@Drݔrr݃amrQam@DamQQamƃQam@Daƃ ͔am@Dr͔rr̓amr am@Dam  amƃ amDaƃamDrrr΃amramDamamƃaffDaffƃUUDLDLaffDrwwDLDLrwwrwwDLaffrwwDLUUaffDaffUUDLUUaffƃUUamDaƃ33@@amDr""33@@r""r""@33amr""@amDam@amƃ33aDD@a3""PUUDDDDaDD@"r3""DDDD"r"rDD3""a"rDDPUUaDD@aPUUDDPUUa3""PUU`-- title: game title -- author: Atomic -- desc: short description -- site: no website -- license: MIT License -- version: 0.1 -- script: lua t = 0 drain = false function steptiles() for i = 0,539 do local x = i%30 local y = 17-(i//30) local tile = mget(x,y) if drain then if tile ~= 0 and mget(x,y+1) == 0 then if y < 16 then mset(x,y,0) mset(x,y+1,tile) else if math.random(0,2) == 0 then mset(x,y,0) mset(x,y+1,0) end end end else if tile ~= 0 and mget(x,y+1) == 0 and y < 16 then mset(x,y,0) mset(x,y+1,tile) end end end if not(drain) then for i = 0,29 do local blocksincolumn = 0 for j = 0,16 do if mget(i,j) > 0 then blocksincolumn = blocksincolumn + 1 end end if math.random(0,blocksincolumn+1) == 0 and mget(i,0) == 0 then mset(i,0,math.random(1,7)) end end end end function TIC() map(0,0) t = t + 1 local board = {} local hasblocks = false local hasair = false for i = 1,510 do local x = (i-1)%30 local y = (i-1)//30 board[i] = mget(x,y) end for i = 1,#board do if board[i] > 0 then hasblocks = true else hasair = true end end if drain then if hasair and not(hasblocks) then drain = false end else if hasblocks and not(hasair) then drain = true end end if t%2 == 0 then steptiles() end end