JU Bat Blinker Development Docs: swords.inc

Gadget Sourcecode: swords.inc

; DO NOT EDIT THIS FILE BY HAND!!!
;
;
;
; This file was created by the spinwords.c program
;

; number of phrases
PHRASE_CNT  equ 7

;
; phrase jump table (MUST BE FIRST CODE IN THIS FILE)
;

jump:
    clrf    PCLATH
    addwf   PCL,f

table:
    goto    phrase0
    goto    phrase1
    goto    phrase2
    goto    phrase3
    goto    phrase4
    goto    phrase5
    goto    phrase6

;
; character column data table
;
char_data:
dots_a:
    retlw   0|RED0|RED1|RED2|RED3                  ; ####.  a
    retlw   0|RED1|RED4                            ; .#..#  
    retlw   0|RED1|RED4                            ; .#..#  
    retlw   0|RED0|RED1|RED2|RED3|RED_END          ; ####.  

dots_b:
    retlw   0|RED0|RED1|RED2|RED3|RED4             ; #####  b
    retlw   0|RED0|RED2|RED4                       ; #.#.#  
    retlw   0|RED0|RED2|RED4                       ; #.#.#  
    retlw   0|RED1|RED3|RED_END                    ; .#.#.  

dots_c:
    retlw   0|RED1|RED2|RED3                       ; .###.  c
    retlw   0|RED0|RED4                            ; #...#  
    retlw   0|RED0|RED4                            ; #...#  
    retlw   0|RED0|RED4|RED_END                    ; #...#  

dots_d:
    retlw   0|RED0|RED1|RED2|RED3|RED4             ; #####  d
    retlw   0|RED0|RED4                            ; #...#  
    retlw   0|RED0|RED4                            ; #...#  
    retlw   0|RED1|RED2|RED3|RED_END               ; .###.  

dots_e:
    retlw   0|RED0|RED1|RED2|RED3|RED4             ; #####  e
    retlw   0|RED0|RED2|RED4                       ; #.#.#  
    retlw   0|RED0|RED2|RED4                       ; #.#.#  
    retlw   0|RED0|RED2|RED4|RED_END               ; #.#.#  

dots_f:
    retlw   0|RED0|RED1|RED2|RED3|RED4             ; #####  f
    retlw   0|RED2|RED4                            ; ..#.#  
    retlw   0|RED2|RED4                            ; ..#.#  
    retlw   0|RED2|RED4|RED_END                    ; ..#.#  

dots_g:
    retlw   0|RED1|RED2|RED3                       ; .###.  g
    retlw   0|RED0|RED4                            ; #...#  
    retlw   0|RED0|RED1|RED4                       ; ##..#  
    retlw   0|RED0|RED1|RED4|RED_END               ; ##..#  

dots_h:
    retlw   0|RED0|RED1|RED2|RED3|RED4             ; #####  h
    retlw   0|RED2                                 ; ..#..  
    retlw   0|RED2                                 ; ..#..  
    retlw   0|RED0|RED1|RED2|RED3|RED4|RED_END     ; #####  

dots_i:
    retlw   0|RED0|RED4                            ; #...#  i
    retlw   0|RED0|RED1|RED2|RED3                  ; ####.  
    retlw   0|RED0|RED4                            ; #...#  
    retlw   0|RED_END                              ; .....  

dots_j:
    retlw   0|RED1|RED4                            ; .#..#  j
    retlw   0|RED0|RED4                            ; #...#  
    retlw   0|RED1|RED2|RED3|RED4                  ; .####  
    retlw   0|RED4|RED_END                         ; ....#  

dots_k:
    retlw   0|RED0|RED1|RED2|RED3|RED4             ; #####  k
    retlw   0|RED2                                 ; ..#..  
    retlw   0|RED1|RED3                            ; .#.#.  
    retlw   0|RED0|RED4|RED_END                    ; #...#  

dots_l:
    retlw   0|RED0|RED1|RED2|RED3                  ; ####  l
    retlw   0|RED0                                 ; #....  
    retlw   0|RED0                                 ; #....  
    retlw   0|RED0|RED_END                         ; #....  

dots_m:
    retlw   0|RED0|RED1|RED2|RED3|RED4             ; #####  m
    retlw   0|RED3                                 ; ...#.  
    retlw   0|RED2                                 ; ..#..  
    retlw   0|RED3                                 ; ...#.  
    retlw   0|RED0|RED1|RED2|RED3|RED4|RED_END     ; #####  

dots_n:
    retlw   0|RED0|RED1|RED2|RED3|RED4             ; #####  n
    retlw   0|RED3                                 ; ...#.  
    retlw   0|RED2                                 ; ..#..  
    retlw   0|RED0|RED1|RED2|RED3|RED4|RED_END     ; #####  

dots_o:
    retlw   0|RED1|RED2|RED3                       ; .###.  o
    retlw   0|RED0|RED4                            ; #...#  
    retlw   0|RED0|RED4                            ; #...#  
    retlw   0|RED1|RED2|RED3|RED_END               ; .###.  

dots_p:
    retlw   0|RED0|RED1|RED2|RED3|RED4             ; #####  p
    retlw   0|RED2|RED4                            ; ..#.#  
    retlw   0|RED2|RED4                            ; ..#.#  
    retlw   0|RED3|RED_END                         ; ...#.  

dots_q:
    retlw   0|RED1|RED2|RED3                       ; .###.  q
    retlw   0|RED0|RED4                            ; #...#  
    retlw   0|RED0|RED1|RED4                       ; ##..#  
    retlw   0|RED0|RED1|RED2|RED3|RED_END          ; ####.  

dots_r:
    retlw   0|RED0|RED1|RED2|RED3|RED4             ; #####  r
    retlw   0|RED2|RED4                            ; ..#.#  
    retlw   0|RED1|RED2|RED4                       ; .##.#  
    retlw   0|RED0|RED3|RED_END                    ; #..#.  

dots_s:
    retlw   0|RED0|RED2|RED3|RED4                  ; #.###  s
    retlw   0|RED0|RED2|RED4                       ; #.#.#  
    retlw   0|RED0|RED2|RED4                       ; #.#.#  
    retlw   0|RED0|RED1|RED2|RED4|RED_END          ; ###.#  

dots_t:
    retlw   0|RED4                                 ; ....#  t
    retlw   0|RED0|RED1|RED2|RED3|RED4             ; #####  
    retlw   0|RED4                                 ; ....#  
    retlw   0|RED_END                              ; .....  

dots_u:
    retlw   0|RED0|RED1|RED2|RED3|RED4             ; #####  u
    retlw   0|RED0                                 ; #....  
    retlw   0|RED0                                 ; #....  
    retlw   0|RED0|RED1|RED2|RED3|RED4|RED_END     ; #####  

dots_v:
    retlw   0|RED1|RED2|RED3|RED4                  ; .####  v
    retlw   0|RED0                                 ; #....  
    retlw   0|RED1|RED2|RED3|RED4                  ; .####  
    retlw   0|RED_END                              ; .....  

dots_w:
    retlw   0|RED1|RED2|RED3|RED4                  ; .####  w
    retlw   0|RED0|RED1                            ; ##...  
    retlw   0|RED2|RED3                            ; ..##.  
    retlw   0|RED0|RED1                            ; ##...  
    retlw   0|RED1|RED2|RED3|RED4|RED_END          ; .####  

dots_x:
    retlw   0|RED0|RED1|RED4                       ; ##..#  x
    retlw   0|RED2|RED3                            ; ..##.  
    retlw   0|RED2|RED3                            ; ..##.  
    retlw   0|RED0|RED1|RED4|RED_END               ; ##..#  

dots_y:
    retlw   0|RED0|RED4                            ; #...#  y
    retlw   0|RED1|RED2|RED3                       ; .###.  
    retlw   0|RED3                                 ; ...#.  
    retlw   0|RED4|RED_END                         ; ....#  

dots_z:
    retlw   0|RED0|RED4                            ; #...#  z
    retlw   0|RED0|RED1|RED4                       ; ##..#  
    retlw   0|RED0|RED2|RED4                       ; #.#.#  
    retlw   0|RED0|RED3|RED4|RED_END               ; #..##  

dots_colon:
    retlw   0                                      ; .....  colon
    retlw   0|RED1|RED3                            ; .#.#.  
    retlw   0|RED1|RED3                            ; .#.#.  
    retlw   0|RED_END                              ; .....  

dots_period:
    retlw   0                                      ; .....  period
    retlw   0|RED0|RED1                            ; ##...  
    retlw   0|RED0|RED1                            ; ##...  
    retlw   0|RED_END                              ; .....  

dots_comma:
    retlw   0                                      ; .....  comma
    retlw   0|RED0                                 ; #....  
    retlw   0|RED1                                 ; .#...  
    retlw   0|RED_END                              ; .....  

dots_apostrophe:
    retlw   0                                      ; .....  apostrophe
    retlw   0|RED3|RED4                            ; ...##  
    retlw   0|RED_END                              ; .....  

dots_quote:
    retlw   0|RED3|RED4                            ; ...##  quote
    retlw   0                                      ; .....  
    retlw   0|RED3|RED4|RED_END                    ; ...##  

dots_qmark:
    retlw   0|RED3                                 ; ...#.  qmark
    retlw   0|RED4                                 ; ....#  
    retlw   0|RED0|RED1|RED4                       ; ##..#  
    retlw   0|RED2|RED3|RED_END                    ; ..##.  

dots_exclamation:
    retlw   0                                      ; .....  exclamation
    retlw   0|RED0|RED2|RED3|RED4                  ; #.###  
    retlw   0|RED0|RED2|RED3|RED4                  ; #.###  
    retlw   0|RED_END                              ; .....  



;
; letter functions
; (W must be 0 when calling these)
;
delta_a equ dots_a-table
delta_b equ dots_b-dots_a
delta_c equ dots_c-dots_b
delta_d equ dots_d-dots_c
delta_e equ dots_e-dots_d
delta_f equ dots_f-dots_e
delta_g equ dots_g-dots_f
delta_h equ dots_h-dots_g
delta_i equ dots_i-dots_h
delta_j equ dots_j-dots_i
delta_k equ dots_k-dots_j
delta_l equ dots_l-dots_k
delta_m equ dots_m-dots_l
delta_n equ dots_n-dots_m
delta_o equ dots_o-dots_n
delta_p equ dots_p-dots_o
delta_q equ dots_q-dots_p
delta_r equ dots_r-dots_q
delta_s equ dots_s-dots_r
delta_t equ dots_t-dots_s
delta_u equ dots_u-dots_t
delta_v equ dots_v-dots_u
delta_w equ dots_w-dots_v
delta_x equ dots_x-dots_w
delta_y equ dots_y-dots_x
delta_z equ dots_z-dots_y
delta_colon equ dots_colon-dots_z
delta_period    equ dots_period-dots_colon
delta_comma equ dots_comma-dots_period
delta_apostrophe    equ dots_apostrophe-dots_comma
delta_quote equ dots_quote-dots_apostrophe
delta_qmark equ dots_qmark-dots_quote
delta_exclamation   equ dots_exclamation-dots_qmark


lexclamation:
    addlw   delta_exclamation
lqmark:
    addlw   delta_qmark
lquote:
    addlw   delta_quote
lapostrophe:
    addlw   delta_apostrophe
lcomma:
    addlw   delta_comma
lperiod:
    addlw   delta_period
lcolon:
    addlw   delta_colon
lz:
    addlw   delta_z
ly:
    addlw   delta_y
lx:
    addlw   delta_x
lw:
    addlw   delta_w
lv:
    addlw   delta_v
lu:
    addlw   delta_u
lt:
    addlw   delta_t
ls:
    addlw   delta_s
lr:
    addlw   delta_r
lq:
    addlw   delta_q
lp:
    addlw   delta_p
lo:
    addlw   delta_o
ln:
    addlw   delta_n
lm:
    addlw   delta_m
ll:
    addlw   delta_l
lk:
    addlw   delta_k
lj:
    addlw   delta_j
li:
    addlw   delta_i
lh:
    addlw   delta_h
lg:
    addlw   delta_g
lf:
    addlw   delta_f
le:
    addlw   delta_e
ld:
    addlw   delta_d
lc:
    addlw   delta_c
lb:
    addlw   delta_b
la:
    addlw   delta_a
    goto    putc




;
; PHRASE 0:
; ""What will you do now, Batman?" asked the Riddler as the dynamic duo dangled over the hostages."
; 1 dots
;
phrase0:
    call    dot
    call    wait_500
phrase0_loop:
    call    start_loop
    call    lquote
    call    lw
    call    lh
    call    la
    call    lt
    call    lspace
    call    lw
    call    li
    call    ll
    call    ll
    call    lspace
    call    ly
    call    lo
    call    lu
    call    lspace
    call    ld
    call    lo
    call    lspace
    call    ln
    call    lo
    call    lw
    call    lcomma
    call    lspace
    call    lb
    call    la
    call    lt
    call    lm
    call    la
    call    ln
    call    lqmark
    call    lquote
    call    lspace
    call    la
    call    ls
    call    lk
    call    le
    call    ld
    call    lspace
    call    lt
    call    lh
    call    le
    call    lspace
    call    lr
    call    li
    call    ld
    call    ld
    call    ll
    call    le
    call    lr
    call    lspace
    call    la
    call    ls
    call    lspace
    call    lt
    call    lh
    call    le
    call    lspace
    call    ld
    call    ly
    call    ln
    call    la
    call    lm
    call    li
    call    lc
    call    lspace
    call    ld
    call    lu
    call    lo
    call    lspace
    call    ld
    call    la
    call    ln
    call    lg
    call    ll
    call    le
    call    ld
    call    lspace
    call    lo
    call    lv
    call    le
    call    lr
    call    lspace
    call    lt
    call    lh
    call    le
    call    lspace
    call    lh
    call    lo
    call    ls
    call    lt
    call    la
    call    lg
    call    le
    call    ls
    call    lperiod
    goto    phrase0_loop


;
; PHRASE 1:
; ""If you stay still, one of the hostages gets showered!""
; 9 dots
;
phrase1:
    call    dot
    call    dot
    call    dot
    call    dot
    call    dot
    call    dot
    call    dot
    call    dot
    call    dot
    call    wait_500
phrase1_loop:
    call    start_loop
    call    lquote
    call    li
    call    lf
    call    lspace
    call    ly
    call    lo
    call    lu
    call    lspace
    call    ls
    call    lt
    call    la
    call    ly
    call    lspace
    call    ls
    call    lt
    call    li
    call    ll
    call    ll
    call    lcomma
    call    lspace
    call    lo
    call    ln
    call    le
    call    lspace
    call    lo
    call    lf
    call    lspace
    call    lt
    call    lh
    call    le
    call    lspace
    call    lh
    call    lo
    call    ls
    call    lt
    call    la
    call    lg
    call    le
    call    ls
    call    lspace
    call    lg
    call    le
    call    lt
    call    ls
    call    lspace
    call    ls
    call    lh
    call    lo
    call    lw
    call    le
    call    lr
    call    le
    call    ld
    call    lexclamation
    call    lquote
    goto    phrase1_loop


;
; PHRASE 2:
; ""And the wetter they get, the more they'll attract the rabid rats!""
; 3 dots
;
phrase2:
    call    dot
    call    dot
    call    dot
    call    wait_500
phrase2_loop:
    call    start_loop
    call    lquote
    call    la
    call    ln
    call    ld
    call    lspace
    call    lt
    call    lh
    call    le
    call    lspace
    call    lw
    call    le
    call    lt
    call    lt
    call    le
    call    lr
    call    lspace
    call    lt
    call    lh
    call    le
    call    ly
    call    lspace
    call    lg
    call    le
    call    lt
    call    lcomma
    call    lspace
    call    lt
    call    lh
    call    le
    call    lspace
    call    lm
    call    lo
    call    lr
    call    le
    call    lspace
    call    lt
    call    lh
    call    le
    call    ly
    call    lapostrophe
    call    ll
    call    ll
    call    lspace
    call    la
    call    lt
    call    lt
    call    lr
    call    la
    call    lc
    call    lt
    call    lspace
    call    lt
    call    lh
    call    le
    call    lspace
    call    lr
    call    la
    call    lb
    call    li
    call    ld
    call    lspace
    call    lr
    call    la
    call    lt
    call    ls
    call    lexclamation
    call    lquote
    goto    phrase2_loop


;
; PHRASE 3:
; ""If you move, all the hostages drop into the Bay!" The Riddler laughed and ran off."
; 5 dots
;
phrase3:
    call    dot
    call    dot
    call    dot
    call    dot
    call    dot
    call    wait_500
phrase3_loop:
    call    start_loop
    call    lquote
    call    li
    call    lf
    call    lspace
    call    ly
    call    lo
    call    lu
    call    lspace
    call    lm
    call    lo
    call    lv
    call    le
    call    lcomma
    call    lspace
    call    la
    call    ll
    call    ll
    call    lspace
    call    lt
    call    lh
    call    le
    call    lspace
    call    lh
    call    lo
    call    ls
    call    lt
    call    la
    call    lg
    call    le
    call    ls
    call    lspace
    call    ld
    call    lr
    call    lo
    call    lp
    call    lspace
    call    li
    call    ln
    call    lt
    call    lo
    call    lspace
    call    lt
    call    lh
    call    le
    call    lspace
    call    lb
    call    la
    call    ly
    call    lexclamation
    call    lquote
    call    lspace
    call    lt
    call    lh
    call    le
    call    lspace
    call    lr
    call    li
    call    ld
    call    ld
    call    ll
    call    le
    call    lr
    call    lspace
    call    ll
    call    la
    call    lu
    call    lg
    call    lh
    call    le
    call    ld
    call    lspace
    call    la
    call    ln
    call    ld
    call    lspace
    call    lr
    call    la
    call    ln
    call    lspace
    call    lo
    call    lf
    call    lf
    call    lperiod
    goto    phrase3_loop


;
; PHRASE 4:
; ""Holy bursting bladders, Batman!" Robin cried. "I can't hold it any more! I have to pee!""
; 12 dots
;
phrase4:
    call    dot
    call    dot
    call    dot
    call    dot
    call    dot
    call    dot
    call    dot
    call    dot
    call    dot
    call    dot
    call    dot
    call    dot
    call    wait_500
phrase4_loop:
    call    start_loop
    call    lquote
    call    lh
    call    lo
    call    ll
    call    ly
    call    lspace
    call    lb
    call    lu
    call    lr
    call    ls
    call    lt
    call    li
    call    ln
    call    lg
    call    lspace
    call    lb
    call    ll
    call    la
    call    ld
    call    ld
    call    le
    call    lr
    call    ls
    call    lcomma
    call    lspace
    call    lb
    call    la
    call    lt
    call    lm
    call    la
    call    ln
    call    lexclamation
    call    lquote
    call    lspace
    call    lr
    call    lo
    call    lb
    call    li
    call    ln
    call    lspace
    call    lc
    call    lr
    call    li
    call    le
    call    ld
    call    lperiod
    call    lspace
    call    lquote
    call    li
    call    lspace
    call    lc
    call    la
    call    ln
    call    lapostrophe
    call    lt
    call    lspace
    call    lh
    call    lo
    call    ll
    call    ld
    call    lspace
    call    li
    call    lt
    call    lspace
    call    la
    call    ln
    call    ly
    call    lspace
    call    lm
    call    lo
    call    lr
    call    le
    call    lexclamation
    call    lspace
    call    li
    call    lspace
    call    lh
    call    la
    call    lv
    call    le
    call    lspace
    call    lt
    call    lo
    call    lspace
    call    lp
    call    le
    call    le
    call    lexclamation
    call    lquote
    goto    phrase4_loop


;
; PHRASE 5:
; ""You've got to hold it a little longer, Robin!" said Batman as he tapped his utility belt."
; 5 dots
;
phrase5:
    call    dot
    call    dot
    call    dot
    call    dot
    call    dot
    call    wait_500
phrase5_loop:
    call    start_loop
    call    lquote
    call    ly
    call    lo
    call    lu
    call    lapostrophe
    call    lv
    call    le
    call    lspace
    call    lg
    call    lo
    call    lt
    call    lspace
    call    lt
    call    lo
    call    lspace
    call    lh
    call    lo
    call    ll
    call    ld
    call    lspace
    call    li
    call    lt
    call    lspace
    call    la
    call    lspace
    call    ll
    call    li
    call    lt
    call    lt
    call    ll
    call    le
    call    lspace
    call    ll
    call    lo
    call    ln
    call    lg
    call    le
    call    lr
    call    lcomma
    call    lspace
    call    lr
    call    lo
    call    lb
    call    li
    call    ln
    call    lexclamation
    call    lquote
    call    lspace
    call    ls
    call    la
    call    li
    call    ld
    call    lspace
    call    lb
    call    la
    call    lt
    call    lm
    call    la
    call    ln
    call    lspace
    call    la
    call    ls
    call    lspace
    call    lh
    call    le
    call    lspace
    call    lt
    call    la
    call    lp
    call    lp
    call    le
    call    ld
    call    lspace
    call    lh
    call    li
    call    ls
    call    lspace
    call    lu
    call    lt
    call    li
    call    ll
    call    li
    call    lt
    call    ly
    call    lspace
    call    lb
    call    le
    call    ll
    call    lt
    call    lperiod
    goto    phrase5_loop


;
; PHRASE 6:
; ""Once this solvent dries, the rope will be brittle enough for you to break free!""
; 4 dots
;
phrase6:
    call    dot
    call    dot
    call    dot
    call    dot
    call    wait_500
phrase6_loop:
    call    start_loop
    call    lquote
    call    lo
    call    ln
    call    lc
    call    le
    call    lspace
    call    lt
    call    lh
    call    li
    call    ls
    call    lspace
    call    ls
    call    lo
    call    ll
    call    lv
    call    le
    call    ln
    call    lt
    call    lspace
    call    ld
    call    lr
    call    li
    call    le
    call    ls
    call    lcomma
    call    lspace
    call    lt
    call    lh
    call    le
    call    lspace
    call    lr
    call    lo
    call    lp
    call    le
    call    lspace
    call    lw
    call    li
    call    ll
    call    ll
    call    lspace
    call    lb
    call    le
    call    lspace
    call    lb
    call    lr
    call    li
    call    lt
    call    lt
    call    ll
    call    le
    call    lspace
    call    le
    call    ln
    call    lo
    call    lu
    call    lg
    call    lh
    call    lspace
    call    lf
    call    lo
    call    lr
    call    lspace
    call    ly
    call    lo
    call    lu
    call    lspace
    call    lt
    call    lo
    call    lspace
    call    lb
    call    lr
    call    le
    call    la
    call    lk
    call    lspace
    call    lf
    call    lr
    call    le
    call    le
    call    lexclamation
    call    lquote
    goto    phrase6_loop





This file Copyright (C) 2004 by Nathan (Acorn) Pooley
Go to Bat Blinker Development page
Go to Bat Blinker page
Go to JU Gadgets page
Go to Justice Unlimited homepage
Go to Acorn's personal webpage
Contact Acorn
See comments from others
Post your own comments
File created by do_doc at Wed Aug 4 20:17:23 2004