10 DATA 169，16，141，243，177，169，29，141，3，178，169，230，141，167，171，141，61，173，169，198，141，67，173，169，160，141，70，173，169，230，141，72，173，169，89，141，245，178，169，82，141，152，168，96，0：FOR I=768 TO 812：READ A：POKE I，A：NEXT：CALL 768：HOME：PRINT“ERLETE FILENAME”
注：本程序在CEC_I中华学习机上通过。