「#カレンダープログラミング プチコンテスト 2014」ピックアップ Vol. 2

2014/10/22DevelopmentBASIC, GAMEBOY, openFrameworks, カレンダープログラミング

kei

慧： こんにちは！　「カレンダープログラミング プチコンテスト」の応募されたコードをピックアップして紹介していくよ。

今回は2回目！　現時点の応募数の更新と、ピックアップは、動画投稿特集ってことでまとめてみたよ。それ以外の応募も次回以降ピックアップしていくから待っててね。

ピックアップは、別にコードの内容が、良い悪いって話じゃないからね！　たくさん応募があるから、他の人のコードを参考にアップデートしてもいいし、バグがあったらつっこむのもアリだよ！

Ideone.com コード消失事件！

コードの公開に Ideone.com を紹介してたんだけど、コードが消える・以前のバージョンに戻る障害があったみたい。カレンダープログラミングの応募も消えちゃってるので、最新のものに更新し直せる人は、元に戻して！　あと別の場所に投稿し直すときは、前の関連するツイートにリプライする形でお願い！

現在の応募状況！　約100の応募！

10/20 09:20 の時点で、私の例を除くと、こんなに応募があるよ！　たぶん集計は間違ってると思う……。

  • PowerShell 2件
  • Python 4件
  • SmileBASIC（プチコン） 1件
  • Windows cmd.exe 1件
  • C# 3件
  • VBA (Excel) 3件
  • Android (Java) 1件
  • Unity (C#) 1件
  • Ruby 4件
  • Java 2件
  • Pascal 1件
  • C 5件
  • Perl 5件
  • Objective-C 1件
  • F# 1件
  • PHP 3件
  • Tcl 1件
  • 一太郎マクロ 1件
  • Clojure 1件
  • HSP 1件
  • PL/SQL 1件
  • MSX BASIC 1件
  • Forth (GForth) 1件
  • Smalltalk 2件
  • ASP.NET (C#) 1件
  • C# + XAML 2件
  • jQuery UI 1件
  • N88互換BASIC 1件
  • Processing 1件
  • C++ 2件
  • PostScript 1件
  • JR-100 (JR-BASIC) 1件
  • N-BASIC 1件
  • Prolog 2件
  • Lua 1件
  • Emacs Lisp 2件
  • Shell 1件
  • Go 1件
  • Brainf*ck 1件
  • PC-E500 (BASIC) 1件
  • openFrameworks (C++) 1件
  • broom 1件
  • Transact-SQL 1件
  • Haskell 1件
  • VB.NET 2件
  • D 言語 1件
  • FORTRAN 2件
  • GBDK (C 言語) 1件
  • TypeScript 1件
  • ActionScript 1件
  • N88-BASIC 1件
  • C++ + Boost 1件
  • COBOL 1件
  • J 言語 2件
  • ドリトル 1件
  • なでしこ 2件
  • C++/CLI 1件
  • PC-1260 (BASIC) 1件
  • SQL 2件
  • GBA ゲームボーイアドバンス 1件
  • C++14 + Sprout 1件
  • VBA (Word) 1件
  • C++ DirectX 1件
  • IronPython 1件
  • C++ + Win32 API 1件
  • Scala 1件

みんなのコードを見るには、Togetter まとめ から。

カレンダー表示のオーソドックスな処理の説明は、ピックアップ Vol. 1 を見てみてね。

ピックアップ No.5 PC-1260 (BASIC)

初の動画投稿！　出力は印刷！

シャープ PC-1260 は、Wikipedia によると「1984年発売。24桁×2行表示。メモリは順に4KB」。プリンタ/マイクロカセットレコーダの CE-125S と組み合わせられて、動画でもそれを使ってるんだね。

コードは、CALENDAR_PC-1260.BAS を見てね。日時関連が扱えないから、年月を入力して、1日目の曜日取得・うるう年判定も時前だね。処理はオーソドックスだと思う。

ピックアップ No.6 PC-E500（BASIC）

続いて、PC-E500。「1988年発売。40桁×4行（240×32ドット）表示」だって。

これも、コードはキー入力があるところ以外は普通な処理かな？

100 REM AER4(O,P)=O-INT(O/P)*P
110 DIM D$(4)
120 Y=2014:M=2:P=0
130 FOR I=1 TO M
140 READ A
150 NEXT
160 IF M=2 THEN A=A+AER4(Y,4)=0)*AER4(Y,100)<>0)+(AER4(Y,400)=0)
170 IF M<3 THEN Y=Y-1:M=M+12
180 B=AER4((Y+INT(Y/4)-INT(Y/100)+INT(Y/400)+INT((13*M+8)/5)+1),7)
190 L=0
200 IF B=0 THEN GOTO 240
210 FOR I=1 TO B
220 D$(0)=D$(0)+" "
230 NEXT
240 FOR I=1 TO A
250 IF I<10 THEN D$(L)=D$(L)+" "
260 D$(L)=D$(L)+STR$(I)
270 IF AER4(I+B,7)=0 THEN L=L+1
280 NEXT
290 P=0
300 FOR I=0 TO 3
310 PRINT D$(P+I)
320 NEXT
330 IF INKEY$<>"" THEN GOTO 330
340 P=1-P
350 IF INKEY$="" THEN GOTO 350
360 GOTO 300
370 DATA 31,28,30,31,30,31,30,31,31,30,31,30,31

view raw

calendar_basic

hosted with ❤ by GitHub

ピックアップ No.7 openFrameworks (C++)

レーザーで壁面描画だって！　openFrameworks は、「創造的なコーディングのための C++ のオープンソースツールキット」で、OpenGL, GLEW, GLUT, libtess2, cairo, rtAudio, PortAudio, FMOD, Kiss FFT, FreeType, FreeImage, Quicktime, videoInput, Poco をまとめて汎用的に使えるみたい。

コードは、ofApp.cpp を見てね。

ピックアップ No.8, 9 ゲームボーイアドバンス (C 言語)、ゲームボーイ（C 言語）

ゲームボーイアドバンスでカレンダー表示！

ゲームボーイ版の投稿もあったよ。

GameBoy Developers Kit (GBDK) というフリーの環境があるんだね。

Vol.2 はここまで！　次回もよろしくね。

The following two tabs change content below.
Twitter のプロフィールMy YouTube channel

kei

都内の公立高校に通う高校生。部活は、情報処理研究会。身体を動かすのも好きで、気が向いたときはなぜか体育会系の部活に混ぜてもらっていろんなスポーツをすることも。プログラミング生放送のキャラクターとして活動中！

DevelopmentBASIC, GAMEBOY, openFrameworks, カレンダープログラミング

Posted by kei