' ' Check for a Super Pro Intellivision ' ' by Oscar Toledo G. (nanochess) ' ' Creation date: Oct/07/2017. ' MODE 0,0,0,0,0 WAIT DEFINE 224,16,cutegirl_bitmaps_14 WAIT DEFINE 208,16,cutegirl_bitmaps_13 WAIT DEFINE 192,16,cutegirl_bitmaps_12 WAIT DEFINE 176,16,cutegirl_bitmaps_11 WAIT DEFINE 160,16,cutegirl_bitmaps_10 WAIT DEFINE 144,16,cutegirl_bitmaps_9 WAIT DEFINE 128,16,cutegirl_bitmaps_8 WAIT DEFINE 112,16,cutegirl_bitmaps_7 WAIT DEFINE 96,16,cutegirl_bitmaps_6 WAIT DEFINE 80,16,cutegirl_bitmaps_5 WAIT DEFINE 64,16,cutegirl_bitmaps_4 WAIT DEFINE 48,16,cutegirl_bitmaps_3 WAIT DEFINE 32,16,cutegirl_bitmaps_2 WAIT DEFINE 16,16,cutegirl_bitmaps_1 WAIT DEFINE 0,16,cutegirl_bitmaps_0 WAIT FOR c = 0 TO 239 #backtab(c) = (cutegirl_cards(c) AND $F807) + c * 8 NEXT c WHILE 1: WAIT: WEND INCLUDE "cutegirl.bas" cutegirl_cards: DATA $0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807 DATA $0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807 DATA $0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0800,$0800 DATA $0800,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807 DATA $0807,$0807,$0807,$0807,$0807,$0807,$0807,$0800,$0800,$0800 DATA $0807,$0800,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807 DATA $0807,$0807,$0807,$0807,$0807,$0807,$0807,$0800,$0807,$0807 DATA $0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807 DATA $0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807 DATA $0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807 DATA $0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807 DATA $0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807 DATA $0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807 DATA $0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807 DATA $0807,$0807,$0807,$0807,$0807,$0807,$0807,$0800,$0800,$0807 DATA $0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807 DATA $0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807 DATA $0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807 DATA $0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0800 DATA $0807,$0807,$0800,$0807,$0807,$0807,$0807,$0807,$0807,$0807 DATA $0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807 DATA $0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807 DATA $0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807 DATA $0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807,$0807