先日作ったバーサライタRPiで、地名を表示してみました。動画はこちら。
プログラムは以下のとおりです。
データがわかりやすいプログラムにしたので、内容を見ればネタバレですが…(笑)
地名1「上田」
10 '*POV Ueda 11 VIDEO 0 12 W=20 13 [0] =`0100000 14 [1] =`0100000 15 [2] =`0111110 16 [3] =`0101000 17 [4] =`0100000 18 [5] =`0000000 19 [6] =`0111110 20 [7] =`0101010 21 [8] =`0111110 22 [9] =`0101010 23 [10]=`0111110 24 [11]=`0000000 25 [12]=`0000000 26 '@LOOP 27 FOR I=0 TO 12 28 OUT [I] 29 FOR T=1 TO W:NEXT 30 NEXT 31 GOTO 26
地名2「福井」
10 '*POV Fukui 11 VIDEO 0 12 W=20 13 [0] =`0100010 14 [1] =`0010010 15 [2] =`0001110 16 [3] =`0000000 17 [4] =`0100100 18 [5] =`0010010 19 [6] =`0001110 20 [7] =`0000000 21 [8] =`0001000 22 [9] =`0111100 23 [10]=`0000010 24 [11]=`0000000 25 [12]=`0000000 26 '@LOOP 27 FOR I=0 TO 12 28 OUT [I] 29 FOR T=1 TO W:NEXT 30 NEXT 31 GOTO 26
地名3「仙台」
10 '*POV Sendai 11 VIDEO 0 12 W=15 13 [0] =`0000100 14 [1] =`1111110 15 [2] =`0000001 16 [3] =`1111000 17 [4] =`1000000 18 [5] =`1111111 19 [6] =`1000000 20 [7] =`1111000 21 [8] =`0000000 22 [9] =`1110100 23 [10]=`1010110 24 [11]=`1010101 25 [12]=`1010100 26 [13]=`1110110 27 [14]=`0000000 28 [15]=`0000000 29 '@LOOP 30 FOR I=0 TO 15 31 OUT [I] 32 FOR T=1 TO W:NEXT 33 NEXT 34 GOTO 29
地名4「鯖江」
10 '*POV Sabae 11 VIDEO 0 12 W=20 13 [0] =`0001100 14 [1] =`1011110 15 [2] =`1111101 16 [3] =`1011110 17 [4] =`0001100 18 [5] =`0000000 19 [6] =`1000001 20 [7] =`1000001 21 [8] =`1111111 22 [9] =`1000001 23 [10]=`1000001 24 [11]=`0000000 25 [12]=`0000000 26 '@LOOP 27 FOR I=0 TO 12 28 OUT [I] 29 FOR T=1 TO W:NEXT 30 NEXT 31 GOTO 26