100 GRAPHICS 0›110 FOR I=1536 TO 1700:READ A:POKE I,A:CK=CK +A:NEXT I›120 IF CK<>19072 THEN ? "Error in DATA Statements. Check Typing.":END›130 A=USR(1536)›140 ? :? "Automatic Proofreader Now Activated."›150 NEW›1536 DATA 104,160,0,185,26,3›1542 DATA 201,69,240,7,200,200›1548 DATA 192,34,208,243,96,200›1554 DATA 169,74,153,26,3,200›1560 DATA 169,6,153,26,3,162›1566 DATA 0,189,0,228,157,74›1572 DATA 6,232,224,16,208,245›1578 DATA 169,93,141,78,6,169›1584 DATA 6,141,79,6,24,173›1590 DATA 4,228,105,1,141,95›1596 DATA 6,173,5,228,105,0›1602 DATA 141,96,6,169,0,133›1608 DATA 203,96,247,238,125,241›1614 DATA 93,6,244,241,115,241›1620 DATA 124,241,76,205,238,0›1626 DATA 0,0,0,0,32,62›1632 DATA 246,8,201,155,240,13›1638 DATA 201,32,240,7,72,24›1644 DATA 101,203,133,203,104,40›1650 DATA 96,72,152,72,138,72›1656 DATA 160,0,169,128,145,88›1662 DATA 200,192,40,208,249,165›1668 DATA 203,74,74,74,74,24›1674 DATA 105,161,160,3,145,88›1680 DATA 165,203,41,15,24,105›1686 DATA 161,200,145,88,169,0›1692 DATA 133,203,104,170,104,168›1698 DATA 104,40,96›