yushaaaaa
絵が描けないのに、まさか投稿することになるとは… 画像>16進数変換のプログラム、要望があれば対応したいと思います。 以下、ポケコンVX-4のプログラムを掲載。 ----------BEGIN---------- 5 CLEAR:CLS 10 c=20:r=0 20 READ s$ 30 IF s$="end" GOTO 90 40 IF c<20 GOTO 50 42 IF r>0 THEN PRINT 45 LOCATE 6,r:c=0:r=r+1 50 DEFCHR$(252)=s$ 60 PRINT CHR$(252); 70 c=c+1 80 GOTO 20 90 LOCATE 0,3:GOTO 90 ----------END---------- 以下はDATA文で定義(81個) FFFFC3808000,00C0E0FCFEFF,FFFFFFFFFFFF,FFFFFFFFFFFF, FFFCF0E0C080,800000000000,008080804040,6060383C1E1F, 0F8EC6F2FBFE,FDFBF7F7EFEF,DFBF5FBF5FBF,7FDF7FBE7CFC, F8F8F0F1E1E0,E0E0E0F03818,0E0703010000,000000000101, 011F342A140C,030080808080,80C0C0E0F0F8,FCFEFFFFFFFF, FFFFFF7F0F07,030000000000,808081C7FFFF,FFFFFFFFFFFE, 800000000000,000000000000,000000000000,0000000000C0, FF1F40800008,88C4E2F1F1F9,F9F9F1E1C282,E4FFFF7F1F20, 418284080808,101010101008,0000C0FFF162,444888901112, 12925434160D,1CACD4AA964D,493013262C33,000080FFFFFF, FFFFFFFFFFFF,FFFF3F1F0701,0040800080C0,E0F0F8FCFF02, 020404040404,040404020202,010008070000,00000001031E, F8E000000000,000000000000,000000000000,00FFFFFEE203, 820204040808,100000000000,00001FE18608,132440800000, 0000F27B1A02,816110C87403,0080E01807FF,0F1FFFFFFFFF, FFFFFFFFFFFF,FFFFFFFFFFFF,FF3F0F030120,502850281080, 601008060100,0A050A050201,038F7FC0C080,8080C0E05068, 3428141F0F0F,0F0F0F0E0D0A,1930204040C0,80050B050301, C23E02020505,0707070E0C0C,1830F1F16313,8B0B4707070F, 3F352404884A,2C1090908081,03041FFFFFFF,FFFFFFFFFFFF, end <EOM>
Featured works
No works in this category
