4420 lines
178 KiB
Plaintext
4420 lines
178 KiB
Plaintext
1 00:0000 - - - - #include "includes/static/ti84pce.inc"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/static/ti84pce.inc"
|
|
1 00:0000 - - - - ;TI-84 Plus CE Include File
|
|
2 00:0000 - - - -
|
|
3 00:0000 - - - - ;Various Parts Contributed by
|
|
4 00:0000 - - - - ;- BrandonW
|
|
5 00:0000 - - - - ;- calc84
|
|
6 00:0000 - - - - ;- MateoConLechuga
|
|
7 00:0000 - - - - ;- Runer112
|
|
8 00:0000 - - - - ;- tr1p1ea
|
|
9 00:0000 - - - - ;- Kerm Martian
|
|
10 00:0000 - - - - ;- Texas Instruments (ti83plus.inc)
|
|
Listing for file "FSHa.asm"
|
|
2 00:0000 - - - - #include "includes/static/define.inc"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/static/define.inc"
|
|
Listing for file "FSHa.asm"
|
|
3 00:0000 - - - - #include "includes/macros/macros.inc"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/macros/macros.inc"
|
|
1 00:0000 - - - - #include "includes/macros/misc.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/macros/misc.asm"
|
|
1 00:0000 - - - - ;;rgbto565
|
|
2 00:0000 - - - - ;;turns an rgb input into the 656 format that the lcd uses
|
|
3 00:0000 - - - - ;;Inputs:
|
|
4 00:0000 - - - - ;; r,g,b
|
|
5 00:0000 - - - - ;;Outputs:
|
|
6 00:0000 - - - - ;; HL: color
|
|
7 00:0000 - - - - #macro rgbto565(red, green, blue)
|
|
8 00:0000 ld hl, ((red / 255 * 31) << 11) | ((green / 255 * 63) << 5) | ((blue / 255 * 31))
|
|
9 00:0000 #endmacro
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/macros/macros.inc"
|
|
2 00:0000 - - - - #include "includes/macros/pixel.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/macros/pixel.asm"
|
|
1 00:0000 - - - - ;;pixel
|
|
2 00:0000 - - - - ;;Gets vRam location of coordinates
|
|
3 00:0000 - - - - ;;Inputs:
|
|
4 00:0000 - - - - ;; x: x axis
|
|
5 00:0000 - - - - ;; y: y axis
|
|
6 00:0000 - - - - ;;Outputs:
|
|
7 00:0000 - - - - ;; DE: vRam location
|
|
8 00:0000 - - - - #macro pixel(x, y)
|
|
9 00:0000 ld de, vRam + (y * 320 * 2) + (x * 2)
|
|
10 00:0000 #endmacro
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/macros/macros.inc"
|
|
3 00:0000 - - - - #include "includes/macros/draw.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/macros/draw.asm"
|
|
1 00:0000 - - - - #macro drawpixelxyM(x, y)
|
|
2 00:0000 ld de, x
|
|
3 00:0000 ld a, y
|
|
4 00:0000 call drawpixelxy
|
|
5 00:0000 #endmacro
|
|
6 00:0000 - - - -
|
|
7 00:0000 - - - - #macro drawlineM(x1, y1, x2, y2)
|
|
8 00:0000 ;TODO
|
|
9 00:0000 #endmacro
|
|
10 00:0000 - - - -
|
|
11 00:0000 - - - - #macro drawrowM(y)
|
|
12 00:0000 ld a, y
|
|
13 00:0000 call drawrow
|
|
14 00:0000 #endmacro
|
|
15 00:0000 - - - -
|
|
16 00:0000 - - - - #macro drawbarM(y, height)
|
|
17 00:0000 ld a, y
|
|
18 00:0000 ld bc, height
|
|
19 00:0000 call drawbar
|
|
20 00:0000 #endmacro
|
|
21 00:0000 - - - -
|
|
22 00:0000 - - - - #macro drawrectfilledM(x, y, width, height)
|
|
23 00:0000 ex de, hl
|
|
24 00:0000 ld ixl, e
|
|
25 00:0000 ld ixh, d
|
|
26 00:0000 ex de, hl
|
|
27 00:0000 ld hl, width
|
|
28 00:0000 ld de, x
|
|
29 00:0000 ld bc, 0
|
|
30 00:0000 ld c, y
|
|
31 00:0000 ld a, height
|
|
32 00:0000 call drawrectfilled
|
|
33 00:0000 #endmacro
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/macros/macros.inc"
|
|
4 00:0000 - - - - #include "includes/macros/command.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/macros/command.asm"
|
|
1 00:0000 - - - - ;;decodecmdopt
|
|
2 00:0000 - - - - ;;compares cmdXs to command input and conditionally sets opt to optcode
|
|
3 00:0000 - - - - ;;Inputs:
|
|
4 00:0000 - - - - ;; HL: cmd string input
|
|
5 00:0000 - - - - ;; DE: op code mem location
|
|
6 00:0000 - - - - #macro decodecmdopt(cmdXs, cmdXo)
|
|
7 00:0000 push hl
|
|
8 00:0000 push de
|
|
9 00:0000 ld de, cmdXs
|
|
10 00:0000 call strcmp
|
|
11 00:0000 ld hl, cmdXo
|
|
12 00:0000 pop de
|
|
13 00:0000 call z, bytecpy
|
|
14 00:0000 pop hl
|
|
15 00:0000 #endmacro
|
|
16 00:0000 - - - -
|
|
17 00:0000 - - - - #macro routeoptjp(cmdXo, cmdXf)
|
|
18 00:0000 ld de, cmdXo
|
|
19 00:0000 call bytecmp
|
|
20 00:0000 jp z, cmdXf
|
|
21 00:0000 #endmacro
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/macros/macros.inc"
|
|
Listing for file "FSHa.asm"
|
|
4 00:0000 - - - -
|
|
5 00:0000 - - - - .assume ADL=1
|
|
6 00:0000 - - - - .org userMem-2
|
|
7 D1:A87F EF 7B - - .DB tExtTok,tAsm84CeCmp
|
|
8 D1:A881 - - - -
|
|
9 D1:A881 - - - - Setup:
|
|
10 D1:A881 CD 48 08 02 CALL _RunIndicOff
|
|
11 D1:A885 CD 38 11 02 CALL _EnableAPD
|
|
12 D1:A889 FD CB 08 DE SET apdRunning,(iy+apdFlags)
|
|
13 D1:A88D CD 28 08 02 CALL _homeup
|
|
14 D1:A891 CD 08 08 02 CALL _ClrLCDFull
|
|
15 D1:A895 - - - -
|
|
16 D1:A895 CD 99 B4 D1 CALL drawstatusbar
|
|
17 D1:A899 - - - -
|
|
18 D1:A899 CD CE B2 D1 CALL fshvarreset
|
|
19 D1:A89D - - - -
|
|
20 D1:A89D CD 74 B4 D1 CALL printmotd
|
|
21 D1:A8A1 - - - -
|
|
22 D1:A8A1 - - - - Input:
|
|
23 D1:A8A1 - - - - ;; TODO: Update status bar sometimes
|
|
24 D1:A8A1 3E 00 - - LD A, $00
|
|
25 D1:A8A3 CD BF B0 D1 CALL commandfill
|
|
26 D1:A8A7 - - - -
|
|
27 D1:A8A7 21 2B A9 D1 LD HL, PS1
|
|
28 D1:A8AB CD FB AA D1 CALL printprompt
|
|
29 D1:A8AF - - - -
|
|
30 D1:A8AF 21 9F EA D0 LD HL, FshCmd
|
|
31 D1:A8B3 11 2C 00 00 LD DE, FshCmdInptSize
|
|
32 D1:A8B7 CD 83 AD D1 CALL inputstr
|
|
33 D1:A8BB - - - -
|
|
34 D1:A8BB 21 9F EA D0 LD HL, FshCmd
|
|
35 D1:A8BF CD DA B0 D1 CALL fshparsecommand
|
|
36 D1:A8C3 - - - -
|
|
37 D1:A8C3 CD F0 07 02 CALL _NewLine
|
|
38 D1:A8C7 - - - -
|
|
39 D1:A8C7 - - - - Decode:
|
|
40 D1:A8C7 21 9F EA D0 LD HL, FshCmd
|
|
41 D1:A8CB 11 CC EA D0 LD DE, FshCmdOP
|
|
42 D1:A8CF CD 21 B6 D1 CALL commanddecode
|
|
43 D1:A8D3 - - - -
|
|
44 D1:A8D3 - - - - Route:
|
|
45 D1:A8D3 21 CC EA D0 LD HL, FshCmdOP
|
|
46 D1:A8D7 C3 2A B6 D1 JP commandroute
|
|
47 D1:A8DB - - - -
|
|
48 D1:A8DB - - - - Fin:
|
|
49 D1:A8DB C3 A1 A8 D1 JP Input
|
|
50 D1:A8DF - - - -
|
|
51 D1:A8DF - - - - Err:
|
|
52 D1:A8DF C3 F9 B2 D1 JP ErrRoute
|
|
53 D1:A8E3 - - - -
|
|
54 D1:A8E3 - - - - Cleanup:
|
|
55 D1:A8E3 FD CB 03 C6 SET graphdraw,(IY+graphflags)
|
|
56 D1:A8E7 CD 08 08 02 CALL _ClrLCDFull
|
|
57 D1:A8EB CD 18 08 02 CALL _ClrTxtShdw
|
|
58 D1:A8EF CD 28 08 02 CALL _homeup
|
|
59 D1:A8F3 CD 3C 1A 02 call _DrawStatusBar
|
|
60 D1:A8F7 - - - -
|
|
61 D1:A8F7 - - - - Exit:
|
|
62 D1:A8F7 FD CB 00 AE RES donePrgm,(iy+doneFlags)
|
|
63 D1:A8FB C9 - - - RET
|
|
64 D1:A8FC - - - -
|
|
65 D1:A8FC - - - - #include "includes/Text.inc"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/Text.inc"
|
|
1 D1:A8FC - - - - ;STRINGS -------------------------
|
|
2 D1:A8FC 46 73 68 20
|
|
53 48 65 6C
|
|
6C 00 - - FshName: .db "Fsh SHell", 0
|
|
3 D1:A906 42 79 20 70
|
|
69 78 69 79
|
|
73 00 - - FshBy: .db "By pixiys", 0
|
|
4 D1:A910 73 74 65 70
|
|
68 65 6E 6C
|
|
74 6F 74 68
|
|
2E 63 6F 6D
|
|
2F 66 73 68
|
|
2D 73 68 65
|
|
6C 6C 00 - FshSite: .db "stephenltoth.com/fsh-shell", 0
|
|
5 D1:A92B 46 53 48 3E
|
|
20 00 - - PS1: .db "FSH> ", 0
|
|
6 D1:A931 36 34 77 00 FshVVars: .db "64w", 0
|
|
7 D1:A935 30 00 - - FshVMajor: .db "0", 0
|
|
8 D1:A937 31 00 - - FshVMinor: .db "1", 0
|
|
9 D1:A939 30 00 - - FshVPatch: .db "0", 0
|
|
10 D1:A93B 34 39 30 00 FshVBuild: .db "490", 0
|
|
11 D1:A93F 2E 00 - - FshVSeparator: .db ".", 0
|
|
12 D1:A941 50 72 65 73
|
|
73 20 32 6E
|
|
64 20 66 6F
|
|
72 20 6E 75
|
|
6D 62 65 72
|
|
73 00 - - FshMotd2nd: .db "Press 2nd for numbers", 0
|
|
13 D1:A957 54 79 70 65
|
|
20 27 48 45
|
|
4C 50 27 20
|
|
66 6F 72 20
|
|
68 65 6C 70
|
|
00 - - - FshMotdHelp: .db "Type 'HELP' for help", 0
|
|
Listing for file "FSHa.asm"
|
|
66 D1:A96C 00 - - - FshFlags: .DB %00000000
|
|
67 D1:A96D - - - - ; 0: Debug Flag
|
|
68 D1:A96D - - - - ; 1: Error Flag
|
|
69 D1:A96D - - - - ; 2: Program Flag
|
|
70 D1:A96D - - - -
|
|
71 D1:A96D - - - - #include "includes/lib/std/std.inc"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/std/std.inc"
|
|
1 D1:A96D - - - - #include "includes/lib/std/Math.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/std/Math.asm"
|
|
1 D1:A96D - - - - ;;cpHLDE
|
|
2 D1:A96D - - - - ;;Compares HL to DE.
|
|
3 D1:A96D - - - - ;;Output:
|
|
4 D1:A96D - - - - ;; Same as z80 CP instruction.
|
|
5 D1:A96D - - - - cpHLDE:
|
|
6 D1:A96D B7 - - - or a
|
|
7 D1:A96E ED 52 - - sbc hl, de
|
|
8 D1:A970 19 - - - add hl,de
|
|
9 D1:A971 C9 - - - ret
|
|
10 D1:A972 - - - -
|
|
11 D1:A972 - - - - ;;cpHLBC
|
|
12 D1:A972 - - - - ;;Compares HL to BC.
|
|
13 D1:A972 - - - - ;;Output:
|
|
14 D1:A972 - - - - ;; Same as z80 CP instruction.
|
|
15 D1:A972 - - - - cpHLBC:
|
|
16 D1:A972 B7 - - - or a
|
|
17 D1:A973 ED 42 - - sbc hl, bc
|
|
18 D1:A975 09 - - - add hl,bc
|
|
19 D1:A976 C9 - - - ret
|
|
20 D1:A977 - - - -
|
|
21 D1:A977 - - - - ;;cpBCDE
|
|
22 D1:A977 - - - - ;;Compares DE to BC.
|
|
23 D1:A977 - - - - ;;Output:
|
|
24 D1:A977 - - - - ;; Same as z80 CP instruction.
|
|
25 D1:A977 - - - - cpBCDE:
|
|
26 D1:A977 E5 - - - push hl
|
|
27 D1:A978 60 - - - ld h, b
|
|
28 D1:A979 69 - - - ld l, c
|
|
29 D1:A97A B7 - - - or a
|
|
30 D1:A97B ED 52 - - sbc hl, de
|
|
31 D1:A97D E1 - - - pop hl
|
|
32 D1:A97E C9 - - - ret
|
|
33 D1:A97F - - - -
|
|
34 D1:A97F - - - - ;;mulAbyB
|
|
35 D1:A97F - - - - ;;Multiplys AxB
|
|
36 D1:A97F - - - - ;;Inputs:
|
|
37 D1:A97F - - - - ;; A: Multiplier
|
|
38 D1:A97F - - - - ;; B: Multiplicand
|
|
39 D1:A97F - - - - ;;Outputs:
|
|
40 D1:A97F - - - - ;; A: Product of A and B.
|
|
41 D1:A97F - - - - mulAbyB:
|
|
42 D1:A97F C5 - - - push bc
|
|
43 D1:A980 4F - - - ld c, a
|
|
44 D1:A981 - - - - mulAbyBLoop:
|
|
45 D1:A981 81 - - - add a, c
|
|
46 D1:A982 10 FD - - djnz mulAbyBLoop
|
|
47 D1:A984 91 - - - sub c
|
|
48 D1:A985 C1 - - - pop bc
|
|
49 D1:A986 C9 - - - ret
|
|
50 D1:A987 - - - -
|
|
51 D1:A987 - - - - ;;mulAbyHL
|
|
52 D1:A987 - - - - ;;Multiplys AxHL
|
|
53 D1:A987 - - - - ;;Inputs:
|
|
54 D1:A987 - - - - ;; A: Multiplier
|
|
55 D1:A987 - - - - ;; HL: Multiplicand
|
|
56 D1:A987 - - - - ;;Outputs:
|
|
57 D1:A987 - - - - ;; HL: Product of A and HL.
|
|
58 D1:A987 - - - - mulAbyHL:
|
|
59 D1:A987 C5 - - - push bc
|
|
60 D1:A988 D5 - - - push de
|
|
61 D1:A989 11 00 00 00 ld de, 0
|
|
62 D1:A98D EB - - - ex de, hl
|
|
63 D1:A98E FE 00 - - cp 0
|
|
64 D1:A990 28 04 - - jr z, mulAbyHLEnd
|
|
65 D1:A992 47 - - - ld b, a
|
|
66 D1:A993 - - - - mulAbyHLLoop:
|
|
67 D1:A993 19 - - - add hl, de
|
|
68 D1:A994 10 FD - - djnz mulAbyHLLoop
|
|
69 D1:A996 - - - - mulAbyHLEnd:
|
|
70 D1:A996 D1 - - - pop de
|
|
71 D1:A997 C1 - - - pop bc
|
|
72 D1:A998 C9 - - - ret
|
|
73 D1:A999 - - - -
|
|
74 D1:A999 - - - - ;;modHL
|
|
75 D1:A999 - - - - ;;H % L => H
|
|
76 D1:A999 - - - - ;;Inputs:
|
|
77 D1:A999 - - - - ;; H:
|
|
78 D1:A999 - - - - ;; L:
|
|
79 D1:A999 - - - - modHL:
|
|
80 D1:A999 C5 - - - push bc
|
|
81 D1:A99A 44 - - - ld b, h
|
|
82 D1:A99B 3E 00 - - ld a, 0
|
|
83 D1:A99D - - - - modHLLoop:
|
|
84 D1:A99D 3C - - - inc a
|
|
85 D1:A99E BD - - - cp a, l
|
|
86 D1:A99F 20 02 - - jr nz, modHLLoopEnd
|
|
87 D1:A9A1 3E 00 - - ld a, 0
|
|
88 D1:A9A3 - - - - modHLLoopEnd:
|
|
89 D1:A9A3 10 F8 - - djnz modHLLoop
|
|
90 D1:A9A5 67 - - - ld h, a
|
|
91 D1:A9A6 C1 - - - pop bc
|
|
92 D1:A9A7 C9 - - - ret
|
|
93 D1:A9A8 - - - -
|
|
94 D1:A9A8 - - - -
|
|
95 D1:A9A8 - - - -
|
|
96 D1:A9A8 - - - - ;;mul32By8
|
|
97 D1:A9A8 - - - - ;;Performs an unsigned multiplication of DEHL and A.
|
|
98 D1:A9A8 - - - - ;;Outputs:
|
|
99 D1:A9A8 - - - - ;; DEHL: product of DEHL and A
|
|
100 D1:A9A8 - - - - mul32By8:
|
|
101 D1:A9A8 C5 DD E5 - push bc \ push ix
|
|
102 D1:A9AB DD 2E 08 - ld ixl, 8
|
|
103 D1:A9AE D5 - - - push de
|
|
104 D1:A9AF E5 - - - push hl
|
|
105 D1:A9B0 21 00 00 00 ld hl, 0
|
|
106 D1:A9B4 54 - - - ld d, h
|
|
107 D1:A9B5 5D - - - ld e, l
|
|
108 D1:A9B6 - - - - mul32by8loop:
|
|
109 D1:A9B6 29 - - - add hl, hl
|
|
110 D1:A9B7 CB 13 - - rl e
|
|
111 D1:A9B9 CB 12 - - rl d
|
|
112 D1:A9BB 17 - - - rla
|
|
113 D1:A9BC 30 0A - - jr nc, mul32by8noAdd
|
|
114 D1:A9BE C1 - - - pop bc
|
|
115 D1:A9BF 09 - - - add hl, bc
|
|
116 D1:A9C0 E3 - - - ex (sp), hl
|
|
117 D1:A9C1 E5 - - - push hl
|
|
118 D1:A9C2 ED 5A - - adc hl, de
|
|
119 D1:A9C4 D1 - - - pop de
|
|
120 D1:A9C5 EB - - - ex de, hl
|
|
121 D1:A9C6 E3 - - - ex (sp), hl
|
|
122 D1:A9C7 C5 - - - push bc
|
|
123 D1:A9C8 - - - - mul32by8noAdd:
|
|
124 D1:A9C8 DD 2D - - dec ixl
|
|
125 D1:A9CA 20 EA - - jr nz, mul32by8loop
|
|
126 D1:A9CC C1 - - - pop bc
|
|
127 D1:A9CD C1 - - - pop bc
|
|
128 D1:A9CE DD E1 C1 - pop ix \ pop bc
|
|
129 D1:A9D1 C9 - - - ret
|
|
130 D1:A9D2 - - - -
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/std/std.inc"
|
|
2 D1:A9D2 - - - - #include "includes/lib/std/Random.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/std/Random.asm"
|
|
1 D1:A9D2 - - - - ;;randomint
|
|
2 D1:A9D2 - - - - ;;Gets an 8-bit random number.
|
|
3 D1:A9D2 - - - - ;;Inputs:
|
|
4 D1:A9D2 - - - - ;; A: Seed
|
|
5 D1:A9D2 - - - - ;;Outputs:
|
|
6 D1:A9D2 - - - - ;; A: Random number (0-255)
|
|
7 D1:A9D2 - - - - ;;Notes:
|
|
8 D1:A9D2 - - - - ;; This is not cryptographically random.
|
|
9 D1:A9D2 - - - - randomint:
|
|
10 D1:A9D2 32 25 AA D1 ld (randomintSeed), a
|
|
11 D1:A9D6 E5 - - - push hl
|
|
12 D1:A9D7 D5 - - - push de
|
|
13 D1:A9D8 C5 - - - push bc
|
|
14 D1:A9D9 2A 25 AA D1 ld hl, (randomintSeed)
|
|
15 D1:A9DD ED 5B 27 AA
|
|
D1 - - - ld de, (randomintSeed+2)
|
|
16 D1:A9E2 44 - - - ld b, h
|
|
17 D1:A9E3 4D - - - ld c, l
|
|
18 D1:A9E4 29 CB 13 CB
|
|
12 - - - add hl, hl \ rl e \ rl d
|
|
19 D1:A9E9 29 CB 13 CB
|
|
12 - - - add hl, hl \ rl e \ rl d
|
|
20 D1:A9EE 2C - - - inc l
|
|
21 D1:A9EF 09 - - - add hl, bc
|
|
22 D1:A9F0 22 25 AA D1 ld (randomintSeed), hl
|
|
23 D1:A9F4 2A 27 AA D1 ld hl, (randomintSeed+2)
|
|
24 D1:A9F8 ED 5A - - adc hl, de
|
|
25 D1:A9FA 22 28 AA D1 ld (randomintSeed+3), hl
|
|
26 D1:A9FE EB - - - ex de, hl
|
|
27 D1:A9FF 2A 25 AA D1 ld hl, (randomintSeed)
|
|
28 D1:AA03 ED 5B 29 AA
|
|
D1 - - - ld de, (randomintSeed+4)
|
|
29 D1:AA08 01 5E F9 00 ld bc, 63838
|
|
30 D1:AA0C 29 CB 11 CB
|
|
10 - - - add hl, hl \ rl c \ rl b
|
|
31 D1:AA11 ED 43 2B AA
|
|
D1 - - - ld (randomintSeed+6), bc
|
|
32 D1:AA16 9F - - - sbc a, a
|
|
33 D1:AA17 E6 F1 - - and %11110001
|
|
34 D1:AA19 AD - - - xor l
|
|
35 D1:AA1A 6F - - - ld l, a
|
|
36 D1:AA1B 22 2C AA D1 ld (randomintSeed+7), hl
|
|
37 D1:AA1F 7A - - - ld a, d
|
|
38 D1:AA20 80 - - - add a, b
|
|
39 D1:AA21 C1 - - - pop bc
|
|
40 D1:AA22 D1 - - - pop de
|
|
41 D1:AA23 E1 - - - pop hl
|
|
42 D1:AA24 C9 - - - ret
|
|
43 D1:AA25 - - - - ;Actual random bytes
|
|
44 D1:AA25 28 BE B3 BB
|
|
A3 F1 97 AF
|
|
87 50 26 91
|
|
46 CC 5F C7 randomintSeed: .db $28, $BE, $B3, $BB, $a3, $f1, $97, $af, $87, $50, $26, $91, $46, $cc, $5f, $c7
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/std/std.inc"
|
|
3 D1:AA35 - - - - #include "includes/lib/std/Byte.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/std/Byte.asm"
|
|
1 D1:AA35 - - - - ;;bytecmp
|
|
2 D1:AA35 - - - - ;;Determines if two bytes are equal.
|
|
3 D1:AA35 - - - - ;;Inputs:
|
|
4 D1:AA35 - - - - ;; HL: Byte pointer
|
|
5 D1:AA35 - - - - ;; DE: Byte pointer
|
|
6 D1:AA35 - - - - ;;Outputs:
|
|
7 D1:AA35 - - - - ;; Z: Set if equal, reset if not equal
|
|
8 D1:AA35 - - - - bytecmp:
|
|
9 D1:AA35 E5 - - - push hl
|
|
10 D1:AA36 D5 - - - push de
|
|
11 D1:AA37 1A - - - ld a, (de)
|
|
12 D1:AA38 B7 - - - or a
|
|
13 D1:AA39 BE - - - cp (hl)
|
|
14 D1:AA3A D1 - - - pop de
|
|
15 D1:AA3B E1 - - - pop hl
|
|
16 D1:AA3C C9 - - - ret
|
|
17 D1:AA3D - - - -
|
|
18 D1:AA3D - - - - ;;bytecpy
|
|
19 D1:AA3D - - - - ;; Copies a byte.
|
|
20 D1:AA3D - - - - ;;Inputs:
|
|
21 D1:AA3D - - - - ;; HL: Byte pointer
|
|
22 D1:AA3D - - - - ;; DE: Destination
|
|
23 D1:AA3D - - - - bytecpy:
|
|
24 D1:AA3D D5 - - - push de
|
|
25 D1:AA3E E5 - - - push hl
|
|
26 D1:AA3F EB - - - ex de, hl
|
|
27 D1:AA40 1A - - - ld a, (de)
|
|
28 D1:AA41 77 - - - ld (hl), a
|
|
29 D1:AA42 E1 - - - pop hl
|
|
30 D1:AA43 D1 - - - pop de
|
|
31 D1:AA44 C9 - - - ret
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/std/std.inc"
|
|
4 D1:AA45 - - - - #include "includes/lib/std/Mem.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/std/Mem.asm"
|
|
1 D1:AA45 - - - - ;;memset
|
|
2 D1:AA45 - - - - ;;Fills B amount of bytes from hl with a
|
|
3 D1:AA45 - - - - ;;Inputs:
|
|
4 D1:AA45 - - - - ;; HL: start
|
|
5 D1:AA45 - - - - ;; B: how many bytes
|
|
6 D1:AA45 - - - - ;; A: Byte
|
|
7 D1:AA45 - - - - memset:
|
|
8 D1:AA45 E5 - - - push hl
|
|
9 D1:AA46 C5 - - - push bc
|
|
10 D1:AA47 - - - - memsetLoop:
|
|
11 D1:AA47 77 - - - ld (hl), a
|
|
12 D1:AA48 23 - - - inc hl
|
|
13 D1:AA49 10 FC - - djnz memsetLoop
|
|
14 D1:AA4B C1 - - - pop bc
|
|
15 D1:AA4C E1 - - - pop hl
|
|
16 D1:AA4D C9 - - - ret
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/std/std.inc"
|
|
5 D1:AA4E - - - - #include "includes/lib/std/Char.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/std/Char.asm"
|
|
1 D1:AA4E - - - - #include "includes/tables/CSC.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/tables/CSC.asm"
|
|
1 D1:AA4E - - - - charMapCSC:
|
|
2 D1:AA4E 22 57 52 4D
|
|
48 FF FF - .DB "\"WRMH", $FF, $FF
|
|
3 D1:AA55 3F 5B 56 51
|
|
4C 47 FF FF .DB Lquestion, Ltheta, "VQLG", $FF, $FF
|
|
4 D1:AA5D 3A 5A 55 50
|
|
4B 46 43 FF .DB ":ZUPKFC", $FF
|
|
5 D1:AA65 20 59 54 4F
|
|
4A 45 42 FF .DB " YTOJEB", $FF
|
|
6 D1:AA6D FF 58 53 4E
|
|
49 44 41 - .DB $FF, "XSNIDA"
|
|
7 D1:AA74 - - - -
|
|
8 D1:AA74 - - - - numsymMapCSC
|
|
9 D1:AA74 2B 2D 2A 2F
|
|
5E FF FF - .DB "+-*/^", $FF, $FF
|
|
10 D1:AA7B 5F 33 36 39
|
|
29 C1 5D FF .DB "_369)", $C1, "]", $FF
|
|
11 D1:AA83 2E 32 35 38
|
|
28 7B 7D 3B .DB ".258({};"
|
|
12 D1:AA8B 30 31 34 37
|
|
2C 20 3C 3E
|
|
7C FF - - .DB "0147, <>|", $FF
|
|
13 D1:AA95 05 21 40 23
|
|
25 26 - - .DB $05, "!@#%&"
|
|
14 D1:AA9B - - - -
|
|
15 D1:AA9B - - - - numMapCSC
|
|
16 D1:AA9B FF FF FF FF
|
|
FF FF FF - .DB $FF, $FF, $FF, $FF, $FF, $FF, $FF
|
|
17 D1:AAA2 FF 33 36 39
|
|
FF FF FF FF .DB $FF, "369", $FF, $FF, $FF, $FF
|
|
18 D1:AAAA FF 32 35 38
|
|
FF FF FF FF .DB $FF, "258", $FF, $FF, $FF, $FF
|
|
19 D1:AAB2 30 31 34 37
|
|
FF FF FF FF
|
|
FF FF - - .DB "0147", $FF, $FF, $FF, $FF, $FF, $FF
|
|
20 D1:AABC FF FF FF FF
|
|
FF FF - - .DB $FF, $FF, $FF, $FF, $FF, $FF
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/std/Char.asm"
|
|
2 D1:AAC2 - - - - ;;chartoascii
|
|
3 D1:AAC2 - - - - ;;Converts a char to "ascii"
|
|
4 D1:AAC2 - - - - ;;Inputs:
|
|
5 D1:AAC2 - - - - ;; A: char code (csc)
|
|
6 D1:AAC2 - - - - ;;Outputs:
|
|
7 D1:AAC2 - - - - ;; A: ascii char
|
|
8 D1:AAC2 - - - - chartoascii:
|
|
9 D1:AAC2 E5 - - - push hl
|
|
10 D1:AAC3 21 00 00 00 ld hl, 0
|
|
11 D1:AAC7 26 00 - - ld h, 0
|
|
12 D1:AAC9 6F - - - ld l, a
|
|
13 D1:AACA 11 4E AA D1 ld de, charMapCSC
|
|
14 D1:AACE 19 - - - add hl, de
|
|
15 D1:AACF 7E - - - ld a, (hl)
|
|
16 D1:AAD0 E1 - - - pop hl
|
|
17 D1:AAD1 C9 - - - ret
|
|
18 D1:AAD2 - - - -
|
|
19 D1:AAD2 - - - - ;;Charnumtoascii
|
|
20 D1:AAD2 - - - - ;;Converts a char to "ascii"
|
|
21 D1:AAD2 - - - - ;;Inputs:
|
|
22 D1:AAD2 - - - - ;; A: char code (csc)
|
|
23 D1:AAD2 - - - - ;;Outputs:
|
|
24 D1:AAD2 - - - - ;; A: ascii char
|
|
25 D1:AAD2 - - - - charnumtoascii:
|
|
26 D1:AAD2 E5 - - - push hl
|
|
27 D1:AAD3 21 00 00 00 ld hl, 0
|
|
28 D1:AAD7 26 00 - - ld h, 0
|
|
29 D1:AAD9 6F - - - ld l, a
|
|
30 D1:AADA 11 9B AA D1 ld de, numMapCSC
|
|
31 D1:AADE 19 - - - add hl, de
|
|
32 D1:AADF 7E - - - ld a, (hl)
|
|
33 D1:AAE0 E1 - - - pop hl
|
|
34 D1:AAE1 C9 - - - ret
|
|
35 D1:AAE2 - - - -
|
|
36 D1:AAE2 - - - - ;;charnumsymtoascii
|
|
37 D1:AAE2 - - - - ;;Converts a char to "ascii"
|
|
38 D1:AAE2 - - - - ;;Inputs:
|
|
39 D1:AAE2 - - - - ;; A: char code (csc)
|
|
40 D1:AAE2 - - - - ;;Outputs:
|
|
41 D1:AAE2 - - - - ;; A: ascii char
|
|
42 D1:AAE2 - - - - charnumsymtoascii:
|
|
43 D1:AAE2 E5 - - - push hl
|
|
44 D1:AAE3 21 00 00 00 ld hl, 0
|
|
45 D1:AAE7 26 00 - - ld h, 0
|
|
46 D1:AAE9 6F - - - ld l, a
|
|
47 D1:AAEA 11 74 AA D1 ld de, numsymMapCSC
|
|
48 D1:AAEE 19 - - - add hl, de
|
|
49 D1:AAEF 7E - - - ld a, (hl)
|
|
50 D1:AAF0 E1 - - - pop hl
|
|
51 D1:AAF1 C9 - - - ret
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/std/std.inc"
|
|
6 D1:AAF2 - - - - #include "includes/lib/std/Cursor.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/std/Cursor.asm"
|
|
1 D1:AAF2 - - - - ;;cursorcharunderreset
|
|
2 D1:AAF2 - - - - ;;Sets curUnder to 0
|
|
3 D1:AAF2 - - - - cursorcurunderreset:
|
|
4 D1:AAF2 E5 - - - push hl
|
|
5 D1:AAF3 21 99 05 D0 ld hl, curUnder
|
|
6 D1:AAF7 36 20 - - ld (hl), ' '
|
|
7 D1:AAF9 E1 - - - pop hl
|
|
8 D1:AAFA C9 - - - ret
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/std/std.inc"
|
|
7 D1:AAFB - - - - #include "includes/lib/std/Print.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/std/Print.asm"
|
|
1 D1:AAFB - - - - ;;printprompt
|
|
2 D1:AAFB - - - - ;;Sets curcol to 0 and prints prompt
|
|
3 D1:AAFB - - - - ;;Inputs:
|
|
4 D1:AAFB - - - - ;; HL: Prompt String Location
|
|
5 D1:AAFB - - - - printprompt:
|
|
6 D1:AAFB E5 - - - push hl
|
|
7 D1:AAFC AF - - - xor a
|
|
8 D1:AAFD 32 96 05 D0 ld (CurCol), a
|
|
9 D1:AB01 CD C0 07 02 call _PutS
|
|
10 D1:AB05 E1 - - - pop hl
|
|
11 D1:AB06 C9 - - - ret
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/std/std.inc"
|
|
8 D1:AB07 - - - - #include "includes/lib/std/Draw.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/std/Draw.asm"
|
|
1 D1:AB07 - - - - ;;drawpixel
|
|
2 D1:AB07 - - - - ;;Sets a pixel to specified color (565)
|
|
3 D1:AB07 - - - - ;;Inputs:
|
|
4 D1:AB07 - - - - ;; HL: color
|
|
5 D1:AB07 - - - - ;; DE: vRam location
|
|
6 D1:AB07 - - - - drawpixel:
|
|
7 D1:AB07 E5 - - - push hl
|
|
8 D1:AB08 D5 - - - push de
|
|
9 D1:AB09 EB - - - ex de, hl
|
|
10 D1:AB0A 73 - - - ld (hl), e
|
|
11 D1:AB0B 23 - - - inc hl
|
|
12 D1:AB0C 72 - - - ld (hl), d
|
|
13 D1:AB0D D1 - - - pop de
|
|
14 D1:AB0E E1 - - - pop hl
|
|
15 D1:AB0F C9 - - - ret
|
|
16 D1:AB10 - - - -
|
|
17 D1:AB10 - - - - ;;drawpixelxy
|
|
18 D1:AB10 - - - - ;;Sets a pixel to specified color
|
|
19 D1:AB10 - - - - ;;Inputs:
|
|
20 D1:AB10 - - - - ;; HL: color
|
|
21 D1:AB10 - - - - ;; DE: x
|
|
22 D1:AB10 - - - - ;; A: y
|
|
23 D1:AB10 - - - - drawpixelxy
|
|
24 D1:AB10 D5 - - - push de
|
|
25 D1:AB11 E5 - - - push hl
|
|
26 D1:AB12 EB - - - ex de, hl
|
|
27 D1:AB13 29 - - - add hl, hl
|
|
28 D1:AB14 E5 - - - push hl
|
|
29 D1:AB15 21 80 02 00 ld hl, 640
|
|
30 D1:AB19 CD 87 A9 D1 call mulAbyHL
|
|
31 D1:AB1D EB - - - ex de, hl
|
|
32 D1:AB1E E1 - - - pop hl
|
|
33 D1:AB1F 19 - - - add hl, de
|
|
34 D1:AB20 11 00 00 D4 ld de, vRam
|
|
35 D1:AB24 19 - - - add hl, de
|
|
36 D1:AB25 EB - - - ex de, hl
|
|
37 D1:AB26 E1 - - - pop hl
|
|
38 D1:AB27 CD 07 AB D1 call drawpixel
|
|
39 D1:AB2B D1 - - - pop de
|
|
40 D1:AB2C C9 - - - ret
|
|
41 D1:AB2D - - - -
|
|
42 D1:AB2D - - - - ;;drawrow
|
|
43 D1:AB2D - - - - ;;Draws a row on lcd
|
|
44 D1:AB2D - - - - ;;Inputs:
|
|
45 D1:AB2D - - - - ;; A: y
|
|
46 D1:AB2D - - - - ;; HL: color
|
|
47 D1:AB2D - - - - drawrow:
|
|
48 D1:AB2D E5 - - - push hl
|
|
49 D1:AB2E C5 - - - push bc
|
|
50 D1:AB2F E5 - - - push hl
|
|
51 D1:AB30 21 E0 01 00 ld hl, lcdHeight * 2
|
|
52 D1:AB34 CD 87 A9 D1 call mulAbyHL
|
|
53 D1:AB38 11 00 00 D4 ld de, vRam
|
|
54 D1:AB3C 19 - - - add hl, de
|
|
55 D1:AB3D EB - - - ex de, hl
|
|
56 D1:AB3E E1 - - - pop hl
|
|
57 D1:AB3F 01 40 01 00 ld bc, lcdWidth
|
|
58 D1:AB43 - - - - drawrowLoop:
|
|
59 D1:AB43 CD 07 AB D1 call drawpixel
|
|
60 D1:AB47 13 - - - inc de
|
|
61 D1:AB48 13 - - - inc de
|
|
62 D1:AB49 0B - - - dec bc
|
|
63 D1:AB4A E5 - - - push hl
|
|
64 D1:AB4B 21 00 00 00 ld hl, 0
|
|
65 D1:AB4F CD 72 A9 D1 call cpHLBC
|
|
66 D1:AB53 E1 - - - pop hl
|
|
67 D1:AB54 20 ED - - jr nz, drawrowLoop
|
|
68 D1:AB56 C1 - - - pop bc
|
|
69 D1:AB57 E1 - - - pop hl
|
|
70 D1:AB58 C9 - - - ret
|
|
71 D1:AB59 - - - -
|
|
72 D1:AB59 - - - - ;;drawbar
|
|
73 D1:AB59 - - - - ;;Loops drawing row
|
|
74 D1:AB59 - - - - ;;Inputs:
|
|
75 D1:AB59 - - - - ;; A: y
|
|
76 D1:AB59 - - - - ;; [B]C: height
|
|
77 D1:AB59 - - - - ;; HL: color
|
|
78 D1:AB59 - - - - drawbar:
|
|
79 D1:AB59 C5 - - - push bc
|
|
80 D1:AB5A - - - - drawbarLoop:
|
|
81 D1:AB5A CD 2D AB D1 call drawrow
|
|
82 D1:AB5E 0B - - - dec bc
|
|
83 D1:AB5F 3C - - - inc a
|
|
84 D1:AB60 E5 - - - push hl
|
|
85 D1:AB61 21 00 00 00 ld hl, 0
|
|
86 D1:AB65 CD 72 A9 D1 call cpHLBC
|
|
87 D1:AB69 E1 - - - pop hl
|
|
88 D1:AB6A 20 EE - - jr nz, drawbarLoop
|
|
89 D1:AB6C C1 - - - pop bc
|
|
90 D1:AB6D C9 - - - ret
|
|
91 D1:AB6E - - - -
|
|
92 D1:AB6E - - - - ;;drawrectfilled
|
|
93 D1:AB6E - - - - ;;Draws a rectangle from coordinates (Slow)
|
|
94 D1:AB6E - - - - ;;Inputs:
|
|
95 D1:AB6E - - - - ;; DE: x
|
|
96 D1:AB6E - - - - ;; C: y
|
|
97 D1:AB6E - - - - ;; HL: width
|
|
98 D1:AB6E - - - - ;; A: height
|
|
99 D1:AB6E - - - - ;; IXH+IXL: color
|
|
100 D1:AB6E - - - - drawrectfilled:
|
|
101 D1:AB6E 19 - - - add hl, de
|
|
102 D1:AB6F 81 - - - add a, c
|
|
103 D1:AB70 47 - - - ld b, a
|
|
104 D1:AB71 - - - - drawrectfilledLoopY:
|
|
105 D1:AB71 D5 - - - push de
|
|
106 D1:AB72 - - - - drawrectfilledLoopX:
|
|
107 D1:AB72 E5 - - - push hl
|
|
108 D1:AB73 C5 - - - push bc
|
|
109 D1:AB74 EB - - - ex de, hl
|
|
110 D1:AB75 DD 54 - - ld d, ixh
|
|
111 D1:AB77 DD 5D - - ld e, ixl
|
|
112 D1:AB79 EB - - - ex de, hl
|
|
113 D1:AB7A 79 - - - ld a, c
|
|
114 D1:AB7B CD 10 AB D1 call drawpixelxy
|
|
115 D1:AB7F C1 - - - pop bc
|
|
116 D1:AB80 E1 - - - pop hl
|
|
117 D1:AB81 13 - - - inc de
|
|
118 D1:AB82 CD 6D A9 D1 call cpHLDE
|
|
119 D1:AB86 20 EA - - jr nz, drawrectfilledLoopX
|
|
120 D1:AB88 D1 - - - pop de
|
|
121 D1:AB89 0C - - - inc c
|
|
122 D1:AB8A 78 - - - ld a, b
|
|
123 D1:AB8B B9 - - - cp c
|
|
124 D1:AB8C 20 E3 - - jr nz, drawrectfilledLoopY
|
|
125 D1:AB8E C9 - - - ret
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/std/std.inc"
|
|
9 D1:AB8F - - - - #include "includes/lib/std/Array.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/std/Array.asm"
|
|
1 D1:AB8F - - - - ;;array2d
|
|
2 D1:AB8F - - - - ;;gets the address of 2d array
|
|
3 D1:AB8F - - - - ;;Inputs:
|
|
4 D1:AB8F - - - - ;; H: y
|
|
5 D1:AB8F - - - - ;; L: x width
|
|
6 D1:AB8F - - - - ;; B: x
|
|
7 D1:AB8F - - - - ;; DE: Array start
|
|
8 D1:AB8F - - - - ;;Outputs:
|
|
9 D1:AB8F - - - - ;; DE: Array loc address
|
|
10 D1:AB8F - - - - array2d:
|
|
11 D1:AB8F E5 - - - push hl
|
|
12 D1:AB90 ED 6C - - mlt hl
|
|
13 D1:AB92 19 - - - add hl, de
|
|
14 D1:AB93 11 00 00 00 ld de, 0
|
|
15 D1:AB97 58 - - - ld e, b
|
|
16 D1:AB98 19 - - - add hl, de
|
|
17 D1:AB99 EB - - - ex de, hl
|
|
18 D1:AB9A E1 - - - pop hl
|
|
19 D1:AB9B C9 - - - ret
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/std/std.inc"
|
|
10 D1:AB9C - - - - #include "includes/lib/std/Hex.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/std/Hex.asm"
|
|
1 D1:AB9C - - - - ;;bytetohexstr
|
|
2 D1:AB9C - - - - ;;converts byte to hex string
|
|
3 D1:AB9C - - - - ;;Inputs:
|
|
4 D1:AB9C - - - - ;; A: input byte
|
|
5 D1:AB9C - - - - ;;Outputs:
|
|
6 D1:AB9C - - - - ;; hl: output string location
|
|
7 D1:AB9C - - - - bytetohexstr:
|
|
8 D1:AB9C E5 - - - push hl
|
|
9 D1:AB9D C5 - - - push bc
|
|
10 D1:AB9E 01 00 00 00 ld bc, 0
|
|
11 D1:ABA2 4F - - - ld c, a
|
|
12 D1:ABA3 06 0F - - ld b, $0F
|
|
13 D1:ABA5 A0 - - - and a, b
|
|
14 D1:ABA6 47 - - - ld b, a
|
|
15 D1:ABA7 79 - - - ld a, c
|
|
16 D1:ABA8 48 - - - ld c, b
|
|
17 D1:ABA9 06 00 - - ld b, 0
|
|
18 D1:ABAB 21 E5 AB D1 ld hl, hexLUT
|
|
19 D1:ABAF 09 - - - add hl, bc
|
|
20 D1:ABB0 46 - - - ld b, (hl)
|
|
21 D1:ABB1 21 E2 AB D1 ld hl, bytetohexstrBuf + 1
|
|
22 D1:ABB5 70 - - - ld (hl), b
|
|
23 D1:ABB6 C1 - - - pop bc
|
|
24 D1:ABB7 C5 - - - push bc
|
|
25 D1:ABB8 01 00 00 00 ld bc, 0
|
|
26 D1:ABBC CB 3F - - srl a
|
|
27 D1:ABBE CB 3F - - srl a
|
|
28 D1:ABC0 CB 3F - - srl a
|
|
29 D1:ABC2 CB 3F - - srl a
|
|
30 D1:ABC4 47 - - - ld b, a
|
|
31 D1:ABC5 79 - - - ld a, c
|
|
32 D1:ABC6 48 - - - ld c, b
|
|
33 D1:ABC7 06 00 - - ld b, 0
|
|
34 D1:ABC9 21 E5 AB D1 ld hl, hexLUT
|
|
35 D1:ABCD 09 - - - add hl, bc
|
|
36 D1:ABCE 46 - - - ld b, (hl)
|
|
37 D1:ABCF 21 E1 AB D1 ld hl, bytetohexstrBuf
|
|
38 D1:ABD3 70 - - - ld (hl), b
|
|
39 D1:ABD4 C1 - - - pop bc
|
|
40 D1:ABD5 21 E3 AB D1 ld hl, bytetohexstrBuf + 2
|
|
41 D1:ABD9 36 00 - - ld (hl), $00
|
|
42 D1:ABDB E1 - - - pop hl
|
|
43 D1:ABDC 21 E1 AB D1 ld hl, bytetohexstrBuf
|
|
44 D1:ABE0 C9 - - - ret
|
|
45 D1:ABE1 - - - -
|
|
46 D1:ABE1 00 00 00 00 bytetohexstrBuf: .db $00, $00, $00, $00
|
|
47 D1:ABE5 - - - -
|
|
48 D1:ABE5 - - - - #include "includes/tables/hexLUT.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/tables/hexLUT.asm"
|
|
1 D1:ABE5 30 31 32 33
|
|
34 35 36 37
|
|
38 39 41 42
|
|
43 44 45 46
|
|
00 - - - hexLUT: .db "0123456789ABCDEF", 0
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/std/Hex.asm"
|
|
49 D1:ABF6 - - - -
|
|
50 D1:ABF6 - - - - ;;hexToA
|
|
51 D1:ABF6 - - - - ;;Converts a hexadecimal string to a number.
|
|
52 D1:ABF6 - - - - ;;Inputs:
|
|
53 D1:ABF6 - - - - ;; HL: String pointer
|
|
54 D1:ABF6 - - - - ;;Outputs:
|
|
55 D1:ABF6 - - - - ;; A: Value
|
|
56 D1:ABF6 - - - - hexToA:
|
|
57 D1:ABF6 C5 - - - push bc
|
|
58 D1:ABF7 E5 - - - push hl
|
|
59 D1:ABF8 06 00 - - ld b, 0
|
|
60 D1:ABFA 7E - - - _: ld a, (hl)
|
|
61 D1:ABFB B7 - - - or a
|
|
62 D1:ABFC 28 11 - - jr z, hexToA_ret
|
|
63 D1:ABFE CB 10 CB 10
|
|
CB 10 CB 10 rl b \ rl b \ rl b \ rl b
|
|
64 D1:AC06 CD 13 AC D1 call hexToA_doConvert
|
|
65 D1:AC0A B0 - - - or b
|
|
66 D1:AC0B 47 - - - ld b, a
|
|
67 D1:AC0C 23 - - - inc hl
|
|
68 D1:AC0D 18 EB - - jr -_
|
|
69 D1:AC0F - - - - hexToA_ret:
|
|
70 D1:AC0F 78 - - - ld a, b
|
|
71 D1:AC10 E1 - - - pop hl
|
|
72 D1:AC11 C1 - - - pop bc
|
|
73 D1:AC12 C9 - - - ret
|
|
74 D1:AC13 - - - -
|
|
75 D1:AC13 - - - - hexToA_doConvert:
|
|
76 D1:AC13 FE 61 - - cp 'a' ; Convert to lowercase
|
|
77 D1:AC15 38 02 - - jr c, _
|
|
78 D1:AC17 D6 20 - - sub 'a' - 'A'
|
|
79 D1:AC19 FE 41 - - _: cp 'A' ; Close gap between numbers and letter
|
|
80 D1:AC1B 38 02 - - jr c, _
|
|
81 D1:AC1D D6 07 - - sub 'A'-('9'+1)
|
|
82 D1:AC1F D6 30 - - _: sub '0' ; To number
|
|
83 D1:AC21 C9 - - - ret
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/std/std.inc"
|
|
11 D1:AC22 - - - -
|
|
12 D1:AC22 - - - - #include "includes/lib/std/String.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/std/String.asm"
|
|
1 D1:AC22 - - - - ;;strlen
|
|
2 D1:AC22 - - - - ;;Determines the length of a zero delimited string.
|
|
3 D1:AC22 - - - - ;;Inputs:
|
|
4 D1:AC22 - - - - ;; HL: String pointer
|
|
5 D1:AC22 - - - - ;;Outputs:
|
|
6 D1:AC22 - - - - ;; BC: String length
|
|
7 D1:AC22 - - - - strlen:
|
|
8 D1:AC22 F5 - - - push af
|
|
9 D1:AC23 E5 - - - push hl
|
|
10 D1:AC24 AF - - - xor a
|
|
11 D1:AC25 47 - - - ld b, a
|
|
12 D1:AC26 4F - - - ld c, a
|
|
13 D1:AC27 ED B1 - - cpir
|
|
14 D1:AC29 - - - - ; bc = -bc
|
|
15 D1:AC29 AF 91 4F 9F
|
|
90 47 - - xor a \ sub c \ ld c, a \ sbc a, a \ sub b \ ld b, a
|
|
16 D1:AC2F 0B - - - dec bc
|
|
17 D1:AC30 E1 - - - pop hl
|
|
18 D1:AC31 F1 - - - pop af
|
|
19 D1:AC32 C9 - - - ret
|
|
20 D1:AC33 - - - -
|
|
21 D1:AC33 - - - - ;;strcmp
|
|
22 D1:AC33 - - - - ;;Determines if two strings are equal, and checks alphabetical sort order.
|
|
23 D1:AC33 - - - - ;;Inputs:
|
|
24 D1:AC33 - - - - ;; HL: String pointer
|
|
25 D1:AC33 - - - - ;; DE: String pointer
|
|
26 D1:AC33 - - - - ;;Outputs:
|
|
27 D1:AC33 - - - - ;; Z: Set if equal, reset if not equal
|
|
28 D1:AC33 - - - - ;; C: Set if string HL is alphabetically earlier than string DE
|
|
29 D1:AC33 - - - - strcmp:
|
|
30 D1:AC33 E5 - - - push hl
|
|
31 D1:AC34 D5 - - - push de
|
|
32 D1:AC35 - - - - strcmpLoop:
|
|
33 D1:AC35 1A - - - ld a, (de)
|
|
34 D1:AC36 B7 - - - or a
|
|
35 D1:AC37 28 07 - - jr z, strCmpEnd
|
|
36 D1:AC39 BE - - - cp (hl)
|
|
37 D1:AC3A 20 06 - - jr nz, strcmpExit
|
|
38 D1:AC3C 23 - - - inc hl
|
|
39 D1:AC3D 13 - - - inc de
|
|
40 D1:AC3E 18 F5 - - jr strcmpLoop
|
|
41 D1:AC40 - - - - strcmpEnd:
|
|
42 D1:AC40 7E - - - ld a, (hl)
|
|
43 D1:AC41 B7 - - - or a
|
|
44 D1:AC42 - - - - strcmpExit:
|
|
45 D1:AC42 3F - - - ccf
|
|
46 D1:AC43 D1 - - - pop de
|
|
47 D1:AC44 E1 - - - pop hl
|
|
48 D1:AC45 C9 - - - ret
|
|
49 D1:AC46 - - - -
|
|
50 D1:AC46 - - - - ;;strcpy
|
|
51 D1:AC46 - - - - ;;Copies a string.
|
|
52 D1:AC46 - - - - ;;Inputs:
|
|
53 D1:AC46 - - - - ;; HL: String pointer
|
|
54 D1:AC46 - - - - ;; DE: Destination
|
|
55 D1:AC46 - - - - ;;Notes:
|
|
56 D1:AC46 - - - - ;; This will trample into undefined territory if you try to copy a string into some
|
|
57 D1:AC46 - - - - ;;allocated memory it won't fit in.
|
|
58 D1:AC46 - - - - strcpy:
|
|
59 D1:AC46 D5 - - - push de
|
|
60 D1:AC47 E5 - - - push hl
|
|
61 D1:AC48 EB - - - ex de, hl
|
|
62 D1:AC49 1A - - - _: ld a, (de)
|
|
63 D1:AC4A 77 - - - ld (hl), a
|
|
64 D1:AC4B B7 - - - or a
|
|
65 D1:AC4C 28 04 - - jr z, _
|
|
66 D1:AC4E 23 13 - - inc hl \ inc de
|
|
67 D1:AC50 18 F7 - - jr -_
|
|
68 D1:AC52 E1 - - - _: pop hl
|
|
69 D1:AC53 D1 - - - pop de
|
|
70 D1:AC54 C9 - - - ret
|
|
71 D1:AC55 - - - -
|
|
72 D1:AC55 - - - - ;;strchr
|
|
73 D1:AC55 - - - - ;;Returns a pointer on the first occurence of a character in a string.
|
|
74 D1:AC55 - - - - ;;Inputs:
|
|
75 D1:AC55 - - - - ;; HL: Haystack
|
|
76 D1:AC55 - - - - ;; B: Needle
|
|
77 D1:AC55 - - - - ;;Outputs:
|
|
78 D1:AC55 - - - - ;; HL: Pointer to first occurence of character
|
|
79 D1:AC55 - - - - ;; Z: Set if character found
|
|
80 D1:AC55 - - - - ;; A: Destroyed
|
|
81 D1:AC55 - - - - strchr:
|
|
82 D1:AC55 - - - - strchrLoop:
|
|
83 D1:AC55 7E - - - ld a, (hl)
|
|
84 D1:AC56 B7 - - - or a
|
|
85 D1:AC57 28 05 - - jr z, strchrNoCharFound
|
|
86 D1:AC59 B8 - - - cp b
|
|
87 D1:AC5A C8 - - - ret z
|
|
88 D1:AC5B 23 - - - inc hl
|
|
89 D1:AC5C 18 F7 - - jr strchrLoop
|
|
90 D1:AC5E - - - - strchrNoCharFound:
|
|
91 D1:AC5E 3C - - - inc a
|
|
92 D1:AC5F C9 - - - ret
|
|
93 D1:AC60 - - - -
|
|
94 D1:AC60 - - - - ;;strtob
|
|
95 D1:AC60 - - - - ;;Converts a string to a byte
|
|
96 D1:AC60 - - - - ;;Inputs:
|
|
97 D1:AC60 - - - - ;; HL: string pointer
|
|
98 D1:AC60 - - - - ;;Outputs:
|
|
99 D1:AC60 - - - - ;; A: byte
|
|
100 D1:AC60 - - - - strtob:
|
|
101 D1:AC60 C5 - - - push bc
|
|
102 D1:AC61 D5 - - - push de
|
|
103 D1:AC62 0E 00 - - ld c, 0
|
|
104 D1:AC64 - - - - strtobNumFind:
|
|
105 D1:AC64 7E - - - ld a, (hl)
|
|
106 D1:AC65 FE 00 - - cp $00
|
|
107 D1:AC67 CA B9 AC D1 jp z, strtobEXIT
|
|
108 D1:AC6B 0E 00 - - ld c, 0
|
|
109 D1:AC6D D6 31 - - sub '1'
|
|
110 D1:AC6F FE 3A - - cp '9' + 1
|
|
111 D1:AC71 38 03 - - jr c, strtobNumWhile
|
|
112 D1:AC73 23 - - - inc hl
|
|
113 D1:AC74 18 EE - - jr strtobNumFind
|
|
114 D1:AC76 - - - - strtobNumWhile:
|
|
115 D1:AC76 E5 - - - push hl
|
|
116 D1:AC77 - - - - strtobNumWhileLoop:
|
|
117 D1:AC77 79 - - - ld a, c
|
|
118 D1:AC78 FE 03 - - cp 3
|
|
119 D1:AC7A D2 8B AC D1 jp nc, strtobConvert
|
|
120 D1:AC7E 7E - - - ld a, (hl)
|
|
121 D1:AC7F D6 2F - - sub '0' - 1
|
|
122 D1:AC81 38 08 - - jr c, strtobConvert
|
|
123 D1:AC83 FE 3A - - cp '9' + 1
|
|
124 D1:AC85 30 04 - - jr nc, strtobConvert
|
|
125 D1:AC87 23 - - - inc hl
|
|
126 D1:AC88 0C - - - inc c
|
|
127 D1:AC89 18 EC - - jr strtobNumWhileLoop
|
|
128 D1:AC8B - - - - strtobConvert:
|
|
129 D1:AC8B 2B - - - dec hl
|
|
130 D1:AC8C 7E - - - ld a, (hl)
|
|
131 D1:AC8D D6 30 - - sub '0'
|
|
132 D1:AC8F 4F - - - ld c, a
|
|
133 D1:AC90 2B - - - dec hl
|
|
134 D1:AC91 D1 - - - pop de
|
|
135 D1:AC92 CD 6D A9 D1 call cpHLDE
|
|
136 D1:AC96 DA B9 AC D1 jp c, strtobExit
|
|
137 D1:AC9A 7E - - - ld a, (hl)
|
|
138 D1:AC9B D6 30 - - sub '0'
|
|
139 D1:AC9D 06 0A - - ld b, 10
|
|
140 D1:AC9F CD 7F A9 D1 call mulAbyB
|
|
141 D1:ACA3 81 - - - add a, c
|
|
142 D1:ACA4 4F - - - ld c, a
|
|
143 D1:ACA5 2B - - - dec hl
|
|
144 D1:ACA6 CD 6D A9 D1 call cpHLDE
|
|
145 D1:ACAA DA B9 AC D1 jp c, strtobExit
|
|
146 D1:ACAE 7E - - - ld a, (hl)
|
|
147 D1:ACAF D6 30 - - sub '0'
|
|
148 D1:ACB1 06 64 - - ld b, 100
|
|
149 D1:ACB3 CD 7F A9 D1 call mulAbyB
|
|
150 D1:ACB7 81 - - - add a, c
|
|
151 D1:ACB8 4F - - - ld c, a
|
|
152 D1:ACB9 - - - - strtobExit:
|
|
153 D1:ACB9 79 - - - ld a, c
|
|
154 D1:ACBA D1 - - - pop de
|
|
155 D1:ACBB C1 - - - pop bc
|
|
156 D1:ACBC C9 - - - ret
|
|
157 D1:ACBD - - - -
|
|
158 D1:ACBD - - - - ;;strtow
|
|
159 D1:ACBD - - - - ;;Converts a string to a byte
|
|
160 D1:ACBD - - - - ;;Inputs:
|
|
161 D1:ACBD - - - - ;; HL: string pointer
|
|
162 D1:ACBD - - - - ;;Outputs:
|
|
163 D1:ACBD - - - - ;; HL: byte
|
|
164 D1:ACBD - - - - strtow:
|
|
165 D1:ACBD C5 - - - push bc
|
|
166 D1:ACBE D5 - - - push de
|
|
167 D1:ACBF 01 00 00 00 ld bc, 0
|
|
168 D1:ACC3 - - - - strtowNumFind:
|
|
169 D1:ACC3 7E - - - ld a, (hl)
|
|
170 D1:ACC4 FE 00 - - cp $00
|
|
171 D1:ACC6 CA 5C AD D1 jp z, strtowEXIT
|
|
172 D1:ACCA 0E 00 - - ld c, 0
|
|
173 D1:ACCC D6 31 - - sub '1'
|
|
174 D1:ACCE FE 3A - - cp '9' + 1
|
|
175 D1:ACD0 38 03 - - jr c, strtowNumWhile
|
|
176 D1:ACD2 23 - - - inc hl
|
|
177 D1:ACD3 18 EE - - jr strtowNumFind
|
|
178 D1:ACD5 - - - - strtowNumWhile:
|
|
179 D1:ACD5 E5 - - - push hl
|
|
180 D1:ACD6 - - - - strtowNumWhileLoop:
|
|
181 D1:ACD6 79 - - - ld a, c
|
|
182 D1:ACD7 FE 05 - - cp 5
|
|
183 D1:ACD9 D2 EA AC D1 jp nc, strtowConvert
|
|
184 D1:ACDD 7E - - - ld a, (hl)
|
|
185 D1:ACDE D6 2F - - sub '0' - 1
|
|
186 D1:ACE0 38 08 - - jr c, strtowConvert
|
|
187 D1:ACE2 FE 3A - - cp '9' + 1
|
|
188 D1:ACE4 30 04 - - jr nc, strtowConvert
|
|
189 D1:ACE6 23 - - - inc hl
|
|
190 D1:ACE7 0C - - - inc c
|
|
191 D1:ACE8 18 EC - - jr strtowNumWhileLoop
|
|
192 D1:ACEA - - - - strtowConvert:
|
|
193 D1:ACEA 01 00 00 00 ld bc, 0
|
|
194 D1:ACEE 2B - - - dec hl
|
|
195 D1:ACEF 7E - - - ld a, (hl)
|
|
196 D1:ACF0 D6 30 - - sub '0'
|
|
197 D1:ACF2 01 00 00 00 ld bc, 0
|
|
198 D1:ACF6 4F - - - ld c, a
|
|
199 D1:ACF7 2B - - - dec hl
|
|
200 D1:ACF8 - - - -
|
|
201 D1:ACF8 D1 - - - pop de
|
|
202 D1:ACF9 CD 6D A9 D1 call cpHLDE
|
|
203 D1:ACFD DA 5C AD D1 jp c, strtowExit
|
|
204 D1:AD01 7E - - - ld a, (hl)
|
|
205 D1:AD02 D6 30 - - sub '0'
|
|
206 D1:AD04 E5 - - - push hl
|
|
207 D1:AD05 21 0A 00 00 ld hl, 10
|
|
208 D1:AD09 CD 87 A9 D1 call mulAbyHL
|
|
209 D1:AD0D 09 - - - add hl, bc
|
|
210 D1:AD0E 44 - - - ld b, h
|
|
211 D1:AD0F 4D - - - ld c, l
|
|
212 D1:AD10 E1 - - - pop hl
|
|
213 D1:AD11 2B - - - dec hl
|
|
214 D1:AD12 - - - -
|
|
215 D1:AD12 CD 6D A9 D1 call cpHLDE
|
|
216 D1:AD16 DA 5C AD D1 jp c, strtowExit
|
|
217 D1:AD1A 7E - - - ld a, (hl)
|
|
218 D1:AD1B D6 30 - - sub '0'
|
|
219 D1:AD1D E5 - - - push hl
|
|
220 D1:AD1E 21 64 00 00 ld hl, 100
|
|
221 D1:AD22 CD 87 A9 D1 call mulAbyHL
|
|
222 D1:AD26 09 - - - add hl, bc
|
|
223 D1:AD27 44 - - - ld b, h
|
|
224 D1:AD28 4D - - - ld c, l
|
|
225 D1:AD29 E1 - - - pop hl
|
|
226 D1:AD2A 2B - - - dec hl
|
|
227 D1:AD2B - - - -
|
|
228 D1:AD2B CD 6D A9 D1 call cpHLDE
|
|
229 D1:AD2F DA 5C AD D1 jp c, strtowExit
|
|
230 D1:AD33 7E - - - ld a, (hl)
|
|
231 D1:AD34 D6 30 - - sub '0'
|
|
232 D1:AD36 E5 - - - push hl
|
|
233 D1:AD37 21 E8 03 00 ld hl, 1000
|
|
234 D1:AD3B CD 87 A9 D1 call mulAbyHL
|
|
235 D1:AD3F 09 - - - add hl, bc
|
|
236 D1:AD40 44 - - - ld b, h
|
|
237 D1:AD41 4D - - - ld c, l
|
|
238 D1:AD42 E1 - - - pop hl
|
|
239 D1:AD43 2B - - - dec hl
|
|
240 D1:AD44 - - - -
|
|
241 D1:AD44 CD 6D A9 D1 call cpHLDE
|
|
242 D1:AD48 DA 5C AD D1 jp c, strtowExit
|
|
243 D1:AD4C 7E - - - ld a, (hl)
|
|
244 D1:AD4D D6 30 - - sub '0'
|
|
245 D1:AD4F E5 - - - push hl
|
|
246 D1:AD50 21 10 27 00 ld hl, 10000
|
|
247 D1:AD54 CD 87 A9 D1 call mulAbyHL
|
|
248 D1:AD58 09 - - - add hl, bc
|
|
249 D1:AD59 44 - - - ld b, h
|
|
250 D1:AD5A 4D - - - ld c, l
|
|
251 D1:AD5B E1 - - - pop hl
|
|
252 D1:AD5C - - - -
|
|
253 D1:AD5C - - - - strtowExit:
|
|
254 D1:AD5C 21 00 00 00 ld hl, 0
|
|
255 D1:AD60 60 - - - ld h, b
|
|
256 D1:AD61 69 - - - ld l, c
|
|
257 D1:AD62 D1 - - - pop de
|
|
258 D1:AD63 C1 - - - pop bc
|
|
259 D1:AD64 C9 - - - ret
|
|
260 D1:AD65 - - - -
|
|
261 D1:AD65 - - - - ;;strxor
|
|
262 D1:AD65 - - - - ;;xor 2 strings together
|
|
263 D1:AD65 - - - - ;;Inputs:
|
|
264 D1:AD65 - - - - ;; HL: string 1
|
|
265 D1:AD65 - - - - ;; DE: string 2
|
|
266 D1:AD65 - - - - ;;Outputs:
|
|
267 D1:AD65 - - - - ;; HL: Xor String Pointer
|
|
268 D1:AD65 - - - - strxor:
|
|
269 D1:AD65 E5 - - - push hl
|
|
270 D1:AD66 D5 - - - push de
|
|
271 D1:AD67 EB - - - ex de, hl
|
|
272 D1:AD68 - - - - strxorLoop:
|
|
273 D1:AD68 1A - - - ld a, (de)
|
|
274 D1:AD69 B7 - - - or a, a
|
|
275 D1:AD6A 28 0A - - jr z, strxorEnd
|
|
276 D1:AD6C AE - - - xor (hl)
|
|
277 D1:AD6D B7 - - - or a, a
|
|
278 D1:AD6E 20 01 - - jr nz, strxorLoopLD
|
|
279 D1:AD70 7E - - - ld a, (hl)
|
|
280 D1:AD71 - - - - strxorLoopLD:
|
|
281 D1:AD71 12 - - - ld (de), a
|
|
282 D1:AD72 13 - - - inc de
|
|
283 D1:AD73 23 - - - inc hl
|
|
284 D1:AD74 18 F2 - - jr strxorLoop
|
|
285 D1:AD76 - - - - strxorEnd:
|
|
286 D1:AD76 D1 - - - pop de
|
|
287 D1:AD77 E1 - - - pop hl
|
|
288 D1:AD78 C9 - - - ret
|
|
289 D1:AD79 - - - -
|
|
290 D1:AD79 - - - -
|
|
291 D1:AD79 - - - - ;;toLower [Strings]
|
|
292 D1:AD79 - - - - ;;Converts every alpha character of a string to lowercase.
|
|
293 D1:AD79 - - - - ;;Inputs:
|
|
294 D1:AD79 - - - - ;; HL: Pointer to string
|
|
295 D1:AD79 - - - - ;;Notes:
|
|
296 D1:AD79 - - - - ;; This modifies the string in-place.
|
|
297 D1:AD79 - - - - ;toLower:
|
|
298 D1:AD79 - - - - ; push af \ push hl
|
|
299 D1:AD79 - - - - ; ld a, (hl)
|
|
300 D1:AD79 - - - - ; or a
|
|
301 D1:AD79 - - - - ; jr z, toLowerExit
|
|
302 D1:AD79 - - - - ; call isAlphaNum
|
|
303 D1:AD79 - - - - ; jr nc, toLowerNotUpperAlpha
|
|
304 D1:AD79 - - - - ; cp 'a'
|
|
305 D1:AD79 - - - - ; jr nc, toLowerNotUpperAlpha
|
|
306 D1:AD79 - - - - ; add a, 'a' - 'A'
|
|
307 D1:AD79 - - - - ; ld (hl), a
|
|
308 D1:AD79 - - - - ;toLowerNotUpperAlpha:
|
|
309 D1:AD79 - - - - ; inc hl
|
|
310 D1:AD79 - - - - ; jr toLower + 2
|
|
311 D1:AD79 - - - - ;toLowerExit:
|
|
312 D1:AD79 - - - - ; pop hl \ pop af
|
|
313 D1:AD79 - - - - ; ret
|
|
314 D1:AD79 - - - -
|
|
315 D1:AD79 - - - - ;;toUpper [Strings]
|
|
316 D1:AD79 - - - - ;;Converts every alpha character of a string to uppercase.
|
|
317 D1:AD79 - - - - ;;Inputs:
|
|
318 D1:AD79 - - - - ;; HL: Pointer to string
|
|
319 D1:AD79 - - - - ;;Notes:
|
|
320 D1:AD79 - - - - ;; This modifies the string in-place.
|
|
321 D1:AD79 - - - - ;toUpper:
|
|
322 D1:AD79 - - - - ; push af \ push hl
|
|
323 D1:AD79 - - - - ; ld a, (hl)
|
|
324 D1:AD79 - - - - ; or a
|
|
325 D1:AD79 - - - - ; jr z, toUpperExit
|
|
326 D1:AD79 - - - - ; call isAlphaNum
|
|
327 D1:AD79 - - - - ; jr nc, toUpperNotLowerAlpha
|
|
328 D1:AD79 - - - - ; cp 'a'
|
|
329 D1:AD79 - - - - ; jr c, toUpperNotLowerAlpha
|
|
330 D1:AD79 - - - - ; sub 'a' - 'A'
|
|
331 D1:AD79 - - - - ; ld (hl), a
|
|
332 D1:AD79 - - - - ;toUpperNotLowerAlpha:
|
|
333 D1:AD79 - - - - ; inc hl
|
|
334 D1:AD79 - - - - ; jr toUpper + 2
|
|
335 D1:AD79 - - - - ;toUpperExit:
|
|
336 D1:AD79 - - - - ; pop hl \ pop af
|
|
337 D1:AD79 - - - - ; ret
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/std/std.inc"
|
|
13 D1:AD79 - - - -
|
|
14 D1:AD79 - - - - #include "includes/lib/std/Input.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/std/Input.asm"
|
|
1 D1:AD79 - - - - ;;inputgetkey
|
|
2 D1:AD79 - - - - ;;Gets keycode
|
|
3 D1:AD79 - - - - ;;Outputs:
|
|
4 D1:AD79 - - - - ;; A: keycode
|
|
5 D1:AD79 - - - - ;;Destroys:
|
|
6 D1:AD79 - - - - ;; DE
|
|
7 D1:AD79 - - - - inputgetkey:
|
|
8 D1:AD79 EB - - - ex de, hl
|
|
9 D1:AD7A CD 4C 01 02 call _GetCSC
|
|
10 D1:AD7E EB - - - ex de, hl
|
|
11 D1:AD7F B7 - - - or a
|
|
12 D1:AD80 28 F7 - - jr z, inputgetkey
|
|
13 D1:AD82 C9 - - - ret
|
|
14 D1:AD83 - - - -
|
|
15 D1:AD83 - - - - ;;inputstr
|
|
16 D1:AD83 - - - - ;;Inputs string of length [Buffer Size] and puts it in (Destination)
|
|
17 D1:AD83 - - - - ;;Inputs:
|
|
18 D1:AD83 - - - - ;; HL: Destination
|
|
19 D1:AD83 - - - - ;; D[E]: Buffer Size
|
|
20 D1:AD83 - - - - ;;Ouptuts:
|
|
21 D1:AD83 - - - - ;; (HL): String
|
|
22 D1:AD83 - - - - inputstr:
|
|
23 D1:AD83 D5 - - - push de
|
|
24 D1:AD84 E5 - - - push hl
|
|
25 D1:AD85 ED 53 A3 AE
|
|
D1 - - - ld (inputstrSizeBuf), de
|
|
26 D1:AD8A E5 - - - push hl
|
|
27 D1:AD8B D5 - - - push de
|
|
28 D1:AD8C 21 96 05 D0 ld hl, CurCol
|
|
29 D1:AD90 11 A5 AE D1 ld de, inputstrCurColBuf
|
|
30 D1:AD94 CD 3D AA D1 call bytecpy
|
|
31 D1:AD98 21 95 05 D0 ld hl, CurRow
|
|
32 D1:AD9C 11 A6 AE D1 ld de, inputstrCurRowBuf
|
|
33 D1:ADA0 CD 3D AA D1 call bytecpy
|
|
34 D1:ADA4 D1 - - - pop de
|
|
35 D1:ADA5 E1 - - - pop hl
|
|
36 D1:ADA6 - - - -
|
|
37 D1:ADA6 FD CB 12 9E res Shift2nd, (IY + ShiftFlags)
|
|
38 D1:ADAA CD B0 08 02 call _CursorOn
|
|
39 D1:ADAE - - - -
|
|
40 D1:ADAE AF - - - xor a
|
|
41 D1:ADAF 47 - - - ld b, a
|
|
42 D1:ADB0 - - - - inputstrKeyInput:
|
|
43 D1:ADB0 CD F2 AA D1 call cursorcurunderreset
|
|
44 D1:ADB4 CD 79 AD D1 call inputgetkey
|
|
45 D1:ADB8 - - - -
|
|
46 D1:ADB8 FE 36 - - cp sk2nd
|
|
47 D1:ADBA CA 11 AE D1 jp z, inputstrKey2nd
|
|
48 D1:ADBE FE 38 - - cp skDel
|
|
49 D1:ADC0 CA 1F AE D1 jp z, inputstrKeyDel
|
|
50 D1:ADC4 FE 0F - - cp skClear
|
|
51 D1:ADC6 CA 3F AE D1 jp z, inputstrKeyClear
|
|
52 D1:ADCA FE 09 - - cp skEnter
|
|
53 D1:ADCC CA 8F AE D1 jp z, inputstrKeyEnter
|
|
54 D1:ADD0 - - - -
|
|
55 D1:ADD0 4F - - - ld c, a
|
|
56 D1:ADD1 78 - - - ld a, b
|
|
57 D1:ADD2 D5 - - - push de
|
|
58 D1:ADD3 ED 5B A3 AE
|
|
D1 - - - ld de, (inputstrSizeBuf)
|
|
59 D1:ADD8 BB - - - cp e
|
|
60 D1:ADD9 D1 - - - pop de
|
|
61 D1:ADDA 28 D4 - - jr z, inputstrKeyInput
|
|
62 D1:ADDC 79 - - - ld a, c
|
|
63 D1:ADDD - - - -
|
|
64 D1:ADDD D6 0A - - sub skAdd
|
|
65 D1:ADDF 38 CF - - jr c, inputstrKeyInput
|
|
66 D1:ADE1 FE 26 - - cp skMath - skAdd + 1
|
|
67 D1:ADE3 30 CB - - jr nc, inputstrKeyInput
|
|
68 D1:ADE5 - - - -
|
|
69 D1:ADE5 FD CB 12 5E bit Shift2nd, (IY + ShiftFlags) ; TIOS BASED
|
|
70 D1:ADE9 CC C2 AA D1 call z, chartoascii
|
|
71 D1:ADED C4 E2 AA D1 call nz, charnumsymtoascii
|
|
72 D1:ADF1 - - - -
|
|
73 D1:ADF1 FE FF - - cp $FF
|
|
74 D1:ADF3 28 BB - - jr z, inputstrKeyInput
|
|
75 D1:ADF5 - - - -
|
|
76 D1:ADF5 FD CB 05 96 res textScrolled, (iy+textFlags)
|
|
77 D1:ADF9 - - - -
|
|
78 D1:ADF9 CD B8 07 02 call _PutC
|
|
79 D1:ADFD - - - -
|
|
80 D1:ADFD 77 - - - ld (hl), a
|
|
81 D1:ADFE 23 - - - inc hl
|
|
82 D1:ADFF 04 - - - inc b
|
|
83 D1:AE00 - - - -
|
|
84 D1:AE00 FD CB 05 56 bit textScrolled, (iy+textFlags)
|
|
85 D1:AE04 28 AA - - jr z, inputstrKeyInput
|
|
86 D1:AE06 E5 - - - push hl
|
|
87 D1:AE07 21 A6 AE D1 ld hl, inputstrCurRowBuf
|
|
88 D1:AE0B 7E - - - ld a, (hl)
|
|
89 D1:AE0C 3D - - - dec a
|
|
90 D1:AE0D 77 - - - ld (hl), a
|
|
91 D1:AE0E E1 - - - pop hl
|
|
92 D1:AE0F 18 9F - - jr inputstrKeyInput
|
|
93 D1:AE11 - - - - inputstrKey2nd:
|
|
94 D1:AE11 E5 - - - push hl
|
|
95 D1:AE12 21 92 00 D0 ld hl, Flags + ShiftFlags
|
|
96 D1:AE16 7E - - - ld a, (hl)
|
|
97 D1:AE17 EE 08 - - xor 1 << Shift2nd ; Toggle state of Shift2nd flag
|
|
98 D1:AE19 77 - - - ld (hl), a
|
|
99 D1:AE1A E1 - - - pop hl
|
|
100 D1:AE1B C3 B0 AD D1 jp inputstrKeyInput
|
|
101 D1:AE1F - - - - inputstrKeyDel:
|
|
102 D1:AE1F 78 - - - ld a, b
|
|
103 D1:AE20 FE 00 - - cp 0
|
|
104 D1:AE22 CA B0 AD D1 jp z, inputstrKeyInput
|
|
105 D1:AE26 - - - -
|
|
106 D1:AE26 3E 20 - - ld a, ' '
|
|
107 D1:AE28 CD B4 07 02 call _PutMap
|
|
108 D1:AE2C - - - -
|
|
109 D1:AE2C E5 - - - push hl
|
|
110 D1:AE2D 21 96 05 D0 ld hl, CurCol
|
|
111 D1:AE31 35 - - - dec (hl)
|
|
112 D1:AE32 E1 - - - pop hl
|
|
113 D1:AE33 - - - -
|
|
114 D1:AE33 3E 20 - - ld a, ' '
|
|
115 D1:AE35 CD B4 07 02 call _PutMap
|
|
116 D1:AE39 - - - -
|
|
117 D1:AE39 2B - - - dec hl
|
|
118 D1:AE3A 05 - - - dec b
|
|
119 D1:AE3B C3 B0 AD D1 jp inputstrKeyInput
|
|
120 D1:AE3F - - - -
|
|
121 D1:AE3F - - - - inputstrKeyClear:
|
|
122 D1:AE3F 78 - - - ld a, b
|
|
123 D1:AE40 FE 00 - - cp 0
|
|
124 D1:AE42 CA B0 AD D1 jp z, inputstrKeyInput
|
|
125 D1:AE46 - - - -
|
|
126 D1:AE46 E5 - - - push hl
|
|
127 D1:AE47 D5 - - - push de
|
|
128 D1:AE48 21 A5 AE D1 ld hl, inputstrCurColBuf
|
|
129 D1:AE4C 11 96 05 D0 ld de, CurCol
|
|
130 D1:AE50 CD 3D AA D1 call bytecpy
|
|
131 D1:AE54 21 A6 AE D1 ld hl, inputstrCurRowBuf
|
|
132 D1:AE58 11 95 05 D0 ld de, CurRow
|
|
133 D1:AE5C CD 3D AA D1 call bytecpy
|
|
134 D1:AE60 D1 - - - pop de
|
|
135 D1:AE61 E1 - - - pop hl
|
|
136 D1:AE62 - - - -
|
|
137 D1:AE62 3E 20 - - ld a, ' '
|
|
138 D1:AE64 04 - - - inc b
|
|
139 D1:AE65 - - - - inputstrKeyClearLoop:
|
|
140 D1:AE65 CD B8 07 02 call _PutC
|
|
141 D1:AE69 10 FA - - djnz inputstrKeyClearLoop
|
|
142 D1:AE6B 06 00 - - ld b, 0
|
|
143 D1:AE6D - - - -
|
|
144 D1:AE6D D5 - - - push de
|
|
145 D1:AE6E E5 - - - push hl
|
|
146 D1:AE6F 21 A5 AE D1 ld hl, inputstrCurColBuf
|
|
147 D1:AE73 11 96 05 D0 ld de, CurCol
|
|
148 D1:AE77 CD 3D AA D1 call bytecpy
|
|
149 D1:AE7B 21 A6 AE D1 ld hl, inputstrCurRowBuf
|
|
150 D1:AE7F 11 95 05 D0 ld de, CurRow
|
|
151 D1:AE83 CD 3D AA D1 call bytecpy
|
|
152 D1:AE87 E1 - - - pop hl
|
|
153 D1:AE88 D1 - - - pop de
|
|
154 D1:AE89 E1 - - - pop hl
|
|
155 D1:AE8A E5 - - - push hl
|
|
156 D1:AE8B C3 B0 AD D1 jp inputstrKeyInput
|
|
157 D1:AE8F - - - -
|
|
158 D1:AE8F - - - - inputstrKeyEnter:
|
|
159 D1:AE8F 36 00 - - ld (hl), 0
|
|
160 D1:AE91 CD A8 08 02 call _CursorOff
|
|
161 D1:AE95 3E 20 - - ld a, ' '
|
|
162 D1:AE97 CD B4 07 02 call _PutMap
|
|
163 D1:AE9B E1 - - - pop hl
|
|
164 D1:AE9C D1 - - - pop de
|
|
165 D1:AE9D FD CB 12 9E res Shift2nd, (IY + ShiftFlags)
|
|
166 D1:AEA1 C9 - - - ret
|
|
167 D1:AEA2 - - - -
|
|
168 D1:AEA2 00 - - - inputstrFlags: .db %00000000
|
|
169 D1:AEA3 - - - - ; 0: num Flag
|
|
170 D1:AEA3 00 00 - - inputstrSizeBuf: .dw $0000
|
|
171 D1:AEA5 00 - - - inputstrCurColBuf: .db $00
|
|
172 D1:AEA6 00 - - - inputstrCurRowBuf: .db $00
|
|
173 D1:AEA7 - - - -
|
|
174 D1:AEA7 - - - - ;;inputcharstr
|
|
175 D1:AEA7 - - - - ;;Inputs string of (only letters) of length [Buffer Size] and puts it in (Destination)
|
|
176 D1:AEA7 - - - - ;;Inputs:
|
|
177 D1:AEA7 - - - - ;; HL: Destination
|
|
178 D1:AEA7 - - - - ;; D[E]: Buffer Size
|
|
179 D1:AEA7 - - - - ;;Ouptuts:
|
|
180 D1:AEA7 - - - - ;; (HL): String
|
|
181 D1:AEA7 - - - - inputcharstr:
|
|
182 D1:AEA7 D5 - - - push de
|
|
183 D1:AEA8 E5 - - - push hl
|
|
184 D1:AEA9 ED 53 B7 AF
|
|
D1 - - - ld (inputcharstrSizeBuf), de
|
|
185 D1:AEAE E5 - - - push hl
|
|
186 D1:AEAF D5 - - - push de
|
|
187 D1:AEB0 21 96 05 D0 ld hl, CurCol
|
|
188 D1:AEB4 11 B9 AF D1 ld de, inputcharstrCurColBuf
|
|
189 D1:AEB8 CD 3D AA D1 call bytecpy
|
|
190 D1:AEBC 21 95 05 D0 ld hl, CurRow
|
|
191 D1:AEC0 11 BA AF D1 ld de, inputcharstrCurRowBuf
|
|
192 D1:AEC4 CD 3D AA D1 call bytecpy
|
|
193 D1:AEC8 D1 - - - pop de
|
|
194 D1:AEC9 E1 - - - pop hl
|
|
195 D1:AECA - - - -
|
|
196 D1:AECA CD B0 08 02 call _CursorOn
|
|
197 D1:AECE - - - -
|
|
198 D1:AECE AF - - - xor a
|
|
199 D1:AECF 47 - - - ld b, a
|
|
200 D1:AED0 - - - - inputcharstrKeyInput:
|
|
201 D1:AED0 CD F2 AA D1 call cursorcurunderreset
|
|
202 D1:AED4 CD 79 AD D1 call inputgetkey
|
|
203 D1:AED8 - - - -
|
|
204 D1:AED8 FE 38 - - cp skDel
|
|
205 D1:AEDA CA 23 AF D1 jp z, inputcharstrKeyDel
|
|
206 D1:AEDE FE 0F - - cp skClear
|
|
207 D1:AEE0 CA 43 AF D1 jp z, inputcharstrKeyClear
|
|
208 D1:AEE4 FE 09 - - cp skEnter
|
|
209 D1:AEE6 CA A8 AF D1 jp z, inputcharstrKeyEnter
|
|
210 D1:AEEA - - - -
|
|
211 D1:AEEA 4F - - - ld c, a
|
|
212 D1:AEEB 78 - - - ld a, b
|
|
213 D1:AEEC D5 - - - push de
|
|
214 D1:AEED ED 5B B7 AF
|
|
D1 - - - ld de, (inputcharstrSizeBuf)
|
|
215 D1:AEF2 BB - - - cp e
|
|
216 D1:AEF3 D1 - - - pop de
|
|
217 D1:AEF4 28 DA - - jr z, inputcharstrKeyInput
|
|
218 D1:AEF6 79 - - - ld a, c
|
|
219 D1:AEF7 - - - -
|
|
220 D1:AEF7 D6 0A - - sub skAdd
|
|
221 D1:AEF9 38 D5 - - jr c, inputcharstrKeyInput
|
|
222 D1:AEFB FE 26 - - cp skMath - skAdd + 1
|
|
223 D1:AEFD 30 D1 - - jr nc, inputcharstrKeyInput
|
|
224 D1:AEFF - - - -
|
|
225 D1:AEFF CD C2 AA D1 call chartoascii
|
|
226 D1:AF03 - - - -
|
|
227 D1:AF03 FE FF - - cp $FF
|
|
228 D1:AF05 28 C9 - - jr z, inputcharstrKeyInput
|
|
229 D1:AF07 - - - -
|
|
230 D1:AF07 FD CB 05 96 res textScrolled, (iy+textFlags)
|
|
231 D1:AF0B - - - -
|
|
232 D1:AF0B CD B8 07 02 call _PutC
|
|
233 D1:AF0F - - - -
|
|
234 D1:AF0F 77 - - - ld (hl), a
|
|
235 D1:AF10 23 - - - inc hl
|
|
236 D1:AF11 04 - - - inc b
|
|
237 D1:AF12 - - - -
|
|
238 D1:AF12 FD CB 05 56 bit textScrolled, (iy+textFlags)
|
|
239 D1:AF16 28 B8 - - jr z, inputcharstrKeyInput
|
|
240 D1:AF18 E5 - - - push hl
|
|
241 D1:AF19 21 BA AF D1 ld hl, inputcharstrCurRowBuf
|
|
242 D1:AF1D 7E - - - ld a, (hl)
|
|
243 D1:AF1E 3D - - - dec a
|
|
244 D1:AF1F 77 - - - ld (hl), a
|
|
245 D1:AF20 E1 - - - pop hl
|
|
246 D1:AF21 18 AD - - jr inputcharstrKeyInput
|
|
247 D1:AF23 - - - - inputcharstrKeyDel:
|
|
248 D1:AF23 78 - - - ld a, b
|
|
249 D1:AF24 FE 00 - - cp 0
|
|
250 D1:AF26 CA D0 AE D1 jp z, inputcharstrKeyInput
|
|
251 D1:AF2A - - - -
|
|
252 D1:AF2A 3E 20 - - ld a, ' '
|
|
253 D1:AF2C CD B4 07 02 call _PutMap
|
|
254 D1:AF30 - - - -
|
|
255 D1:AF30 E5 - - - push hl
|
|
256 D1:AF31 21 96 05 D0 ld hl, CurCol
|
|
257 D1:AF35 35 - - - dec (hl)
|
|
258 D1:AF36 E1 - - - pop hl
|
|
259 D1:AF37 - - - -
|
|
260 D1:AF37 3E 20 - - ld a, ' '
|
|
261 D1:AF39 CD B4 07 02 call _PutMap
|
|
262 D1:AF3D - - - -
|
|
263 D1:AF3D 2B - - - dec hl
|
|
264 D1:AF3E 05 - - - dec b
|
|
265 D1:AF3F C3 D0 AE D1 jp inputcharstrKeyInput
|
|
266 D1:AF43 - - - -
|
|
267 D1:AF43 - - - - inputcharstrKeyClear:
|
|
268 D1:AF43 78 - - - ld a, b
|
|
269 D1:AF44 FE 00 - - cp 0
|
|
270 D1:AF46 CA D0 AE D1 jp z, inputcharstrKeyInput
|
|
271 D1:AF4A - - - -
|
|
272 D1:AF4A E5 - - - push hl
|
|
273 D1:AF4B 21 95 05 D0 ld hl, CurRow
|
|
274 D1:AF4F 4E - - - ld c, (hl)
|
|
275 D1:AF50 E1 - - - pop hl
|
|
276 D1:AF51 - - - -
|
|
277 D1:AF51 E5 - - - push hl
|
|
278 D1:AF52 D5 - - - push de
|
|
279 D1:AF53 21 B9 AF D1 ld hl, inputcharstrCurColBuf
|
|
280 D1:AF57 11 96 05 D0 ld de, CurCol
|
|
281 D1:AF5B CD 3D AA D1 call bytecpy
|
|
282 D1:AF5F 21 BA AF D1 ld hl, inputcharstrCurRowBuf
|
|
283 D1:AF63 11 95 05 D0 ld de, CurRow
|
|
284 D1:AF67 CD 3D AA D1 call bytecpy
|
|
285 D1:AF6B D1 - - - pop de
|
|
286 D1:AF6C E1 - - - pop hl
|
|
287 D1:AF6D - - - -
|
|
288 D1:AF6D 3E 20 - - ld a, ' '
|
|
289 D1:AF6F 04 - - - inc b
|
|
290 D1:AF70 - - - - inputcharstrKeyClearLoop:
|
|
291 D1:AF70 CD B8 07 02 call _PutC
|
|
292 D1:AF74 10 FA - - djnz inputcharstrKeyClearLoop
|
|
293 D1:AF76 - - - -
|
|
294 D1:AF76 E5 - - - push hl
|
|
295 D1:AF77 D5 - - - push de
|
|
296 D1:AF78 21 B9 AF D1 ld hl, inputcharstrCurColBuf
|
|
297 D1:AF7C 11 96 05 D0 ld de, CurCol
|
|
298 D1:AF80 CD 3D AA D1 call bytecpy
|
|
299 D1:AF84 D1 - - - pop de
|
|
300 D1:AF85 E1 - - - pop hl
|
|
301 D1:AF86 - - - -
|
|
302 D1:AF86 D5 - - - push de
|
|
303 D1:AF87 E5 - - - push hl
|
|
304 D1:AF88 21 B9 AF D1 ld hl, inputcharstrCurColBuf
|
|
305 D1:AF8C 11 96 05 D0 ld de, CurCol
|
|
306 D1:AF90 CD 3D AA D1 call bytecpy
|
|
307 D1:AF94 21 BA AF D1 ld hl, inputcharstrCurRowBuf
|
|
308 D1:AF98 11 95 05 D0 ld de, CurRow
|
|
309 D1:AF9C CD 3D AA D1 call bytecpy
|
|
310 D1:AFA0 E1 - - - pop hl
|
|
311 D1:AFA1 D1 - - - pop de
|
|
312 D1:AFA2 E1 - - - pop hl
|
|
313 D1:AFA3 E5 - - - push hl
|
|
314 D1:AFA4 C3 D0 AE D1 jp inputcharstrKeyInput
|
|
315 D1:AFA8 - - - -
|
|
316 D1:AFA8 - - - - inputcharstrKeyEnter:
|
|
317 D1:AFA8 36 00 - - ld (hl), 0
|
|
318 D1:AFAA CD A8 08 02 call _CursorOff
|
|
319 D1:AFAE 3E 20 - - ld a, ' '
|
|
320 D1:AFB0 CD B4 07 02 call _PutMap
|
|
321 D1:AFB4 E1 - - - pop hl
|
|
322 D1:AFB5 D1 - - - pop de
|
|
323 D1:AFB6 C9 - - - ret
|
|
324 D1:AFB7 - - - -
|
|
325 D1:AFB7 00 00 - - inputcharstrSizeBuf: .dw $0000
|
|
326 D1:AFB9 00 - - - inputcharstrCurColBuf: .db $00
|
|
327 D1:AFBA 00 - - - inputcharstrCurRowBuf: .db $00
|
|
328 D1:AFBB - - - -
|
|
329 D1:AFBB - - - - ;;inputnumstr
|
|
330 D1:AFBB - - - - ;;Inputs string of (only numbers) of length [Buffer Size] and puts it in (Destination)
|
|
331 D1:AFBB - - - - ;;Inputs:
|
|
332 D1:AFBB - - - - ;; HL: Destination
|
|
333 D1:AFBB - - - - ;; D[E]: Buffer Size
|
|
334 D1:AFBB - - - - ;;Ouptuts:
|
|
335 D1:AFBB - - - - ;; (HL): String
|
|
336 D1:AFBB - - - - inputnumstr:
|
|
337 D1:AFBB D5 - - - push de
|
|
338 D1:AFBC E5 - - - push hl
|
|
339 D1:AFBD ED 53 BB B0
|
|
D1 - - - ld (inputnumstrSizeBuf), de
|
|
340 D1:AFC2 E5 - - - push hl
|
|
341 D1:AFC3 D5 - - - push de
|
|
342 D1:AFC4 21 96 05 D0 ld hl, CurCol
|
|
343 D1:AFC8 11 BD B0 D1 ld de, inputnumstrCurColBuf
|
|
344 D1:AFCC CD 3D AA D1 call bytecpy
|
|
345 D1:AFD0 21 95 05 D0 ld hl, CurRow
|
|
346 D1:AFD4 11 BE B0 D1 ld de, inputnumstrCurRowBuf
|
|
347 D1:AFD8 CD 3D AA D1 call bytecpy
|
|
348 D1:AFDC D1 - - - pop de
|
|
349 D1:AFDD E1 - - - pop hl
|
|
350 D1:AFDE - - - -
|
|
351 D1:AFDE CD B0 08 02 call _CursorOn
|
|
352 D1:AFE2 - - - -
|
|
353 D1:AFE2 AF - - - xor a
|
|
354 D1:AFE3 47 - - - ld b, a
|
|
355 D1:AFE4 - - - -
|
|
356 D1:AFE4 - - - - inputnumstrKeyInput:
|
|
357 D1:AFE4 CD F2 AA D1 call cursorcurunderreset
|
|
358 D1:AFE8 CD 79 AD D1 call inputgetkey
|
|
359 D1:AFEC - - - -
|
|
360 D1:AFEC FE 38 - - cp skDel
|
|
361 D1:AFEE CA 37 B0 D1 jp z, inputnumstrKeyDel
|
|
362 D1:AFF2 FE 0F - - cp skClear
|
|
363 D1:AFF4 CA 57 B0 D1 jp z, inputnumstrKeyClear
|
|
364 D1:AFF8 FE 09 - - cp skEnter
|
|
365 D1:AFFA CA AC B0 D1 jp z, inputnumstrKeyEnter
|
|
366 D1:AFFE - - - -
|
|
367 D1:AFFE 4F - - - ld c, a
|
|
368 D1:AFFF 78 - - - ld a, b
|
|
369 D1:B000 D5 - - - push de
|
|
370 D1:B001 ED 5B BB B0
|
|
D1 - - - ld de, (inputnumstrSizeBuf)
|
|
371 D1:B006 BB - - - cp e
|
|
372 D1:B007 D1 - - - pop de
|
|
373 D1:B008 28 DA - - jr z, inputnumstrKeyInput
|
|
374 D1:B00A 79 - - - ld a, c
|
|
375 D1:B00B - - - -
|
|
376 D1:B00B D6 0A - - sub skAdd
|
|
377 D1:B00D 38 D5 - - jr c, inputnumstrKeyInput
|
|
378 D1:B00F FE 26 - - cp skMath - skAdd + 1
|
|
379 D1:B011 30 D1 - - jr nc, inputnumstrKeyInput
|
|
380 D1:B013 - - - -
|
|
381 D1:B013 CD D2 AA D1 call charnumtoascii
|
|
382 D1:B017 FE FF - - cp $FF
|
|
383 D1:B019 28 C9 - - jr z, inputnumstrKeyInput
|
|
384 D1:B01B - - - -
|
|
385 D1:B01B FD CB 05 96 res textScrolled, (iy+textFlags)
|
|
386 D1:B01F - - - -
|
|
387 D1:B01F CD B8 07 02 call _PutC
|
|
388 D1:B023 - - - -
|
|
389 D1:B023 77 - - - ld (hl), a
|
|
390 D1:B024 23 - - - inc hl
|
|
391 D1:B025 04 - - - inc b
|
|
392 D1:B026 - - - -
|
|
393 D1:B026 FD CB 05 56 bit textScrolled, (iy+textFlags)
|
|
394 D1:B02A 28 B8 - - jr z, inputnumstrKeyInput
|
|
395 D1:B02C E5 - - - push hl
|
|
396 D1:B02D 21 BE B0 D1 ld hl, inputnumstrCurRowBuf
|
|
397 D1:B031 7E - - - ld a, (hl)
|
|
398 D1:B032 3D - - - dec a
|
|
399 D1:B033 77 - - - ld (hl), a
|
|
400 D1:B034 E1 - - - pop hl
|
|
401 D1:B035 18 AD - - jr inputnumstrKeyInput
|
|
402 D1:B037 - - - - inputnumstrkeydel:
|
|
403 D1:B037 78 - - - ld a, b
|
|
404 D1:B038 FE 00 - - cp 0
|
|
405 D1:B03A CA E4 AF D1 jp z, inputnumstrKeyInput
|
|
406 D1:B03E - - - -
|
|
407 D1:B03E 3E 20 - - ld a, ' '
|
|
408 D1:B040 CD B4 07 02 call _PutMap
|
|
409 D1:B044 - - - -
|
|
410 D1:B044 E5 - - - push hl
|
|
411 D1:B045 21 96 05 D0 ld hl, CurCol
|
|
412 D1:B049 35 - - - dec (hl)
|
|
413 D1:B04A E1 - - - pop hl
|
|
414 D1:B04B - - - -
|
|
415 D1:B04B 3E 20 - - ld a, ' '
|
|
416 D1:B04D CD B4 07 02 call _PutMap
|
|
417 D1:B051 - - - -
|
|
418 D1:B051 2B - - - dec hl
|
|
419 D1:B052 05 - - - dec b
|
|
420 D1:B053 C3 E4 AF D1 jp inputnumstrKeyInput
|
|
421 D1:B057 - - - -
|
|
422 D1:B057 - - - - inputnumstrKeyClear:
|
|
423 D1:B057 78 - - - ld a, b
|
|
424 D1:B058 FE 00 - - cp 0
|
|
425 D1:B05A CA E4 AF D1 jp z, inputnumstrKeyInput
|
|
426 D1:B05E - - - -
|
|
427 D1:B05E E5 - - - push hl
|
|
428 D1:B05F 21 95 05 D0 ld hl, CurRow
|
|
429 D1:B063 4E - - - ld c, (hl)
|
|
430 D1:B064 E1 - - - pop hl
|
|
431 D1:B065 - - - -
|
|
432 D1:B065 E5 - - - push hl
|
|
433 D1:B066 D5 - - - push de
|
|
434 D1:B067 21 BD B0 D1 ld hl, inputnumstrCurColBuf
|
|
435 D1:B06B 11 96 05 D0 ld de, CurCol
|
|
436 D1:B06F CD 3D AA D1 call bytecpy
|
|
437 D1:B073 21 BE B0 D1 ld hl, inputnumstrCurRowBuf
|
|
438 D1:B077 11 95 05 D0 ld de, CurRow
|
|
439 D1:B07B CD 3D AA D1 call bytecpy
|
|
440 D1:B07F D1 - - - pop de
|
|
441 D1:B080 E1 - - - pop hl
|
|
442 D1:B081 - - - -
|
|
443 D1:B081 3E 20 - - ld a, ' '
|
|
444 D1:B083 04 - - - inc b
|
|
445 D1:B084 - - - - inputnumstrKeyClearLoop:
|
|
446 D1:B084 CD B8 07 02 call _PutC
|
|
447 D1:B088 10 FA - - djnz inputnumstrKeyClearLoop
|
|
448 D1:B08A - - - -
|
|
449 D1:B08A D5 - - - push de
|
|
450 D1:B08B E5 - - - push hl
|
|
451 D1:B08C 21 BD B0 D1 ld hl, inputnumstrCurColBuf
|
|
452 D1:B090 11 96 05 D0 ld de, CurCol
|
|
453 D1:B094 CD 3D AA D1 call bytecpy
|
|
454 D1:B098 21 BE B0 D1 ld hl, inputnumstrCurRowBuf
|
|
455 D1:B09C 11 95 05 D0 ld de, CurRow
|
|
456 D1:B0A0 CD 3D AA D1 call bytecpy
|
|
457 D1:B0A4 E1 - - - pop hl
|
|
458 D1:B0A5 D1 - - - pop de
|
|
459 D1:B0A6 E1 - - - pop hl
|
|
460 D1:B0A7 E5 - - - push hl
|
|
461 D1:B0A8 C3 E4 AF D1 jp inputnumstrKeyInput
|
|
462 D1:B0AC - - - -
|
|
463 D1:B0AC - - - - inputnumstrKeyEnter:
|
|
464 D1:B0AC 36 00 - - ld (hl), 0
|
|
465 D1:B0AE CD A8 08 02 call _CursorOff
|
|
466 D1:B0B2 3E 20 - - ld a, ' '
|
|
467 D1:B0B4 CD B4 07 02 call _PutMap
|
|
468 D1:B0B8 E1 - - - pop hl
|
|
469 D1:B0B9 D1 - - - pop de
|
|
470 D1:B0BA C9 - - - ret
|
|
471 D1:B0BB - - - -
|
|
472 D1:B0BB 00 00 - - inputnumstrSizeBuf: .dw $0000
|
|
473 D1:B0BD 00 - - - inputnumstrCurColBuf: .db $00
|
|
474 D1:B0BE 00 - - - inputnumstrCurRowBuf: .db $00
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/std/std.inc"
|
|
Listing for file "FSHa.asm"
|
|
72 D1:B0BF - - - - #include "includes/lib/fsh/fsh.inc"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/fsh/fsh.inc"
|
|
1 D1:B0BF - - - - #include "includes/lib/fsh/Command.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/fsh/Command.asm"
|
|
1 D1:B0BF - - - - ;;commandfill
|
|
2 D1:B0BF - - - - ;;Fills command mem with byte a
|
|
3 D1:B0BF - - - - ;;Inputs:
|
|
4 D1:B0BF - - - - ;; A: byte
|
|
5 D1:B0BF - - - - commandfill:
|
|
6 D1:B0BF E5 - - - push hl
|
|
7 D1:B0C0 C5 - - - push bc
|
|
8 D1:B0C1 D5 - - - push de
|
|
9 D1:B0C2 06 00 - - ld b, 0
|
|
10 D1:B0C4 11 00 00 00 ld de, 0
|
|
11 D1:B0C8 4F - - - ld c, a
|
|
12 D1:B0C9 21 9F EA D0 ld hl, FshCmd
|
|
13 D1:B0CD - - - - commandfillLoop:
|
|
14 D1:B0CD 71 - - - ld (hl), c
|
|
15 D1:B0CE 23 - - - inc hl
|
|
16 D1:B0CF 04 - - - inc b
|
|
17 D1:B0D0 13 - - - inc de
|
|
18 D1:B0D1 78 - - - ld a, b
|
|
19 D1:B0D2 FE 40 - - cp FshCmdSize
|
|
20 D1:B0D4 38 F7 - - jr c, commandfillLoop
|
|
21 D1:B0D6 D1 - - - pop de
|
|
22 D1:B0D7 C1 - - - pop bc
|
|
23 D1:B0D8 E1 - - - pop hl
|
|
24 D1:B0D9 C9 - - - ret
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/fsh/fsh.inc"
|
|
2 D1:B0DA - - - - #include "includes/lib/fsh/Parse.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/fsh/Parse.asm"
|
|
1 D1:B0DA - - - - ;;fshparsecommand
|
|
2 D1:B0DA - - - - ;;Inputs:
|
|
3 D1:B0DA - - - - ;; HL: FshCmd
|
|
4 D1:B0DA - - - - ;;b = buf row
|
|
5 D1:B0DA - - - - ;;c = char in row
|
|
6 D1:B0DA - - - - ;de = scratch
|
|
7 D1:B0DA - - - - fshparsecommand:
|
|
8 D1:B0DA E5 - - - push hl
|
|
9 D1:B0DB C5 - - - push bc
|
|
10 D1:B0DC D5 - - - push de
|
|
11 D1:B0DD E5 - - - push hl
|
|
12 D1:B0DE E5 - - - push hl
|
|
13 D1:B0DF 21 F1 B1 D1 ld hl, fshparsecommandCmd
|
|
14 D1:B0E3 06 2D - - ld b, 45
|
|
15 D1:B0E5 3E 00 - - ld a, $00
|
|
16 D1:B0E7 CD 45 AA D1 call memset
|
|
17 D1:B0EB E1 - - - pop hl
|
|
18 D1:B0EC - - - -
|
|
19 D1:B0EC 01 00 00 00 ld bc, 0
|
|
20 D1:B0F0 11 00 00 00 ld de, 0
|
|
21 D1:B0F4 - - - - fshparsecommandLoop:
|
|
22 D1:B0F4 7E - - - ld a, (hl)
|
|
23 D1:B0F5 - - - - fshparsecommandCheckSpace:
|
|
24 D1:B0F5 FE 20 - - cp ' ' ;end of word
|
|
25 D1:B0F7 20 0C - - jr nz, fshparsecommandCheckEnd
|
|
26 D1:B0F9 3E 00 - - ld a, $00
|
|
27 D1:B0FB CD 24 B2 D1 call fshparsecommandCopyChar
|
|
28 D1:B0FF 0E 00 - - ld c, 0
|
|
29 D1:B101 04 - - - inc b
|
|
30 D1:B102 23 - - - inc hl
|
|
31 D1:B103 18 EF - - jr fshparsecommandLoop
|
|
32 D1:B105 - - - -
|
|
33 D1:B105 - - - - fshparsecommandCheckEnd:
|
|
34 D1:B105 FE 00 - - cp $00 ;end of string
|
|
35 D1:B107 28 13 - - jr z, fshparsecommandCheckArgStatus
|
|
36 D1:B109 - - - -
|
|
37 D1:B109 - - - - fshparsecommandLoopEnd:
|
|
38 D1:B109 CD 24 B2 D1 call fshparsecommandCopyChar
|
|
39 D1:B10D 23 - - - inc hl
|
|
40 D1:B10E 0C - - - inc c
|
|
41 D1:B10F - - - -
|
|
42 D1:B10F 79 - - - ld a, c
|
|
43 D1:B110 FE 08 - - cp FshCmdCmdSize
|
|
44 D1:B112 20 E0 - - jr nz, fshparsecommandLoop
|
|
45 D1:B114 - - - - ;inc hl
|
|
46 D1:B114 0E 00 - - ld c, 0
|
|
47 D1:B116 04 - - - inc b
|
|
48 D1:B117 78 - - - ld a, b
|
|
49 D1:B118 FE 05 - - cp 5
|
|
50 D1:B11A 20 D8 - - jr nz, fshparsecommandLoop
|
|
51 D1:B11C - - - - ; ld bc, 0
|
|
52 D1:B11C - - - -
|
|
53 D1:B11C - - - - fshparsecommandCheckArgStatus:
|
|
54 D1:B11C AF - - - xor a
|
|
55 D1:B11D 21 CD EA D0 ld hl, FshCmdArgFlags
|
|
56 D1:B121 77 - - - ld (hl), a
|
|
57 D1:B122 - - - - fshparsecommandCheckArg0:
|
|
58 D1:B122 21 FA B1 D1 ld hl, fshparsecommandArg0
|
|
59 D1:B126 7E - - - ld a, (hl)
|
|
60 D1:B127 FE 00 - - cp $00
|
|
61 D1:B129 28 27 - - jr z, fshparsecommandCheckArg1
|
|
62 D1:B12B 21 CD EA D0 ld hl, FshCmdArgFlags
|
|
63 D1:B12F CB C6 - - set 0, (hl)
|
|
64 D1:B131 7E - - - ld a, (hl)
|
|
65 D1:B132 21 FA B1 D1 ld hl, fshparsecommandArg0
|
|
66 D1:B136 7E - - - ld a, (hl)
|
|
67 D1:B137 D6 30 - - sub '0'
|
|
68 D1:B139 FE 0A - - cp '9' - '0' + 1
|
|
69 D1:B13B 30 15 - - jr nc, fshparsecommandCheckArg1
|
|
70 D1:B13D CD BD AC D1 call strtow
|
|
71 D1:B141 11 FA B1 D1 ld de, fshparsecommandArg0
|
|
72 D1:B145 EB - - - ex de, hl
|
|
73 D1:B146 73 - - - ld (hl), e
|
|
74 D1:B147 23 - - - inc hl
|
|
75 D1:B148 72 - - - ld (hl), d
|
|
76 D1:B149 34 - - - inc (hl)
|
|
77 D1:B14A 36 00 - - ld (hl), $00
|
|
78 D1:B14C 21 CD EA D0 ld hl, FshCmdArgFlags
|
|
79 D1:B150 CB CE - - set 1, (hl)
|
|
80 D1:B152 - - - - fshparsecommandCheckArg1:
|
|
81 D1:B152 21 03 B2 D1 ld hl, fshparsecommandArg1
|
|
82 D1:B156 7E - - - ld a, (hl)
|
|
83 D1:B157 FE 00 - - cp $00
|
|
84 D1:B159 28 26 - - jr z, fshparsecommandCheckArg2
|
|
85 D1:B15B 21 CD EA D0 ld hl, FshCmdArgFlags
|
|
86 D1:B15F CB D6 - - set 2, (hl)
|
|
87 D1:B161 21 03 B2 D1 ld hl, fshparsecommandArg1
|
|
88 D1:B165 7E - - - ld a, (hl)
|
|
89 D1:B166 D6 30 - - sub '0'
|
|
90 D1:B168 FE 0A - - cp '9' - '0' + 1
|
|
91 D1:B16A 30 15 - - jr nc, fshparsecommandCheckArg2
|
|
92 D1:B16C CD BD AC D1 call strtow
|
|
93 D1:B170 11 03 B2 D1 ld de, fshparsecommandArg1
|
|
94 D1:B174 EB - - - ex de, hl
|
|
95 D1:B175 73 - - - ld (hl), e
|
|
96 D1:B176 23 - - - inc hl
|
|
97 D1:B177 72 - - - ld (hl), d
|
|
98 D1:B178 23 - - - inc hl
|
|
99 D1:B179 36 00 - - ld (hl), $00
|
|
100 D1:B17B 21 CD EA D0 ld hl, FshCmdArgFlags
|
|
101 D1:B17F CB DE - - set 3, (hl)
|
|
102 D1:B181 - - - - fshparsecommandCheckArg2:
|
|
103 D1:B181 21 0C B2 D1 ld hl, fshparsecommandArg2
|
|
104 D1:B185 7E - - - ld a, (hl)
|
|
105 D1:B186 FE 00 - - cp $00
|
|
106 D1:B188 28 26 - - jr z, fshparsecommandCheckArg3
|
|
107 D1:B18A 21 CD EA D0 ld hl, FshCmdArgFlags
|
|
108 D1:B18E CB E6 - - set 4, (hl)
|
|
109 D1:B190 21 0C B2 D1 ld hl, fshparsecommandArg2
|
|
110 D1:B194 7E - - - ld a, (hl)
|
|
111 D1:B195 D6 30 - - sub '0'
|
|
112 D1:B197 FE 0A - - cp '9' - '0' + 1
|
|
113 D1:B199 30 15 - - jr nc, fshparsecommandCheckArg3
|
|
114 D1:B19B CD BD AC D1 call strtow
|
|
115 D1:B19F 11 0C B2 D1 ld de, fshparsecommandArg2
|
|
116 D1:B1A3 EB - - - ex de, hl
|
|
117 D1:B1A4 73 - - - ld (hl), e
|
|
118 D1:B1A5 23 - - - inc hl
|
|
119 D1:B1A6 72 - - - ld (hl), d
|
|
120 D1:B1A7 23 - - - inc hl
|
|
121 D1:B1A8 36 00 - - ld (hl), $00
|
|
122 D1:B1AA 21 CD EA D0 ld hl, FshCmdArgFlags
|
|
123 D1:B1AE CB EE - - set 5, (hl)
|
|
124 D1:B1B0 - - - - fshparsecommandCheckArg3:
|
|
125 D1:B1B0 21 15 B2 D1 ld hl, fshparsecommandArg3
|
|
126 D1:B1B4 7E - - - ld a, (hl)
|
|
127 D1:B1B5 FE 00 - - cp $00
|
|
128 D1:B1B7 28 26 - - jr z, fshparsecommandCopyBack
|
|
129 D1:B1B9 21 CD EA D0 ld hl, FshCmdArgFlags
|
|
130 D1:B1BD CB F6 - - set 6, (hl)
|
|
131 D1:B1BF 21 15 B2 D1 ld hl, fshparsecommandArg3
|
|
132 D1:B1C3 7E - - - ld a, (hl)
|
|
133 D1:B1C4 D6 30 - - sub '0'
|
|
134 D1:B1C6 FE 0A - - cp '9' - '0' + 1
|
|
135 D1:B1C8 30 15 - - jr nc, fshparsecommandCopyBack
|
|
136 D1:B1CA CD BD AC D1 call strtow
|
|
137 D1:B1CE 11 15 B2 D1 ld de, fshparsecommandArg3
|
|
138 D1:B1D2 EB - - - ex de, hl
|
|
139 D1:B1D3 73 - - - ld (hl), e
|
|
140 D1:B1D4 23 - - - inc hl
|
|
141 D1:B1D5 72 - - - ld (hl), d
|
|
142 D1:B1D6 23 - - - inc hl
|
|
143 D1:B1D7 36 00 - - ld (hl), $00
|
|
144 D1:B1D9 21 CD EA D0 ld hl, FshCmdArgFlags
|
|
145 D1:B1DD CB FE - - set 7, (hl)
|
|
146 D1:B1DF - - - - fshparsecommandCopyBack:
|
|
147 D1:B1DF E1 - - - pop hl
|
|
148 D1:B1E0 C5 - - - push bc
|
|
149 D1:B1E1 EB - - - ex de, hl
|
|
150 D1:B1E2 21 F1 B1 D1 ld hl, fshparsecommandCmd
|
|
151 D1:B1E6 01 2D 00 00 ld bc, 45
|
|
152 D1:B1EA ED B0 - - ldir
|
|
153 D1:B1EC C1 - - - pop bc
|
|
154 D1:B1ED - - - -
|
|
155 D1:B1ED D1 - - - pop de
|
|
156 D1:B1EE C1 - - - pop bc
|
|
157 D1:B1EF E1 - - - pop hl
|
|
158 D1:B1F0 C9 - - - ret
|
|
159 D1:B1F1 - - - -
|
|
160 D1:B1F1 00 00 00 00
|
|
00 00 00 00
|
|
00 - - - fshparsecommandCmd: .db $00, $00, $00, $00, $00, $00, $00, $00, $00
|
|
161 D1:B1FA 00 00 00 00
|
|
00 00 00 00
|
|
00 - - - fshparsecommandArg0: .db $00, $00, $00, $00, $00, $00, $00, $00, $00
|
|
162 D1:B203 00 00 00 00
|
|
00 00 00 00
|
|
00 - - - fshparsecommandArg1: .db $00, $00, $00, $00, $00, $00, $00, $00, $00
|
|
163 D1:B20C 00 00 00 00
|
|
00 00 00 00
|
|
00 - - - fshparsecommandArg2: .db $00, $00, $00, $00, $00, $00, $00, $00, $00
|
|
164 D1:B215 00 00 00 00
|
|
00 00 00 00
|
|
00 - - - fshparsecommandArg3: .db $00, $00, $00, $00, $00, $00, $00, $00, $00
|
|
165 D1:B21E 00 00 00 00
|
|
00 00 - - fshparsecommandOverB: .db $00, $00, $00, $00, $00, $00
|
|
166 D1:B224 - - - -
|
|
167 D1:B224 - - - - fshparsecommandCopyChar:
|
|
168 D1:B224 - - - - ;Copy
|
|
169 D1:B224 E5 - - - push hl
|
|
170 D1:B225 C5 - - - push bc
|
|
171 D1:B226 21 00 00 00 ld hl, 0
|
|
172 D1:B22A 60 - - - ld h, b
|
|
173 D1:B22B 2E 09 - - ld l, 9
|
|
174 D1:B22D 41 - - - ld b, c
|
|
175 D1:B22E 11 F1 B1 D1 ld de, fshparsecommandCmd
|
|
176 D1:B232 CD 8F AB D1 call array2d
|
|
177 D1:B236 C1 - - - pop bc
|
|
178 D1:B237 E1 - - - pop hl
|
|
179 D1:B238 - - - - ;push hl
|
|
180 D1:B238 - - - - ; ld hl, fshparsecommandCmd+45+1
|
|
181 D1:B238 - - - - ; call cpHLDE
|
|
182 D1:B238 - - - - ;pop hl
|
|
183 D1:B238 - - - - ;pop de
|
|
184 D1:B238 - - - - ;ret c
|
|
185 D1:B238 - - - - ;push de
|
|
186 D1:B238 12 - - - ld (de), a ;ld buffer
|
|
187 D1:B239 C9 - - - ret
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/fsh/fsh.inc"
|
|
3 D1:B23A - - - - #include "includes/lib/fsh/FshVar.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/fsh/FshVar.asm"
|
|
1 D1:B23A - - - - ;;fshvarset
|
|
2 D1:B23A - - - - ;;Sets a Word in FshVars.
|
|
3 D1:B23A - - - - ;;Inputs:
|
|
4 D1:B23A - - - - ;; HL: 16b
|
|
5 D1:B23A - - - - ;; DE: Destination Word Relitive to FshVars
|
|
6 D1:B23A - - - - fshvarset:
|
|
7 D1:B23A C5 - - - push bc
|
|
8 D1:B23B 01 3F 00 00 ld bc, FshVarsSize / 2 - 1
|
|
9 D1:B23F CD 77 A9 D1 call cpBCDE
|
|
10 D1:B243 C1 - - - pop bc
|
|
11 D1:B244 38 11 - - jr c, fshvarsetOOBException
|
|
12 D1:B246 C5 - - - push bc
|
|
13 D1:B247 D5 - - - push de
|
|
14 D1:B248 E5 - - - push hl
|
|
15 D1:B249 01 1F EA D0 ld bc, FshVars
|
|
16 D1:B24D EB - - - ex de, hl
|
|
17 D1:B24E 29 - - - add hl, hl
|
|
18 D1:B24F 09 - - - add hl, bc
|
|
19 D1:B250 73 - - - ld (hl), e
|
|
20 D1:B251 23 - - - inc hl
|
|
21 D1:B252 72 - - - ld (hl), d
|
|
22 D1:B253 E1 - - - pop hl
|
|
23 D1:B254 D1 - - - pop de
|
|
24 D1:B255 C1 - - - pop bc
|
|
25 D1:B256 C9 - - - ret
|
|
26 D1:B257 - - - - fshvarsetOOBException:
|
|
27 D1:B257 E5 - - - push hl
|
|
28 D1:B258 21 7C B3 D1 ld hl, ErrOutOfBoundso
|
|
29 D1:B25C CD 37 B3 D1 call ErrSet
|
|
30 D1:B260 E1 - - - pop hl
|
|
31 D1:B261 C9 - - - ret
|
|
32 D1:B262 - - - -
|
|
33 D1:B262 - - - - ;;fshvarget
|
|
34 D1:B262 - - - - ;;Gets a Word in FshVars.
|
|
35 D1:B262 - - - - ;;Inputs:
|
|
36 D1:B262 - - - - ;; DE: Destination Word Relitive to FshVars
|
|
37 D1:B262 - - - - ;;Outputs:
|
|
38 D1:B262 - - - - ;; HL: Word in (DE)
|
|
39 D1:B262 - - - - fshvarget:
|
|
40 D1:B262 C5 - - - push bc
|
|
41 D1:B263 01 3F 00 00 ld bc, FshVarsSize / 2 - 1
|
|
42 D1:B267 CD 77 A9 D1 call cpBCDE
|
|
43 D1:B26B C1 - - - pop bc
|
|
44 D1:B26C 38 14 - - jr c, fshvargetOOBException
|
|
45 D1:B26E C5 - - - push bc
|
|
46 D1:B26F D5 - - - push de
|
|
47 D1:B270 21 00 00 00 ld hl, 0
|
|
48 D1:B274 01 1F EA D0 ld bc, FshVars
|
|
49 D1:B278 EB - - - ex de, hl
|
|
50 D1:B279 29 - - - add hl, hl
|
|
51 D1:B27A 09 - - - add hl, bc
|
|
52 D1:B27B 5E - - - ld e, (hl)
|
|
53 D1:B27C 23 - - - inc hl
|
|
54 D1:B27D 56 - - - ld d, (hl)
|
|
55 D1:B27E EB - - - ex de, hl
|
|
56 D1:B27F D1 - - - pop de
|
|
57 D1:B280 C1 - - - pop bc
|
|
58 D1:B281 C9 - - - ret
|
|
59 D1:B282 - - - - fshvargetOOBException:
|
|
60 D1:B282 E5 - - - push hl
|
|
61 D1:B283 21 7C B3 D1 ld hl, ErrOutOfBoundso
|
|
62 D1:B287 CD 37 B3 D1 call ErrSet
|
|
63 D1:B28B E1 - - - pop hl
|
|
64 D1:B28C C9 - - - ret
|
|
65 D1:B28D - - - - ;;fshvarcpy
|
|
66 D1:B28D - - - - ;;Copies a word.
|
|
67 D1:B28D - - - - ;;Inputs:
|
|
68 D1:B28D - - - - ;; HL: Byte pointer
|
|
69 D1:B28D - - - - ;; DE: Destination
|
|
70 D1:B28D - - - - fshvarcpy:
|
|
71 D1:B28D C5 - - - push bc
|
|
72 D1:B28E 01 3F 00 00 ld bc, FshVarsSize / 2 - 1
|
|
73 D1:B292 CD 77 A9 D1 call cpBCDE
|
|
74 D1:B296 C1 - - - pop bc
|
|
75 D1:B297 38 2A - - jr c, fshvarcpyOOBException
|
|
76 D1:B299 C5 - - - push bc
|
|
77 D1:B29A 01 40 00 00 ld bc, FshVarsSize / 2
|
|
78 D1:B29E CD 72 A9 D1 call cpHLBC
|
|
79 D1:B2A2 C1 - - - pop bc
|
|
80 D1:B2A3 30 1E - - jr nc, fshvarcpyOOBException
|
|
81 D1:B2A5 D5 - - - push de
|
|
82 D1:B2A6 E5 - - - push hl
|
|
83 D1:B2A7 01 40 00 00 ld bc, FshVarsSize / 2
|
|
84 D1:B2AB CD 77 A9 D1 call cpBCDE
|
|
85 D1:B2AF 38 12 - - jr c, fshvarcpyOOBException
|
|
86 D1:B2B1 01 1F EA D0 ld bc, FshVars
|
|
87 D1:B2B5 29 - - - add hl, hl
|
|
88 D1:B2B6 09 - - - add hl, bc
|
|
89 D1:B2B7 EB - - - ex de, hl
|
|
90 D1:B2B8 29 - - - add hl, hl
|
|
91 D1:B2B9 09 - - - add hl, bc
|
|
92 D1:B2BA 1A - - - ld a, (de)
|
|
93 D1:B2BB 77 - - - ld (hl), a
|
|
94 D1:B2BC 13 - - - inc de
|
|
95 D1:B2BD 23 - - - inc hl
|
|
96 D1:B2BE 1A - - - ld a, (de)
|
|
97 D1:B2BF 77 - - - ld (hl), a
|
|
98 D1:B2C0 E1 - - - pop hl
|
|
99 D1:B2C1 D1 - - - pop de
|
|
100 D1:B2C2 C9 - - - ret
|
|
101 D1:B2C3 - - - -
|
|
102 D1:B2C3 - - - - fshvarcpyOOBException:
|
|
103 D1:B2C3 E5 - - - push hl
|
|
104 D1:B2C4 21 7C B3 D1 ld hl, ErrOutOfBoundso
|
|
105 D1:B2C8 CD 37 B3 D1 call ErrSet
|
|
106 D1:B2CC E1 - - - pop hl
|
|
107 D1:B2CD C9 - - - ret
|
|
108 D1:B2CE - - - -
|
|
109 D1:B2CE - - - - ;;fshvarreset
|
|
110 D1:B2CE - - - - ;;Fills fshvars with $00
|
|
111 D1:B2CE - - - - fshvarreset:
|
|
112 D1:B2CE E5 - - - push hl
|
|
113 D1:B2CF C5 - - - push bc
|
|
114 D1:B2D0 D5 - - - push de
|
|
115 D1:B2D1 06 00 - - ld b, 0
|
|
116 D1:B2D3 11 00 00 00 ld de, 0
|
|
117 D1:B2D7 21 00 00 00 ld hl, 0
|
|
118 D1:B2DB - - - - fshvarfillLoop:
|
|
119 D1:B2DB CD 3A B2 D1 call fshvarset
|
|
120 D1:B2DF 04 - - - inc b
|
|
121 D1:B2E0 13 - - - inc de
|
|
122 D1:B2E1 78 - - - ld a, b
|
|
123 D1:B2E2 FE 40 - - cp FshVarsSize / 2
|
|
124 D1:B2E4 38 F5 - - jr c, fshvarfillLoop
|
|
125 D1:B2E6 D1 - - - pop de
|
|
126 D1:B2E7 C1 - - - pop bc
|
|
127 D1:B2E8 E1 - - - pop hl
|
|
128 D1:B2E9 C9 - - - ret
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/fsh/fsh.inc"
|
|
4 D1:B2EA - - - - #include "includes/lib/fsh/Err.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/fsh/Err.asm"
|
|
1 D1:B2EA - - - - ;;ErrCatch
|
|
2 D1:B2EA - - - - ;;Checks err bit and jp to err route
|
|
3 D1:B2EA - - - - ErrCatch:
|
|
4 D1:B2EA C1 - - - pop bc
|
|
5 D1:B2EB E5 - - - push hl
|
|
6 D1:B2EC 21 6C A9 D1 ld hl, FshFlags
|
|
7 D1:B2F0 CB 4E - - bit 1, (hl)
|
|
8 D1:B2F2 E1 - - - pop hl
|
|
9 D1:B2F3 C2 F9 B2 D1 jp nz, ErrRoute
|
|
10 D1:B2F7 C5 - - - push bc
|
|
11 D1:B2F8 C9 - - - ret
|
|
12 D1:B2F9 - - - -
|
|
13 D1:B2F9 - - - - ;;ErrRoute
|
|
14 D1:B2F9 - - - - ;;Routes err codes.
|
|
15 D1:B2F9 - - - - ErrRoute:
|
|
16 D1:B2F9 - - - -
|
|
17 D1:B2F9 21 6C A9 D1 ld hl, FshFlags
|
|
18 D1:B2FD CB 8E - - res 1, (hl)
|
|
19 D1:B2FF - - - -
|
|
20 D1:B2FF 21 CE EA D0 ld hl, FshCmdErrCode
|
|
21 D1:B303 - - - -
|
|
22 D1:B303 11 46 B3 D1 ld de, ErrCmdNotFoundo
|
|
23 D1:B307 CD 35 AA D1 call bytecmp
|
|
24 D1:B30B CA 47 B3 D1 jp z, ErrCmdNotFoundf
|
|
25 D1:B30F - - - -
|
|
26 D1:B30F 11 7C B3 D1 ld de, ErrOutOfBoundso
|
|
27 D1:B313 CD 35 AA D1 call bytecmp
|
|
28 D1:B317 CA 7D B3 D1 jp z, ErrOutOfBoundsf
|
|
29 D1:B31B - - - -
|
|
30 D1:B31B 11 A2 B3 D1 ld de, ErrArgso
|
|
31 D1:B31F CD 35 AA D1 call bytecmp
|
|
32 D1:B323 CA A3 B3 D1 jp z, ErrArgsf
|
|
33 D1:B327 - - - -
|
|
34 D1:B327 11 CC B3 D1 ld de, ErrUsageo
|
|
35 D1:B32B CD 35 AA D1 call bytecmp
|
|
36 D1:B32F CA CD B3 D1 jp z, ErrUsagef
|
|
37 D1:B333 - - - -
|
|
38 D1:B333 C3 F8 B3 D1 jp ErrDefault
|
|
39 D1:B337 - - - -
|
|
40 D1:B337 - - - -
|
|
41 D1:B337 - - - - ;;ErrSet
|
|
42 D1:B337 - - - - ;;Sets all things relating to Err codes
|
|
43 D1:B337 - - - - ;;Inputs:
|
|
44 D1:B337 - - - - ;; HL: Err_____o
|
|
45 D1:B337 - - - - ErrSet:
|
|
46 D1:B337 E5 - - - push hl
|
|
47 D1:B338 7E - - - ld a, (hl)
|
|
48 D1:B339 21 CE EA D0 ld hl, FshCmdErrCode
|
|
49 D1:B33D 77 - - - ld (hl), a
|
|
50 D1:B33E 21 6C A9 D1 ld hl, FshFlags
|
|
51 D1:B342 CB CE - - set 1, (hl)
|
|
52 D1:B344 E1 - - - pop hl
|
|
53 D1:B345 C9 - - - ret
|
|
54 D1:B346 - - - -
|
|
55 D1:B346 - - - - ;;ERR FUNCS-------------------
|
|
56 D1:B346 - - - -
|
|
57 D1:B346 01 - - - ErrCmdNotFoundo: .db $01
|
|
58 D1:B347 - - - - ErrCmdNotFoundf:
|
|
59 D1:B347 21 9F EA D0 ld hl, FshCmd
|
|
60 D1:B34B 7E - - - ld a, (hl)
|
|
61 D1:B34C FE 00 - - cp $00
|
|
62 D1:B34E CA DB A8 D1 jp z, Fin
|
|
63 D1:B352 21 6A B3 D1 ld hl, ErrCmdNotFoundt
|
|
64 D1:B356 CD C0 07 02 call _PutS
|
|
65 D1:B35A 21 9F EA D0 ld hl, FshCmd
|
|
66 D1:B35E CD C0 07 02 call _PutS
|
|
67 D1:B362 CD F0 07 02 call _NewLine
|
|
68 D1:B366 C3 DB A8 D1 jp Fin
|
|
69 D1:B36A 65 72 72 6F
|
|
72 3A 4E 6F
|
|
20 43 6F 6D
|
|
6D 61 6E 64
|
|
3A 00 - - ErrCmdNotFoundt: .db "error:No Command:", 0
|
|
70 D1:B37C - - - -
|
|
71 D1:B37C 02 - - - ErrOutOfBoundso: .db $02
|
|
72 D1:B37D - - - - ErrOutOfBoundsf:
|
|
73 D1:B37D 21 8D B3 D1 ld hl, ErrOutOfBoundst
|
|
74 D1:B381 CD C0 07 02 call _PutS
|
|
75 D1:B385 CD F0 07 02 call _NewLine
|
|
76 D1:B389 C3 DB A8 D1 jp Fin
|
|
77 D1:B38D 65 72 72 6F
|
|
72 3A 20 4F
|
|
75 74 20 4F
|
|
66 20 42 6F
|
|
75 6E 64 73
|
|
00 - - - ErrOutOfBoundst: .db "error: Out Of Bounds", 0
|
|
78 D1:B3A2 - - - -
|
|
79 D1:B3A2 03 - - - ErrArgso: .db $03
|
|
80 D1:B3A3 - - - - ErrArgsf:
|
|
81 D1:B3A3 21 B3 B3 D1 ld hl, ErrArgst
|
|
82 D1:B3A7 CD C0 07 02 call _PutS
|
|
83 D1:B3AB CD F0 07 02 call _NewLine
|
|
84 D1:B3AF C3 DB A8 D1 jp Fin
|
|
85 D1:B3B3 65 72 72 6F
|
|
72 3A 20 49
|
|
6E 76 61 6C
|
|
69 64 20 41
|
|
72 67 75 6D
|
|
65 6E 74 73
|
|
00 - - - ErrArgst: .db "error: Invalid Arguments", 0
|
|
86 D1:B3CC - - - -
|
|
87 D1:B3CC 04 - - - ErrUsageo: .db $04
|
|
88 D1:B3CD - - - - ErrUsagef:
|
|
89 D1:B3CD 21 E9 B3 D1 ld hl, ErrUsaget
|
|
90 D1:B3D1 CD C0 07 02 call _PutS
|
|
91 D1:B3D5 21 9F EA D0 ld hl, FshCmd
|
|
92 D1:B3D9 CD 0B B6 D1 call manrouteu
|
|
93 D1:B3DD CD C0 07 02 call _PutS
|
|
94 D1:B3E1 CD F0 07 02 call _NewLine
|
|
95 D1:B3E5 C3 DB A8 D1 jp Fin
|
|
96 D1:B3E9 65 72 72 6F
|
|
72 3A 20 55
|
|
73 61 67 65
|
|
3A 20 00 - ErrUsaget: .db "error: Usage: ", 0
|
|
97 D1:B3F8 - - - -
|
|
98 D1:B3F8 - - - - ErrDefault:
|
|
99 D1:B3F8 21 04 B4 D1 ld hl, ErrDefaultt
|
|
100 D1:B3FC CD C0 07 02 call _PutS
|
|
101 D1:B400 C3 F7 A8 D1 jp Exit
|
|
102 D1:B404 65 72 72 6F
|
|
72 3A 20 44
|
|
65 66 61 75
|
|
6C 74 3B 20
|
|
45 78 69 74
|
|
00 - - - ErrDefaultt: .db "error: Default; Exit", 0
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/fsh/fsh.inc"
|
|
5 D1:B419 - - - - #include "includes/lib/fsh/Print.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/fsh/Print.asm"
|
|
1 D1:B419 - - - - ;;printfshnamelong
|
|
2 D1:B419 - - - - ;;prints Name + Varsv + Version to screen
|
|
3 D1:B419 - - - - printfshnamelong:
|
|
4 D1:B419 E5 - - - push hl
|
|
5 D1:B41A 21 FC A8 D1 ld hl, FshName
|
|
6 D1:B41E CD C0 07 02 call _PutS
|
|
7 D1:B422 3E 20 - - ld a, ' '
|
|
8 D1:B424 CD B8 07 02 call _PutC
|
|
9 D1:B428 21 31 A9 D1 ld hl, FshVVars
|
|
10 D1:B42C CD C0 07 02 call _PutS
|
|
11 D1:B430 3E 20 - - ld a, ' '
|
|
12 D1:B432 CD B8 07 02 call _PutC
|
|
13 D1:B436 3E 76 - - ld a, 'v'
|
|
14 D1:B438 CD B8 07 02 call _PutC
|
|
15 D1:B43C 21 35 A9 D1 ld hl, FshVMajor
|
|
16 D1:B440 CD C0 07 02 call _PutS
|
|
17 D1:B444 21 3F A9 D1 ld hl, FshVSeparator
|
|
18 D1:B448 CD C0 07 02 call _PutS
|
|
19 D1:B44C 21 37 A9 D1 ld hl, FshVMinor
|
|
20 D1:B450 CD C0 07 02 call _PutS
|
|
21 D1:B454 21 3F A9 D1 ld hl, FshVSeparator
|
|
22 D1:B458 CD C0 07 02 call _PutS
|
|
23 D1:B45C 21 39 A9 D1 ld hl, FshVPatch
|
|
24 D1:B460 CD C0 07 02 call _PutS
|
|
25 D1:B464 3E 20 - - ld a, ' '
|
|
26 D1:B466 CD B8 07 02 call _PutC
|
|
27 D1:B46A 21 3B A9 D1 ld hl, FshVBuild
|
|
28 D1:B46E CD C0 07 02 call _PutS
|
|
29 D1:B472 E1 - - - pop hl
|
|
30 D1:B473 C9 - - - ret
|
|
31 D1:B474 - - - -
|
|
32 D1:B474 - - - - ;;printmotd
|
|
33 D1:B474 - - - - ;;prints the motd to screen
|
|
34 D1:B474 - - - - printmotd:
|
|
35 D1:B474 CD 19 B4 D1 call printfshnamelong
|
|
36 D1:B478 CD F0 07 02 call _NewLine
|
|
37 D1:B47C CD F0 07 02 call _NewLine
|
|
38 D1:B480 21 41 A9 D1 ld hl, FshMotd2nd
|
|
39 D1:B484 CD C0 07 02 call _PutS
|
|
40 D1:B488 CD F0 07 02 call _NewLine
|
|
41 D1:B48C 21 57 A9 D1 ld hl, FshMotdHelp
|
|
42 D1:B490 CD C0 07 02 call _PutS
|
|
43 D1:B494 CD F0 07 02 call _NewLine
|
|
44 D1:B498 C9 - - - ret
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/fsh/fsh.inc"
|
|
6 D1:B499 - - - - #include "includes/lib/fsh/Draw.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/fsh/Draw.asm"
|
|
1 D1:B499 - - - - ;;drawstatusbar
|
|
2 D1:B499 - - - - ;;draws the FSH status bar
|
|
3 D1:B499 - - - - drawstatusbar:
|
|
4 D1:B499 - - - - ;rgbto565(84, 84, 84)
|
|
5 D1:B499 21 AA 52 00 ld hl, $52AA
|
|
6 D1:B49D 3E 00 - - ld a, 0
|
|
7 D1:B49F 01 1E 00 00 ld bc, 30
|
|
8 D1:B4A3 CD 59 AB D1 call drawbar
|
|
9 D1:B4A7 - - - - ;rgbto565(0, 159, 209)
|
|
10 D1:B4A7 21 FA 04 00 ld hl, $04FA
|
|
11 D1:B4AB - - - - ;ld hl, %1111100000000000
|
|
12 D1:B4AB EB DD 6B DD
|
|
62 EB 21 02
|
|
00 00 11 00
|
|
00 00 01 00
|
|
00 00 0E 00
|
|
3E 1E CD 6E
|
|
AB D1 - - drawrectfilledM(0, 0, 2, 30)
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/fsh/Draw.asm"
|
|
13 D1:B4C5 CD 50 1A 02 call _DrawBatteryIndicator
|
|
14 D1:B4C9 - - - - ;draw name
|
|
15 D1:B4C9 FD CB 32 D6 set fracDrawLFont, (iy + fontFlags)
|
|
16 D1:B4CD 3E 06 - - ld a, 6
|
|
17 D1:B4CF 32 D5 08 D0 ld (penRow), a
|
|
18 D1:B4D3 21 07 00 00 ld hl, 7
|
|
19 D1:B4D7 22 D2 08 D0 ld (penCol), hl
|
|
20 D1:B4DB 21 AA 52 00 ld hl, $52AA
|
|
21 D1:B4DF 22 AA 26 D0 ld (drawBGcolor), hl
|
|
22 D1:B4E3 21 FF FF 00 ld hl, $ffff
|
|
23 D1:B4E7 22 AC 26 D0 ld (drawFGcolor), hl
|
|
24 D1:B4EB 21 FC A8 D1 ld hl, FshName
|
|
25 D1:B4EF CD 34 08 02 call _VPutS
|
|
26 D1:B4F3 21 FF FF 00 ld hl, $ffff
|
|
27 D1:B4F7 22 AA 26 D0 ld (drawBGcolor), hl
|
|
28 D1:B4FB 21 00 00 00 ld hl, $0000
|
|
29 D1:B4FF 22 AC 26 D0 ld (drawFGcolor), hl
|
|
30 D1:B503 C9 - - - ret
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/fsh/fsh.inc"
|
|
Listing for file "FSHa.asm"
|
|
73 D1:B504 - - - - #include "includes/lib/crypto/crypto.inc"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/crypto/crypto.inc"
|
|
1 D1:B504 - - - - #include "includes/lib/crypto/Rot.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/crypto/Rot.asm"
|
|
1 D1:B504 - - - - ;;rotletencrypt
|
|
2 D1:B504 - - - - ;;Encrypts a string in rot-n (uses $41 to $5B)
|
|
3 D1:B504 - - - - ;;Inputs:
|
|
4 D1:B504 - - - - ;; HL: string pointer
|
|
5 D1:B504 - - - - ;; A: rot-n
|
|
6 D1:B504 - - - - ;;Notes:
|
|
7 D1:B504 - - - - ;; Changes string in place.
|
|
8 D1:B504 - - - - rotletencrypt:
|
|
9 D1:B504 E5 - - - push hl
|
|
10 D1:B505 C5 - - - push bc
|
|
11 D1:B506 - - - - rotletencryptMod:
|
|
12 D1:B506 E5 - - - push hl
|
|
13 D1:B507 67 - - - ld h, a
|
|
14 D1:B508 2E 19 - - ld l, 'Z' + 1 - 'A' - 1
|
|
15 D1:B50A CD 99 A9 D1 call modHL
|
|
16 D1:B50E 44 - - - ld b, h
|
|
17 D1:B50F E1 - - - pop hl
|
|
18 D1:B510 - - - - rotletencryptLoop:
|
|
19 D1:B510 7E - - - ld a, (hl)
|
|
20 D1:B511 FE 00 - - cp a, $00
|
|
21 D1:B513 28 0F - - jr z, rotletencryptEnd
|
|
22 D1:B515 FE 20 - - cp a, ' '
|
|
23 D1:B517 28 07 - - jr z, rotletencryptLD
|
|
24 D1:B519 80 - - - add a, b
|
|
25 D1:B51A FE 5C - - cp a, 'Z' + 2
|
|
26 D1:B51C 38 02 - - jr c , rotletencryptLD
|
|
27 D1:B51E D6 1B - - sub a, 'Z' + 2 - 'A'
|
|
28 D1:B520 - - - - rotletencryptLD:
|
|
29 D1:B520 77 - - - ld (hl), a
|
|
30 D1:B521 23 - - - inc hl
|
|
31 D1:B522 18 EC - - jr rotletencryptLoop
|
|
32 D1:B524 - - - - rotletencryptEnd:
|
|
33 D1:B524 36 00 - - ld (hl), $00
|
|
34 D1:B526 C1 - - - pop bc
|
|
35 D1:B527 E1 - - - pop hl
|
|
36 D1:B528 C9 - - - ret
|
|
37 D1:B529 - - - -
|
|
38 D1:B529 - - - - ;;rotletdecrypt
|
|
39 D1:B529 - - - - ;;Decrypts a string in rot-n (uses $41 to $5B)
|
|
40 D1:B529 - - - - ;;Inputs:
|
|
41 D1:B529 - - - - ;; HL: string pointer
|
|
42 D1:B529 - - - - ;; A: rot-n
|
|
43 D1:B529 - - - - ;;Notes:
|
|
44 D1:B529 - - - - ;; Changes string in place.
|
|
45 D1:B529 - - - - rotletdecrypt:
|
|
46 D1:B529 E5 - - - push hl
|
|
47 D1:B52A C5 - - - push bc
|
|
48 D1:B52B - - - - rotletdecryptMod:
|
|
49 D1:B52B E5 - - - push hl
|
|
50 D1:B52C 67 - - - ld h, a
|
|
51 D1:B52D 2E 19 - - ld l, 'Z' + 1 - 'A' - 1
|
|
52 D1:B52F CD 99 A9 D1 call modHL
|
|
53 D1:B533 44 - - - ld b, h
|
|
54 D1:B534 E1 - - - pop hl
|
|
55 D1:B535 - - - - rotletdecryptLoop:
|
|
56 D1:B535 7E - - - ld a, (hl)
|
|
57 D1:B536 FE 00 - - cp a, $00
|
|
58 D1:B538 28 0F - - jr z, rotletdecryptEnd
|
|
59 D1:B53A FE 20 - - cp a, ' '
|
|
60 D1:B53C 28 07 - - jr z, rotletdecryptLD
|
|
61 D1:B53E 90 - - - sub a, b
|
|
62 D1:B53F FE 41 - - cp a, 'A'
|
|
63 D1:B541 30 02 - - jr nc , rotletdecryptLD
|
|
64 D1:B543 C6 1B - - add a, 'Z' + 2 - 'A'
|
|
65 D1:B545 - - - - rotletdecryptLD:
|
|
66 D1:B545 77 - - - ld (hl), a
|
|
67 D1:B546 23 - - - inc hl
|
|
68 D1:B547 18 EC - - jr rotletdecryptLoop
|
|
69 D1:B549 - - - - rotletdecryptEnd:
|
|
70 D1:B549 36 00 - - ld (hl), $00
|
|
71 D1:B54B C1 - - - pop bc
|
|
72 D1:B54C E1 - - - pop hl
|
|
73 D1:B54D C9 - - - ret
|
|
74 D1:B54E - - - -
|
|
75 D1:B54E - - - - ;;rotasciiencrypt
|
|
76 D1:B54E - - - - ;;Encrypts a string in rot-x (uses $00 to $EF)
|
|
77 D1:B54E - - - - ;;Inputs:
|
|
78 D1:B54E - - - - ;; HL: string pointer
|
|
79 D1:B54E - - - - ;; A: x
|
|
80 D1:B54E - - - - ;;Notes:
|
|
81 D1:B54E - - - - ;; Changes string in place.
|
|
82 D1:B54E - - - - rotasciiencrypt:
|
|
83 D1:B54E E5 - - - push hl
|
|
84 D1:B54F C5 - - - push bc
|
|
85 D1:B550 0E 00 - - ld c, 0
|
|
86 D1:B552 4F - - - ld c, a
|
|
87 D1:B553 - - - - rotasciiencryptLoop:
|
|
88 D1:B553 7E - - - ld a, (hl)
|
|
89 D1:B554 FE 00 - - cp 0
|
|
90 D1:B556 28 13 - - jr z, rotasciiencryptEnd
|
|
91 D1:B558 81 - - - add a, c
|
|
92 D1:B559 FE 00 - - cp 0
|
|
93 D1:B55B 20 01 - - jr nz, rotasciiencryptLd
|
|
94 D1:B55D 3C - - - inc a
|
|
95 D1:B55E - - - - rotasciiencryptLd:
|
|
96 D1:B55E 77 - - - ld (hl), a
|
|
97 D1:B55F 23 - - - inc hl
|
|
98 D1:B560 FE EF - - cp a, $EF
|
|
99 D1:B562 38 EF - - jr c, rotasciiencryptLoop
|
|
100 D1:B564 2B - - - dec hl
|
|
101 D1:B565 D6 0F - - sub a, $0F
|
|
102 D1:B567 77 - - - ld (hl), a
|
|
103 D1:B568 23 - - - inc hl
|
|
104 D1:B569 18 E8 - - jr rotasciiencryptLoop
|
|
105 D1:B56B - - - - rotasciiencryptEnd:
|
|
106 D1:B56B 36 00 - - ld (hl), $00
|
|
107 D1:B56D C1 - - - pop bc
|
|
108 D1:B56E E1 - - - pop hl
|
|
109 D1:B56F C9 - - - ret
|
|
110 D1:B570 - - - -
|
|
111 D1:B570 - - - - ;;rotasciidecrypt
|
|
112 D1:B570 - - - - ;;Encrypts a string in rot-x (uses $00 to $EF)
|
|
113 D1:B570 - - - - ;;Inputs:
|
|
114 D1:B570 - - - - ;; HL: string pointer
|
|
115 D1:B570 - - - - ;; A: x
|
|
116 D1:B570 - - - - ;;Notes:
|
|
117 D1:B570 - - - - ;; Changes string in place.
|
|
118 D1:B570 - - - - rotasciidecrypt:
|
|
119 D1:B570 E5 - - - push hl
|
|
120 D1:B571 C5 - - - push bc
|
|
121 D1:B572 0E 00 - - ld c, 0
|
|
122 D1:B574 4F - - - ld c, a
|
|
123 D1:B575 - - - - rotasciidecryptLoop:
|
|
124 D1:B575 7E - - - ld a, (hl)
|
|
125 D1:B576 FE 00 - - cp 0
|
|
126 D1:B578 28 13 - - jr z, rotasciidecryptEnd
|
|
127 D1:B57A 91 - - - sub a, c
|
|
128 D1:B57B FE 00 - - cp 0
|
|
129 D1:B57D 20 01 - - jr nz, rotasciidecryptLd
|
|
130 D1:B57F 3D - - - dec a
|
|
131 D1:B580 - - - - rotasciidecryptLd:
|
|
132 D1:B580 77 - - - ld (hl), a
|
|
133 D1:B581 23 - - - inc hl
|
|
134 D1:B582 FE EF - - cp a, $EF
|
|
135 D1:B584 38 EF - - jr c, rotasciidecryptLoop
|
|
136 D1:B586 2B - - - dec hl
|
|
137 D1:B587 C6 0F - - add a, $0F
|
|
138 D1:B589 77 - - - ld (hl), a
|
|
139 D1:B58A 23 - - - inc hl
|
|
140 D1:B58B 18 E8 - - jr rotasciidecryptLoop
|
|
141 D1:B58D - - - - rotasciidecryptEnd:
|
|
142 D1:B58D 36 00 - - ld (hl), $00
|
|
143 D1:B58F C1 - - - pop bc
|
|
144 D1:B590 E1 - - - pop hl
|
|
145 D1:B591 C9 - - - ret
|
|
146 D1:B592 - - - -
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/crypto/crypto.inc"
|
|
2 D1:B592 - - - - #include "includes/lib/crypto/Xor.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/crypto/Xor.asm"
|
|
1 D1:B592 - - - - ;;xorcrypt
|
|
2 D1:B592 - - - - ;;<en><de>crypts a string using xor
|
|
3 D1:B592 - - - - ;;Inputs:
|
|
4 D1:B592 - - - - ;; HL: string pointer
|
|
5 D1:B592 - - - - ;; DE: seed pointer (shorter)
|
|
6 D1:B592 - - - - ;;Notes:
|
|
7 D1:B592 - - - - ;; Changes string in place.
|
|
8 D1:B592 - - - - xorcrypt:
|
|
9 D1:B592 E5 - - - push hl
|
|
10 D1:B593 D5 - - - push de
|
|
11 D1:B594 C5 - - - push bc
|
|
12 D1:B595 CD 22 AC D1 call strlen
|
|
13 D1:B599 D5 - - - push de
|
|
14 D1:B59A E5 - - - push hl
|
|
15 D1:B59B 21 00 00 00 ld hl, 0
|
|
16 D1:B59F 60 - - - ld h, b
|
|
17 D1:B5A0 69 - - - ld l, c
|
|
18 D1:B5A1 EB - - - ex de, hl
|
|
19 D1:B5A2 CD 22 AC D1 call strlen
|
|
20 D1:B5A6 EB - - - ex de, hl
|
|
21 D1:B5A7 7D - - - ld a, l ;C = len(seed) l=len(string)
|
|
22 D1:B5A8 91 - - - sub a,c
|
|
23 D1:B5A9 D2 B3 B5 D1 jp nc, xorcryptNSmaller
|
|
24 D1:B5AD 0E 01 - - ld c, $01
|
|
25 D1:B5AF 3E 00 - - ld a, 0
|
|
26 D1:B5B1 2E 00 - - ld l, 0
|
|
27 D1:B5B3 - - - - xorcryptNSmaller:
|
|
28 D1:B5B3 0D - - - dec c
|
|
29 D1:B5B4 D2 BA B5 D1 jp nc, xorcryptNSmaller2
|
|
30 D1:B5B8 0E 00 - - ld c, 0
|
|
31 D1:B5BA - - - - xorcryptNSmaller2:
|
|
32 D1:B5BA 41 - - - ld b, c
|
|
33 D1:B5BB 4D - - - ld c, l ;b=len(seed) c=len(string)
|
|
34 D1:B5BC E1 - - - pop hl
|
|
35 D1:B5BD B7 - - - or a, a
|
|
36 D1:B5BE D1 - - - pop de
|
|
37 D1:B5BF 28 2C - - jr z, xorcryptEnd
|
|
38 D1:B5C1 D5 - - - push de
|
|
39 D1:B5C2 EB - - - ex de, hl; hl=seed
|
|
40 D1:B5C3 E1 - - - pop hl
|
|
41 D1:B5C4 C5 - - - push bc
|
|
42 D1:B5C5 D5 - - - push de
|
|
43 D1:B5C6 11 00 00 00 ld de, 0
|
|
44 D1:B5CA 58 - - - ld e, b
|
|
45 D1:B5CB 01 00 00 00 ld bc, 0
|
|
46 D1:B5CF 4B - - - ld c, e
|
|
47 D1:B5D0 09 - - - add hl, bc
|
|
48 D1:B5D1 D1 - - - pop de
|
|
49 D1:B5D2 C1 - - - pop bc
|
|
50 D1:B5D3 23 - - - inc hl
|
|
51 D1:B5D4 36 80 - - ld (hl), %10000000
|
|
52 D1:B5D6 C5 - - - push bc
|
|
53 D1:B5D7 05 - - - dec b
|
|
54 D1:B5D8 3E FF - - ld a, $FF
|
|
55 D1:B5DA B8 - - - cp a, b
|
|
56 D1:B5DB 28 0B - - jr z, xorcryptPadLoopEnd
|
|
57 D1:B5DD 3E 00 - - ld a, $00
|
|
58 D1:B5DF B8 - - - cp a, b
|
|
59 D1:B5E0 20 01 - - jr nz, xorcryptPadLoop
|
|
60 D1:B5E2 04 - - - inc b
|
|
61 D1:B5E3 - - - - xorcryptPadLoop:
|
|
62 D1:B5E3 23 - - - inc hl
|
|
63 D1:B5E4 36 65 - - ld (hl), 'e'
|
|
64 D1:B5E6 10 FB - - djnz xorcryptPadLoop
|
|
65 D1:B5E8 - - - - xorcryptPadLoopEnd:
|
|
66 D1:B5E8 C1 - - - pop bc
|
|
67 D1:B5E9 70 - - - ld (hl), b
|
|
68 D1:B5EA 23 - - - inc hl
|
|
69 D1:B5EB 36 00 - - ld (hl), $00
|
|
70 D1:B5ED - - - - xorcryptEnd:
|
|
71 D1:B5ED C1 - - - pop bc
|
|
72 D1:B5EE D1 - - - pop de
|
|
73 D1:B5EF E1 - - - pop hl
|
|
74 D1:B5F0 - - - - ;push hl
|
|
75 D1:B5F0 - - - - ;xorcryptRandLoop:
|
|
76 D1:B5F0 - - - - ;ld a, (hl)
|
|
77 D1:B5F0 - - - - ;or a, a
|
|
78 D1:B5F0 - - - - ;jr z, xorcryptRandLoopEnd
|
|
79 D1:B5F0 - - - - ;call randomint
|
|
80 D1:B5F0 - - - - ;or a, a
|
|
81 D1:B5F0 - - - - ;jr nz, xorcryptRandLoopLD
|
|
82 D1:B5F0 - - - - ;ld a, '/'
|
|
83 D1:B5F0 - - - - ;xorcryptRandLoopLD:
|
|
84 D1:B5F0 - - - - ;ld (hl), a
|
|
85 D1:B5F0 - - - - ;inc hl
|
|
86 D1:B5F0 - - - - ;jr xorcryptRandLoop
|
|
87 D1:B5F0 - - - - ;xorcryptRandLoopEnd:
|
|
88 D1:B5F0 - - - - ;pop hl
|
|
89 D1:B5F0 CD 65 AD D1 call strxor
|
|
90 D1:B5F4 C9 - - - ret
|
|
91 D1:B5F5 - - - -
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/lib/crypto/crypto.inc"
|
|
Listing for file "FSHa.asm"
|
|
74 D1:B5F5 - - - -
|
|
75 D1:B5F5 - - - - #include "includes/man-db.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/man-db.asm"
|
|
1 D1:B5F5 - - - - ;;TODO: move module specific macros to diffrent file
|
|
2 D1:B5F5 - - - - ;;manroute
|
|
3 D1:B5F5 - - - - ;;routes command string to discription
|
|
4 D1:B5F5 - - - - ;;Inputs:
|
|
5 D1:B5F5 - - - - ;; HL: Command String
|
|
6 D1:B5F5 - - - - ;;Outputs:
|
|
7 D1:B5F5 - - - - ;; HL: Command Discription String
|
|
8 D1:B5F5 - - - - manroute:
|
|
9 D1:B5F5 D5 - - - push de
|
|
10 D1:B5F6 - - - - #macro routestrjp(cmdXs, cmdXm)
|
|
11 D1:B5F6 ld de, cmdXs
|
|
12 D1:B5F6 call strcmp
|
|
13 D1:B5F6 ld de, cmdXm
|
|
14 D1:B5F6 jp z, manrouteReturn
|
|
15 D1:B5F6 #endmacro
|
|
16 D1:B5F6 - - - -
|
|
17 D1:B5F6 - - - - #macro subroutestrjp(cmdXs, cmdYs, cmdYm)
|
|
18 D1:B5F6 push hl
|
|
19 D1:B5F6 ld de, cmdXs
|
|
20 D1:B5F6 call strcmp
|
|
21 D1:B5F6 ld hl, 0
|
|
22 D1:B5F6 jr nz, +_
|
|
23 D1:B5F6 ld hl, FshCmdArg1
|
|
24 D1:B5F6 _:
|
|
25 D1:B5F6 ld de, cmdYs
|
|
26 D1:B5F6 call strcmp
|
|
27 D1:B5F6 pop hl
|
|
28 D1:B5F6 ld de, cmdYm
|
|
29 D1:B5F6 jp z, manrouteReturn
|
|
30 D1:B5F6 #endmacro
|
|
31 D1:B5F6 - - - -
|
|
32 D1:B5F6 CD AA B7 D1 call fshcmdmanroute
|
|
33 D1:B5FA CD F1 C0 D1 call cryptocmdmanroute
|
|
34 D1:B5FE - - - - ;Extention Point
|
|
35 D1:B5FE - - - -
|
|
36 D1:B5FE 21 CE EA D0 ld hl, FshCmdErrCode
|
|
37 D1:B602 36 01 - - ld (hl), $01
|
|
38 D1:B604 11 00 00 00 ld de, $00
|
|
39 D1:B608 - - - - manrouteReturn:
|
|
40 D1:B608 EB - - - ex de, hl
|
|
41 D1:B609 D1 - - - pop de
|
|
42 D1:B60A C9 - - - ret
|
|
43 D1:B60B - - - -
|
|
44 D1:B60B - - - - ;;manrouteu
|
|
45 D1:B60B - - - - ;;routes command string to usage
|
|
46 D1:B60B - - - - ;;Inputs:
|
|
47 D1:B60B - - - - ;; HL: Command String
|
|
48 D1:B60B - - - - ;;Outputs:
|
|
49 D1:B60B - - - - ;; HL: Command Usage String
|
|
50 D1:B60B - - - - manrouteu:
|
|
51 D1:B60B D5 - - - push de
|
|
52 D1:B60C - - - - #macro routeustrjp(cmdXs, cmdXu)
|
|
53 D1:B60C ld de, cmdXs
|
|
54 D1:B60C call strcmp
|
|
55 D1:B60C ld de, cmdXu
|
|
56 D1:B60C jp z, manrouteuReturn
|
|
57 D1:B60C #endmacro
|
|
58 D1:B60C - - - -
|
|
59 D1:B60C - - - - #macro subrouteustrjp(cmdXs, cmdYs, cmdYu)
|
|
60 D1:B60C push hl
|
|
61 D1:B60C ld de, cmdXs
|
|
62 D1:B60C call strcmp
|
|
63 D1:B60C ld hl, 0
|
|
64 D1:B60C jr nz, +_
|
|
65 D1:B60C ld hl, FshCmdArg1
|
|
66 D1:B60C _:
|
|
67 D1:B60C ld de, cmdYs
|
|
68 D1:B60C call strcmp
|
|
69 D1:B60C pop hl
|
|
70 D1:B60C ld de, cmdYu
|
|
71 D1:B60C jp z, manrouteuReturn
|
|
72 D1:B60C #endmacro
|
|
73 D1:B60C - - - -
|
|
74 D1:B60C CD 5D B8 D1 call fshcmdmanrouteu
|
|
75 D1:B610 CD EC C1 D1 call cryptocmdmanrouteu
|
|
76 D1:B614 - - - - ;Extention Point
|
|
77 D1:B614 - - - -
|
|
78 D1:B614 21 CE EA D0 ld hl, FshCmdErrCode
|
|
79 D1:B618 36 01 - - ld (hl), $01
|
|
80 D1:B61A 11 00 00 00 ld de, $00
|
|
81 D1:B61E - - - - manrouteuReturn:
|
|
82 D1:B61E EB - - - ex de, hl
|
|
83 D1:B61F D1 - - - pop de
|
|
84 D1:B620 C9 - - - ret
|
|
Listing for file "FSHa.asm"
|
|
76 D1:B621 - - - - #include "includes/Command.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/Command.asm"
|
|
1 D1:B621 - - - - ;;Commanddecode
|
|
2 D1:B621 - - - - ;;Decodes all commands.
|
|
3 D1:B621 - - - - ;;Inputs:
|
|
4 D1:B621 - - - - ;; HL: Cmd String mem loc
|
|
5 D1:B621 - - - - ;; DE: Op code mem loc
|
|
6 D1:B621 - - - - ;;Output:
|
|
7 D1:B621 - - - - ;; Sets (DE) with command op code
|
|
8 D1:B621 - - - - commanddecode:
|
|
9 D1:B621 CD 46 B6 D1 call fshcmddecode
|
|
10 D1:B625 CD AD C0 D1 call cryptocmddecode
|
|
11 D1:B629 - - - - ;Extention Point
|
|
12 D1:B629 - - - -
|
|
13 D1:B629 C9 - - - ret
|
|
14 D1:B62A - - - -
|
|
15 D1:B62A - - - - ;;commandroute
|
|
16 D1:B62A - - - - ;;Routes all commamds.
|
|
17 D1:B62A - - - - ;;Inputs:
|
|
18 D1:B62A - - - - ;; HL: Op code mem loc
|
|
19 D1:B62A - - - - commandroute:
|
|
20 D1:B62A CD 23 B7 D1 call fshcmdroute
|
|
21 D1:B62E CD D6 C0 D1 call cryptocmdroute
|
|
22 D1:B632 - - - - ;Extention Point
|
|
23 D1:B632 - - - -
|
|
24 D1:B632 21 46 B3 D1 ld hl, ErrCmdNotFoundo
|
|
25 D1:B636 11 CE EA D0 ld de, FshCmdErrCode
|
|
26 D1:B63A CD 3D AA D1 call bytecpy
|
|
27 D1:B63E CD 37 B3 D1 call ErrSet
|
|
28 D1:B642 C3 DF A8 D1 jp Err
|
|
29 D1:B646 - - - -
|
|
30 D1:B646 - - - - #include "includes/FshCommands/FshCommand.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/FshCommands/FshCommand.asm"
|
|
1 D1:B646 - - - - fshcmddecode:
|
|
2 D1:B646 E5 D5 11 10
|
|
B9 D1 CD 33
|
|
AC D1 21 15
|
|
B9 D1 D1 CC
|
|
3D AA D1 E1 decodecmdopt(fshcmdEXIT, fshcmdEXITo)
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/FshCommands/FshCommand.asm"
|
|
3 D1:B65A E5 D5 11 29
|
|
B9 D1 CD 33
|
|
AC D1 21 2D
|
|
B9 D1 D1 CC
|
|
3D AA D1 E1 decodecmdopt(fshcmdSET, fshcmdSETo)
|
|
4 D1:B66E E5 D5 11 20
|
|
BA D1 CD 33
|
|
AC D1 21 25
|
|
BA D1 D1 CC
|
|
3D AA D1 E1 decodecmdopt(fshcmdCOPY, fshcmdCOPYo)
|
|
5 D1:B682 E5 D5 11 2E
|
|
BB D1 CD 33
|
|
AC D1 21 33
|
|
BB D1 D1 CC
|
|
3D AA D1 E1 decodecmdopt(fshcmdMOVE, fshcmdMOVEo)
|
|
6 D1:B696 E5 D5 11 44
|
|
BC D1 CD 33
|
|
AC D1 21 48
|
|
BC D1 D1 CC
|
|
3D AA D1 E1 decodecmdopt(fshcmdCLS, fshcmdCLSo)
|
|
7 D1:B6AA E5 D5 11 70
|
|
BC D1 CD 33
|
|
AC D1 21 74
|
|
BC D1 D1 CC
|
|
3D AA D1 E1 decodecmdopt(fshcmdVAR, fshcmdVARo)
|
|
8 D1:B6BE E5 D5 11 12
|
|
BD D1 CD 33
|
|
AC D1 21 17
|
|
BD D1 D1 CC
|
|
3D AA D1 E1 decodecmdopt(fshcmdVARS, fshcmdVARSo)
|
|
9 D1:B6D2 E5 D5 11 82
|
|
BD D1 CD 33
|
|
AC D1 21 88
|
|
BD D1 D1 CC
|
|
3D AA D1 E1 decodecmdopt(fshcmdSLEEP, fshcmdSLEEPo)
|
|
10 D1:B6E6 E5 D5 11 D0
|
|
BD D1 CD 33
|
|
AC D1 21 D5
|
|
BD D1 D1 CC
|
|
3D AA D1 E1 decodecmdopt(fshcmdINFO, fshcmdINFOo)
|
|
11 D1:B6FA E5 D5 11 72
|
|
BE D1 CD 33
|
|
AC D1 21 77
|
|
BE D1 D1 CC
|
|
3D AA D1 E1 decodecmdopt(fshcmdHELP, fshcmdHELPo)
|
|
12 D1:B70E E5 D5 11 C5
|
|
BF D1 CD 33
|
|
AC D1 21 C9
|
|
BF D1 D1 CC
|
|
3D AA D1 E1 decodecmdopt(fshcmdMAN, fshcmdMANo)
|
|
13 D1:B722 C9 - - - ret
|
|
14 D1:B723 - - - -
|
|
15 D1:B723 - - - - fshcmdroute:
|
|
16 D1:B723 C1 - - - pop bc ;pop the ret loc from stack into bc
|
|
17 D1:B724 11 15 B9 D1
|
|
CD 35 AA D1
|
|
CA 25 B9 D1 routeoptjp(fshcmdEXITo, fshcmdEXITf)
|
|
18 D1:B730 11 2D B9 D1
|
|
CD 35 AA D1
|
|
CA 6B B9 D1 routeoptjp(fshcmdSETo, fshcmdSETf)
|
|
19 D1:B73C 11 25 BA D1
|
|
CD 35 AA D1
|
|
CA 80 BA D1 routeoptjp(fshcmdCOPYo, fshcmdCOPYf)
|
|
20 D1:B748 11 33 BB D1
|
|
CD 35 AA D1
|
|
CA 8D BB D1 routeoptjp(fshcmdMOVEo, fshcmdMOVEf)
|
|
21 D1:B754 11 48 BC D1
|
|
CD 35 AA D1
|
|
CA 5F BC D1 routeoptjp(fshcmdCLSo, fshcmdCLSf)
|
|
22 D1:B760 11 74 BC D1
|
|
CD 35 AA D1
|
|
CA AB BC D1 routeoptjp(fshcmdVARo, fshcmdVARf)
|
|
23 D1:B76C 11 17 BD D1
|
|
CD 35 AA D1
|
|
CA 33 BD D1 routeoptjp(fshcmdVARSo, fshcmdVARSf)
|
|
24 D1:B778 11 88 BD D1
|
|
CD 35 AA D1
|
|
CA B9 BD D1 routeoptjp(fshcmdSLEEPo, fshcmdSLEEPf)
|
|
25 D1:B784 11 D5 BD D1
|
|
CD 35 AA D1
|
|
CA 01 BE D1 routeoptjp(fshcmdINFOo, fshcmdINFOf)
|
|
26 D1:B790 11 77 BE D1
|
|
CD 35 AA D1
|
|
CA 93 BE D1 routeoptjp(fshcmdHELPo, fshcmdHELPf)
|
|
27 D1:B79C 11 C9 BF D1
|
|
CD 35 AA D1
|
|
CA F6 BF D1 routeoptjp(fshcmdMANo, fshcmdMANf)
|
|
28 D1:B7A8 C5 - - - push bc ;put ret location back on stack
|
|
29 D1:B7A9 C9 - - - ret
|
|
30 D1:B7AA - - - -
|
|
31 D1:B7AA - - - - fshcmdmanroute:
|
|
32 D1:B7AA C1 - - - pop bc
|
|
33 D1:B7AB 11 10 B9 D1
|
|
CD 33 AC D1
|
|
11 16 B9 D1
|
|
CA 08 B6 D1 routestrjp(fshcmdEXIT, fshCmdEXITm)
|
|
34 D1:B7BB 11 29 B9 D1
|
|
CD 33 AC D1
|
|
11 2E B9 D1
|
|
CA 08 B6 D1 routestrjp(fshcmdSET, fshCmdSETm)
|
|
35 D1:B7CB 11 20 BA D1
|
|
CD 33 AC D1
|
|
11 26 BA D1
|
|
CA 08 B6 D1 routestrjp(fshcmdCOPY, fshCmdCOPYm)
|
|
36 D1:B7DB 11 2E BB D1
|
|
CD 33 AC D1
|
|
11 34 BB D1
|
|
CA 08 B6 D1 routestrjp(fshcmdMOVE, fshCmdMOVEm)
|
|
37 D1:B7EB 11 44 BC D1
|
|
CD 33 AC D1
|
|
11 49 BC D1
|
|
CA 08 B6 D1 routestrjp(fshcmdCLS, fshCmdCLSm)
|
|
38 D1:B7FB 11 70 BC D1
|
|
CD 33 AC D1
|
|
11 75 BC D1
|
|
CA 08 B6 D1 routestrjp(fshcmdVAR, fshCmdVARm)
|
|
39 D1:B80B 11 12 BD D1
|
|
CD 33 AC D1
|
|
11 18 BD D1
|
|
CA 08 B6 D1 routestrjp(fshcmdVARS, fshCmdVARSm)
|
|
40 D1:B81B 11 82 BD D1
|
|
CD 33 AC D1
|
|
11 89 BD D1
|
|
CA 08 B6 D1 routestrjp(fshcmdSLEEP, fshCmdSLEEPm)
|
|
41 D1:B82B 11 D0 BD D1
|
|
CD 33 AC D1
|
|
11 D6 BD D1
|
|
CA 08 B6 D1 routestrjp(fshcmdINFO, fshCmdINFOm)
|
|
42 D1:B83B 11 72 BE D1
|
|
CD 33 AC D1
|
|
11 78 BE D1
|
|
CA 08 B6 D1 routestrjp(fshcmdHELP, fshCmdHELPm)
|
|
43 D1:B84B 11 C5 BF D1
|
|
CD 33 AC D1
|
|
11 CA BF D1
|
|
CA 08 B6 D1 routestrjp(fshcmdMAN, fshCmdMANm)
|
|
44 D1:B85B C5 - - - push bc
|
|
45 D1:B85C C9 - - - ret
|
|
46 D1:B85D - - - -
|
|
47 D1:B85D - - - - fshcmdmanrouteu:
|
|
48 D1:B85D C1 - - - pop bc
|
|
49 D1:B85E 11 10 B9 D1
|
|
CD 33 AC D1
|
|
11 20 B9 D1
|
|
CA 1E B6 D1 routeustrjp(fshcmdEXIT, fshCmdEXITu)
|
|
50 D1:B86E 11 29 B9 D1
|
|
CD 33 AC D1
|
|
11 49 B9 D1
|
|
CA 1E B6 D1 routeustrjp(fshcmdSET, fshCmdSETu)
|
|
51 D1:B87E 11 20 BA D1
|
|
CD 33 AC D1
|
|
11 54 BA D1
|
|
CA 1E B6 D1 routeustrjp(fshcmdCOPY, fshCmdCOPYu)
|
|
52 D1:B88E 11 2E BB D1
|
|
CD 33 AC D1
|
|
11 61 BB D1
|
|
CA 1E B6 D1 routeustrjp(fshcmdMOVE, fshCmdMOVEu)
|
|
53 D1:B89E 11 44 BC D1
|
|
CD 33 AC D1
|
|
11 5B BC D1
|
|
CA 1E B6 D1 routeustrjp(fshcmdCLS, fshCmdCLSu)
|
|
54 D1:B8AE 11 70 BC D1
|
|
CD 33 AC D1
|
|
11 96 BC D1
|
|
CA 1E B6 D1 routeustrjp(fshcmdVAR, fshCmdVARu)
|
|
55 D1:B8BE 11 12 BD D1
|
|
CD 33 AC D1
|
|
11 2E BD D1
|
|
CA 1E B6 D1 routeustrjp(fshcmdVARS, fshCmdVARSu)
|
|
56 D1:B8CE 11 82 BD D1
|
|
CD 33 AC D1
|
|
11 B3 BD D1
|
|
CA 1E B6 D1 routeustrjp(fshcmdSLEEP, fshCmdSLEEPu)
|
|
57 D1:B8DE 11 D0 BD D1
|
|
CD 33 AC D1
|
|
11 FC BD D1
|
|
CA 1E B6 D1 routeustrjp(fshcmdINFO, fshCmdINFOu)
|
|
58 D1:B8EE 11 72 BE D1
|
|
CD 33 AC D1
|
|
11 8E BE D1
|
|
CA 1E B6 D1 routeustrjp(fshcmdHELP, fshCmdHELPu)
|
|
59 D1:B8FE 11 C5 BF D1
|
|
CD 33 AC D1
|
|
11 E8 BF D1
|
|
CA 1E B6 D1 routeustrjp(fshcmdMAN, fshCmdMANu)
|
|
60 D1:B90E C5 - - - push bc
|
|
61 D1:B90F C9 - - - ret
|
|
62 D1:B910 - - - -
|
|
63 D1:B910 - - - - #include "includes/FshCommands/FshCommands.inc"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/FshCommands/FshCommands.inc"
|
|
1 D1:B910 - - - - #include "includes/FshCommands/EXIT.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/FshCommands/EXIT.asm"
|
|
1 D1:B910 45 58 49 54
|
|
00 - - - fshcmdEXIT: .db "EXIT", 0
|
|
2 D1:B915 FF - - - fshcmdEXITo: .db $FF
|
|
3 D1:B916 45 78 69 74
|
|
73 20 46 73
|
|
68 00 - - fshcmdEXITm: .db "Exits Fsh", 0
|
|
4 D1:B920 45 58 49 54
|
|
00 - - - fshcmdEXITu: .db "EXIT", 0
|
|
5 D1:B925 C3 E3 A8 D1 fshcmdEXITf: JP Cleanup
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/FshCommands/FshCommands.inc"
|
|
2 D1:B929 - - - - #include "includes/FshCommands/SET.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/FshCommands/SET.asm"
|
|
1 D1:B929 53 45 54 00 fshcmdSET: .db "SET", 0
|
|
2 D1:B92D 01 - - - fshcmdSETo: .db $01
|
|
3 D1:B92E 53 65 74 73
|
|
20 61 20 76
|
|
61 6C 75 65
|
|
20 69 6E 20
|
|
46 53 48 20
|
|
6D 65 6D 6F
|
|
72 79 00 - fshcmdSETm: .db "Sets a value in FSH memory", 0
|
|
4 D1:B949 53 45 54 20
|
|
3C 64 65 73
|
|
74 69 6E 61
|
|
74 69 6F 6E
|
|
20 61 64 64
|
|
72 65 73 73
|
|
3E 20 3C 76
|
|
61 6C 75 65
|
|
3E 00 - - fshcmdSETu: .db "SET <destination address> <value>", 0
|
|
5 D1:B96B - - - - fshcmdSETf:
|
|
6 D1:B96B - - - - fshcmdSETfArg0:
|
|
7 D1:B96B 21 CD EA D0 ld hl, FshCmdArgFlags
|
|
8 D1:B96F CB 4E - - bit 1, (hl)
|
|
9 D1:B971 20 34 - - jr nz, fshcmdSETfArg1
|
|
10 D1:B973 CB 46 - - bit 0, (hl)
|
|
11 D1:B975 28 0C - - jr z, fshcmdSETfArg0Get
|
|
12 D1:B977 21 CC B3 D1 ld hl, ErrUsageo
|
|
13 D1:B97B CD 37 B3 D1 call ErrSet
|
|
14 D1:B97F CD EA B2 D1 call ErrCatch
|
|
15 D1:B983 - - - - fshcmdSETfArg0Get:
|
|
16 D1:B983 21 0A BA D1 ld hl, fshcmdSETfDIndex
|
|
17 D1:B987 CD FB AA D1 call printprompt
|
|
18 D1:B98B 21 04 BA D1 ld hl, fshcmdSETfInputBuffer
|
|
19 D1:B98F 11 03 00 00 ld de, 3
|
|
20 D1:B993 CD BB AF D1 call inputnumstr
|
|
21 D1:B997 CD BD AC D1 call strtow
|
|
22 D1:B99B 11 A8 EA D0 ld de, FshCmdArg0
|
|
23 D1:B99F EB - - - ex de, hl
|
|
24 D1:B9A0 73 - - - ld (hl), e
|
|
25 D1:B9A1 23 - - - inc hl
|
|
26 D1:B9A2 72 - - - ld (hl), d
|
|
27 D1:B9A3 CD F0 07 02 call _NewLine
|
|
28 D1:B9A7 - - - - fshcmdSETfArg1:
|
|
29 D1:B9A7 21 CD EA D0 ld hl, FshCmdArgFlags
|
|
30 D1:B9AB CB 5E - - bit 3, (hl)
|
|
31 D1:B9AD 20 34 - - jr nz, fshcmdSETfExe
|
|
32 D1:B9AF CB 56 - - bit 2, (hl)
|
|
33 D1:B9B1 28 0C - - jr z, fshcmdSETfArg1Get
|
|
34 D1:B9B3 21 CC B3 D1 ld hl, ErrUsageo
|
|
35 D1:B9B7 CD 37 B3 D1 call ErrSet
|
|
36 D1:B9BB CD EA B2 D1 call ErrCatch
|
|
37 D1:B9BF - - - - fshcmdSETfArg1Get:
|
|
38 D1:B9BF 21 18 BA D1 ld hl, fshcmdSETfDValue
|
|
39 D1:B9C3 CD FB AA D1 call printprompt
|
|
40 D1:B9C7 21 04 BA D1 ld hl, fshcmdSETfInputBuffer
|
|
41 D1:B9CB 11 05 00 00 ld de, 5
|
|
42 D1:B9CF CD BB AF D1 call inputnumstr
|
|
43 D1:B9D3 CD BD AC D1 call strtow
|
|
44 D1:B9D7 EB - - - ex de, hl
|
|
45 D1:B9D8 21 B1 EA D0 ld hl, FshCmdArg1
|
|
46 D1:B9DC 73 - - - ld (hl), e
|
|
47 D1:B9DD 23 - - - inc hl
|
|
48 D1:B9DE 72 - - - ld (hl), d
|
|
49 D1:B9DF CD F0 07 02 call _NewLine
|
|
50 D1:B9E3 - - - - fshcmdSETfExe:
|
|
51 D1:B9E3 21 A8 EA D0 ld hl, FshCmdArg0
|
|
52 D1:B9E7 11 00 00 00 ld de, 0
|
|
53 D1:B9EB 5E - - - ld e, (hl)
|
|
54 D1:B9EC 23 - - - inc hl
|
|
55 D1:B9ED 56 - - - ld d, (hl)
|
|
56 D1:B9EE D5 - - - push de
|
|
57 D1:B9EF 21 B1 EA D0 ld hl, FshCmdArg1
|
|
58 D1:B9F3 5E - - - ld e, (hl)
|
|
59 D1:B9F4 23 - - - inc hl
|
|
60 D1:B9F5 56 - - - ld d, (hl)
|
|
61 D1:B9F6 EB - - - ex de, hl
|
|
62 D1:B9F7 D1 - - - pop de
|
|
63 D1:B9F8 CD 3A B2 D1 call fshvarset
|
|
64 D1:B9FC CD EA B2 D1 call ErrCatch
|
|
65 D1:BA00 C3 DB A8 D1 jp Fin
|
|
66 D1:BA04 - - - -
|
|
67 D1:BA04 00 00 00 00
|
|
00 00 - - fshcmdSETfInputBuffer: .db $00, $00, $00, $00, $00, $00
|
|
68 D1:BA0A 44 65 73 74
|
|
69 6E 61 74
|
|
69 6F 6E 3D
|
|
20 00 - - fshcmdSETfDIndex: .db "Destination= ", 0
|
|
69 D1:BA18 56 61 6C 75
|
|
65 3D 20 00 fshcmdSETfDValue: .db "Value= ", 0
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/FshCommands/FshCommands.inc"
|
|
3 D1:BA20 - - - - #include "includes/FshCommands/COPY.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/FshCommands/COPY.asm"
|
|
1 D1:BA20 43 4F 50 59
|
|
00 - - - fshcmdCOPY: .db "COPY", 0
|
|
2 D1:BA25 02 - - - fshcmdCOPYo: .db $02
|
|
3 D1:BA26 43 6F 70 79
|
|
73 20 61 20
|
|
76 61 6C 75
|
|
65 20 69 6E
|
|
20 46 53 48
|
|
20 6D 65 6D
|
|
6F 72 79 20
|
|
74 6F 20 61
|
|
6E 6F 74 68
|
|
65 72 20 61
|
|
64 64 65 73
|
|
73 00 - - fshcmdCOPYm: .db "Copys a value in FSH memory to another addess", 0
|
|
4 D1:BA54 43 4F 50 59
|
|
20 3C 73 6F
|
|
75 72 63 65
|
|
20 61 64 64
|
|
72 65 73 73
|
|
3E 20 3C 64
|
|
65 73 74 69
|
|
6E 61 74 69
|
|
6F 6E 20 61
|
|
64 64 72 65
|
|
73 73 3E 00 fshcmdCOPYu: .db "COPY <source address> <destination address>", 0
|
|
5 D1:BA80 - - - - fshcmdCOPYf:
|
|
6 D1:BA80 - - - - fshcmdCOPYfArg0:
|
|
7 D1:BA80 21 CD EA D0 ld hl, FshCmdArgFlags
|
|
8 D1:BA84 CB 4E - - bit 1, (hl)
|
|
9 D1:BA86 20 31 - - jr nz, fshcmdCOPYfArg1
|
|
10 D1:BA88 CB 46 - - bit 0, (hl)
|
|
11 D1:BA8A 28 0C - - jr z, fshcmdCOPYfArg0Get
|
|
12 D1:BA8C 21 CC B3 D1 ld hl, ErrUsageo
|
|
13 D1:BA90 CD 37 B3 D1 call ErrSet
|
|
14 D1:BA94 CD EA B2 D1 call ErrCatch
|
|
15 D1:BA98 - - - - fshcmdCOPYfArg0Get:
|
|
16 D1:BA98 21 17 BB D1 ld hl, fshcmdCOPYfDSource
|
|
17 D1:BA9C CD FB AA D1 call printprompt
|
|
18 D1:BAA0 21 13 BB D1 ld hl, fshcmdCOPYfInputBuffer
|
|
19 D1:BAA4 11 03 00 00 ld de, 3
|
|
20 D1:BAA8 CD BB AF D1 call inputnumstr
|
|
21 D1:BAAC CD 60 AC D1 call strtob
|
|
22 D1:BAB0 21 A8 EA D0 ld hl, FshCmdArg0
|
|
23 D1:BAB4 77 - - - ld (hl), a
|
|
24 D1:BAB5 CD F0 07 02 call _NewLine
|
|
25 D1:BAB9 - - - - fshcmdCOPYfArg1:
|
|
26 D1:BAB9 21 CD EA D0 ld hl, FshCmdArgFlags
|
|
27 D1:BABD CB 5E - - bit 3, (hl)
|
|
28 D1:BABF 20 31 - - jr nz, fshcmdCOPYfExe
|
|
29 D1:BAC1 CB 56 - - bit 2, (hl)
|
|
30 D1:BAC3 28 0C - - jr z, fshcmdCOPYfArg1Get
|
|
31 D1:BAC5 21 CC B3 D1 ld hl, ErrUsageo
|
|
32 D1:BAC9 CD 37 B3 D1 call ErrSet
|
|
33 D1:BACD CD EA B2 D1 call ErrCatch
|
|
34 D1:BAD1 - - - - fshcmdCOPYfArg1Get:
|
|
35 D1:BAD1 21 17 BB D1 ld hl, fshcmdCOPYfDSource
|
|
36 D1:BAD5 CD FB AA D1 call printprompt
|
|
37 D1:BAD9 21 13 BB D1 ld hl, fshcmdCOPYfInputBuffer
|
|
38 D1:BADD 11 03 00 00 ld de, 3
|
|
39 D1:BAE1 CD BB AF D1 call inputnumstr
|
|
40 D1:BAE5 CD 60 AC D1 call strtob
|
|
41 D1:BAE9 21 B1 EA D0 ld hl, FshCmdArg1
|
|
42 D1:BAED 77 - - - ld (hl), a
|
|
43 D1:BAEE CD F0 07 02 call _NewLine
|
|
44 D1:BAF2 - - - - fshcmdCOPYfExe:
|
|
45 D1:BAF2 21 A8 EA D0 ld hl, FshCmdArg0
|
|
46 D1:BAF6 11 00 00 00 ld de, 0
|
|
47 D1:BAFA 5E - - - ld e, (hl)
|
|
48 D1:BAFB EB - - - ex de, hl
|
|
49 D1:BAFC E5 - - - push hl
|
|
50 D1:BAFD 21 B1 EA D0 ld hl, FshCmdArg1
|
|
51 D1:BB01 11 00 00 00 ld de, 0
|
|
52 D1:BB05 5E - - - ld e, (hl)
|
|
53 D1:BB06 E1 - - - pop hl
|
|
54 D1:BB07 CD 8D B2 D1 call fshvarcpy
|
|
55 D1:BB0B CD EA B2 D1 call ErrCatch
|
|
56 D1:BB0F C3 DB A8 D1 jp Fin
|
|
57 D1:BB13 - - - -
|
|
58 D1:BB13 00 00 00 00 fshcmdCOPYfInputBuffer: .db $00, $00, $00, $00
|
|
59 D1:BB17 53 6F 75 72
|
|
63 65 3D 20
|
|
00 - - - fshcmdCOPYfDSource: .db "Source= ", 0
|
|
60 D1:BB20 44 65 73 74
|
|
69 6E 61 74
|
|
69 6F 6E 3D
|
|
20 00 - - fshcmdCOPYfDDestination: .db "Destination= ", 0
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/FshCommands/FshCommands.inc"
|
|
4 D1:BB2E - - - - #include "includes/FshCommands/MOVE.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/FshCommands/MOVE.asm"
|
|
1 D1:BB2E 4D 4F 56 45
|
|
00 - - - fshcmdMOVE: .db "MOVE", 0
|
|
2 D1:BB33 03 - - - fshcmdMOVEo: .db $03
|
|
3 D1:BB34 4D 6F 76 65
|
|
20 61 20 76
|
|
61 6C 75 65
|
|
20 69 6E 20
|
|
46 53 48 20
|
|
6D 65 6D 6F
|
|
72 79 20 74
|
|
6F 20 61 6E
|
|
6F 74 68 65
|
|
72 20 61 64
|
|
64 65 73 73
|
|
00 - - - fshcmdMOVEm: .db "Move a value in FSH memory to another addess", 0
|
|
4 D1:BB61 4D 4F 56 45
|
|
20 3C 73 6F
|
|
75 72 63 65
|
|
20 61 64 64
|
|
72 65 73 73
|
|
3E 20 3C 64
|
|
65 73 74 69
|
|
6E 61 74 69
|
|
6F 6E 20 61
|
|
64 64 72 65
|
|
73 73 3E 00 fshcmdMOVEu: .db "MOVE <source address> <destination address>", 0
|
|
5 D1:BB8D - - - - fshcmdMOVEf:
|
|
6 D1:BB8D - - - - fshcmdMOVEfArg0:
|
|
7 D1:BB8D 21 CD EA D0 ld hl, FshCmdArgFlags
|
|
8 D1:BB91 CB 4E - - bit 1, (hl)
|
|
9 D1:BB93 20 31 - - jr nz, fshcmdMOVEfArg1
|
|
10 D1:BB95 CB 46 - - bit 0, (hl)
|
|
11 D1:BB97 28 0C - - jr z, fshcmdMOVEfArg0Get
|
|
12 D1:BB99 21 CC B3 D1 ld hl, ErrUsageo
|
|
13 D1:BB9D CD 37 B3 D1 call ErrSet
|
|
14 D1:BBA1 CD EA B2 D1 call ErrCatch
|
|
15 D1:BBA5 - - - - fshcmdMOVEfArg0Get:
|
|
16 D1:BBA5 21 2D BC D1 ld hl, fshcmdMOVEfDSource
|
|
17 D1:BBA9 CD FB AA D1 call printprompt
|
|
18 D1:BBAD 21 29 BC D1 ld hl, fshcmdMOVEfInputBuffer
|
|
19 D1:BBB1 11 03 00 00 ld de, 3
|
|
20 D1:BBB5 CD BB AF D1 call inputnumstr
|
|
21 D1:BBB9 CD 60 AC D1 call strtob
|
|
22 D1:BBBD 21 A8 EA D0 ld hl, FshCmdArg0
|
|
23 D1:BBC1 77 - - - ld (hl), a
|
|
24 D1:BBC2 CD F0 07 02 call _NewLine
|
|
25 D1:BBC6 - - - - fshcmdMOVEfArg1:
|
|
26 D1:BBC6 21 CD EA D0 ld hl, FshCmdArgFlags
|
|
27 D1:BBCA CB 5E - - bit 3, (hl)
|
|
28 D1:BBCC 20 31 - - jr nz, fshcmdMOVEfExe
|
|
29 D1:BBCE CB 56 - - bit 2, (hl)
|
|
30 D1:BBD0 28 0C - - jr z, fshcmdMOVEfArg1Get
|
|
31 D1:BBD2 21 CC B3 D1 ld hl, ErrUsageo
|
|
32 D1:BBD6 CD 37 B3 D1 call ErrSet
|
|
33 D1:BBDA CD EA B2 D1 call ErrCatch
|
|
34 D1:BBDE - - - - fshcmdMOVEfArg1Get:
|
|
35 D1:BBDE 21 36 BC D1 ld hl, fshcmdMOVEfDDestination
|
|
36 D1:BBE2 CD FB AA D1 call printprompt
|
|
37 D1:BBE6 21 29 BC D1 ld hl, fshcmdMOVEfInputBuffer
|
|
38 D1:BBEA 11 03 00 00 ld de, 3
|
|
39 D1:BBEE CD BB AF D1 call inputnumstr
|
|
40 D1:BBF2 CD 60 AC D1 call strtob
|
|
41 D1:BBF6 21 B1 EA D0 ld hl, FshCmdArg1
|
|
42 D1:BBFA 77 - - - ld (hl), a
|
|
43 D1:BBFB CD F0 07 02 call _NewLine
|
|
44 D1:BBFF - - - - fshcmdMOVEfExe:
|
|
45 D1:BBFF 21 A8 EA D0 ld hl, FshCmdArg0
|
|
46 D1:BC03 11 00 00 00 ld de, 0
|
|
47 D1:BC07 5E - - - ld e, (hl)
|
|
48 D1:BC08 EB - - - ex de, hl
|
|
49 D1:BC09 E5 - - - push hl
|
|
50 D1:BC0A 21 B1 EA D0 ld hl, FshCmdArg1
|
|
51 D1:BC0E 11 00 00 00 ld de, 0
|
|
52 D1:BC12 5E - - - ld e, (hl)
|
|
53 D1:BC13 E1 - - - pop hl
|
|
54 D1:BC14 CD 8D B2 D1 call fshvarcpy
|
|
55 D1:BC18 EB - - - ex de, hl
|
|
56 D1:BC19 21 00 00 00 ld hl, 0
|
|
57 D1:BC1D CD 3A B2 D1 call fshvarset
|
|
58 D1:BC21 CD EA B2 D1 call ErrCatch
|
|
59 D1:BC25 C3 DB A8 D1 jp Fin
|
|
60 D1:BC29 - - - -
|
|
61 D1:BC29 00 00 00 00 fshcmdMOVEfInputBuffer: .db $00, $00, $00, $00
|
|
62 D1:BC2D 53 6F 75 72
|
|
63 65 3D 20
|
|
00 - - - fshcmdMOVEfDSource: .db "Source= ", 0
|
|
63 D1:BC36 44 65 73 74
|
|
69 6E 61 74
|
|
69 6F 6E 3D
|
|
20 00 - - fshcmdMOVEfDDestination: .db "Destination= ", 0
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/FshCommands/FshCommands.inc"
|
|
5 D1:BC44 - - - - #include "includes/FshCommands/CLS.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/FshCommands/CLS.asm"
|
|
1 D1:BC44 43 4C 53 00 fshcmdCLS: .db "CLS", 0
|
|
2 D1:BC48 10 - - - fshcmdCLSo: .db $10
|
|
3 D1:BC49 43 6C 65 61
|
|
72 73 20 74
|
|
68 65 20 73
|
|
63 72 65 65
|
|
6E 00 - - fshcmdCLSm: .db "Clears the screen", 0
|
|
4 D1:BC5B 43 4C 53 00 fshcmdCLSu: .db "CLS", 0
|
|
5 D1:BC5F - - - - fshcmdCLSf:
|
|
6 D1:BC5F CD 08 08 02 call _ClrLCDFull
|
|
7 D1:BC63 AF - - - xor a
|
|
8 D1:BC64 32 95 05 D0 ld (CurRow), a
|
|
9 D1:BC68 32 96 05 D0 ld (CurCol), a
|
|
10 D1:BC6C C3 DB A8 D1 jp Fin
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/FshCommands/FshCommands.inc"
|
|
6 D1:BC70 - - - - #include "includes/FshCommands/VAR.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/FshCommands/VAR.asm"
|
|
1 D1:BC70 56 41 52 00 fshcmdVAR: .db "VAR", 0
|
|
2 D1:BC74 11 - - - fshcmdVARo: .db $11
|
|
3 D1:BC75 44 69 73 70
|
|
6C 61 79 73
|
|
20 61 20 76
|
|
61 6C 75 65
|
|
20 66 72 6F
|
|
6D 20 46 53
|
|
48 20 6D 65
|
|
6D 6F 72 79
|
|
00 - - - fshcmdVARm: .db "Displays a value from FSH memory", 0
|
|
4 D1:BC96 56 41 52 20
|
|
3C 73 6F 75
|
|
72 63 65 20
|
|
61 64 64 72
|
|
65 73 73 3E
|
|
00 - - - fshcmdVARu: .db "VAR <source address>", 0
|
|
5 D1:BCAB - - - - fshcmdVARf:
|
|
6 D1:BCAB - - - - fshcmdVARfArg0:
|
|
7 D1:BCAB 21 CD EA D0 ld hl, FshCmdArgFlags
|
|
8 D1:BCAF CB 4E - - bit 1, (hl)
|
|
9 D1:BCB1 20 34 - - jr nz, fshcmdVARfExe
|
|
10 D1:BCB3 CB 46 - - bit 0, (hl)
|
|
11 D1:BCB5 28 0C - - jr z, fshcmdVARfArg0Get
|
|
12 D1:BCB7 21 CC B3 D1 ld hl, ErrUsageo
|
|
13 D1:BCBB CD 37 B3 D1 call ErrSet
|
|
14 D1:BCBF CD EA B2 D1 call ErrCatch
|
|
15 D1:BCC3 - - - - fshcmdVARfArg0Get:
|
|
16 D1:BCC3 21 0A BD D1 ld hl, fshcmdVARfDIndex
|
|
17 D1:BCC7 CD FB AA D1 call printprompt
|
|
18 D1:BCCB 21 06 BD D1 ld hl, fshcmdVARfInputBuffer
|
|
19 D1:BCCF 11 03 00 00 ld de, 3
|
|
20 D1:BCD3 CD BB AF D1 call inputnumstr
|
|
21 D1:BCD7 CD BD AC D1 call strtow
|
|
22 D1:BCDB 11 A8 EA D0 ld de, FshCmdArg0
|
|
23 D1:BCDF EB - - - ex de, hl
|
|
24 D1:BCE0 73 - - - ld (hl), e
|
|
25 D1:BCE1 23 - - - inc hl
|
|
26 D1:BCE2 72 - - - ld (hl), d
|
|
27 D1:BCE3 CD F0 07 02 call _NewLine
|
|
28 D1:BCE7 - - - - fshcmdVARfExe:
|
|
29 D1:BCE7 21 A8 EA D0 ld hl, FshCmdArg0
|
|
30 D1:BCEB 11 00 00 00 ld de, 0
|
|
31 D1:BCEF 5E - - - ld e, (hl)
|
|
32 D1:BCF0 23 - - - inc hl
|
|
33 D1:BCF1 56 - - - ld d, (hl)
|
|
34 D1:BCF2 CD 62 B2 D1 call fshvarget
|
|
35 D1:BCF6 CD EA B2 D1 call ErrCatch
|
|
36 D1:BCFA CD BC 07 02 call _DispHL_s
|
|
37 D1:BCFE CD F0 07 02 call _NewLine
|
|
38 D1:BD02 C3 DB A8 D1 jp Fin
|
|
39 D1:BD06 - - - -
|
|
40 D1:BD06 00 00 00 00 fshcmdVARfInputBuffer: .db $00, $00, $00, $00
|
|
41 D1:BD0A 49 6E 64 65
|
|
78 3D 20 00 fshcmdVARfDIndex: .db "Index= ", 0
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/FshCommands/FshCommands.inc"
|
|
7 D1:BD12 - - - - #include "includes/FshCommands/VARS.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/FshCommands/VARS.asm"
|
|
1 D1:BD12 56 41 52 53
|
|
00 - - - fshcmdVARS: .db "VARS", 0
|
|
2 D1:BD17 12 - - - fshcmdVARSo: .db $12
|
|
3 D1:BD18 44 69 73 70
|
|
6C 61 79 73
|
|
20 61 6C 6C
|
|
20 46 73 68
|
|
20 56 61 72
|
|
73 00 - - fshcmdVARSm: .db "Displays all Fsh Vars", 0
|
|
4 D1:BD2E 56 41 52 53
|
|
00 - - - fshcmdVARSu: .db "VARS", 0
|
|
5 D1:BD33 - - - - fshcmdVARSf:
|
|
6 D1:BD33 21 CD EA D0 ld hl, FshCmdArgFlags
|
|
7 D1:BD37 CB 46 - - bit 0, (hl)
|
|
8 D1:BD39 28 0C - - jr z, fshcmdVARSfExe
|
|
9 D1:BD3B 21 CC B3 D1 ld hl, ErrUsageo
|
|
10 D1:BD3F CD 37 B3 D1 call ErrSet
|
|
11 D1:BD43 CD EA B2 D1 call ErrCatch
|
|
12 D1:BD47 - - - - fshcmdVARSfExe:
|
|
13 D1:BD47 06 00 - - ld b, 0
|
|
14 D1:BD49 0E 00 - - ld c, 0
|
|
15 D1:BD4B 11 00 00 00 ld de, 0
|
|
16 D1:BD4F - - - - fshcmdVARSfLoop:
|
|
17 D1:BD4F CD 62 B2 D1 call fshvarget
|
|
18 D1:BD53 7C - - - ld a, h
|
|
19 D1:BD54 CD B8 07 02 call _PutC
|
|
20 D1:BD58 7D - - - ld a, l
|
|
21 D1:BD59 CD B8 07 02 call _PutC
|
|
22 D1:BD5D 79 - - - ld a, c
|
|
23 D1:BD5E 0C - - - inc c
|
|
24 D1:BD5F FE 07 - - cp 7
|
|
25 D1:BD61 20 0E - - jr nz, fshcmdVARSfLoopU
|
|
26 D1:BD63 E5 - - - push hl
|
|
27 D1:BD64 C5 - - - push bc
|
|
28 D1:BD65 D5 - - - push de
|
|
29 D1:BD66 CD F0 07 02 call _NewLine
|
|
30 D1:BD6A D1 - - - pop de
|
|
31 D1:BD6B C1 - - - pop bc
|
|
32 D1:BD6C E1 - - - pop hl
|
|
33 D1:BD6D 0E 00 - - ld c, 0
|
|
34 D1:BD6F 18 06 - - jr fshcmdVARSfLoopEnd
|
|
35 D1:BD71 - - - - fshcmdVARSfLoopU:
|
|
36 D1:BD71 3E 5F - - ld a, '_'
|
|
37 D1:BD73 CD B8 07 02 call _PutC
|
|
38 D1:BD77 - - - - fshcmdVARSfLoopEnd:
|
|
39 D1:BD77 04 - - - inc b
|
|
40 D1:BD78 13 - - - inc de
|
|
41 D1:BD79 78 - - - ld a, b
|
|
42 D1:BD7A FE 40 - - cp FshVarsSize / 2
|
|
43 D1:BD7C 38 D1 - - jr c, fshcmdVARSfLoop
|
|
44 D1:BD7E C3 DB A8 D1 jp Fin
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/FshCommands/FshCommands.inc"
|
|
8 D1:BD82 - - - - #include "includes/FshCommands/SLEEP.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/FshCommands/SLEEP.asm"
|
|
1 D1:BD82 53 4C 45 45
|
|
50 00 - - fshcmdSLEEP: .db "SLEEP", 0
|
|
2 D1:BD88 16 - - - fshcmdSLEEPo: .db $16
|
|
3 D1:BD89 50 75 74 73
|
|
20 74 68 65
|
|
20 63 61 6C
|
|
63 75 6C 61
|
|
74 6F 72 20
|
|
69 6E 74 6F
|
|
20 73 6C 65
|
|
65 70 20 6D
|
|
6F 64 65 20
|
|
28 41 50 44
|
|
29 00 - - fshcmdSLEEPm: .db "Puts the calculator into sleep mode (APD)", 0
|
|
4 D1:BDB3 53 4C 45 45
|
|
50 00 - - fshcmdSLEEPu: .db "SLEEP", 0
|
|
5 D1:BDB9 - - - - fshcmdSLEEPf:
|
|
6 D1:BDB9 F3 - - - di
|
|
7 D1:BDBA CD 38 11 02 call _EnableAPD
|
|
8 D1:BDBE 3E 01 - - ld a,1
|
|
9 D1:BDC0 21 90 05 D0 ld hl,apdSubTimer
|
|
10 D1:BDC4 77 - - - ld (hl),a
|
|
11 D1:BDC5 23 - - - inc hl
|
|
12 D1:BDC6 77 - - - ld (hl),a
|
|
13 D1:BDC7 FD CB 08 DE set apdRunning,(iy+apdFlags)
|
|
14 D1:BDCB FB - - - ei
|
|
15 D1:BDCC C3 DB A8 D1 jp Fin
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/FshCommands/FshCommands.inc"
|
|
9 D1:BDD0 - - - - #include "includes/FshCommands/INFO.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/FshCommands/INFO.asm"
|
|
1 D1:BDD0 49 4E 46 4F
|
|
00 - - - fshcmdINFO: .db "INFO", 0
|
|
2 D1:BDD5 20 - - - fshcmdINFOo: .db $20
|
|
3 D1:BDD6 44 69 73 70
|
|
6C 61 79 73
|
|
20 53 79 65
|
|
74 65 6D 20
|
|
49 6E 66 6F
|
|
72 6D 61 74
|
|
69 6F 6E 20
|
|
61 6E 64 20
|
|
53 74 61 74
|
|
73 00 - - fshcmdINFOm: .db "Displays Syetem Information and Stats", 0
|
|
4 D1:BDFC 49 4E 46 4F
|
|
00 - - - fshcmdINFOu: .db "INFO", 0
|
|
5 D1:BE01 - - - - fshcmdINFOf:
|
|
6 D1:BE01 21 CD EA D0 ld hl, FshCmdArgFlags
|
|
7 D1:BE05 CB 46 - - bit 0, (hl)
|
|
8 D1:BE07 28 0C - - jr z, fshcmdINFOfExe
|
|
9 D1:BE09 21 CC B3 D1 ld hl, ErrUsageo
|
|
10 D1:BE0D CD 37 B3 D1 call ErrSet
|
|
11 D1:BE11 CD EA B2 D1 call ErrCatch
|
|
12 D1:BE15 - - - - fshcmdINFOfExe:
|
|
13 D1:BE15 CD 08 08 02 call _ClrLCDFull
|
|
14 D1:BE19 AF - - - xor a
|
|
15 D1:BE1A 32 95 05 D0 ld (CurRow), a
|
|
16 D1:BE1E 32 96 05 D0 ld (CurCol), a
|
|
17 D1:BE22 - - - -
|
|
18 D1:BE22 CD 19 B4 D1 call printfshnamelong
|
|
19 D1:BE26 CD F0 07 02 call _NewLine
|
|
20 D1:BE2A - - - -
|
|
21 D1:BE2A 21 06 A9 D1 ld hl, FshBy
|
|
22 D1:BE2E CD C0 07 02 call _PutS
|
|
23 D1:BE32 CD F0 07 02 call _NewLine
|
|
24 D1:BE36 - - - -
|
|
25 D1:BE36 21 10 A9 D1 ld hl, FshSite
|
|
26 D1:BE3A CD C0 07 02 call _PutS
|
|
27 D1:BE3E CD F0 07 02 call _NewLine
|
|
28 D1:BE42 - - - -
|
|
29 D1:BE42 CD F0 07 02 call _NewLine
|
|
30 D1:BE46 21 6A BE D1 ld hl, fshcmdINFOfSPS1
|
|
31 D1:BE4A CD C0 07 02 call _PutS
|
|
32 D1:BE4E 3E 27 - - ld a, $27
|
|
33 D1:BE50 CD B8 07 02 call _PutC
|
|
34 D1:BE54 21 2B A9 D1 ld hl, PS1
|
|
35 D1:BE58 CD C0 07 02 call _PutS
|
|
36 D1:BE5C 3E 27 - - ld a, $27
|
|
37 D1:BE5E CD B8 07 02 call _PutC
|
|
38 D1:BE62 CD F0 07 02 call _NewLine
|
|
39 D1:BE66 - - - -
|
|
40 D1:BE66 C3 DB A8 D1 jp Fin
|
|
41 D1:BE6A - - - -
|
|
42 D1:BE6A 50 53 31 CE
|
|
CE CE 3A 00 fshcmdINFOfSPS1: .db "PS1", $CE, $CE, $CE, ":", 0
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/FshCommands/FshCommands.inc"
|
|
10 D1:BE72 - - - - #include "includes/FshCommands/HELP.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/FshCommands/HELP.asm"
|
|
1 D1:BE72 48 45 4C 50
|
|
00 - - - fshcmdHELP: .db "HELP", 0
|
|
2 D1:BE77 21 - - - fshcmdHELPo: .db $21
|
|
3 D1:BE78 44 69 73 70
|
|
6C 61 79 73
|
|
20 61 6C 6C
|
|
20 63 6F 6D
|
|
6D 61 6E 64
|
|
73 00 - - fshcmdHELPm: .db "Displays all commands", 0
|
|
4 D1:BE8E 48 45 4C 50
|
|
00 - - - fshcmdHELPu: .db "HELP", 0
|
|
5 D1:BE93 - - - - fshcmdHELPf:
|
|
6 D1:BE93 21 CD EA D0 ld hl, FshCmdArgFlags
|
|
7 D1:BE97 CB 46 - - bit 0, (hl)
|
|
8 D1:BE99 28 0C - - jr z, fshcmdHELPfExe
|
|
9 D1:BE9B 21 CC B3 D1 ld hl, ErrUsageo
|
|
10 D1:BE9F CD 37 B3 D1 call ErrSet
|
|
11 D1:BEA3 CD EA B2 D1 call ErrCatch
|
|
12 D1:BEA7 - - - - fshcmdHELPfExe:
|
|
13 D1:BEA7 21 8C BF D1 ld hl, fshcmdHELPfLine1
|
|
14 D1:BEAB CD C0 07 02 call _PutS
|
|
15 D1:BEAF CD F0 07 02 call _NewLine
|
|
16 D1:BEB3 - - - -
|
|
17 D1:BEB3 - - - - #macro fshcmdHELPmRow1(cmdXs)
|
|
18 D1:BEB3 xor a
|
|
19 D1:BEB3 ld (curCol), a
|
|
20 D1:BEB3 ld hl, cmdXs
|
|
21 D1:BEB3 call _PutS
|
|
22 D1:BEB3 call _NewLine
|
|
23 D1:BEB3 #endmacro
|
|
24 D1:BEB3 - - - - #macro fshcmdHELPmRow2(cmdXs, cmdYs)
|
|
25 D1:BEB3 xor a
|
|
26 D1:BEB3 ld (curCol), a
|
|
27 D1:BEB3 ld hl, cmdXs
|
|
28 D1:BEB3 call _PutS
|
|
29 D1:BEB3 ld a, 9
|
|
30 D1:BEB3 ld (curcol), a
|
|
31 D1:BEB3 ld hl, cmdYs
|
|
32 D1:BEB3 call _PutS
|
|
33 D1:BEB3 call _NewLine
|
|
34 D1:BEB3 #endmacro
|
|
35 D1:BEB3 - - - - #macro fshcmdHELPmRow3(cmdXs, cmdYs, cmdZs)
|
|
36 D1:BEB3 xor a
|
|
37 D1:BEB3 ld (curCol), a
|
|
38 D1:BEB3 ld hl, cmdXs
|
|
39 D1:BEB3 call _PutS
|
|
40 D1:BEB3 ld a, 9
|
|
41 D1:BEB3 ld (curcol), a
|
|
42 D1:BEB3 ld hl, cmdYs
|
|
43 D1:BEB3 call _PutS
|
|
44 D1:BEB3 ld a, 19
|
|
45 D1:BEB3 ld (curcol), a
|
|
46 D1:BEB3 ld hl, cmdZs
|
|
47 D1:BEB3 call _PutS
|
|
48 D1:BEB3 call _NewLine
|
|
49 D1:BEB3 #endmacro
|
|
50 D1:BEB3 - - - -
|
|
51 D1:BEB3 AF 32 96 05
|
|
D0 21 10 B9
|
|
D1 CD C0 07
|
|
02 3E 09 32
|
|
96 05 D0 21
|
|
29 B9 D1 CD
|
|
C0 07 02 3E
|
|
13 32 96 05
|
|
D0 21 20 BA
|
|
D1 CD C0 07
|
|
02 CD F0 07
|
|
02 - - - fshcmdHELPmRow3(fshcmdEXIT, fshcmdSET, fshcmdCOPY)
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/FshCommands/HELP.asm"
|
|
52 D1:BEE0 AF 32 96 05
|
|
D0 21 2E BB
|
|
D1 CD C0 07
|
|
02 3E 09 32
|
|
96 05 D0 21
|
|
44 BC D1 CD
|
|
C0 07 02 3E
|
|
13 32 96 05
|
|
D0 21 70 BC
|
|
D1 CD C0 07
|
|
02 CD F0 07
|
|
02 - - - fshcmdHELPmRow3(fshcmdMOVE, fshcmdCLS, fshcmdVAR)
|
|
53 D1:BF0D AF 32 96 05
|
|
D0 21 12 BD
|
|
D1 CD C0 07
|
|
02 3E 09 32
|
|
96 05 D0 21
|
|
82 BD D1 CD
|
|
C0 07 02 3E
|
|
13 32 96 05
|
|
D0 21 D0 BD
|
|
D1 CD C0 07
|
|
02 CD F0 07
|
|
02 - - - fshcmdHELPmRow3(fshcmdVARS, fshcmdSLEEP, fshcmdINFO)
|
|
54 D1:BF3A AF 32 96 05
|
|
D0 21 72 BE
|
|
D1 CD C0 07
|
|
02 3E 09 32
|
|
96 05 D0 21
|
|
C5 BF D1 CD
|
|
C0 07 02 CD
|
|
F0 07 02 - fshcmdHELPmRow2(fshcmdHELP, fshcmdMAN)
|
|
55 D1:BF59 AF 32 96 05
|
|
D0 21 E7 C2
|
|
D1 CD C0 07
|
|
02 3E 09 32
|
|
96 05 D0 21
|
|
9C C6 D1 CD
|
|
C0 07 02 CD
|
|
F0 07 02 - fshcmdHELPmRow2(cryptocmdENCRYPT, cryptocmdDECRYPT)
|
|
56 D1:BF78 - - - - ; Extention Point
|
|
57 D1:BF78 - - - -
|
|
58 D1:BF78 CD F0 07 02 call _NewLine
|
|
59 D1:BF7C 21 A0 BF D1 ld hl, fshcmdHELPfLine2
|
|
60 D1:BF80 CD C0 07 02 call _PutS
|
|
61 D1:BF84 CD F0 07 02 call _NewLine
|
|
62 D1:BF88 C3 DB A8 D1 jp Fin
|
|
63 D1:BF8C - - - -
|
|
64 D1:BF8C 41 76 61 69
|
|
6C 61 62 6C
|
|
65 20 43 6F
|
|
6D 6D 61 6E
|
|
64 73 3A 00 fshcmdHELPfLine1: .db "Available Commands:", 0
|
|
65 D1:BFA0 54 79 70 65
|
|
20 27 4D 41
|
|
4E 27 20 61
|
|
6E 64 20 63
|
|
6F 6D 6D 61
|
|
6E 64 20 66
|
|
6F 72 20 6D
|
|
6F 72 65 20
|
|
69 6E 66 6F
|
|
00 - - - fshcmdHELPfLine2: .db "Type 'MAN' and command for more info", 0
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/FshCommands/FshCommands.inc"
|
|
11 D1:BFC5 - - - - #include "includes/FshCommands/MAN.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/FshCommands/MAN.asm"
|
|
1 D1:BFC5 4D 41 4E 00 fshcmdMAN: .db "MAN", 0
|
|
2 D1:BFC9 22 - - - fshcmdMANo: .db $22
|
|
3 D1:BFCA 44 69 73 70
|
|
6C 61 79 73
|
|
20 4D 41 4E
|
|
20 74 65 78
|
|
74 20 66 6F
|
|
72 20 63 6F
|
|
6D 6D 61 6E
|
|
64 00 - - fshcmdMANm: .db "Displays MAN text for command", 0
|
|
4 D1:BFE8 4D 41 4E 20
|
|
3C 63 6F 6D
|
|
6D 61 6E 64
|
|
3E 00 - - fshcmdMANu: .db "MAN <command>", 0
|
|
5 D1:BFF6 - - - - fshcmdMANf:
|
|
6 D1:BFF6 - - - - fshcmdMANfCheckArgs:
|
|
7 D1:BFF6 21 CD EA D0 ld hl, FshCmdArgFlags
|
|
8 D1:BFFA CB 46 - - bit 0, (hl)
|
|
9 D1:BFFC 28 10 - - jr z, fshcmdMANfArg0Get
|
|
10 D1:BFFE CB 4E - - bit 1, (hl)
|
|
11 D1:C000 28 24 - - jr z, fshcmdMANfExe
|
|
12 D1:C002 21 CC B3 D1 ld hl, ErrUsageo
|
|
13 D1:C006 CD 37 B3 D1 call ErrSet
|
|
14 D1:C00A CD EA B2 D1 call ErrCatch
|
|
15 D1:C00E - - - - fshcmdMANfArg0Get:
|
|
16 D1:C00E 21 A3 C0 D1 ld hl, fshcmdMANfPrompt
|
|
17 D1:C012 CD FB AA D1 call printprompt
|
|
18 D1:C016 - - - -
|
|
19 D1:C016 21 A8 EA D0 ld hl, FshCmdArg0
|
|
20 D1:C01A 11 08 00 00 ld de, FshCmdCmdSize
|
|
21 D1:C01E CD 83 AD D1 call inputstr
|
|
22 D1:C022 CD F0 07 02 call _NewLine
|
|
23 D1:C026 - - - -
|
|
24 D1:C026 - - - - fshcmdMANfExe:
|
|
25 D1:C026 21 A8 EA D0 ld hl, FshCmdArg0
|
|
26 D1:C02A 11 9F EA D0 ld de, FshCmd
|
|
27 D1:C02E CD 46 AC D1 call strcpy
|
|
28 D1:C032 - - - -
|
|
29 D1:C032 21 92 C0 D1 ld hl, fshcmdMANfPrefix
|
|
30 D1:C036 CD C0 07 02 call _PutS
|
|
31 D1:C03A - - - -
|
|
32 D1:C03A 21 9F EA D0 ld hl, FshCmd
|
|
33 D1:C03E CD C0 07 02 call _PutS
|
|
34 D1:C042 CD F0 07 02 call _NewLine
|
|
35 D1:C046 CD F0 07 02 call _NewLine
|
|
36 D1:C04A - - - -
|
|
37 D1:C04A 21 9F EA D0 ld hl, FshCmd
|
|
38 D1:C04E CD F5 B5 D1 call manroute
|
|
39 D1:C052 11 00 00 00 ld de, $00
|
|
40 D1:C056 CD 6D A9 D1 call cpHLDE
|
|
41 D1:C05A CA DF A8 D1 jp z, Err
|
|
42 D1:C05E - - - -
|
|
43 D1:C05E CD C0 07 02 call _PutS
|
|
44 D1:C062 CD F0 07 02 call _NewLine
|
|
45 D1:C066 CD F0 07 02 call _NewLine
|
|
46 D1:C06A - - - -
|
|
47 D1:C06A 21 9B C0 D1 ld hl, fshcmdMANfUsage
|
|
48 D1:C06E CD C0 07 02 call _PutS
|
|
49 D1:C072 - - - -
|
|
50 D1:C072 21 9F EA D0 ld hl, FshCmd
|
|
51 D1:C076 CD 0B B6 D1 call manrouteu
|
|
52 D1:C07A 11 00 00 00 ld de, $00
|
|
53 D1:C07E CD 6D A9 D1 call cpHLDE
|
|
54 D1:C082 CA DF A8 D1 jp z, Err
|
|
55 D1:C086 CD C0 07 02 call _PutS
|
|
56 D1:C08A CD F0 07 02 call _NewLine
|
|
57 D1:C08E - - - -
|
|
58 D1:C08E C3 DB A8 D1 jp Fin
|
|
59 D1:C092 - - - -
|
|
60 D1:C092 4D 41 4E 2D
|
|
44 42 DF 20
|
|
00 - - - fshcmdMANfPrefix: .db "MAN-DB", $DF, ' ', 0
|
|
61 D1:C09B 55 73 61 67
|
|
65 3A 20 00 fshcmdMANfUsage: .db "Usage: ",0
|
|
62 D1:C0A3 43 6F 6D 6D
|
|
61 6E 64 3D
|
|
20 00 - - fshcmdMANfPrompt: .db "Command= ", 0
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/FshCommands/FshCommands.inc"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/FshCommands/FshCommand.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/Command.asm"
|
|
31 D1:C0AD - - - - #include "includes/CryptoCommands/CryptoCommand.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/CryptoCommands/CryptoCommand.asm"
|
|
1 D1:C0AD - - - - cryptocmddecode:
|
|
2 D1:C0AD E5 D5 11 E7
|
|
C2 D1 CD 33
|
|
AC D1 21 EF
|
|
C2 D1 D1 CC
|
|
3D AA D1 E1 decodecmdopt(cryptocmdENCRYPT, cryptocmdENCRYPTo)
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/CryptoCommands/CryptoCommand.asm"
|
|
3 D1:C0C1 E5 D5 11 9C
|
|
C6 D1 CD 33
|
|
AC D1 21 A4
|
|
C6 D1 D1 CC
|
|
3D AA D1 E1 decodecmdopt(cryptocmdDECRYPT, cryptocmdDECRYPTo)
|
|
4 D1:C0D5 C9 - - - ret
|
|
5 D1:C0D6 - - - -
|
|
6 D1:C0D6 - - - - cryptocmdroute:
|
|
7 D1:C0D6 C1 - - - pop bc
|
|
8 D1:C0D7 11 EF C2 D1
|
|
CD 35 AA D1
|
|
CA 5E C3 D1 routeoptjp(cryptocmdENCRYPTo, cryptocmdENCRYPTf)
|
|
9 D1:C0E3 11 A4 C6 D1
|
|
CD 35 AA D1
|
|
CA 13 C7 D1 routeoptjp(cryptocmdDECRYPTo, cryptocmdDECRYPTf)
|
|
10 D1:C0EF C5 - - - push bc
|
|
11 D1:C0F0 C9 - - - ret
|
|
12 D1:C0F1 - - - -
|
|
13 D1:C0F1 - - - - cryptocmdmanroute:
|
|
14 D1:C0F1 C1 - - - pop bc
|
|
15 D1:C0F2 E5 11 E7 C2
|
|
D1 CD 33 AC
|
|
D1 21 00 00
|
|
00 20 04 21
|
|
B1 EA D0 11
|
|
E7 C3 D1 CD
|
|
33 AC D1 E1
|
|
11 EB C3 D1
|
|
CA 08 B6 D1 subroutestrjp(cryptocmdENCRYPT, cryptocmdROT, cryptocmdROTm)
|
|
16 D1:C116 E5 11 9C C6
|
|
D1 CD 33 AC
|
|
D1 21 00 00
|
|
00 20 04 21
|
|
B1 EA D0 11
|
|
9C C7 D1 CD
|
|
33 AC D1 E1
|
|
11 A0 C7 D1
|
|
CA 08 B6 D1 subroutestrjp(cryptocmdDECRYPT, cryptocmdunROT, cryptocmdunROTm)
|
|
17 D1:C13A - - - -
|
|
18 D1:C13A E5 11 E7 C2
|
|
D1 CD 33 AC
|
|
D1 21 00 00
|
|
00 20 04 21
|
|
B1 EA D0 11
|
|
F5 C4 D1 CD
|
|
33 AC D1 E1
|
|
11 F9 C4 D1
|
|
CA 08 B6 D1 subroutestrjp(cryptocmdENCRYPT, cryptocmdXOR, cryptocmdXORm)
|
|
19 D1:C15E E5 11 9C C6
|
|
D1 CD 33 AC
|
|
D1 21 00 00
|
|
00 20 04 21
|
|
B1 EA D0 11
|
|
A3 C8 D1 CD
|
|
33 AC D1 E1
|
|
11 A7 C8 D1
|
|
CA 08 B6 D1 subroutestrjp(cryptocmdDECRYPT, cryptocmdunXOR, cryptocmdunXORm)
|
|
20 D1:C182 - - - -
|
|
21 D1:C182 E5 11 E7 C2
|
|
D1 CD 33 AC
|
|
D1 21 00 00
|
|
00 20 04 21
|
|
B1 EA D0 11
|
|
F4 C5 D1 CD
|
|
33 AC D1 E1
|
|
11 F9 C5 D1
|
|
CA 08 B6 D1 subroutestrjp(cryptocmdENCRYPT, cryptocmdHELP, cryptocmdHELPm)
|
|
22 D1:C1A6 E5 11 9C C6
|
|
D1 CD 33 AC
|
|
D1 21 00 00
|
|
00 20 04 21
|
|
B1 EA D0 11
|
|
B8 C9 D1 CD
|
|
33 AC D1 E1
|
|
11 BD C9 D1
|
|
CA 08 B6 D1 subroutestrjp(cryptocmdDECRYPT, cryptocmdunHELP, cryptocmdunHELPm)
|
|
23 D1:C1CA - - - -
|
|
24 D1:C1CA 11 E7 C2 D1
|
|
CD 33 AC D1
|
|
11 F0 C2 D1
|
|
CA 08 B6 D1 routestrjp(cryptocmdENCRYPT, cryptocmdENCRYPTm)
|
|
25 D1:C1DA 11 9C C6 D1
|
|
CD 33 AC D1
|
|
11 A5 C6 D1
|
|
CA 08 B6 D1 routestrjp(cryptocmdDECRYPT, cryptocmdDECRYPTm)
|
|
26 D1:C1EA - - - -
|
|
27 D1:C1EA C5 - - - push bc
|
|
28 D1:C1EB C9 - - - ret
|
|
29 D1:C1EC - - - -
|
|
30 D1:C1EC - - - -
|
|
31 D1:C1EC - - - - cryptocmdmanrouteu:
|
|
32 D1:C1EC C1 - - - pop bc
|
|
33 D1:C1ED E5 11 E7 C2
|
|
D1 CD 33 AC
|
|
D1 21 00 00
|
|
00 20 04 21
|
|
B1 EA D0 11
|
|
E7 C3 D1 CD
|
|
33 AC D1 E1
|
|
11 22 C4 D1
|
|
CA 1E B6 D1 subrouteustrjp(cryptocmdENCRYPT, cryptocmdROT, cryptocmdROTu)
|
|
34 D1:C211 E5 11 9C C6
|
|
D1 CD 33 AC
|
|
D1 21 00 00
|
|
00 20 04 21
|
|
B1 EA D0 11
|
|
9C C7 D1 CD
|
|
33 AC D1 E1
|
|
11 D7 C7 D1
|
|
CA 1E B6 D1 subrouteustrjp(cryptocmdDECRYPT, cryptocmdunROT, cryptocmdunROTu)
|
|
35 D1:C235 - - - -
|
|
36 D1:C235 E5 11 E7 C2
|
|
D1 CD 33 AC
|
|
D1 21 00 00
|
|
00 20 04 21
|
|
B1 EA D0 11
|
|
F5 C4 D1 CD
|
|
33 AC D1 E1
|
|
11 1B C5 D1
|
|
CA 1E B6 D1 subrouteustrjp(cryptocmdENCRYPT, cryptocmdXOR, cryptocmdXORu)
|
|
37 D1:C259 E5 11 9C C6
|
|
D1 CD 33 AC
|
|
D1 21 00 00
|
|
00 20 04 21
|
|
B1 EA D0 11
|
|
A3 C8 D1 CD
|
|
33 AC D1 E1
|
|
11 C9 C8 D1
|
|
CA 1E B6 D1 subrouteustrjp(cryptocmdDECRYPT, cryptocmdunXOR, cryptocmdunXORu)
|
|
38 D1:C27D - - - -
|
|
39 D1:C27D E5 11 E7 C2
|
|
D1 CD 33 AC
|
|
D1 21 00 00
|
|
00 20 04 21
|
|
B1 EA D0 11
|
|
F4 C5 D1 CD
|
|
33 AC D1 E1
|
|
11 0A C6 D1
|
|
CA 1E B6 D1 subrouteustrjp(cryptocmdENCRYPT, cryptocmdHELP, cryptocmdHELPu)
|
|
40 D1:C2A1 E5 11 9C C6
|
|
D1 CD 33 AC
|
|
D1 21 00 00
|
|
00 20 04 21
|
|
B1 EA D0 11
|
|
B8 C9 D1 CD
|
|
33 AC D1 E1
|
|
11 CE C9 D1
|
|
CA 1E B6 D1 subrouteustrjp(cryptocmdDECRYPT, cryptocmdunHELP, cryptocmdunHELPu)
|
|
41 D1:C2C5 - - - -
|
|
42 D1:C2C5 11 E7 C2 D1
|
|
CD 33 AC D1
|
|
11 39 C3 D1
|
|
CA 1E B6 D1 routeustrjp(cryptocmdENCRYPT, cryptocmdENCRYPTu)
|
|
43 D1:C2D5 11 9C C6 D1
|
|
CD 33 AC D1
|
|
11 EE C6 D1
|
|
CA 1E B6 D1 routeustrjp(cryptocmdDECRYPT, cryptocmdDECRYPTu)
|
|
44 D1:C2E5 - - - -
|
|
45 D1:C2E5 C5 - - - push bc
|
|
46 D1:C2E6 C9 - - - ret
|
|
47 D1:C2E7 - - - -
|
|
48 D1:C2E7 - - - - #include "includes/CryptoCommands/CryptoCommands.inc"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/CryptoCommands/CryptoCommands.inc"
|
|
1 D1:C2E7 - - - - #include "includes/CryptoCommands/ENCRYPT.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/CryptoCommands/ENCRYPT.asm"
|
|
1 D1:C2E7 45 4E 43 52
|
|
59 50 54 00 cryptocmdENCRYPT: .db "ENCRYPT", 0
|
|
2 D1:C2EF 40 - - - cryptocmdENCRYPTo: .db $40
|
|
3 D1:C2F0 45 6E 63 72
|
|
79 70 74 73
|
|
20 61 20 73
|
|
74 72 69 6E
|
|
67 20 75 73
|
|
69 6E 67 20
|
|
61 20 63 79
|
|
70 68 65 72
|
|
2E 20 73 65
|
|
65 20 27 45
|
|
4E 43 52 59
|
|
50 54 20 48
|
|
45 4C 50 27
|
|
20 66 6F 72
|
|
20 69 6E 66
|
|
6F 20 6F 6E
|
|
20 63 79 70
|
|
68 65 72 73
|
|
00 - - - cryptocmdENCRYPTm: .db "Encrypts a string using a cypher. see 'ENCRYPT HELP' for info on cyphers", 0
|
|
4 D1:C339 45 4E 43 52
|
|
59 50 54 20
|
|
3C 43 72 79
|
|
70 74 20 43
|
|
6F 6D 6D 61
|
|
6E 64 3E 20
|
|
3C 43 72 79
|
|
70 74 20 41
|
|
72 67 73 3E
|
|
00 - - - cryptocmdENCRYPTu: .db "ENCRYPT <Crypt Command> <Crypt Args>", 0
|
|
5 D1:C35E - - - - cryptocmdENCRYPTf:
|
|
6 D1:C35E - - - - cryptocmdENCRYPTfArg0:
|
|
7 D1:C35E 21 CD EA D0 ld hl, FshCmdArgFlags
|
|
8 D1:C362 CB 46 - - bit 0, (hl)
|
|
9 D1:C364 28 10 - - jr z, cryptocmdENCRYPTfArg0Get
|
|
10 D1:C366 CB 4E - - bit 1, (hl)
|
|
11 D1:C368 28 24 - - jr z, cryptocmdENCRYPTfExe
|
|
12 D1:C36A 21 CC B3 D1 ld hl, ErrUsageo
|
|
13 D1:C36E CD 37 B3 D1 call ErrSet
|
|
14 D1:C372 CD EA B2 D1 call ErrCatch
|
|
15 D1:C376 - - - - cryptocmdENCRYPTfArg0Get:
|
|
16 D1:C376 21 DE C3 D1 ld hl, cryptocmdENCRYPTfSCypher
|
|
17 D1:C37A CD FB AA D1 call printprompt
|
|
18 D1:C37E 21 A8 EA D0 ld hl, FshCmdArg0
|
|
19 D1:C382 11 2C 00 00 ld de, FshCmdInptSize
|
|
20 D1:C386 CD 83 AD D1 call inputstr
|
|
21 D1:C38A CD F0 07 02 call _NewLine
|
|
22 D1:C38E - - - - cryptocmdENCRYPTfExe:
|
|
23 D1:C38E - - - -
|
|
24 D1:C38E - - - - #macro cryptocmdENCRYPTcmpjp(cmdX, cmdXf)
|
|
25 D1:C38E ld hl, FshCmdArg0
|
|
26 D1:C38E ld de, CmdX
|
|
27 D1:C38E call strcmp
|
|
28 D1:C38E jp z, cmdXf
|
|
29 D1:C38E #endmacro
|
|
30 D1:C38E - - - -
|
|
31 D1:C38E 21 A8 EA D0
|
|
11 E7 C3 D1
|
|
CD 33 AC D1
|
|
CA 41 C4 D1 cryptocmdENCRYPTcmpjp(cryptocmdROT, cryptocmdROTf)
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/CryptoCommands/ENCRYPT.asm"
|
|
32 D1:C39E 21 A8 EA D0
|
|
11 F5 C4 D1
|
|
CD 33 AC D1
|
|
CA 37 C5 D1 cryptocmdENCRYPTcmpjp(cryptocmdXOR, cryptocmdXORf)
|
|
33 D1:C3AE 21 A8 EA D0
|
|
11 F4 C5 D1
|
|
CD 33 AC D1
|
|
CA 17 C6 D1 cryptocmdENCRYPTcmpjp(cryptocmdHELP, cryptocmdHELPf)
|
|
34 D1:C3BE - - - -
|
|
35 D1:C3BE 21 A8 EA D0 ld hl, FshCmdArg0
|
|
36 D1:C3C2 11 9F EA D0 ld de, FshCmd
|
|
37 D1:C3C6 CD 46 AC D1 call strcpy
|
|
38 D1:C3CA - - - -
|
|
39 D1:C3CA 21 46 B3 D1 ld hl, ErrCmdNotFoundo
|
|
40 D1:C3CE 11 CE EA D0 ld de, FshCmdErrCode
|
|
41 D1:C3D2 CD 3D AA D1 call bytecpy
|
|
42 D1:C3D6 CD 37 B3 D1 call ErrSet
|
|
43 D1:C3DA C3 DF A8 D1 jp Err
|
|
44 D1:C3DE - - - -
|
|
45 D1:C3DE 43 79 70 68
|
|
65 72 3D 20
|
|
00 - - - cryptocmdENCRYPTfSCypher: .db "Cypher= ", 0
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/CryptoCommands/CryptoCommands.inc"
|
|
2 D1:C3E7 - - - - #include "includes/CryptoCommands/ROT.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/CryptoCommands/ROT.asm"
|
|
1 D1:C3E7 52 4F 54 00 cryptocmdROT: .db "ROT", 0
|
|
2 D1:C3EB 52 4F 54 3A
|
|
20 43 79 70
|
|
68 65 72 2C
|
|
20 72 6F 74
|
|
61 74 65 73
|
|
20 74 68 65
|
|
20 61 6C 70
|
|
68 61 62 65
|
|
74 20 61 6E
|
|
64 20 65 6E
|
|
63 6F 64 65
|
|
73 20 61 20
|
|
73 74 72 69
|
|
6E 67 00 - cryptocmdROTm: .db "ROT: Cypher, rotates the alphabet and encodes a string", 0
|
|
3 D1:C422 45 4E 43 52
|
|
59 50 54 20
|
|
52 4F 54 20
|
|
3C 73 68 69
|
|
66 74 23 3E
|
|
20 3C 6D 65
|
|
73 73 61 67
|
|
65 3E 00 - cryptocmdROTu: .db "ENCRYPT ROT <shift#> <message>", 0
|
|
4 D1:C441 - - - - cryptocmdROTf:
|
|
5 D1:C441 - - - - cryptocmdROTfArg1:
|
|
6 D1:C441 21 CD EA D0 ld hl, FshCmdArgFlags
|
|
7 D1:C445 CB 5E - - bit 3, (hl)
|
|
8 D1:C447 20 32 - - jr nz, cryptocmdROTfArg2
|
|
9 D1:C449 CB 56 - - bit 2, (hl)
|
|
10 D1:C44B 28 0C - - jr z, cryptocmdROTfArg1Get
|
|
11 D1:C44D 21 CC B3 D1 ld hl, ErrUsageo
|
|
12 D1:C451 CD 37 B3 D1 call ErrSet
|
|
13 D1:C455 CD EA B2 D1 call ErrCatch
|
|
14 D1:C459 - - - - cryptocmdROTfArg1Get:
|
|
15 D1:C459 21 DA C4 D1 ld hl, cryptocmdROTfDShift
|
|
16 D1:C45D CD FB AA D1 call printprompt
|
|
17 D1:C461 21 B1 EA D0 ld hl, FshCmdArg1
|
|
18 D1:C465 11 03 00 00 ld de, 3
|
|
19 D1:C469 CD BB AF D1 call inputnumstr
|
|
20 D1:C46D CD BD AC D1 call strtow
|
|
21 D1:C471 11 B1 EA D0 ld de, FshCmdArg1
|
|
22 D1:C475 EB - - - ex de, hl
|
|
23 D1:C476 73 - - - ld (hl), e
|
|
24 D1:C477 CD F0 07 02 call _NewLine
|
|
25 D1:C47B - - - - cryptocmdROTfArg2:
|
|
26 D1:C47B 21 BA EA D0 ld hl, FshCmdArg2
|
|
27 D1:C47F 11 CF EA D0 ld de, FshScratch
|
|
28 D1:C483 CD 46 AC D1 call strcpy
|
|
29 D1:C487 21 CD EA D0 ld hl, FshCmdArgFlags
|
|
30 D1:C48B CB 66 - - bit 4, (hl)
|
|
31 D1:C48D 28 10 - - jr z, cryptocmdROTfArg2Get
|
|
32 D1:C48F CB 6E - - bit 5, (hl)
|
|
33 D1:C491 28 24 - - jr z, cryptocmdROTfExe
|
|
34 D1:C493 21 CC B3 D1 ld hl, ErrUsageo
|
|
35 D1:C497 CD 37 B3 D1 call ErrSet
|
|
36 D1:C49B CD EA B2 D1 call ErrCatch
|
|
37 D1:C49F - - - - cryptocmdROTfArg2Get:
|
|
38 D1:C49F 21 E2 C4 D1 ld hl, cryptocmdROTfDMessage
|
|
39 D1:C4A3 CD FB AA D1 call printprompt
|
|
40 D1:C4A7 21 CF EA D0 ld hl, FshScratch
|
|
41 D1:C4AB 11 10 00 00 ld de, FshScratchSize - 4
|
|
42 D1:C4AF CD A7 AE D1 call inputcharstr
|
|
43 D1:C4B3 CD F0 07 02 call _NewLine
|
|
44 D1:C4B7 - - - - cryptocmdROTfExe:
|
|
45 D1:C4B7 21 B1 EA D0 ld hl, FshCmdArg1
|
|
46 D1:C4BB 7E - - - ld a, (hl)
|
|
47 D1:C4BC 21 CF EA D0 ld hl, FshScratch
|
|
48 D1:C4C0 CD 04 B5 D1 call rotletencrypt
|
|
49 D1:C4C4 E5 - - - push hl
|
|
50 D1:C4C5 21 EC C4 D1 ld hl, cryptocmdROTfDResult
|
|
51 D1:C4C9 CD C0 07 02 call _PutS
|
|
52 D1:C4CD E1 - - - pop hl
|
|
53 D1:C4CE CD C0 07 02 call _PutS
|
|
54 D1:C4D2 CD F0 07 02 call _NewLine
|
|
55 D1:C4D6 C3 DB A8 D1 jp Fin
|
|
56 D1:C4DA - - - -
|
|
57 D1:C4DA 53 68 69 66
|
|
74 3D 20 00 cryptocmdROTfDShift: .db "Shift= ", 0
|
|
58 D1:C4E2 4D 65 73 73
|
|
61 67 65 3D
|
|
20 00 - - cryptocmdROTfDMessage: .db "Message= ", 0
|
|
59 D1:C4EC 52 65 73 75
|
|
6C 74 3A 20
|
|
00 - - - cryptocmdROTfDResult: .db "Result: ", 0
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/CryptoCommands/CryptoCommands.inc"
|
|
3 D1:C4F5 - - - - #include "includes/CryptoCommands/XOR.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/CryptoCommands/XOR.asm"
|
|
1 D1:C4F5 58 4F 52 00 cryptocmdXOR: .db "XOR", 0
|
|
2 D1:C4F9 58 4F 52 3A
|
|
20 43 79 70
|
|
68 65 72 2C
|
|
20 61 6E 64
|
|
20 65 6E 63
|
|
6F 64 65 73
|
|
20 61 20 73
|
|
74 72 69 6E
|
|
67 00 - - cryptocmdXORm: .db "XOR: Cypher, and encodes a string", 0
|
|
3 D1:C51B 45 4E 43 52
|
|
59 50 54 20
|
|
58 4F 52 20
|
|
3C 6B 65 79
|
|
3E 20 3C 6D
|
|
65 73 73 61
|
|
67 65 3E 00 cryptocmdXORu: .db "ENCRYPT XOR <key> <message>", 0
|
|
4 D1:C537 - - - - cryptocmdXORf:
|
|
5 D1:C537 - - - - cryptocmdXORfArg1:
|
|
6 D1:C537 21 CD EA D0 ld hl, FshCmdArgFlags
|
|
7 D1:C53B CB 56 - - bit 2, (hl)
|
|
8 D1:C53D 28 10 - - jr z, cryptocmdXORfArg1Get
|
|
9 D1:C53F CB 5E - - bit 3, (hl)
|
|
10 D1:C541 28 24 - - jr z, cryptocmdXORfArg2
|
|
11 D1:C543 21 CC B3 D1 ld hl, ErrUsageo
|
|
12 D1:C547 CD 37 B3 D1 call ErrSet
|
|
13 D1:C54B CD EA B2 D1 call ErrCatch
|
|
14 D1:C54F - - - - cryptocmdXORfArg1Get:
|
|
15 D1:C54F 21 DB C5 D1 ld hl, cryptocmdXORfDKey
|
|
16 D1:C553 CD FB AA D1 call printprompt
|
|
17 D1:C557 21 B1 EA D0 ld hl, FshCmdArg1
|
|
18 D1:C55B 11 08 00 00 ld de, FshCmdCmdSize
|
|
19 D1:C55F CD 83 AD D1 call inputstr
|
|
20 D1:C563 CD F0 07 02 call _NewLine
|
|
21 D1:C567 - - - - cryptocmdXORfArg2:
|
|
22 D1:C567 21 BA EA D0 ld hl, FshCmdArg2
|
|
23 D1:C56B 11 CF EA D0 ld de, FshScratch
|
|
24 D1:C56F CD 46 AC D1 call strcpy
|
|
25 D1:C573 21 CD EA D0 ld hl, FshCmdArgFlags
|
|
26 D1:C577 CB 66 - - bit 4, (hl)
|
|
27 D1:C579 28 10 - - jr z, cryptocmdXORfArg2Get
|
|
28 D1:C57B CB 6E - - bit 5, (hl)
|
|
29 D1:C57D 28 24 - - jr z, cryptocmdXORfExe
|
|
30 D1:C57F 21 CC B3 D1 ld hl, ErrUsageo
|
|
31 D1:C583 CD 37 B3 D1 call ErrSet
|
|
32 D1:C587 CD EA B2 D1 call ErrCatch
|
|
33 D1:C58B - - - - cryptocmdXORfArg2Get:
|
|
34 D1:C58B 21 E1 C5 D1 ld hl, cryptocmdXORfDMessage
|
|
35 D1:C58F CD FB AA D1 call printprompt
|
|
36 D1:C593 21 CF EA D0 ld hl, FshScratch
|
|
37 D1:C597 11 09 00 00 ld de, FshScratchSize - 1 / 2
|
|
38 D1:C59B CD A7 AE D1 call inputcharstr
|
|
39 D1:C59F CD F0 07 02 call _NewLine
|
|
40 D1:C5A3 - - - - cryptocmdXORfExe:
|
|
41 D1:C5A3 21 CF EA D0 ld hl, FshScratch
|
|
42 D1:C5A7 11 B1 EA D0 ld de, FshCmdArg1
|
|
43 D1:C5AB CD 92 B5 D1 call xorcrypt
|
|
44 D1:C5AF 21 EB C5 D1 ld hl, cryptocmdXORfDResult
|
|
45 D1:C5B3 CD C0 07 02 call _PutS
|
|
46 D1:C5B7 21 CF EA D0 ld hl, FshScratch
|
|
47 D1:C5BB - - - - cryptocmdXORfPrint:
|
|
48 D1:C5BB 7E - - - ld a, (hl)
|
|
49 D1:C5BC B7 - - - or a, a
|
|
50 D1:C5BD 28 14 - - jr z, cryptocmdXORfPrintEnd
|
|
51 D1:C5BF E5 - - - push hl
|
|
52 D1:C5C0 CD 9C AB D1 call bytetohexstr
|
|
53 D1:C5C4 7E - - - ld a, (hl)
|
|
54 D1:C5C5 CD B8 07 02 call _PutC
|
|
55 D1:C5C9 23 - - - inc hl
|
|
56 D1:C5CA 7E - - - ld a, (hl)
|
|
57 D1:C5CB CD B8 07 02 call _PutC
|
|
58 D1:C5CF E1 - - - pop hl
|
|
59 D1:C5D0 23 - - - inc hl
|
|
60 D1:C5D1 18 E8 - - jr cryptocmdXORfPrint
|
|
61 D1:C5D3 - - - - cryptocmdXORfPrintEnd:
|
|
62 D1:C5D3 CD F0 07 02 call _NewLine
|
|
63 D1:C5D7 C3 DB A8 D1 jp Fin
|
|
64 D1:C5DB - - - -
|
|
65 D1:C5DB 4B 65 79 3D
|
|
20 00 - - cryptocmdXORfDKey: .db "Key= ", 0
|
|
66 D1:C5E1 4D 65 73 73
|
|
61 67 65 3D
|
|
20 00 - - cryptocmdXORfDMessage: .db "Message= ", 0
|
|
67 D1:C5EB 52 65 73 75
|
|
6C 74 3A 20
|
|
00 - - - cryptocmdXORfDResult: .db "Result: ", 0
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/CryptoCommands/CryptoCommands.inc"
|
|
4 D1:C5F4 - - - - #include "includes/CryptoCommands/HELP.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/CryptoCommands/HELP.asm"
|
|
1 D1:C5F4 48 45 4C 50
|
|
00 - - - cryptocmdHELP: .db "HELP", 0
|
|
2 D1:C5F9 48 65 6C 70
|
|
20 66 6F 72
|
|
20 63 79 70
|
|
68 65 72 73
|
|
00 - - - cryptocmdHELPm: .db "Help for cyphers", 0
|
|
3 D1:C60A 45 4E 43 52
|
|
59 50 54 20
|
|
48 45 4C 50
|
|
00 - - - cryptocmdHELPu: .db "ENCRYPT HELP", 0
|
|
4 D1:C617 - - - - cryptocmdHELPf:
|
|
5 D1:C617 21 CD EA D0 ld hl, FshCmdArgFlags
|
|
6 D1:C61B CB 56 - - bit 2, (hl)
|
|
7 D1:C61D 28 0C - - jr z, cryptocmdHELPfExe
|
|
8 D1:C61F 21 CC B3 D1 ld hl, ErrUsageo
|
|
9 D1:C623 CD 37 B3 D1 call ErrSet
|
|
10 D1:C627 CD EA B2 D1 call ErrCatch
|
|
11 D1:C62B - - - - cryptocmdHELPfExe:
|
|
12 D1:C62B 21 89 C6 D1 ld hl, cryptocmdHELPfLine1
|
|
13 D1:C62F CD C0 07 02 call _PutS
|
|
14 D1:C633 CD F0 07 02 call _NewLine
|
|
15 D1:C637 - - - -
|
|
16 D1:C637 - - - - #macro cryptocmdHELPmRow1(cmdXs)
|
|
17 D1:C637 xor a
|
|
18 D1:C637 ld (curCol), a
|
|
19 D1:C637 ld hl, cmdXs
|
|
20 D1:C637 call _PutS
|
|
21 D1:C637 call _NewLine
|
|
22 D1:C637 #endmacro
|
|
23 D1:C637 - - - - #macro cryptocmdHELPmRowU(cmdXs, cmdXu)
|
|
24 D1:C637 xor a
|
|
25 D1:C637 ld (curCol), a
|
|
26 D1:C637 ld hl, cmdXs
|
|
27 D1:C637 call _PutS
|
|
28 D1:C637 ld a, ':'
|
|
29 D1:C637 call _PutC
|
|
30 D1:C637 ld a, ' '
|
|
31 D1:C637 call _PutC
|
|
32 D1:C637 ld hl, cmdXu
|
|
33 D1:C637 call _PutS
|
|
34 D1:C637 call _NewLine
|
|
35 D1:C637 #endmacro
|
|
36 D1:C637 - - - - #macro cryptocmdHELPmRow2(cmdXs, cmdYs)
|
|
37 D1:C637 xor a
|
|
38 D1:C637 ld (curCol), a
|
|
39 D1:C637 ld hl, cmdXs
|
|
40 D1:C637 call _PutS
|
|
41 D1:C637 ld a, 9
|
|
42 D1:C637 ld (curcol), a
|
|
43 D1:C637 ld hl, cmdYs
|
|
44 D1:C637 call _PutS
|
|
45 D1:C637 call _NewLine
|
|
46 D1:C637 #endmacro
|
|
47 D1:C637 - - - - #macro cryptocmdHELPmRow3(cmdXs, cmdYs, cmdZs)
|
|
48 D1:C637 xor a
|
|
49 D1:C637 ld (curCol), a
|
|
50 D1:C637 ld hl, cmdXs
|
|
51 D1:C637 call _PutS
|
|
52 D1:C637 ld a, 9
|
|
53 D1:C637 ld (curcol), a
|
|
54 D1:C637 ld hl, cmdYs
|
|
55 D1:C637 call _PutS
|
|
56 D1:C637 ld a, 19
|
|
57 D1:C637 ld (curcol), a
|
|
58 D1:C637 ld hl, cmdZs
|
|
59 D1:C637 call _PutS
|
|
60 D1:C637 call _NewLine
|
|
61 D1:C637 #endmacro
|
|
62 D1:C637 - - - -
|
|
63 D1:C637 AF 32 96 05
|
|
D0 21 E7 C3
|
|
D1 CD C0 07
|
|
02 3E 3A CD
|
|
B8 07 02 3E
|
|
20 CD B8 07
|
|
02 21 22 C4
|
|
D1 CD C0 07
|
|
02 CD F0 07
|
|
02 - - - cryptocmdHELPmRowU(cryptocmdROT, cryptocmdROTu)
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/CryptoCommands/HELP.asm"
|
|
64 D1:C65C AF 32 96 05
|
|
D0 21 F5 C4
|
|
D1 CD C0 07
|
|
02 3E 3A CD
|
|
B8 07 02 3E
|
|
20 CD B8 07
|
|
02 21 1B C5
|
|
D1 CD C0 07
|
|
02 CD F0 07
|
|
02 - - - cryptocmdHELPmRowU(cryptocmdXOR, cryptocmdXORu)
|
|
65 D1:C681 - - - -
|
|
66 D1:C681 CD F0 07 02 call _NewLine
|
|
67 D1:C685 C3 DB A8 D1 jp Fin
|
|
68 D1:C689 - - - -
|
|
69 D1:C689 41 76 61 69
|
|
6C 61 62 6C
|
|
65 20 43 72
|
|
79 70 74 6F
|
|
73 3A 00 - cryptocmdHELPfLine1: .db "Available Cryptos:", 0
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/CryptoCommands/CryptoCommands.inc"
|
|
5 D1:C69C - - - -
|
|
6 D1:C69C - - - - #include "includes/CryptoCommands/DECRYPT.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/CryptoCommands/DECRYPT.asm"
|
|
1 D1:C69C 44 45 43 52
|
|
59 50 54 00 cryptocmdDECRYPT: .db "DECRYPT", 0
|
|
2 D1:C6A4 41 - - - cryptocmdDECRYPTo: .db $41
|
|
3 D1:C6A5 44 65 63 72
|
|
79 70 74 73
|
|
20 61 20 73
|
|
74 72 69 6E
|
|
67 20 75 73
|
|
69 6E 67 20
|
|
61 20 63 79
|
|
70 68 65 72
|
|
2E 20 73 65
|
|
65 20 27 44
|
|
45 43 52 59
|
|
50 54 20 48
|
|
45 4C 50 27
|
|
20 66 6F 72
|
|
20 69 6E 66
|
|
6F 20 6F 6E
|
|
20 63 79 70
|
|
68 65 72 73
|
|
00 - - - cryptocmdDECRYPTm: .db "Decrypts a string using a cypher. see 'DECRYPT HELP' for info on cyphers", 0
|
|
4 D1:C6EE 44 45 43 52
|
|
59 50 54 20
|
|
3C 43 72 79
|
|
70 74 20 43
|
|
6F 6D 6D 61
|
|
6E 64 3E 20
|
|
3C 43 72 79
|
|
70 74 20 41
|
|
72 67 73 3E
|
|
00 - - - cryptocmdDECRYPTu: .db "DECRYPT <Crypt Command> <Crypt Args>", 0
|
|
5 D1:C713 - - - - cryptocmdDECRYPTf:
|
|
6 D1:C713 - - - - cryptocmdDECRYPTfArg0:
|
|
7 D1:C713 21 CD EA D0 ld hl, FshCmdArgFlags
|
|
8 D1:C717 CB 46 - - bit 0, (hl)
|
|
9 D1:C719 28 10 - - jr z, cryptocmdDECRYPTfArg0Get
|
|
10 D1:C71B CB 4E - - bit 1, (hl)
|
|
11 D1:C71D 28 24 - - jr z, cryptocmdDECRYPTfExe
|
|
12 D1:C71F 21 CC B3 D1 ld hl, ErrUsageo
|
|
13 D1:C723 CD 37 B3 D1 call ErrSet
|
|
14 D1:C727 CD EA B2 D1 call ErrCatch
|
|
15 D1:C72B - - - - cryptocmdDECRYPTfArg0Get:
|
|
16 D1:C72B 21 93 C7 D1 ld hl, cryptocmdDECRYPTfSCypher
|
|
17 D1:C72F CD FB AA D1 call printprompt
|
|
18 D1:C733 21 A8 EA D0 ld hl, FshCmdArg0
|
|
19 D1:C737 11 2C 00 00 ld de, FshCmdInptSize
|
|
20 D1:C73B CD 83 AD D1 call inputstr
|
|
21 D1:C73F CD F0 07 02 call _NewLine
|
|
22 D1:C743 - - - - cryptocmdDECRYPTfExe:
|
|
23 D1:C743 - - - -
|
|
24 D1:C743 - - - - #macro cryptocmdDECRYPTcmpjp(cmdX, cmdXf)
|
|
25 D1:C743 ld hl, FshCmdArg0
|
|
26 D1:C743 ld de, CmdX
|
|
27 D1:C743 call strcmp
|
|
28 D1:C743 jp z, cmdXf
|
|
29 D1:C743 #endmacro
|
|
30 D1:C743 - - - -
|
|
31 D1:C743 21 A8 EA D0
|
|
11 9C C7 D1
|
|
CD 33 AC D1
|
|
CA EC C7 D1 cryptocmdDECRYPTcmpjp(cryptocmdunROT, cryptocmdunROTf)
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/CryptoCommands/DECRYPT.asm"
|
|
32 D1:C753 21 A8 EA D0
|
|
11 A3 C8 D1
|
|
CD 33 AC D1
|
|
CA DB C8 D1 cryptocmdDECRYPTcmpjp(cryptocmdunXOR, cryptocmdunXORf)
|
|
33 D1:C763 21 A8 EA D0
|
|
11 B8 C9 D1
|
|
CD 33 AC D1
|
|
CA DB C9 D1 cryptocmdDECRYPTcmpjp(cryptocmdunHELP, cryptocmdunHELPf)
|
|
34 D1:C773 - - - -
|
|
35 D1:C773 21 A8 EA D0 ld hl, FshCmdArg0
|
|
36 D1:C777 11 9F EA D0 ld de, FshCmd
|
|
37 D1:C77B CD 46 AC D1 call strcpy
|
|
38 D1:C77F - - - -
|
|
39 D1:C77F 21 46 B3 D1 ld hl, ErrCmdNotFoundo
|
|
40 D1:C783 11 CE EA D0 ld de, FshCmdErrCode
|
|
41 D1:C787 CD 3D AA D1 call bytecpy
|
|
42 D1:C78B CD 37 B3 D1 call ErrSet
|
|
43 D1:C78F C3 DF A8 D1 jp Err
|
|
44 D1:C793 - - - -
|
|
45 D1:C793 43 79 70 68
|
|
65 72 3D 20
|
|
00 - - - cryptocmdDECRYPTfSCypher: .db "Cypher= ", 0
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/CryptoCommands/CryptoCommands.inc"
|
|
7 D1:C79C - - - - #include "includes/CryptoCommands/unROT.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/CryptoCommands/unROT.asm"
|
|
1 D1:C79C 52 4F 54 00 cryptocmdunROT: .db "ROT", 0
|
|
2 D1:C7A0 52 4F 54 3A
|
|
20 43 79 70
|
|
68 65 72 2C
|
|
20 72 6F 74
|
|
61 74 65 73
|
|
20 74 68 65
|
|
20 61 6C 70
|
|
68 61 62 65
|
|
74 20 61 6E
|
|
64 20 44 65
|
|
63 6F 64 65
|
|
73 20 61 20
|
|
73 74 72 69
|
|
6E 67 00 - cryptocmdunROTm: .db "ROT: Cypher, rotates the alphabet and Decodes a string", 0
|
|
3 D1:C7D7 44 45 43 52
|
|
59 50 54 20
|
|
52 4F 54 20
|
|
3C 73 68 69
|
|
66 74 23 3E
|
|
00 - - - cryptocmdunROTu: .db "DECRYPT ROT <shift#>", 0
|
|
4 D1:C7EC - - - - cryptocmdunROTf:
|
|
5 D1:C7EC - - - - cryptocmdunROTfArg1:
|
|
6 D1:C7EC 21 CD EA D0 ld hl, FshCmdArgFlags
|
|
7 D1:C7F0 CB 5E - - bit 3, (hl)
|
|
8 D1:C7F2 20 32 - - jr nz, cryptocmdunROTfArg2
|
|
9 D1:C7F4 CB 56 - - bit 2, (hl)
|
|
10 D1:C7F6 28 0C - - jr z, cryptocmdunROTfArg1Get
|
|
11 D1:C7F8 21 CC B3 D1 ld hl, ErrUsageo
|
|
12 D1:C7FC CD 37 B3 D1 call ErrSet
|
|
13 D1:C800 CD EA B2 D1 call ErrCatch
|
|
14 D1:C804 - - - - cryptocmdunROTfArg1Get:
|
|
15 D1:C804 21 85 C8 D1 ld hl, cryptocmdunROTfDShift
|
|
16 D1:C808 CD FB AA D1 call printprompt
|
|
17 D1:C80C 21 B1 EA D0 ld hl, FshCmdArg1
|
|
18 D1:C810 11 03 00 00 ld de, 3
|
|
19 D1:C814 CD BB AF D1 call inputnumstr
|
|
20 D1:C818 CD BD AC D1 call strtow
|
|
21 D1:C81C 11 B1 EA D0 ld de, FshCmdArg1
|
|
22 D1:C820 EB - - - ex de, hl
|
|
23 D1:C821 73 - - - ld (hl), e
|
|
24 D1:C822 CD F0 07 02 call _NewLine
|
|
25 D1:C826 - - - - cryptocmdunROTfArg2:
|
|
26 D1:C826 21 BA EA D0 ld hl, FshCmdArg2
|
|
27 D1:C82A 11 CF EA D0 ld de, FshScratch
|
|
28 D1:C82E CD 46 AC D1 call strcpy
|
|
29 D1:C832 21 CD EA D0 ld hl, FshCmdArgFlags
|
|
30 D1:C836 CB 66 - - bit 4, (hl)
|
|
31 D1:C838 28 10 - - jr z, cryptocmdunROTfArg2Get
|
|
32 D1:C83A CB 6E - - bit 5, (hl)
|
|
33 D1:C83C 28 24 - - jr z, cryptocmdunROTfExe
|
|
34 D1:C83E 21 CC B3 D1 ld hl, ErrUsageo
|
|
35 D1:C842 CD 37 B3 D1 call ErrSet
|
|
36 D1:C846 CD EA B2 D1 call ErrCatch
|
|
37 D1:C84A - - - - cryptocmdunROTfArg2Get:
|
|
38 D1:C84A 21 8D C8 D1 ld hl, cryptocmdunROTfDMessage
|
|
39 D1:C84E CD FB AA D1 call printprompt
|
|
40 D1:C852 21 CF EA D0 ld hl, FshScratch
|
|
41 D1:C856 11 10 00 00 ld de, FshScratchSize - 4
|
|
42 D1:C85A CD A7 AE D1 call inputcharstr
|
|
43 D1:C85E CD F0 07 02 call _NewLine
|
|
44 D1:C862 - - - - cryptocmdunROTfExe:
|
|
45 D1:C862 21 B1 EA D0 ld hl, FshCmdArg1
|
|
46 D1:C866 7E - - - ld a, (hl)
|
|
47 D1:C867 21 CF EA D0 ld hl, FshScratch
|
|
48 D1:C86B CD 29 B5 D1 call rotletdecrypt
|
|
49 D1:C86F E5 - - - push hl
|
|
50 D1:C870 21 9A C8 D1 ld hl, cryptocmdunROTfDResult
|
|
51 D1:C874 CD C0 07 02 call _PutS
|
|
52 D1:C878 E1 - - - pop hl
|
|
53 D1:C879 CD C0 07 02 call _PutS
|
|
54 D1:C87D CD F0 07 02 call _NewLine
|
|
55 D1:C881 C3 DB A8 D1 jp Fin
|
|
56 D1:C885 - - - -
|
|
57 D1:C885 53 68 69 66
|
|
74 3D 20 00 cryptocmdunROTfDShift: .db "Shift= ", 0
|
|
58 D1:C88D 43 79 70 68
|
|
65 72 54 65
|
|
78 74 3D 20
|
|
00 - - - cryptocmdunROTfDMessage: .db "CypherText= ", 0
|
|
59 D1:C89A 52 65 73 75
|
|
6C 74 3A 20
|
|
00 - - - cryptocmdunROTfDResult: .db "Result: ", 0
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/CryptoCommands/CryptoCommands.inc"
|
|
8 D1:C8A3 - - - - #include "includes/CryptoCommands/unXOR.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/CryptoCommands/unXOR.asm"
|
|
1 D1:C8A3 58 4F 52 00 cryptocmdunXOR: .db "XOR", 0
|
|
2 D1:C8A7 58 4F 52 3A
|
|
20 43 79 70
|
|
68 65 72 2C
|
|
20 61 6E 64
|
|
20 64 65 63
|
|
6F 64 65 73
|
|
20 61 20 73
|
|
74 72 69 6E
|
|
67 00 - - cryptocmdunXORm: .db "XOR: Cypher, and decodes a string", 0
|
|
3 D1:C8C9 44 45 43 52
|
|
59 50 54 20
|
|
58 4F 52 20
|
|
3C 6B 65 79
|
|
3E 00 - - cryptocmdunXORu: .db "DECRYPT XOR <key>", 0
|
|
4 D1:C8DB - - - - cryptocmdunXORf:
|
|
5 D1:C8DB - - - - cryptocmdunXORfArg1:
|
|
6 D1:C8DB 21 CD EA D0 ld hl, FshCmdArgFlags
|
|
7 D1:C8DF CB 56 - - bit 2, (hl)
|
|
8 D1:C8E1 28 10 - - jr z, cryptocmdunXORfArg1Get
|
|
9 D1:C8E3 CB 5E - - bit 3, (hl)
|
|
10 D1:C8E5 28 24 - - jr z, cryptocmdunXORfArg2
|
|
11 D1:C8E7 21 CC B3 D1 ld hl, ErrUsageo
|
|
12 D1:C8EB CD 37 B3 D1 call ErrSet
|
|
13 D1:C8EF CD EA B2 D1 call ErrCatch
|
|
14 D1:C8F3 - - - - cryptocmdunXORfArg1Get:
|
|
15 D1:C8F3 21 88 C9 D1 ld hl, cryptocmdunXORfDKey
|
|
16 D1:C8F7 CD FB AA D1 call printprompt
|
|
17 D1:C8FB 21 B1 EA D0 ld hl, FshCmdArg1
|
|
18 D1:C8FF 11 08 00 00 ld de, FshCmdCmdSize
|
|
19 D1:C903 CD 83 AD D1 call inputstr
|
|
20 D1:C907 CD F0 07 02 call _NewLine
|
|
21 D1:C90B - - - - cryptocmdunXORfArg2:
|
|
22 D1:C90B 21 BA EA D0 ld hl, FshCmdArg2
|
|
23 D1:C90F 11 CF EA D0 ld de, FshScratch
|
|
24 D1:C913 CD 46 AC D1 call strcpy
|
|
25 D1:C917 21 CD EA D0 ld hl, FshCmdArgFlags
|
|
26 D1:C91B CB 66 - - bit 4, (hl)
|
|
27 D1:C91D 20 45 - - jr nz, cryptocmdunXORfExe
|
|
28 D1:C91F - - - - cryptocmdunXORfArg2Get:
|
|
29 D1:C91F 21 A8 C9 D1 ld hl, cryptocmdunXORfStringPBuffer
|
|
30 D1:C923 06 0F - - ld b, $0F
|
|
31 D1:C925 3E 00 - - ld a, $00
|
|
32 D1:C927 CD 45 AA D1 call memset
|
|
33 D1:C92B 21 8E C9 D1 ld hl, cryptocmdunXORfDMessage
|
|
34 D1:C92F CD FB AA D1 call printprompt
|
|
35 D1:C933 21 CF EA D0 ld hl, FshScratch
|
|
36 D1:C937 11 10 00 00 ld de, FshScratchSize - 4
|
|
37 D1:C93B CD 83 AD D1 call inputstr
|
|
38 D1:C93F 01 A8 C9 D1 ld bc, cryptocmdunXORfStringPBuffer
|
|
39 D1:C943 - - - - cryptocmdunXORfArg2GetLoop:
|
|
40 D1:C943 7E - - - ld a, (hl)
|
|
41 D1:C944 B7 - - - or a, a
|
|
42 D1:C945 28 19 - - jr z, cryptocmdunXORfArg2GetLoopEnd
|
|
43 D1:C947 32 A4 C9 D1 ld (cryptocmdunXORfStringBuffer), a
|
|
44 D1:C94B 23 - - - inc hl
|
|
45 D1:C94C 7E - - - ld a, (hl)
|
|
46 D1:C94D 32 A5 C9 D1 ld (cryptocmdunXORfStringBuffer + 1), a
|
|
47 D1:C951 E5 - - - push hl
|
|
48 D1:C952 21 A4 C9 D1 ld hl, cryptocmdunXORfStringBuffer
|
|
49 D1:C956 CD F6 AB D1 call hexToA
|
|
50 D1:C95A E1 - - - pop hl
|
|
51 D1:C95B 02 - - - ld (bc), a
|
|
52 D1:C95C 23 - - - inc hl
|
|
53 D1:C95D 03 - - - inc bc
|
|
54 D1:C95E 18 E3 - - jr cryptocmdunXORfArg2GetLoop
|
|
55 D1:C960 - - - - cryptocmdunXORfArg2GetLoopEnd:
|
|
56 D1:C960 CD F0 07 02 call _NewLine
|
|
57 D1:C964 - - - - cryptocmdunXORfExe:
|
|
58 D1:C964 21 A8 C9 D1 ld hl, cryptocmdunXORfStringPBuffer
|
|
59 D1:C968 11 B1 EA D0 ld de, FshCmdArg1
|
|
60 D1:C96C CD 92 B5 D1 call xorcrypt
|
|
61 D1:C970 21 9B C9 D1 ld hl, cryptocmdunXORfDResult
|
|
62 D1:C974 CD C0 07 02 call _PutS
|
|
63 D1:C978 21 A8 C9 D1 ld hl, cryptocmdunXORfStringPBuffer
|
|
64 D1:C97C CD C0 07 02 call _PutS
|
|
65 D1:C980 CD F0 07 02 call _NewLine
|
|
66 D1:C984 C3 DB A8 D1 jp Fin
|
|
67 D1:C988 - - - -
|
|
68 D1:C988 4B 65 79 3D
|
|
20 00 - - cryptocmdunXORfDKey: .db "Key= ", 0
|
|
69 D1:C98E 43 79 70 68
|
|
65 72 54 65
|
|
78 74 3D 20
|
|
00 - - - cryptocmdunXORfDMessage: .db "CypherText= ", 0
|
|
70 D1:C99B 52 65 73 75
|
|
6C 74 3A 20
|
|
00 - - - cryptocmdunXORfDResult: .db "Result: ", 0
|
|
71 D1:C9A4 00 00 00 00 cryptocmdunXORfStringBuffer: .db $00, $00, $00, $00
|
|
72 D1:C9A8 00 00 00 00
|
|
00 00 00 00
|
|
00 00 00 00
|
|
00 00 00 00 cryptocmdunXORfStringPBuffer: .db $00, $00, $00, $00, $00, $00, $00, $00, $00, $00, $00, $00, $00, $00, $00, $00
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/CryptoCommands/CryptoCommands.inc"
|
|
9 D1:C9B8 - - - - #include "includes/CryptoCommands/unHELP.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/CryptoCommands/unHELP.asm"
|
|
1 D1:C9B8 48 45 4C 50
|
|
00 - - - cryptocmdunHELP: .db "HELP", 0
|
|
2 D1:C9BD 48 65 6C 70
|
|
20 66 6F 72
|
|
20 63 79 70
|
|
68 65 72 73
|
|
00 - - - cryptocmdunHELPm: .db "Help for cyphers", 0
|
|
3 D1:C9CE 44 45 43 52
|
|
59 50 54 20
|
|
48 45 4C 50
|
|
00 - - - cryptocmdunHELPu: .db "DECRYPT HELP", 0
|
|
4 D1:C9DB - - - - cryptocmdunHELPf:
|
|
5 D1:C9DB 21 CD EA D0 ld hl, FshCmdArgFlags
|
|
6 D1:C9DF CB 56 - - bit 2, (hl)
|
|
7 D1:C9E1 28 0C - - jr z, cryptocmdunHELPfExe
|
|
8 D1:C9E3 21 CC B3 D1 ld hl, ErrUsageo
|
|
9 D1:C9E7 CD 37 B3 D1 call ErrSet
|
|
10 D1:C9EB CD EA B2 D1 call ErrCatch
|
|
11 D1:C9EF - - - - cryptocmdunHELPfExe:
|
|
12 D1:C9EF 21 4D CA D1 ld hl, cryptocmdunHELPfLine1
|
|
13 D1:C9F3 CD C0 07 02 call _PutS
|
|
14 D1:C9F7 CD F0 07 02 call _NewLine
|
|
15 D1:C9FB - - - -
|
|
16 D1:C9FB - - - - #macro cryptocmdunHELPmRow1(cmdXs)
|
|
17 D1:C9FB xor a
|
|
18 D1:C9FB ld (curCol), a
|
|
19 D1:C9FB ld hl, cmdXs
|
|
20 D1:C9FB call _PutS
|
|
21 D1:C9FB call _NewLine
|
|
22 D1:C9FB #endmacro
|
|
23 D1:C9FB - - - - #macro cryptocmdunHELPmRowU(cmdXs, cmdXu)
|
|
24 D1:C9FB xor a
|
|
25 D1:C9FB ld (curCol), a
|
|
26 D1:C9FB ld hl, cmdXs
|
|
27 D1:C9FB call _PutS
|
|
28 D1:C9FB ld a, ':'
|
|
29 D1:C9FB call _PutC
|
|
30 D1:C9FB ld a, ' '
|
|
31 D1:C9FB call _PutC
|
|
32 D1:C9FB ld hl, cmdXu
|
|
33 D1:C9FB call _PutS
|
|
34 D1:C9FB call _NewLine
|
|
35 D1:C9FB #endmacro
|
|
36 D1:C9FB - - - - #macro cryptocmdunHELPmRow2(cmdXs, cmdYs)
|
|
37 D1:C9FB xor a
|
|
38 D1:C9FB ld (curCol), a
|
|
39 D1:C9FB ld hl, cmdXs
|
|
40 D1:C9FB call _PutS
|
|
41 D1:C9FB ld a, 9
|
|
42 D1:C9FB ld (curcol), a
|
|
43 D1:C9FB ld hl, cmdYs
|
|
44 D1:C9FB call _PutS
|
|
45 D1:C9FB call _NewLine
|
|
46 D1:C9FB #endmacro
|
|
47 D1:C9FB - - - - #macro cryptocmdunHELPmRow3(cmdXs, cmdYs, cmdZs)
|
|
48 D1:C9FB xor a
|
|
49 D1:C9FB ld (curCol), a
|
|
50 D1:C9FB ld hl, cmdXs
|
|
51 D1:C9FB call _PutS
|
|
52 D1:C9FB ld a, 9
|
|
53 D1:C9FB ld (curcol), a
|
|
54 D1:C9FB ld hl, cmdYs
|
|
55 D1:C9FB call _PutS
|
|
56 D1:C9FB ld a, 19
|
|
57 D1:C9FB ld (curcol), a
|
|
58 D1:C9FB ld hl, cmdZs
|
|
59 D1:C9FB call _PutS
|
|
60 D1:C9FB call _NewLine
|
|
61 D1:C9FB #endmacro
|
|
62 D1:C9FB - - - -
|
|
63 D1:C9FB AF 32 96 05
|
|
D0 21 9C C7
|
|
D1 CD C0 07
|
|
02 3E 3A CD
|
|
B8 07 02 3E
|
|
20 CD B8 07
|
|
02 21 D7 C7
|
|
D1 CD C0 07
|
|
02 CD F0 07
|
|
02 - - - cryptocmdunHELPmRowU(cryptocmdunROT, cryptocmdunROTu)
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/CryptoCommands/unHELP.asm"
|
|
64 D1:CA20 AF 32 96 05
|
|
D0 21 A3 C8
|
|
D1 CD C0 07
|
|
02 3E 3A CD
|
|
B8 07 02 3E
|
|
20 CD B8 07
|
|
02 21 C9 C8
|
|
D1 CD C0 07
|
|
02 CD F0 07
|
|
02 - - - cryptocmdunHELPmRowU(cryptocmdunXOR, cryptocmdunXORu)
|
|
65 D1:CA45 - - - -
|
|
66 D1:CA45 CD F0 07 02 call _NewLine
|
|
67 D1:CA49 C3 DB A8 D1 jp Fin
|
|
68 D1:CA4D - - - -
|
|
69 D1:CA4D 41 76 61 69
|
|
6C 61 62 6C
|
|
65 20 43 72
|
|
79 70 74 6F
|
|
73 3A 00 - cryptocmdunHELPfLine1: .db "Available Cryptos:", 0
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/CryptoCommands/CryptoCommands.inc"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/CryptoCommands/CryptoCommand.asm"
|
|
Listing for file "/home/pi/Documents/asm/FSH/includes/Command.asm"
|
|
Listing for file "FSHa.asm"
|
|
77 D1:CA60 - - - -
|
|
78 D1:CA60 - - - - .end
|