戞係復丂僷儗僢僩


僷儗僢僩偺嶌惉

丂僼傽儈僐儞偼僷儗僢僩傪棙梡偟偰丄64怓拞丄摨帪偵16怓巊偊傑偡丅 僷儗僢僩偺嶌惉偵偼丄偙傟傪巊梡偟偰偔偩偝偄丅

pal.exe傪幚峴偡傞偲丄偙偺傛偆側夋柺偑弌傑偡丅忋抜偺16x2偺儅僗偼嶌惉偡傞僷儗僢僩僨乕僞丄壓抜偺16x4偺儅僗偼慖戰偡傞怓偱偡丅偙偙偐傜怓傪忋偵僪儔僢僌僪儘僢僾偟傑偡丅 忋抜偺忋偺峴偑BG丄壓偺峴偑僗僾儔僀僩偺僷儗僢僩偱偡丅 嵍偐傜0斣丄1斣丄2斣丄丄偲側傝傑偡丅僗僾儔僀僩傗BG偼丄0񐿮3丄4񒎢7丄偺傛偆偵丄楢斣偱4怓堦慻偱巊傢傟傑偡丅 偨偩偟丄0斣丄4斣丄8斣丄12斣偼攚宨怓偵側傝傑偡丅偙偺偆偪僗僾儔僀僩偺0斣偼攚宨慡懱偺怓偵側傝傑偡丅

僷儗僢僩傪撉傒崬傓

丂僷儗僢僩僨乕僞偼丄VRAM偺$3F00埲崀偵撉傒崬傒傑偡丅偦偺偨傔偵偼傑偢丄VRAM傾僪儗僗儗僕僗僞偺$2006偵丄 儘乕僪愭偺傾僪儗僗$3F00傪彂偒崬傒傑偡丅偟偐偟儗僕僗僞偺僒僀僘偼8宿側偺偱丄2寘偟偐巊偊傑偣傫丅 偙偺傛偆側16宿偺抣傪彂偒崬傓応崌偼丄埲壓偺傛偆偵2夞偵暘偗偰彂偒崬傒傑偡丅

	lda #$3F
	sta $2006
	lda #$00
	sta $2006

丂偙偺屻丄2偮栚偺VRAM傾僪儗僗儗僕僗僞偺$2007偵丄巜掕偟偨傾僪儗僗偵儘乕僪偡傞僷儗僢僩偺抣(1僶僀僩)傪彂偒崬傒傑偡丅 彂偒崬傓偨傃偵懳徾偑師偺傾僪儗僗偵帺摦揑偵堏傞偺偱丄昁梫側悢偩偗僗僩傾(sta)傪孞傝曉偣偽椙偄傛偆偵側偭偰偄傑偡丅

僀儞僨僢僋僗儗僕僗僞偵傛傞儊儌儕傾僋僙僗

丂X儗僕僗僞偲Y儗僕僗僞偼僀儞僨僢僋僗儗僕僗僞偱偡丅埲壓偺傛偆側巊偄曽偑偱偒傑偡丅

	;X偺抣偼6

	lda $2002, x    ; A偵($2002+6)斣抧丄偮傑傝$2008偺抣傪儘乕僪偡傞丅

	;Y偺抣偼9

	lda $2000, y    ; A偵($2000+9)斣抧丄偮傑傝$2009偺抣傪儘乕僪偡傞丅

丂偙偺僀儞僨僢僋僗儗僕僗僞偺婡擻偱丄愭傎偳偺僷儗僢僩偐傜偺僨乕僞傪弴師撉傒崬傓偙偲偑偱偒傑偡丅

	pallabel: .incbin "giko.pal"  ; 僷儗僢僩傪include偡傞
	
	lda pallabel, x  ; A偵(pallabel+x)偺抣傪儘乕僪偡傞丅

僷儗僢僩傪儘乕僪偡傞僐乕僪

丂埲壓偼僷儗僢僩傪儘乕僪偡傞僾儘僌儔儉偺椺偱偡丅

	; VRAM傾僪儗僗儗僕僗僞偺$2006偵丄僷儗僢僩偺儘乕僪愭偺傾僪儗僗$3F00傪巜掕偡傞丅
	lda #$3F
	sta $2006
	lda #$00
	sta $2006

	ldx #$00 ; X偵0傪儘乕僪偡傞丅僷儗僢僩偺0斣栚
loadPal: ; 儔儀儖偼丄乽儔儀儖柤亄:乿偺宍幃偱婰弎
	lda pallabel, x ; A偵(ourpal + x)斣抧偺僷儗僢僩傪儘乕僪偡傞

	sta $2007 ; $2007偵僷儗僢僩偺抣傪撉傒崬傓

	inx ; 傑偩愢柧偝傟偰柍偄偑丄偙傟偼X儗僕僗僞偵抣傪1壛嶼偟偰偄傞

	cpx #32 ; X傪32(10恑悢丅BG偲僗僾儔僀僩偺僷儗僢僩偺憤悢)偲斾妑偟偰摨偠偐偳偆偐斾妑偟偰偄傞	
	bne loadPal ;	忋偑摍偟偔側偄応崌偼丄loadPal儔儀儖偺埵抲偵僕儍儞僾偡傞
	; X偑32側傜僷儗僢僩儘乕僪廔椆

丂儔儀儖偼":"傪偮偗側偔偰傕椙偄偺偱偡偑丄偙偺僒僀僩偱偼":"傪偮偗傞傛偆偵摑堦偟傑偡丅
僩僢僾儁乕僕 慜偺儁乕僕 師偺儁乕僕
SEO [PR] 敋懍!柍椏僽儘僌 柍椏儂乕儉儁乕僕奐愝 柍椏儔僀僽曻憲