在大年三十之夜写程序是一种怎样的体验?
在minecraft里观赏自己的108p(注意看清楚了)“高清“视频
(代码质量值的担忧,好多东西写的太奇葩了,不过毕竟是实验性的)
读取视频处理成setblock命令的形式,每两帧之间用一行等号隔开module Main where
import Data.Array.Unboxed
import qualified Data.ByteString as B
import Codec.BMP
import Text.Printf
import Data.List
import Control.Concurrent
import Control.Monad
import Control.DeepSeq
import System.IO
import System.Environment
width, height :: Int
width = 108
height = 144
indexPix :: B.ByteString -&> Int -&> Int -&> Bool
indexPix s x y =
let f i = fromIntegral
$ s `B.index` index ((0, 0, 0), (width-1, height-1, 3)) (x, y, i)
in f 0 + f 1 + f 2 &< 200
strToArr :: B.ByteString -&> UArray (Int, Int) Bool
strToArr s = array arrBounds (map pix $ range arrBounds)
where arrBounds = ((0, 0), (width - 1, height - 1))
pix (x, y) = ((x, y), indexPix s x y)
readArrFromFile :: FilePath -&> IO (UArray (Int, Int) Bool)
readArrFromFile name = readBMP name &>&>=
es -&>
case res of
Left err -&> error (show err)
Right bmp -&> return (strToArr $ unpackBMPToRGBA32 bmp)
readAllData :: IO [UArray (Int, Int) Bool]
readAllData = mapM readArrFromFile
$ map (printf "imgs/frame_%04d.bmp") [(1 :: Int), 41 .. 6570]
delta :: UArray (Int, Int) Bool
-&> UArray (Int, Int) Bool
-&> [(Int, Int, Bool)]
delta ar1 ar2 =
map ((x, y, _, p2) -&> (x, y, p2))
. filter ((_, _, p1, p2) -&> p1 /= p2)
$ zipWith (((x, y), p1) (_, p2) -&> (x, y, p1, p2))
(assocs ar1) (assocs ar2)
allDeltas :: [UArray (Int, Int) Bool] -&> [[(Int, Int, Bool)]]
allDeltas as = zipWith delta as (tail as)
deltaToCmd :: (Int, Int, Bool) -&> String
deltaToCmd (x, y, b) = printf "/setblock %d %d %d wool %d"
(y - 160) (x + 77 )
(17 :: Int) (if b then 15 else 0 :: Int)
makeCmd :: [[(Int, Int, Bool)]] -&> [String]
makeCmd = map (concat . intersperse "
") . map (map deltaToCmd)
main = do
allData &<- readAllData
let cmds = makeCmd $ allDeltas allData
forM_ (zip [(1 :: Int)..] cmds) $ (i, x) -&> do
hPutStrLn stderr (printf "Processing %d" i)
putStrLn x
putStrLn (replicate 50 "=")
读取命令并输出
module Main where
import Control.Monad
import Control.Concurrent
main = do
input &<- getContents
let out" = cycle (lines input)
forM_ out" $ l -&>
-- 这时才发现两帧之间真的完全不能有间隔,要不太慢了
if not (null l) head l == "=" then return ()
else putStrLn l
运行:
./makedata &> out.txt
# read使得服务器能启动起来然后我按回车再开始放
(read; ./writedata &< out.txt) | java -jar minecraft_server.jar nogui
效果:
(当然了我是挑的比较好看的一张)没错,这是(台下一部分人:什么?)Bad Apple!!。(叹号是名字一部分)跟前些年大年三十写作业、打游戏没啥区别。
算个啥,大年初一生,30来年没人给我过生日我都不屑说。正在加班中。
谢邀,感觉还不错。
长辈们在看春晚,妹妹在我旁边逛b站,我在写寒假作业(计算物理的程序)。
没事瞅两眼春晚,吃点水果嗑嗑瓜子,写程序写得飞起【并没有
思路卡住了就逗逗妹妹,在她pad上乱点,然后被她一脚踹回来,然后刷刷微信抢几个红包,思路顺了就继续写。
至于鞭炮声,没什么影响,权当白噪声了。
新的一年也要继续努力哟~~~新年快乐~~~哈哈,看到这个问题就知道一定会被邀请的 XD
今天我给自己的项目改了改代码…感觉就是“夸我啊夸我啊我这个时候还在写代码你们看我是不是好伟大,年三十还是我阴历生日我还在给你们做贡献”…
其实和其他时候区别不大的~如果是自己的项目,会有一种优越感吧;如果是公司的…我觉得不会有公司要员工这个时候写代码的啦,腾讯阿里就不一定了(打算今天发新版本的知乎助手,现在正在写最后的epub生成代码。感觉嘛,还是挺开心的。靠着助手收了5000多个赞外加一份工作,夫复何求~
update:
epub果然是最让我怨念的模块啊。。。先睡了,明晚继续!update:新版助手已发布,感谢支持~你们好歹还是有假期的。。。知足吧。。。在美国一边上课一边搬砖过年的哭了出来。。。
当然要码完码年的最后几分钟了,下一个马年不知还幸存否。
从高中开始已经连续几年大年三十写代码了,体验就是特别吵?以前是一直边看春晚边敲代码,现在是只剩下敲代码了…年三十前后几天也都在写代码,所以没有什么特别的= =
码代码,多么健康的全民运动啊,远离小儿麻痹,预防老年痴呆,愉悦心情的不二选择。
假装自己是要了汇编编程当礼物的罗梅洛和冰雪圣诞夜买NeXT的卡马克,装模作样地在写一些自以为不一样的程序,并不断感概为啥没人想到这么干过。
刚在微信上收到的。。。。
////不要再赞了啊大家,当时粘贴过来只是觉得好玩。这个不是我写的,要是原作者看到的话,请轻拍。若不同意我转载过来,我立即删除。
def calRandomValue(min, max, total, num):
print min, max, total, num total = float(total) num = int(num) min = 0.01 if num return if num == 1: print "第%d个人拿到红包数为:%.2f" %(num, total) returni = 1
total_money = total #rtotal = (total*100 - min*num*100)/100 while( i max = total_money - min*(num- i) k = int((num-i)/2) if num -i k = num -i max = max/k monney = random.randint(int(min*100), int(max*100)) monney = float(monney)/100total_money = total_money - monney
print "第%d个人拿到红包数为:%.2f, 余额为: %.2f" %(i, monney, total_money) i += 1 print "第%d个人拿到红包数为:%.2f, 余额为: %.2f" %(i, total_money, 0.0)if __name__ == "__main__": min = sys.argv[1] max = sys.argv[2]total = sys.argv[3]
num = sys.argv[4] calRandomValue(min, max, total, num)python 2.py 0.01 10 20 300.01 10 20 30第1个人拿到红包数为:1.34, 余额为: 18.66第2个人拿到红包数为:1.06, 余额为: 17.60第3个人拿到红包数为:1.08, 余额为: 16.52第4个人拿到红包数为:0.98, 余额为: 15.54第5个人拿到红包数为:0.88, 余额为: 14.66第6个人拿到红包数为:0.48, 余额为: 14.18第7个人拿到红包数为:0.26, 余额为: 13.92第8个人拿到红包数为:0.90, 余额为: 13.02第9个人拿到红包数为:0.12, 余额为: 12.90第10个人拿到红包数为:0.41, 余额为: 12.49第11个人拿到红包数为:0.43, 余额为: 12.06第12个人拿到红包数为:0.63, 余额为: 11.43第13个人拿到红包数为:0.36, 余额为: 11.07第14个人拿到红包数为:0.25, 余额为: 10.82第15个人拿到红包数为:1.38, 余额为: 9.44第16个人拿到红包数为:0.17, 余额为: 9.27第17个人拿到红包数为:0.79, 余额为: 8.48第18个人拿到红包数为:0.52, 余额为: 7.96第19个人拿到红包数为:0.44, 余额为: 7.52第20个人拿到红包数为:1.15, 余额为: 6.37第21个人拿到红包数为:0.13, 余额为: 6.24第22个人拿到红包数为:0.76, 余额为: 5.48第23个人拿到红包数为:1.32, 余额为: 4.16第24个人拿到红包数为:0.80, 余额为: 3.36第25个人拿到红包数为:0.16, 余额为: 3.20第26个人拿到红包数为:0.27, 余额为: 2.93第27个人拿到红包数为:1.82, 余额为: 1.11第28个人拿到红包数为:0.45, 余额为: 0.66第29个人拿到红包数为:0.27, 余额为: 0.39第30个人拿到红包数为:0.39, 余额为: 0.00没做完想做的事情,自然会去想补刀,尤其是你自己觉得有趣的事情。
唯一不同的体验,网络质量下降了。苟利国家生死以,岂因祸福避趋之!敢同恶鬼争高下,不向霸王让寸分!
我昨天一天都在写。今天一天也都在写。感觉自己是个SB。
年三十晚上吃完在老大家吃完年夜饭,赶紧回家,睡觉。初一早晨六点起床,奔去公司,等待着八点卡券开入口。然后开入口,挂,微信方流量限制写小了o(╯□╰)o看着满屏报错,联系甲方,开流控。然后看数据,跑报表,查内存,过脚本。这是第二个在北京过的年了╮(╯_╰)╭
边喝西凤酒边调飞控,酸爽
_(:3?∠)_最近想入门一点图形学……一边啃书一边摸索里面的做法。
心里想着从年三十开始努力的话,接下来的一年自己也许也会更加努力一些吧。年三十上午被qq红包刷烦于是下午四点开始反向qq、正好当作一个学习反向ios技术的契机= =最后到十一点半终于搞定注入群组页面做了个人型红包自走器ˊ_&>ˋps.最终投产效果不佳 主要还是网络问题…一堆谢谢爸爸都出来了可是红包组建还没出来(-?-;
没把三十当回事儿,还是编程让人快乐
女朋友从他那感受到了正能量。
过年在家天天撸shell,春晚时看了两个小品,然后一直撸到12点出去放鞭炮。至于体验嘛,就是一种:“我都这么努力了,以后肯定前程似锦”的满足感。欺骗自己自己并不是那么没用!
推薦閱讀:
※當縣委書記子女是什麼樣的一種體驗?
※在韋爾斯利學院(Wellesley College)就讀是怎樣一番體驗?
※成为门萨会员是什么样的体验?
※看完絕命毒師有種什麼體驗?
※喜歡一個演技不是那麼好的明星是什麼感受?