The engine compiles Alabama's rules into a law image and runs it as bytecode. Rule ids in the listing link back to the rules above.
- Listing from
- the engine's disassembler, tdis, when the site was built
- Compiled by
- tendc 1.3.0, image format 1.3
- Contents
- 58 rules, 27 sources, 28 proofs, 6 ints, 379 strings
- Compiled from these rules
- Yes. The image names the same SHA-256 as the verified rules above.
- Compiled from the current law IR
- Yes. The image carries the SHA-256 of the IR shown on this page.
- Image SHA-256
f0444236c7a06e3cb9b2c4262f5ee9bb34d432a70f2d7b780660d0c7cc6a5c32
Jump to: rule table, per-cost program, totals program, or download the listing.
.rules
R0 AL-EXAM-1 exam_no_bill - Ala. Code 15-23-121(a)(1)a
R1 AL-EXAM-2 exam_no_bill - Ala. Code 15-23-121(a)(1)b
R2 AL-EXAM-3 exam_no_bill - Ala. Admin. Code r. 262-X-11-.01(3)(c)1
R3 AL-EXAM-4 exam_payment - Ala. Code 15-23-5(24)
R4 AL-EXAM-5 exam_payment - Ala. Admin. Code r. 262-X-11-.01(3)(c)
R5 AL-EXAM-6 exam_payment - Ala. Admin. Code r. 262-X-11-.01(6)(b)
R6 AL-EXAM-7 exam_payment - Ala. Admin. Code r. 262-X-11-.01(4)(c)3
R7 AL-CAP-1 total_cap - Ala. Admin. Code r. 262-X-4-.04(1)
R8 AL-CAP-COUNS expense_cap counseling per claim Ala. Admin. Code r. 262-X-4-.07(4)(c)
R9 AL-CAP-WAGES expense_cap lost_wages per week Ala. Admin. Code r. 262-X-4-.04(12)(a)
R10 AL-WAGES-SA covered lost_wages Ala. Admin. Code r. 262-X-4-.04(28)
R11 AL-CAP-RELO expense_cap relocation per claim Ala. Admin. Code r. 262-X-4-.04(14)(c)
R12 AL-CAP-TRAVEL expense_cap transportation per claim Ala. Admin. Code r. 262-X-4-.04(15)(a)
R13 AL-COV-TRAVEL-MED covered transportation Ala. Admin. Code r. 262-X-4-.04(15)(a)
R14 AL-COV-MED covered medical Ala. Code 15-23-3(6)
R15 AL-COV-MED-OOP covered medical Ala. Admin. Code r. 262-X-4-.04(3)
R16 AL-COV-HIV covered prescription Ala. Admin. Code r. 262-X-11-.01(10)(a)1
R17 AL-COV-SEC covered security Ala. Admin. Code r. 262-X-4-.04(16)1
R18 AL-CAP-GLASSES expense_cap other per claim Ala. Admin. Code r. 262-X-4-.04(16)2
R19 AL-EXCL-PROP info - excluded_expense Ala. Admin. Code r. 262-X-4-.04(16)
R20 AL-EXCL-PROP-2 excluded - ACVCC Compensation page
R21 AL-EXCL-PAIN excluded - ACVCC Compensation page
R22 AL-EXCL-LEGAL excluded legal Ala. Admin. Code r. 262-X-4-.04(17)(b)
R23 AL-DEADLINE-1 deadline - from crime Ala. Code 15-23-12(a)(1)
R24 AL-REPORT-1 reporting - Ala. Code 15-23-12(a)(4)
R25 AL-REPORT-2 reporting - Ala. Admin. Code r. 262-X-4-.02(2)
R26 AL-COLL-1 collateral - Ala. Admin. Code r. 262-X-4-.02(6)
R27 AL-COLL-2 collateral - Ala. Code 15-23-12(b)
R28 AL-CONDUCT-1 info - conduct_reduction Ala. Code 15-23-12(b)
R29 AL-CONDUCT-2 info - conduct_reduction Ala. Code 15-23-12(c)
R30 AL-EMERG-1 info - emergency_award Ala. Admin. Code r. 262-X-4-.05
R31 AL-CRIME-1 info - eligible_crime ACVCC brochure, Sexual Assault Victimization
R32 AL-CRIME-2 info - eligible_crime Ala. Code 15-23-13
R33 AL-RES-1 info - residency Ala. Code 15-23-3(2)a
R34 AL-RES-2 info - residency Ala. Code 15-23-3(2)b
R35 AL-RES-3 info - residency Ala. Admin. Code r. 262-X-4-.02(11)
R36 AL-SUBMIT-1 info - submission Compensation page, How Do I File A Claim?
R37 AL-SUBMIT-2 info - submission Application, Claim Authorization page, submission box
R38 AL-SUBMIT-3 info - submission Application, Claim Authorization page, submission box
R39 AL-DOC-1 info - required_document Ala. Admin. Code r. 262-X-4-.02(10)
R40 AL-DOC-2 info - required_document Application, Section 1 note
R41 AL-DOC-3 info - required_document Application, Section 5 (Crime Information)
R42 AL-DOC-4 info - required_document Application, Section 6 (Compensation Request)
R43 AL-DOC-5 info - required_document Application, Patient Authorization for Use and Disclosure of Protected Health Information
R44 AL-DOC-6 info - required_document Application Form page, Additional Requirements
R45 AL-DOC-7 info - required_document Application Form page, Additional Requirements
R46 AL-DOC-8 info - required_document Application, Claim Authorization page, signature note
R47 AL-DOC-9 info - required_document Application, Section 3 (Claimant Information)
R48 AL-DOC-10 info - required_document Ala. Admin. Code r. 262-X-4-.04(8)
R49 AL-DOC-11 info - required_document Ala. Admin. Code r. 262-X-4-.04(8)
R50 AL-DOC-12 info - required_document Ala. Admin. Code r. 262-X-4-.04(28)
R51 AL-DOC-13 info - required_document Ala. Admin. Code r. 262-X-4-.07(2)(a)
R52 AL-DOC-14 info - required_document Ala. Admin. Code r. 262-X-4-.07(2)(b)
R53 AL-DOC-15 info - required_document Ala. Admin. Code r. 262-X-4-.07(2)(c)
R54 AL-DOC-16 info - required_document Ala. Admin. Code r. 262-X-4-.04(14)(a)
R55 AL-DOC-17 info - required_document Ala. Admin. Code r. 262-X-4-.04(14)(b)
R56 AL-REC-1 info - record_confidentiality Ala. Code 15-23-4(k)
R57 AL-CAP-COUNS-MINOR skipped - expense_cap Ala. Admin. Code r. 262-X-4-.07(4)(c)
.tags cash=bit0, pain_suffering=bit1
.sources
S0 AL-S1 sha256 690abef45a3a9967 https://acvcc.alabama.gov/victims/who-is-eligible/
S1 AL-S2 sha256 e3a58d7ff5161471 https://acvcc.alabama.gov/victims/what-is-covered/
S2 AL-S3 sha256 d3062be4e77eb3f8 https://acvcc.alabama.gov/victims/collateral-sources/
S3 AL-S5 sha256 bcdd14bc8c16d08c https://acvcc.alabama.gov/victims/compesation/
S4 AL-S8 sha256 a761b698478ed232 https://acvcc.alabama.gov/wp-content/uploads/2025/10/english-application-2026-06-01.pdf
S5 AL-S9 sha256 31db0ca72f4e549b https://acvcc.alabama.gov/victims/application-form/
S6 AL-S10 sha256 2e066574fa04f123 https://acvcc.alabama.gov/victims/forms/
S7 AL-S11 sha256 d9f07e0cb13a1c44 https://acvcc.alabama.gov/wp-content/uploads/2024/10/sexual-assault-payment-program-2024-12-02.pdf
S8 AL-S12 sha256 1459598822b1b721 https://acvcc.alabama.gov/wp-content/uploads/2024/06/ACVCC-Sexual-Assault-Victimization.pdf
S9 AL-S13 sha256 2550a1691b94bc5d https://law.justia.com/codes/alabama/title-15/chapter-23/article-1/section-15-23-15/
S10 AL-S14 sha256 b92ffeed7b5b1407 https://law.justia.com/codes/alabama/title-15/chapter-23/article-1/section-15-23-3/
S11 AL-S15 sha256 442dd54372333ef1 https://law.justia.com/codes/alabama/title-15/chapter-23/article-1/section-15-23-8/
S12 AL-S16 sha256 3aad5609e03fb282 https://law.justia.com/codes/alabama/title-15/chapter-23/article-1/section-15-23-12/
S13 AL-S17 sha256 54bd828c84004a90 https://law.justia.com/codes/alabama/title-15/chapter-23/article-1/section-15-23-13/
S14 AL-S18 sha256 b492a3b746b816f8 https://law.justia.com/codes/alabama/title-15/chapter-23/article-1/section-15-23-14/
S15 AL-S19 sha256 a06e66bb09fa4b85 https://law.justia.com/codes/alabama/title-15/chapter-23/article-1/section-15-23-23/
S16 AL-S20 sha256 6682a6c1c3868628 https://law.justia.com/codes/alabama/title-15/chapter-23/article-5/section-15-23-121/
S17 AL-S21 sha256 07cb2b0d1a21aa9d https://law.justia.com/codes/alabama/title-15/chapter-23/article-1/section-15-23-5/
S18 AL-S22 sha256 1e741377312e5f75 https://acvcc.alabama.gov/wp-content/uploads/2024/11/ACVCC-Administrative-Code.pdf
S19 AL-S25 sha256 c1654eb40e765a26 https://admincode.legislature.state.al.us/administrative-code/262-X-4-.04
S20 AL-S26 sha256 4ebccc971e84dffb https://admincode.legislature.state.al.us/administrative-code/262-X-4-.07
S21 AL-S27 sha256 c344ed775956bf22 https://admincode.legislature.state.al.us/administrative-code/262-X-4-.05
S22 AL-S28 sha256 a89faea9e9bea5cf https://admincode.legislature.state.al.us/administrative-code/262-X-11-.01
S23 AL-S29 sha256 334c367c8778cc0d https://admincode.legislature.state.al.us/administrative-code/262-X-4-.02
S24 AL-S30 sha256 ed4d5f99f35d387a https://admincode.legislature.state.al.us/administrative-code/262-X-1-.01
S25 AL-S31 sha256 ea8360cd5dfe7f9b https://admincode.legislature.state.al.us/administrative-code/262-X-2-.05
S26 AL-S32 sha256 7759be79ba969201 https://law.justia.com/codes/alabama/title-15/chapter-23/article-1/section-15-23-4/
.proofs
P0 ()
P1 (AL-EXAM-1, AL-EXAM-2, AL-EXAM-3, AL-EXAM-4, AL-EXAM-5, AL-EXAM-6, AL-EXAM-7)
P2 (AL-EXCL-PROP-2)
P3 (AL-EXCL-PAIN)
P4 (AL-EXCL-PROP-2, AL-EXCL-PAIN)
P5 (AL-COV-MED, AL-COV-MED-OOP)
P6 (AL-COV-MED, AL-COV-MED-OOP, AL-COLL-1, AL-COLL-2)
P7 (AL-CAP-COUNS)
P8 (AL-CAP-COUNS, AL-COLL-1, AL-COLL-2)
P9 (AL-CAP-WAGES, AL-WAGES-SA)
P10 (AL-CAP-WAGES, AL-WAGES-SA, AL-COLL-1, AL-COLL-2)
P11 (AL-CAP-TRAVEL, AL-COV-TRAVEL-MED)
P12 (AL-CAP-TRAVEL, AL-COV-TRAVEL-MED, AL-COLL-1, AL-COLL-2)
P13 (AL-CAP-RELO)
P14 (AL-CAP-RELO, AL-COLL-1, AL-COLL-2)
P15 (AL-COV-SEC)
P16 (AL-COV-SEC, AL-COLL-1, AL-COLL-2)
P17 (AL-COV-HIV)
P18 (AL-COV-HIV, AL-COLL-1, AL-COLL-2)
P19 (AL-EXCL-PROP-2, AL-EXCL-LEGAL)
P20 (AL-EXCL-PAIN, AL-EXCL-LEGAL)
P21 (AL-EXCL-PROP-2, AL-EXCL-PAIN, AL-EXCL-LEGAL)
P22 (AL-EXCL-LEGAL)
P23 (AL-CAP-GLASSES)
P24 (AL-CAP-GLASSES, AL-COLL-1, AL-COLL-2)
P25 (AL-DEADLINE-1)
P26 (AL-REPORT-1, AL-REPORT-2)
P27 (AL-EXCL-PROP, AL-COLL-1, AL-COLL-2, AL-CONDUCT-1, AL-CONDUCT-2, AL-EMERG-1, AL-CRIME-1, AL-CRIME-2, AL-RES-1, AL-RES-2, AL-RES-3, AL-SUBMIT-1, AL-SUBMIT-2, AL-SUBMIT-3, AL-DOC-1, AL-DOC-2, AL-DOC-3, AL-DOC-4, AL-DOC-5, AL-DOC-6, AL-DOC-7, AL-DOC-8, AL-DOC-9, AL-DOC-10, AL-DOC-11, AL-DOC-12, AL-DOC-13, AL-DOC-14, AL-DOC-15, AL-DOC-16, AL-DOC-17, AL-REC-1)
.ints
K0 40000
K1 625000
K2 100000
K3 300000
K4 35000
K5 1500000
.item
0000 ldi date
0002 ldx incident_date
0004 lt
0005 jnz L0
000a ldi date
000c ldx as_of_date
000e gt
000f jnz L0
0014 ldi expense
0016 switch 19, default L42
case medical -> L2
case forensic_exam -> L1
case counseling -> L10
case lost_wages -> L18
case transportation -> L26
case relocation -> L34
case temporary_housing -> L42
case security -> L49
case crime_scene_cleanup -> L42
case childcare -> L42
case property_replacement -> L42
case clothing_bedding -> L42
case prescription -> L57
case dental -> L42
case funeral -> L42
case legal -> L65
case tuition -> L42
case other -> L72
case unknown -> L42
0068 L0: push 0
006d decide out_of_window, P0
0071 ret
0072 L1: push 0
0077 decide held, P1
007b ret
007c L2: push 0
0081 str r0
0083 ldi tags
0085 push 1
008a and
008b jz L3
0090 ldr r0
0092 push 1
0097 or
0098 str r0
009a L3: ldi tags
009c push 2
00a1 and
00a2 jz L4
00a7 ldr r0
00a9 push 2
00ae or
00af str r0
00b1 L4: ldr r0
00b3 switch 4, default L8
case 0 -> L8
case 1 -> L5
case 2 -> L6
case 3 -> L7
00c9 L5: push 0
00ce decide excluded, P2
00d2 ret
00d3 L6: push 0
00d8 decide excluded, P3
00dc ret
00dd L7: push 0
00e2 decide excluded, P4
00e6 ret
00e7 L8: ldi confirmed
00e9 jnz L9
00ee push 0
00f3 decide needs_confirmation, P5
00f7 ret
00f8 L9: ldi amount_cents
00fa decide eligible, P6
00fe lda
00ff ldi insurance_paid_cents
0101 subs
0102 push 0
0107 max
0108 seta collateral, R26
010c ret
010d L10: push 0
0112 str r0
0114 ldi tags
0116 push 1
011b and
011c jz L11
0121 ldr r0
0123 push 1
0128 or
0129 str r0
012b L11: ldi tags
012d push 2
0132 and
0133 jz L12
0138 ldr r0
013a push 2
013f or
0140 str r0
0142 L12: ldr r0
0144 switch 4, default L16
case 0 -> L16
case 1 -> L13
case 2 -> L14
case 3 -> L15
015a L13: push 0
015f decide excluded, P2
0163 ret
0164 L14: push 0
0169 decide excluded, P3
016d ret
016e L15: push 0
0173 decide excluded, P4
0177 ret
0178 L16: ldi confirmed
017a jnz L17
017f push 0
0184 decide needs_confirmation, P7
0188 ret
0189 L17: ldi amount_cents
018b decide eligible, P8
018f lda
0190 ldi insurance_paid_cents
0192 subs
0193 push 0
0198 max
0199 seta collateral, R26
019d ret
019e L18: push 0
01a3 str r0
01a5 ldi tags
01a7 push 1
01ac and
01ad jz L19
01b2 ldr r0
01b4 push 1
01b9 or
01ba str r0
01bc L19: ldi tags
01be push 2
01c3 and
01c4 jz L20
01c9 ldr r0
01cb push 2
01d0 or
01d1 str r0
01d3 L20: ldr r0
01d5 switch 4, default L24
case 0 -> L24
case 1 -> L21
case 2 -> L22
case 3 -> L23
01eb L21: push 0
01f0 decide excluded, P2
01f4 ret
01f5 L22: push 0
01fa decide excluded, P3
01fe ret
01ff L23: push 0
0204 decide excluded, P4
0208 ret
0209 L24: ldi confirmed
020b jnz L25
0210 push 0
0215 decide needs_confirmation, P9
0219 ret
021a L25: ldi amount_cents
021c decide eligible, P10
0220 lda
0221 ldi insurance_paid_cents
0223 subs
0224 push 0
0229 max
022a seta collateral, R26
022e ret
022f L26: push 0
0234 str r0
0236 ldi tags
0238 push 1
023d and
023e jz L27
0243 ldr r0
0245 push 1
024a or
024b str r0
024d L27: ldi tags
024f push 2
0254 and
0255 jz L28
025a ldr r0
025c push 2
0261 or
0262 str r0
0264 L28: ldr r0
0266 switch 4, default L32
case 0 -> L32
case 1 -> L29
case 2 -> L30
case 3 -> L31
027c L29: push 0
0281 decide excluded, P2
0285 ret
0286 L30: push 0
028b decide excluded, P3
028f ret
0290 L31: push 0
0295 decide excluded, P4
0299 ret
029a L32: ldi confirmed
029c jnz L33
02a1 push 0
02a6 decide needs_confirmation, P11
02aa ret
02ab L33: ldi amount_cents
02ad decide eligible, P12
02b1 lda
02b2 ldi insurance_paid_cents
02b4 subs
02b5 push 0
02ba max
02bb seta collateral, R26
02bf ret
02c0 L34: push 0
02c5 str r0
02c7 ldi tags
02c9 push 1
02ce and
02cf jz L35
02d4 ldr r0
02d6 push 1
02db or
02dc str r0
02de L35: ldi tags
02e0 push 2
02e5 and
02e6 jz L36
02eb ldr r0
02ed push 2
02f2 or
02f3 str r0
02f5 L36: ldr r0
02f7 switch 4, default L40
case 0 -> L40
case 1 -> L37
case 2 -> L38
case 3 -> L39
030d L37: push 0
0312 decide excluded, P2
0316 ret
0317 L38: push 0
031c decide excluded, P3
0320 ret
0321 L39: push 0
0326 decide excluded, P4
032a ret
032b L40: ldi confirmed
032d jnz L41
0332 push 0
0337 decide needs_confirmation, P13
033b ret
033c L41: ldi amount_cents
033e decide eligible, P14
0342 lda
0343 ldi insurance_paid_cents
0345 subs
0346 push 0
034b max
034c seta collateral, R26
0350 ret
0351 L42: push 0
0356 str r0
0358 ldi tags
035a push 1
035f and
0360 jz L43
0365 ldr r0
0367 push 1
036c or
036d str r0
036f L43: ldi tags
0371 push 2
0376 and
0377 jz L44
037c ldr r0
037e push 2
0383 or
0384 str r0
0386 L44: ldr r0
0388 switch 4, default L48
case 0 -> L48
case 1 -> L45
case 2 -> L46
case 3 -> L47
039e L45: push 0
03a3 decide excluded, P2
03a7 ret
03a8 L46: push 0
03ad decide excluded, P3
03b1 ret
03b2 L47: push 0
03b7 decide excluded, P4
03bb ret
03bc L48: push 0
03c1 decide unknown_rule, P0
03c5 ret
03c6 L49: push 0
03cb str r0
03cd ldi tags
03cf push 1
03d4 and
03d5 jz L50
03da ldr r0
03dc push 1
03e1 or
03e2 str r0
03e4 L50: ldi tags
03e6 push 2
03eb and
03ec jz L51
03f1 ldr r0
03f3 push 2
03f8 or
03f9 str r0
03fb L51: ldr r0
03fd switch 4, default L55
case 0 -> L55
case 1 -> L52
case 2 -> L53
case 3 -> L54
0413 L52: push 0
0418 decide excluded, P2
041c ret
041d L53: push 0
0422 decide excluded, P3
0426 ret
0427 L54: push 0
042c decide excluded, P4
0430 ret
0431 L55: ldi confirmed
0433 jnz L56
0438 push 0
043d decide needs_confirmation, P15
0441 ret
0442 L56: ldi amount_cents
0444 decide eligible, P16
0448 lda
0449 ldi insurance_paid_cents
044b subs
044c push 0
0451 max
0452 seta collateral, R26
0456 ret
0457 L57: push 0
045c str r0
045e ldi tags
0460 push 1
0465 and
0466 jz L58
046b ldr r0
046d push 1
0472 or
0473 str r0
0475 L58: ldi tags
0477 push 2
047c and
047d jz L59
0482 ldr r0
0484 push 2
0489 or
048a str r0
048c L59: ldr r0
048e switch 4, default L63
case 0 -> L63
case 1 -> L60
case 2 -> L61
case 3 -> L62
04a4 L60: push 0
04a9 decide excluded, P2
04ad ret
04ae L61: push 0
04b3 decide excluded, P3
04b7 ret
04b8 L62: push 0
04bd decide excluded, P4
04c1 ret
04c2 L63: ldi confirmed
04c4 jnz L64
04c9 push 0
04ce decide needs_confirmation, P17
04d2 ret
04d3 L64: ldi amount_cents
04d5 decide eligible, P18
04d9 lda
04da ldi insurance_paid_cents
04dc subs
04dd push 0
04e2 max
04e3 seta collateral, R26
04e7 ret
04e8 L65: push 0
04ed str r0
04ef ldi tags
04f1 push 1
04f6 and
04f7 jz L66
04fc ldr r0
04fe push 1
0503 or
0504 str r0
0506 L66: ldi tags
0508 push 2
050d and
050e jz L67
0513 ldr r0
0515 push 2
051a or
051b str r0
051d L67: ldr r0
051f switch 4, default L71
case 0 -> L71
case 1 -> L68
case 2 -> L69
case 3 -> L70
0535 L68: push 0
053a decide excluded, P19
053e ret
053f L69: push 0
0544 decide excluded, P20
0548 ret
0549 L70: push 0
054e decide excluded, P21
0552 ret
0553 L71: push 0
0558 decide excluded, P22
055c ret
055d L72: push 0
0562 str r0
0564 ldi tags
0566 push 1
056b and
056c jz L73
0571 ldr r0
0573 push 1
0578 or
0579 str r0
057b L73: ldi tags
057d push 2
0582 and
0583 jz L74
0588 ldr r0
058a push 2
058f or
0590 str r0
0592 L74: ldr r0
0594 switch 4, default L78
case 0 -> L78
case 1 -> L75
case 2 -> L76
case 3 -> L77
05aa L75: push 0
05af decide excluded, P2
05b3 ret
05b4 L76: push 0
05b9 decide excluded, P3
05bd ret
05be L77: push 0
05c3 decide excluded, P4
05c7 ret
05c8 L78: ldi confirmed
05ca jnz L79
05cf push 0
05d4 decide needs_confirmation, P23
05d8 ret
05d9 L79: ldi amount_cents
05db decide eligible, P24
05df lda
05e0 ldi insurance_paid_cents
05e2 subs
05e3 push 0
05e8 max
05e9 seta collateral, R26
05ed ret
.aggregate
0000 push 26
0005 str r3
0007 each lost_wages, L4
000d L0: ldi unit
000f push 2
0014 eq
0015 jz L2
001a ldi units
001c push 0
0021 gt
0022 jz L2
0027 ldi units
0029 ldr r3
002b min
002c str r4
002e ldr r3
0030 ldr r4
0032 subs
0033 str r3
0035 ldk K0
0038 ldr r4
003a muls
003b dup
003c lda
003d lt
003e jz L1
0043 cap unit_cap, R9
0047 jmp L3
004c L1: pop
004d jmp L3
0052 L2: flag R9
0055 L3: next L0
005a L4: push 0
005f str r0
0061 push 0
0066 str r1
0068 each counseling, L9
006e L5: ldr r1
0070 jnz L7
0075 ldr r0
0077 lda
0078 adds
0079 ldk K1
007c gt
007d jz L6
0082 ldk K1
0085 ldr r0
0087 subs
0088 cap expense_cap, R8
008c push 1
0091 str r1
0093 L6: ldr r0
0095 lda
0096 adds
0097 str r0
0099 jmp L8
009e L7: push 0
00a3 cap expense_cap, R8
00a7 L8: next L5
00ac L9: push 0
00b1 str r0
00b3 push 0
00b8 str r1
00ba each relocation, L14
00c0 L10: ldr r1
00c2 jnz L12
00c7 ldr r0
00c9 lda
00ca adds
00cb ldk K2
00ce gt
00cf jz L11
00d4 ldk K2
00d7 ldr r0
00d9 subs
00da cap expense_cap, R11
00de push 1
00e3 str r1
00e5 L11: ldr r0
00e7 lda
00e8 adds
00e9 str r0
00eb jmp L13
00f0 L12: push 0
00f5 cap expense_cap, R11
00f9 L13: next L10
00fe L14: push 0
0103 str r0
0105 push 0
010a str r1
010c each transportation, L19
0112 L15: ldr r1
0114 jnz L17
0119 ldr r0
011b lda
011c adds
011d ldk K3
0120 gt
0121 jz L16
0126 ldk K3
0129 ldr r0
012b subs
012c cap expense_cap, R12
0130 push 1
0135 str r1
0137 L16: ldr r0
0139 lda
013a adds
013b str r0
013d jmp L18
0142 L17: push 0
0147 cap expense_cap, R12
014b L18: next L15
0150 L19: push 0
0155 str r0
0157 push 0
015c str r1
015e each other, L24
0164 L20: ldr r1
0166 jnz L22
016b ldr r0
016d lda
016e adds
016f ldk K4
0172 gt
0173 jz L21
0178 ldk K4
017b ldr r0
017d subs
017e cap expense_cap, R18
0182 push 1
0187 str r1
0189 L21: ldr r0
018b lda
018c adds
018d str r0
018f jmp L23
0194 L22: push 0
0199 cap expense_cap, R18
019d L23: next L20
01a2 L24: push 0
01a7 str r0
01a9 push 0
01ae str r1
01b0 each all, L29
01b6 L25: ldr r1
01b8 jnz L27
01bd ldr r0
01bf lda
01c0 adds
01c1 ldk K5
01c4 gt
01c5 jz L26
01ca ldk K5
01cd ldr r0
01cf subs
01d0 cap total_cap, R7
01d4 push 1
01d9 str r1
01db L26: ldr r0
01dd lda
01de adds
01df str r0
01e1 jmp L28
01e6 L27: push 0
01eb cap total_cap, R7
01ef L28: next L25
01f4 L29: push 0
01f9 check minimum_loss, P0
01fd ldx incident_date
01ff push 365
0204 adds
0205 dup
0206 setdate
0207 ldx as_of_date
0209 ge
020a jz L30
020f push 0
0214 jmp L31
0219 L30: push 1
021e L31: check deadline, P25
0222 ldx police_report
0224 push 1
0229 eq
022a jnz L33
022f ldx police_report
0231 push 0
0236 eq
0237 jnz L32
023c push 3
0241 jmp L34
0246 L32: push 1
024b jmp L34
0250 L33: push 0
0255 L34: check reporting, P26
0259 info P27
025c ret