The engine compiles New Jersey'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
- 54 rules, 17 sources, 37 proofs, 10 ints, 296 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
81f2dc0373dd309ffe787d8ef2faad8a82463eabfd9555bfaae89b181485b7cf
Jump to: rule table, per-cost program, totals program, or download the listing.
.rules
R0 NJ-EXAM-1 exam_no_bill - N.J.S.A. 52:4B-52(k)
R1 NJ-EXAM-2 exam_no_bill - NJ OAG, Sexual Assault Victims page (Forensic Nurse Examiner section)
R2 NJ-EXAM-3 exam_no_bill - AG Standards for Providing Services to Victims of Sexual Assault (2018), Standard on the medical forensic exam, Non-Participating Examination Facilities
R3 NJ-CAP-1 total_cap - N.J.S.A. 52:4B-18
R4 NJ-COUNSEL-1 expense_cap counseling per claim N.J.A.C. 13:75-4.4(b)
R5 NJ-WAGES-1 expense_cap lost_wages per week N.J.A.C. 13:75-4.5(h)
R6 NJ-RELOC-1 expense_cap relocation per claim N.J.A.C. 13:75-4.7(d)
R7 NJ-SEC-1 expense_cap security per claim N.J.A.C. 13:75-4.7(d)2
R8 NJ-TRANS-1 expense_cap transportation per day N.J.A.C. 13:75-4.8(a)
R9 NJ-TRANS-2 info - excluded_expense N.J.A.C. 13:75-4.8(a)1
R10 NJ-CHILD-1 expense_cap childcare per claim N.J.A.C. 13:75-4.11(a)2
R11 NJ-CLEAN-1 expense_cap crime_scene_cleanup per claim N.J.A.C. 13:75-4.12(f)
R12 NJ-LEGAL-1 expense_cap legal per claim N.J.A.C. 13:75-4.10(b)
R13 NJ-FUNERAL-1 expense_cap funeral per claim N.J.A.C. 13:75-4.9
R14 NJ-DOMHELP-1 expense_cap other per claim N.J.A.C. 13:75-4.11(b)2
R15 NJ-COV-MED covered medical N.J.A.C. 13:75-4.1(a)1
R16 NJ-COV-WAGES covered lost_wages N.J.A.C. 13:75-4.1(a)1
R17 NJ-COV-COUNSEL covered counseling VCCO Application, Section 5 (Services Requested)
R18 NJ-COV-DENTAL covered dental VCCO Application, Section 5 (Services Requested)
R19 NJ-COV-RX covered prescription VCCO Application, Section 5 (Services Requested)
R20 NJ-COV-CLOTH covered clothing_bedding N.J.A.C. 13:75-4.12(d)1
R21 NJ-EXCL-PROP excluded - N.J.A.C. 13:75-4.1(f)
R22 NJ-EXCL-PAIN excluded - N.J.A.C. 13:75-4.1(e)
R23 NJ-FILE-1 deadline - from crime N.J.S.A. 52:4B-18
R24 NJ-FILE-2 info - filing_deadline N.J.S.A. 52:4B-18
R25 NJ-FILE-3 deadline - from discovery N.J.A.C. 13:75-3.1(a)3
R26 NJ-REPORT-1 reporting - N.J.S.A. 52:4B-18
R27 NJ-REPORT-2 reporting - N.J.A.C. 13:75-3.1(b)
R28 NJ-REPORT-3 reporting - AG Standards for Providing Services to Victims of Sexual Assault (2018), Standard on the medical forensic exam
R29 NJ-MINLOSS-1 minimum_loss - NJ VCCO Eligibility page, Preconditions for Eligibility
R30 NJ-COLL-1 collateral - NJ VCCO Eligibility page, Moneys from other Sources
R31 NJ-COLL-2 collateral - N.J.A.C. 13:75-9.1(a)
R32 NJ-CONDUCT-1 info - conduct_reduction N.J.S.A. 52:4B-18
R33 NJ-CONDUCT-2 info - conduct_reduction N.J.A.C. 13:75-4.1(c)1
R34 NJ-EMERG-1 info - emergency_award N.J.S.A. 52:4B-10.1(a)
R35 NJ-EMERG-2 info - emergency_award N.J.A.C. 13:75-5.1(c)
R36 NJ-CRIME-1 info - eligible_crime N.J.S.A. 52:4B-11b.(9) (amended through P.L.2023, c.101)
R37 NJ-RES-1 info - residency NJ VCCO Eligibility page, Preconditions for Eligibility
R38 NJ-SUB-1 info - submission NJ VCCO Contact page, applications and submission of documents
R39 NJ-SUB-2 info - submission NJ VCCO Claim Application and Instructions (oag.rev.8.25.20), Instructions page II sidebar
R40 NJ-SUB-3 info - submission NJ VCCO Contact page, applications and submission of documents
R41 NJ-DOC-1 info - required_document NJ VCCO Claim Application and Instructions (oag.rev.8.25.20), Instructions, Section 4
R42 NJ-DOC-2 info - required_document NJ VCCO Claim Application and Instructions (oag.rev.8.25.20), Instructions page II
R43 NJ-DOC-3 info - required_document NJ VCCO Claim Application and Instructions (oag.rev.8.25.20), Instructions, Section 7
R44 NJ-DOC-4 info - required_document NJ VCCO Claim Application and Instructions (oag.rev.8.25.20), Instructions page II
R45 NJ-DOC-5 info - required_document NJ VCCO Claim Application and Instructions (oag.rev.8.25.20), Section 8 (Lost Wages/Support Information)
R46 NJ-DOC-6 info - required_document NJ VCCO Claim Application and Instructions (oag.rev.8.25.20), Section 8 (Lost Wages/Support Information)
R47 NJ-DOC-7 info - required_document NJ VCCO Claim Application and Instructions (oag.rev.8.25.20), Section 8 (Lost Wages/Support Information)
R48 NJ-DOC-8 info - required_document NJ VCCO Claim Application and Instructions (oag.rev.8.25.20), Instructions, Section 15
R49 NJ-TIME-1 info - processing_time N.J.A.C. 13:75-4.2(c)
R50 NJ-TIME-2 info - processing_time NJ VCCO Claim Application and Instructions (oag.rev.8.25.20), Instructions page II
R51 NJ-ACP-1 info - address_confidentiality N.J.S.A. 47:4-2
R52 NJ-REC-1 info - record_confidentiality N.J.A.C. 13:75-1.6(b)
R53 NJ-WAGES-2 skipped - expense_cap N.J.A.C. 13:75-4.5(e)
.tags phone=bit0, pain_suffering=bit1
.sources
S0 NJ-S1 sha256 8472f8e6f260ae06 https://www.njoag.gov/vcco/
S1 NJ-S2 sha256 93fc46f2834d0138 https://www.njoag.gov/vcco/vcco-eligibility/
S2 NJ-S3 sha256 773b98bdf679f520 https://www.njoag.gov/vcco/vcco-benefits/
S3 NJ-S4 sha256 e76b19c5640cb094 https://www.njoag.gov/wp-content/uploads/2024/02/VCCO-2024-0215_FAQs.pdf
S4 NJ-S6 sha256 d306c1a702ef8b37 https://www.njoag.gov/vcco/vcco-contact-us/
S5 NJ-S8 sha256 f897b2655522ecb7 https://nj.gov/oag/njvictims/pdfs/2020-08-01_Statute.pdf
S6 NJ-S9 sha256 1627f7f5ccf426f3 https://www.nj.gov/oag/njvictims/admincode/Administrative-Code.pdf
S7 NJ-S10 sha256 8192d2d16774fa97 https://law.justia.com/codes/new-jersey/title-52/section-52-4b-18/
S8 NJ-S11 sha256 75a876e5dd860b79 https://www.njoag.gov/end-sexual-assault/
S9 NJ-S13 sha256 dfcbecd812ca047c http://www.nj.gov/oag/newsreleases18/AG-SART-Standards.pdf
S10 NJ-S14 sha256 c3a0b5dcf8503f72 https://law.justia.com/codes/new-jersey/title-52/section-52-4b-52/
S11 NJ-S16 sha256 3486cc828dc6125e https://www.nj.gov/oag/njvictims/pdfs/VCCO-Application-Instructions.pdf
S12 NJ-S18 sha256 7be92ccae6e6b947 https://law.justia.com/codes/new-jersey/title-52/section-52-4b-11/
S13 NJ-S19 sha256 f793d944b093d042 https://www.njoag.gov/vcco/vcco-paper-application/
S14 NJ-S20 sha256 2695364dae840504 https://www.nj.gov/dcf/divisions-offices/dow/acp.shtml
S15 NJ-S21 sha256 63253bc5001aee64 https://www.law.cornell.edu/regulations/new-jersey/N-J-A-C-3A-71-3-1
S16 NJ-S22 sha256 cdaefa241b09919f https://law.justia.com/codes/new-jersey/title-47/section-47-4-2/
.proofs
P0 ()
P1 (NJ-EXAM-1, NJ-EXAM-2, NJ-EXAM-3)
P2 (NJ-EXCL-PROP)
P3 (NJ-EXCL-PAIN)
P4 (NJ-EXCL-PROP, NJ-EXCL-PAIN)
P5 (NJ-COV-MED)
P6 (NJ-COV-MED, NJ-COLL-1, NJ-COLL-2)
P7 (NJ-COUNSEL-1, NJ-COV-COUNSEL)
P8 (NJ-COUNSEL-1, NJ-COV-COUNSEL, NJ-COLL-1, NJ-COLL-2)
P9 (NJ-WAGES-1, NJ-COV-WAGES)
P10 (NJ-WAGES-1, NJ-COV-WAGES, NJ-COLL-1, NJ-COLL-2)
P11 (NJ-TRANS-1)
P12 (NJ-TRANS-1, NJ-COLL-1, NJ-COLL-2)
P13 (NJ-RELOC-1)
P14 (NJ-RELOC-1, NJ-COLL-1, NJ-COLL-2)
P15 (NJ-SEC-1)
P16 (NJ-SEC-1, NJ-COLL-1, NJ-COLL-2)
P17 (NJ-CLEAN-1)
P18 (NJ-CLEAN-1, NJ-COLL-1, NJ-COLL-2)
P19 (NJ-CHILD-1)
P20 (NJ-CHILD-1, NJ-COLL-1, NJ-COLL-2)
P21 (NJ-COV-CLOTH)
P22 (NJ-COV-CLOTH, NJ-COLL-1, NJ-COLL-2)
P23 (NJ-COV-RX)
P24 (NJ-COV-RX, NJ-COLL-1, NJ-COLL-2)
P25 (NJ-COV-DENTAL)
P26 (NJ-COV-DENTAL, NJ-COLL-1, NJ-COLL-2)
P27 (NJ-FUNERAL-1)
P28 (NJ-FUNERAL-1, NJ-COLL-1, NJ-COLL-2)
P29 (NJ-LEGAL-1)
P30 (NJ-LEGAL-1, NJ-COLL-1, NJ-COLL-2)
P31 (NJ-DOMHELP-1)
P32 (NJ-DOMHELP-1, NJ-COLL-1, NJ-COLL-2)
P33 (NJ-MINLOSS-1)
P34 (NJ-FILE-1, NJ-FILE-3)
P35 (NJ-REPORT-1, NJ-REPORT-2, NJ-REPORT-3)
P36 (NJ-TRANS-2, NJ-FILE-2, NJ-COLL-1, NJ-COLL-2, NJ-CONDUCT-1, NJ-CONDUCT-2, NJ-EMERG-1, NJ-EMERG-2, NJ-CRIME-1, NJ-RES-1, NJ-SUB-1, NJ-SUB-2, NJ-SUB-3, NJ-DOC-1, NJ-DOC-2, NJ-DOC-3, NJ-DOC-4, NJ-DOC-5, NJ-DOC-6, NJ-DOC-7, NJ-DOC-8, NJ-TIME-1, NJ-TIME-2, NJ-ACP-1, NJ-REC-1)
.ints
K0 60000
K1 1000
K2 2000000
K3 300000
K4 650000
K5 400000
K6 1000000
K7 750000
K8 2500000
K9 0
.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 -> L57
case childcare -> L65
case property_replacement -> L42
case clothing_bedding -> L73
case prescription -> L81
case dental -> L89
case funeral -> L97
case legal -> L105
case tuition -> L42
case other -> L113
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, R30
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, R30
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, R30
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, R30
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, R30
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, R30
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, R30
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, P2
053e ret
053f L69: push 0
0544 decide excluded, P3
0548 ret
0549 L70: push 0
054e decide excluded, P4
0552 ret
0553 L71: ldi confirmed
0555 jnz L72
055a push 0
055f decide needs_confirmation, P19
0563 ret
0564 L72: ldi amount_cents
0566 decide eligible, P20
056a lda
056b ldi insurance_paid_cents
056d subs
056e push 0
0573 max
0574 seta collateral, R30
0578 ret
0579 L73: push 0
057e str r0
0580 ldi tags
0582 push 1
0587 and
0588 jz L74
058d ldr r0
058f push 1
0594 or
0595 str r0
0597 L74: ldi tags
0599 push 2
059e and
059f jz L75
05a4 ldr r0
05a6 push 2
05ab or
05ac str r0
05ae L75: ldr r0
05b0 switch 4, default L79
case 0 -> L79
case 1 -> L76
case 2 -> L77
case 3 -> L78
05c6 L76: push 0
05cb decide excluded, P2
05cf ret
05d0 L77: push 0
05d5 decide excluded, P3
05d9 ret
05da L78: push 0
05df decide excluded, P4
05e3 ret
05e4 L79: ldi confirmed
05e6 jnz L80
05eb push 0
05f0 decide needs_confirmation, P21
05f4 ret
05f5 L80: ldi amount_cents
05f7 decide eligible, P22
05fb lda
05fc ldi insurance_paid_cents
05fe subs
05ff push 0
0604 max
0605 seta collateral, R30
0609 ret
060a L81: push 0
060f str r0
0611 ldi tags
0613 push 1
0618 and
0619 jz L82
061e ldr r0
0620 push 1
0625 or
0626 str r0
0628 L82: ldi tags
062a push 2
062f and
0630 jz L83
0635 ldr r0
0637 push 2
063c or
063d str r0
063f L83: ldr r0
0641 switch 4, default L87
case 0 -> L87
case 1 -> L84
case 2 -> L85
case 3 -> L86
0657 L84: push 0
065c decide excluded, P2
0660 ret
0661 L85: push 0
0666 decide excluded, P3
066a ret
066b L86: push 0
0670 decide excluded, P4
0674 ret
0675 L87: ldi confirmed
0677 jnz L88
067c push 0
0681 decide needs_confirmation, P23
0685 ret
0686 L88: ldi amount_cents
0688 decide eligible, P24
068c lda
068d ldi insurance_paid_cents
068f subs
0690 push 0
0695 max
0696 seta collateral, R30
069a ret
069b L89: push 0
06a0 str r0
06a2 ldi tags
06a4 push 1
06a9 and
06aa jz L90
06af ldr r0
06b1 push 1
06b6 or
06b7 str r0
06b9 L90: ldi tags
06bb push 2
06c0 and
06c1 jz L91
06c6 ldr r0
06c8 push 2
06cd or
06ce str r0
06d0 L91: ldr r0
06d2 switch 4, default L95
case 0 -> L95
case 1 -> L92
case 2 -> L93
case 3 -> L94
06e8 L92: push 0
06ed decide excluded, P2
06f1 ret
06f2 L93: push 0
06f7 decide excluded, P3
06fb ret
06fc L94: push 0
0701 decide excluded, P4
0705 ret
0706 L95: ldi confirmed
0708 jnz L96
070d push 0
0712 decide needs_confirmation, P25
0716 ret
0717 L96: ldi amount_cents
0719 decide eligible, P26
071d lda
071e ldi insurance_paid_cents
0720 subs
0721 push 0
0726 max
0727 seta collateral, R30
072b ret
072c L97: push 0
0731 str r0
0733 ldi tags
0735 push 1
073a and
073b jz L98
0740 ldr r0
0742 push 1
0747 or
0748 str r0
074a L98: ldi tags
074c push 2
0751 and
0752 jz L99
0757 ldr r0
0759 push 2
075e or
075f str r0
0761 L99: ldr r0
0763 switch 4, default L103
case 0 -> L103
case 1 -> L100
case 2 -> L101
case 3 -> L102
0779 L100: push 0
077e decide excluded, P2
0782 ret
0783 L101: push 0
0788 decide excluded, P3
078c ret
078d L102: push 0
0792 decide excluded, P4
0796 ret
0797 L103: ldi confirmed
0799 jnz L104
079e push 0
07a3 decide needs_confirmation, P27
07a7 ret
07a8 L104: ldi amount_cents
07aa decide eligible, P28
07ae lda
07af ldi insurance_paid_cents
07b1 subs
07b2 push 0
07b7 max
07b8 seta collateral, R30
07bc ret
07bd L105: push 0
07c2 str r0
07c4 ldi tags
07c6 push 1
07cb and
07cc jz L106
07d1 ldr r0
07d3 push 1
07d8 or
07d9 str r0
07db L106: ldi tags
07dd push 2
07e2 and
07e3 jz L107
07e8 ldr r0
07ea push 2
07ef or
07f0 str r0
07f2 L107: ldr r0
07f4 switch 4, default L111
case 0 -> L111
case 1 -> L108
case 2 -> L109
case 3 -> L110
080a L108: push 0
080f decide excluded, P2
0813 ret
0814 L109: push 0
0819 decide excluded, P3
081d ret
081e L110: push 0
0823 decide excluded, P4
0827 ret
0828 L111: ldi confirmed
082a jnz L112
082f push 0
0834 decide needs_confirmation, P29
0838 ret
0839 L112: ldi amount_cents
083b decide eligible, P30
083f lda
0840 ldi insurance_paid_cents
0842 subs
0843 push 0
0848 max
0849 seta collateral, R30
084d ret
084e L113: push 0
0853 str r0
0855 ldi tags
0857 push 1
085c and
085d jz L114
0862 ldr r0
0864 push 1
0869 or
086a str r0
086c L114: ldi tags
086e push 2
0873 and
0874 jz L115
0879 ldr r0
087b push 2
0880 or
0881 str r0
0883 L115: ldr r0
0885 switch 4, default L119
case 0 -> L119
case 1 -> L116
case 2 -> L117
case 3 -> L118
089b L116: push 0
08a0 decide excluded, P2
08a4 ret
08a5 L117: push 0
08aa decide excluded, P3
08ae ret
08af L118: push 0
08b4 decide excluded, P4
08b8 ret
08b9 L119: ldi confirmed
08bb jnz L120
08c0 push 0
08c5 decide needs_confirmation, P31
08c9 ret
08ca L120: ldi amount_cents
08cc decide eligible, P32
08d0 lda
08d1 ldi insurance_paid_cents
08d3 subs
08d4 push 0
08d9 max
08da seta collateral, R30
08de ret
.aggregate
0000 each lost_wages, L4
0006 L0: ldi unit
0008 push 2
000d eq
000e jz L2
0013 ldi units
0015 push 0
001a gt
001b jz L2
0020 ldk K0
0023 ldi units
0025 muls
0026 dup
0027 lda
0028 lt
0029 jz L1
002e cap unit_cap, R5
0032 jmp L3
0037 L1: pop
0038 jmp L3
003d L2: flag R5
0040 L3: next L0
0045 L4: each transportation, L9
004b L5: ldi unit
004d push 5
0052 eq
0053 jz L7
0058 ldi units
005a push 0
005f gt
0060 jz L7
0065 ldk K1
0068 ldi units
006a muls
006b dup
006c lda
006d lt
006e jz L6
0073 cap unit_cap, R8
0077 jmp L8
007c L6: pop
007d jmp L8
0082 L7: flag R8
0085 L8: next L5
008a L9: push 0
008f str r0
0091 push 0
0096 str r1
0098 each counseling, L14
009e L10: ldr r1
00a0 jnz L12
00a5 ldr r0
00a7 lda
00a8 adds
00a9 ldk K2
00ac gt
00ad jz L11
00b2 ldk K2
00b5 ldr r0
00b7 subs
00b8 cap expense_cap, R4
00bc push 1
00c1 str r1
00c3 L11: ldr r0
00c5 lda
00c6 adds
00c7 str r0
00c9 jmp L13
00ce L12: push 0
00d3 cap expense_cap, R4
00d7 L13: next L10
00dc L14: push 0
00e1 str r0
00e3 push 0
00e8 str r1
00ea each relocation, L19
00f0 L15: ldr r1
00f2 jnz L17
00f7 ldr r0
00f9 lda
00fa adds
00fb ldk K3
00fe gt
00ff jz L16
0104 ldk K3
0107 ldr r0
0109 subs
010a cap expense_cap, R6
010e push 1
0113 str r1
0115 L16: ldr r0
0117 lda
0118 adds
0119 str r0
011b jmp L18
0120 L17: push 0
0125 cap expense_cap, R6
0129 L18: next L15
012e L19: push 0
0133 str r0
0135 push 0
013a str r1
013c each security, L24
0142 L20: ldr r1
0144 jnz L22
0149 ldr r0
014b lda
014c adds
014d ldk K3
0150 gt
0151 jz L21
0156 ldk K3
0159 ldr r0
015b subs
015c cap expense_cap, R7
0160 push 1
0165 str r1
0167 L21: ldr r0
0169 lda
016a adds
016b str r0
016d jmp L23
0172 L22: push 0
0177 cap expense_cap, R7
017b L23: next L20
0180 L24: push 0
0185 str r0
0187 push 0
018c str r1
018e each childcare, L29
0194 L25: ldr r1
0196 jnz L27
019b ldr r0
019d lda
019e adds
019f ldk K4
01a2 gt
01a3 jz L26
01a8 ldk K4
01ab ldr r0
01ad subs
01ae cap expense_cap, R10
01b2 push 1
01b7 str r1
01b9 L26: ldr r0
01bb lda
01bc adds
01bd str r0
01bf jmp L28
01c4 L27: push 0
01c9 cap expense_cap, R10
01cd L28: next L25
01d2 L29: push 0
01d7 str r0
01d9 push 0
01de str r1
01e0 each crime_scene_cleanup, L34
01e6 L30: ldr r1
01e8 jnz L32
01ed ldr r0
01ef lda
01f0 adds
01f1 ldk K5
01f4 gt
01f5 jz L31
01fa ldk K5
01fd ldr r0
01ff subs
0200 cap expense_cap, R11
0204 push 1
0209 str r1
020b L31: ldr r0
020d lda
020e adds
020f str r0
0211 jmp L33
0216 L32: push 0
021b cap expense_cap, R11
021f L33: next L30
0224 L34: push 0
0229 str r0
022b push 0
0230 str r1
0232 each legal, L39
0238 L35: ldr r1
023a jnz L37
023f ldr r0
0241 lda
0242 adds
0243 ldk K6
0246 gt
0247 jz L36
024c ldk K6
024f ldr r0
0251 subs
0252 cap expense_cap, R12
0256 push 1
025b str r1
025d L36: ldr r0
025f lda
0260 adds
0261 str r0
0263 jmp L38
0268 L37: push 0
026d cap expense_cap, R12
0271 L38: next L35
0276 L39: push 0
027b str r0
027d push 0
0282 str r1
0284 each funeral, L44
028a L40: ldr r1
028c jnz L42
0291 ldr r0
0293 lda
0294 adds
0295 ldk K7
0298 gt
0299 jz L41
029e ldk K7
02a1 ldr r0
02a3 subs
02a4 cap expense_cap, R13
02a8 push 1
02ad str r1
02af L41: ldr r0
02b1 lda
02b2 adds
02b3 str r0
02b5 jmp L43
02ba L42: push 0
02bf cap expense_cap, R13
02c3 L43: next L40
02c8 L44: push 0
02cd str r0
02cf push 0
02d4 str r1
02d6 each other, L49
02dc L45: ldr r1
02de jnz L47
02e3 ldr r0
02e5 lda
02e6 adds
02e7 ldk K4
02ea gt
02eb jz L46
02f0 ldk K4
02f3 ldr r0
02f5 subs
02f6 cap expense_cap, R14
02fa push 1
02ff str r1
0301 L46: ldr r0
0303 lda
0304 adds
0305 str r0
0307 jmp L48
030c L47: push 0
0311 cap expense_cap, R14
0315 L48: next L45
031a L49: push 0
031f str r0
0321 push 0
0326 str r1
0328 each all, L54
032e L50: ldr r1
0330 jnz L52
0335 ldr r0
0337 lda
0338 adds
0339 ldk K8
033c gt
033d jz L51
0342 ldk K8
0345 ldr r0
0347 subs
0348 cap total_cap, R3
034c push 1
0351 str r1
0353 L51: ldr r0
0355 lda
0356 adds
0357 str r0
0359 jmp L53
035e L52: push 0
0363 cap total_cap, R3
0367 L53: next L50
036c L54: push 0
0371 str r0
0373 each all, L56
0379 L55: ldr r0
037b lda
037c adds
037d str r0
037f next L55
0384 L56: push 0
0389 str r2
038b ldr r0
038d ldk K9
0390 ge
0391 jnz L57
0396 push 4
039b ldr r2
039d max
039e str r2
03a0 L57: ldr r2
03a2 check minimum_loss, P33
03a6 ldx incident_date
03a8 push 1826
03ad adds
03ae ldx incident_date
03b0 push 1826
03b5 adds
03b6 max
03b7 dup
03b8 setdate
03b9 ldx as_of_date
03bb ge
03bc jz L58
03c1 push 0
03c6 jmp L59
03cb L58: push 1
03d0 L59: note deadline_from_discovery
03d2 check deadline, P34
03d6 ldx police_report
03d8 push 1
03dd eq
03de jnz L61
03e3 ldx police_report
03e5 push 0
03ea eq
03eb jnz L60
03f0 push 3
03f5 jmp L62
03fa L60: push 1
03ff jmp L62
0404 L61: push 0
0409 L62: check reporting, P35
040d info P36
0410 ret