312 lines
		
	
	
		
			6.1 KiB
		
	
	
	
		
			PHP
		
	
	
	
	
	
			
		
		
	
	
			312 lines
		
	
	
		
			6.1 KiB
		
	
	
	
		
			PHP
		
	
	
	
	
	
 | 
						|
Spreads:
 | 
						|
  db 8 ; length
 | 
						|
.onecard
 | 
						|
  db 1, $31
 | 
						|
  db 7, "Reply  "
 | 
						|
  db 7, "       "
 | 
						|
  db 18, "     One Card     "
 | 
						|
  db 18, "  Make any query. "
 | 
						|
.threecard
 | 
						|
  db 3, $11, $31, $51
 | 
						|
  db 7, "Past   "
 | 
						|
  db 7, "       "
 | 
						|
  db 7, "Present"
 | 
						|
  db 7, "       "
 | 
						|
  db 7, "Future "
 | 
						|
  db 7, "       "
 | 
						|
  db 18, "Three Card Spread "
 | 
						|
  db 18, "  Old reliable.   "
 | 
						|
.threecardB
 | 
						|
  db 3, $12, $52, $30
 | 
						|
  db 7, "Mind   "
 | 
						|
  db 7, "       "
 | 
						|
  db 7, "Body   "
 | 
						|
  db 7, "       "
 | 
						|
  db 7, "Spirit "
 | 
						|
  db 7, "       "
 | 
						|
  db 18, "Three Card Spread "
 | 
						|
  db 18, " Many variations. "
 | 
						|
.fivecardSituation
 | 
						|
  db 5, $10, $50, $12, $52, $31
 | 
						|
  db 7, "Goings "
 | 
						|
  db 7, "on     "
 | 
						|
  db 7, "Things "
 | 
						|
  db 7, "at play"
 | 
						|
  db 7, "Dangers"
 | 
						|
  db 7, "afoot  "
 | 
						|
  db 7, "Outcome"
 | 
						|
  db 7, "       "
 | 
						|
  db 7, "Theme  "
 | 
						|
  db 7, "       "
 | 
						|
  db 18, "Situation reading "
 | 
						|
  db 18, "What's going on?  "
 | 
						|
.fivecardRelationship
 | 
						|
  db 5, $01, $61, $20, $31, $42
 | 
						|
  db 7, "Querent"
 | 
						|
  db 7, "       "
 | 
						|
  db 7, "Other  "
 | 
						|
  db 7, "person "
 | 
						|
  db 7, "Past   "
 | 
						|
  db 7, "history"
 | 
						|
  db 7, "Present"
 | 
						|
  db 7, "moment "
 | 
						|
  db 7, "Future "
 | 
						|
  db 7, "outcome"
 | 
						|
  db 18, "  Relationships   "
 | 
						|
  db 18, "5 cards, 2 people."
 | 
						|
.sixcard
 | 
						|
  db 6, $11, $21, $30, $32, $41, $51
 | 
						|
  db 7, "Querent" ; 01
 | 
						|
  db 7, "       "
 | 
						|
  db 7, "Problem" ; 11
 | 
						|
  db 7, "       "
 | 
						|
  db 7, "Logic  " ; 20
 | 
						|
  db 7, "view   "
 | 
						|
  db 7, "Emotion" ; 22
 | 
						|
  db 7, "view   "
 | 
						|
  db 7, "Path of" ; 31
 | 
						|
  db 7, "action "
 | 
						|
  db 7, "Outcome" ; 41
 | 
						|
  db 7, "       "
 | 
						|
  db 18, " Horizontal Cross " 
 | 
						|
  db 18, "For facing issues."
 | 
						|
.alexNine
 | 
						|
  db 9, $01, $10, $12, $20, $22, $30, $32, $41, $61 
 | 
						|
  db 7, "Querent"
 | 
						|
  db 7, "role   "
 | 
						|
  db 7, "Woes   "
 | 
						|
  db 7, "known  "
 | 
						|
  db 7, "Woes   "
 | 
						|
  db 7, "hidden "
 | 
						|
  db 7, "Power  "
 | 
						|
  db 7, "known  "
 | 
						|
  db 7, "Power  "
 | 
						|
  db 7, "unknown"
 | 
						|
  db 7, "Frailty"
 | 
						|
  db 7, "known  "
 | 
						|
  db 7, "Frailty"
 | 
						|
  db 7, "ignored"
 | 
						|
  db 7, "Advice "
 | 
						|
  db 7, "       "
 | 
						|
  db 7, "Outcome"
 | 
						|
  db 7, "       "
 | 
						|
  db 18, "  Eight Plus One  "
 | 
						|
  db 18, " What faces you?  "
 | 
						|
.twelvecard
 | 
						|
  db 12, $00, $10, $20, $40, $50, $60, $02, $12, $22, $42, $52, $62
 | 
						|
  db 7, "This   " ; 00
 | 
						|
  db 7, "month  "
 | 
						|
  db 7, "Next   " ; 10
 | 
						|
  db 7, "month  "
 | 
						|
  db 7, "3rd    " ; 20
 | 
						|
  db 7, "month  "
 | 
						|
  db 7, "4th    " ; 30
 | 
						|
  db 7, "month  "
 | 
						|
  db 7, "5th    " ; 40
 | 
						|
  db 7, "month  "
 | 
						|
  db 7, "6th    " ; 02
 | 
						|
  db 7, "month  "
 | 
						|
  db 7, "7th    " ; 12
 | 
						|
  db 7, "month  "
 | 
						|
  db 7, "8th    " ; 22
 | 
						|
  db 7, "month  "
 | 
						|
  db 7, "9th    " ; 32
 | 
						|
  db 7, "month  "
 | 
						|
  db 7, "10th   " ; 42
 | 
						|
  db 7, "month  "
 | 
						|
  db 7, "11th   " ; 42
 | 
						|
  db 7, "month  "
 | 
						|
  db 7, "12th   " ; 42
 | 
						|
  db 7, "month  "
 | 
						|
  db 18, " One Year Spread  "
 | 
						|
  db 18, " Month by month   "
 | 
						|
 | 
						|
.end
 | 
						|
 | 
						|
macro Card
 | 
						|
  db BANK(\1)
 | 
						|
  dw \1
 | 
						|
endm
 | 
						|
Cards:
 | 
						|
  db (Cards.end - Cards - 1) / 3 ; length
 | 
						|
  Card TheFool
 | 
						|
  Card TheMagician
 | 
						|
  Card TheHighPriestess
 | 
						|
  Card TheEmpress
 | 
						|
  Card TheEmperor
 | 
						|
  Card TheHierophant
 | 
						|
  Card TheLovers
 | 
						|
  Card TheChariot
 | 
						|
  Card Strength
 | 
						|
  Card TheHermit
 | 
						|
  Card WheelOfFortune
 | 
						|
  Card Justice
 | 
						|
  Card TheHangedMan
 | 
						|
  Card Death
 | 
						|
  Card Temperance
 | 
						|
  Card TheDevil
 | 
						|
  Card TheTower
 | 
						|
  Card TheStar
 | 
						|
  Card TheMoon
 | 
						|
  Card TheSun
 | 
						|
  Card Judgement
 | 
						|
  Card TheWorld
 | 
						|
  
 | 
						|
  Card Cups01Ace
 | 
						|
  Card Cups02
 | 
						|
  Card Cups03
 | 
						|
  Card Cups04
 | 
						|
  Card Cups05
 | 
						|
  Card Cups06
 | 
						|
  Card Cups01Ace
 | 
						|
  Card Cups01Ace
 | 
						|
  Card Cups01Ace
 | 
						|
  Card Cups01Ace
 | 
						|
  Card Cups11Page
 | 
						|
  Card Cups12Knight
 | 
						|
  Card Cups13Queen
 | 
						|
  Card Cups14King
 | 
						|
  
 | 
						|
  Card Swords01Ace
 | 
						|
  Card Swords02
 | 
						|
  Card Swords03
 | 
						|
  Card Swords04
 | 
						|
  Card Swords05
 | 
						|
  Card Swords06
 | 
						|
  Card Swords01Ace
 | 
						|
  Card Swords01Ace
 | 
						|
  Card Swords01Ace
 | 
						|
  Card Swords01Ace
 | 
						|
  Card Swords11Page
 | 
						|
  Card Swords12Knight
 | 
						|
  Card Swords13Queen
 | 
						|
  Card Swords14King
 | 
						|
  
 | 
						|
  Card Coins01Ace
 | 
						|
  Card Coins02
 | 
						|
  Card Coins03
 | 
						|
  Card Coins04
 | 
						|
  Card Coins05
 | 
						|
  Card Coins06
 | 
						|
  Card Coins01Ace
 | 
						|
  Card Coins01Ace
 | 
						|
  Card Coins01Ace
 | 
						|
  Card Coins01Ace
 | 
						|
  Card Coins11Page
 | 
						|
  Card Coins12Knight
 | 
						|
  Card Coins13Queen
 | 
						|
  Card Coins14King
 | 
						|
  
 | 
						|
  Card Wands01Ace
 | 
						|
  Card Wands02
 | 
						|
  Card Wands03
 | 
						|
  Card Wands04
 | 
						|
  Card Wands05
 | 
						|
  Card Wands06
 | 
						|
  Card Wands01Ace
 | 
						|
  Card Wands01Ace
 | 
						|
  Card Wands01Ace
 | 
						|
  Card Wands01Ace
 | 
						|
  Card Wands11Page
 | 
						|
  Card Wands12Knight
 | 
						|
  Card Wands13Queen
 | 
						|
  Card Wands14King
 | 
						|
.end
 | 
						|
def Library_Length equ Cards.end - Cards
 | 
						|
println strfmt("The length of the library is %d", Library_Length / 3)
 | 
						|
 | 
						|
SECTION "First Five Cards", ROMX
 | 
						|
INCLUDE "00TheFool.inc"
 | 
						|
INCLUDE "01TheMagician.inc"
 | 
						|
INCLUDE "02TheHighPriestess.inc"
 | 
						|
INCLUDE "03TheEmpress.inc"
 | 
						|
INCLUDE "04TheEmperor.inc"
 | 
						|
 | 
						|
SECTION "Second Five Cards", ROMX
 | 
						|
INCLUDE "05TheHierophant.inc"
 | 
						|
INCLUDE "06TheLovers.inc"
 | 
						|
INCLUDE "07TheChariot.inc"
 | 
						|
INCLUDE "08Strength.inc"
 | 
						|
INCLUDE "09TheHermit.inc"
 | 
						|
 | 
						|
SECTION "Third Five Cards", ROMX
 | 
						|
INCLUDE "10WheelOfFortune.inc"
 | 
						|
INCLUDE "11Justice.inc"
 | 
						|
INCLUDE "12TheHangedMan.inc"
 | 
						|
INCLUDE "13Death.inc"
 | 
						|
INCLUDE "14Temperance.inc"
 | 
						|
 | 
						|
SECTION "Fourth Five Cards", ROMX
 | 
						|
INCLUDE "15TheDevil.inc"
 | 
						|
INCLUDE "16TheTower.inc"
 | 
						|
INCLUDE "17TheStar.inc"
 | 
						|
INCLUDE "18TheMoon.inc"
 | 
						|
INCLUDE "19TheSun.inc"
 | 
						|
 | 
						|
SECTION "FIFTH FIVE CARDS", ROMX
 | 
						|
INCLUDE "20Judgement.inc"
 | 
						|
INCLUDE "21TheWorld.inc"
 | 
						|
 | 
						|
SECTION "CUPS", ROMX
 | 
						|
cups_start:
 | 
						|
INCLUDE "cups01ace.inc"
 | 
						|
INCLUDE "cups02.inc"
 | 
						|
INCLUDE "cups03.inc"
 | 
						|
INCLUDE "cups04.inc"
 | 
						|
INCLUDE "cups05.inc"
 | 
						|
INCLUDE "cups06.inc"
 | 
						|
INCLUDE "cups11page.inc"
 | 
						|
INCLUDE "cups12knight.inc"
 | 
						|
INCLUDE "cups13queen.inc"
 | 
						|
INCLUDE "cups14king.inc"
 | 
						|
cups_end:
 | 
						|
println "Cups take up ", cups_end - cups_start, " kb"
 | 
						|
 | 
						|
 | 
						|
SECTION "SWORDS", ROMX
 | 
						|
swords_start:
 | 
						|
INCLUDE "swords01ace.inc"
 | 
						|
INCLUDE "swords02.inc"
 | 
						|
INCLUDE "swords03.inc"
 | 
						|
INCLUDE "swords04.inc"
 | 
						|
INCLUDE "swords05.inc"
 | 
						|
INCLUDE "swords06.inc"
 | 
						|
INCLUDE "swords11page.inc"
 | 
						|
INCLUDE "swords12knight.inc"
 | 
						|
INCLUDE "swords13queen.inc"
 | 
						|
INCLUDE "swords14king.inc"
 | 
						|
swords_end:
 | 
						|
println "Swords take up ", swords_end - swords_start, " kb"
 | 
						|
 | 
						|
SECTION "COINS", ROMX
 | 
						|
coins_start:
 | 
						|
INCLUDE "coins01ace.inc"
 | 
						|
INCLUDE "coins02.inc"
 | 
						|
INCLUDE "coins03.inc"
 | 
						|
INCLUDE "coins04.inc"
 | 
						|
INCLUDE "coins05.inc"
 | 
						|
INCLUDE "coins06.inc"
 | 
						|
INCLUDE "coins11page.inc"
 | 
						|
INCLUDE "coins12knight.inc"
 | 
						|
INCLUDE "coins13queen.inc"
 | 
						|
INCLUDE "coins14king.inc"
 | 
						|
coins_end:
 | 
						|
println "Coins take up ", coins_end - coins_start, " kb"
 | 
						|
 | 
						|
 | 
						|
SECTION "WANDS", ROMX
 | 
						|
wands_start:
 | 
						|
INCLUDE "wands01ace.inc"
 | 
						|
INCLUDE "wands02.inc"
 | 
						|
INCLUDE "wands03.inc"
 | 
						|
INCLUDE "wands04.inc"
 | 
						|
INCLUDE "wands05.inc"
 | 
						|
INCLUDE "wands06.inc"
 | 
						|
INCLUDE "wands11page.inc"
 | 
						|
INCLUDE "wands12knight.inc"
 | 
						|
INCLUDE "wands13queen.inc"
 | 
						|
INCLUDE "wands14king.inc"
 | 
						|
wands_end:
 | 
						|
println "Wands take up ", wands_end - wands_start, " kb"
 |