The engine compiles Ohio'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
- 45 rules, 17 sources, 29 proofs, 6 ints, 289 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
9925310f1349722e701756498e4aac27d2bdac8799360992d5d89fb9890a782b
Jump to: rule table, per-cost program, totals program, or download the listing.
.rules
R0 OH-EXAM-1 exam_no_bill - ORC 2907.28(B)
R1 OH-EXAM-2 exam_payment - ORC 2907.28(A)
R2 OH-EXAM-3 exam_payment - OAC 109:7-1-02(A)
R3 OH-EXAM-4 exam_payment - SAFE Reimbursement Instructions, item 12 (Law enforcement reporting)
R4 OH-EXAM-5 exam_payment - SAFE Reimbursement Instructions, mandated examination components table (18 and over)
R5 OH-EXAM-6 exam_payment - SAFE Reimbursement Instructions, Billing
R6 OH-EXAM-7 exam_payment - OAC 109:7-1-02(B)
R7 OH-CAP-1 total_cap - ORC 2743.60(H)
R8 OH-CAP-2 expense_cap counseling per claim ORC 2743.60(H)
R9 OH-CAP-3 expense_cap crime_scene_cleanup per claim ORC 2743.51(T)(2)
R10 OH-CAP-4 expense_cap property_replacement per claim ORC 2743.51(U)
R11 OH-CAP-5 expense_cap legal per claim ORC 2743.51(F)(5)(b)
R12 OH-CAP-6 expense_cap other per claim ORC 2743.60(H)
R13 OH-COV-1 covered medical ORC 2743.51(F)(1)
R14 OH-COV-2 covered dental ORC 2743.51(F)(1)
R15 OH-COV-3 covered counseling Application for Crime Victim Compensation, Section 4
R16 OH-COV-4 covered lost_wages ORC 2743.51(G)
R17 OH-COV-5 covered clothing_bedding ORC 2743.51(T)(1)
R18 OH-COV-6 covered childcare Application for Crime Victim Compensation, Section 4
R19 OH-EXCL-1 excluded - Application for Crime Victim Compensation, program overview (Are there limits on compensation?)
R20 OH-EXCL-2 excluded - ORC 2743.51(E)
R21 OH-DEADLINE-1 deadline - from crime ORC 2743.56(B)
R22 OH-DEADLINE-2 info - filing_deadline ORC 2743.60(A)(2)(b)
R23 OH-REPORT-1 reporting - ORC 2743.60(A)(1)
R24 OH-REPORT-2 reporting - Court of Claims FAQ: Do I need to File a police report in order to qualify for the program?
R25 OH-MIN-1 minimum_loss - ORC 2743.191(B)(1)
R26 OH-COLL-1 collateral - ORC 2743.60(D)
R27 OH-COLL-2 collateral - ORC 2743.60(G)
R28 OH-CONDUCT-1 info - conduct_reduction ORC 2743.60(E)(1)
R29 OH-CONDUCT-2 info - conduct_reduction ORC 2743.60(C)
R30 OH-EMERG-1 info - emergency_award ORC 2743.67
R31 OH-CRIME-1 info - eligible_crime ORC 2743.51(C)(1)
R32 OH-RES-1 info - residency ORC 2743.51(A)(1)(a) and (C)(1)
R33 OH-RES-2 info - residency ORC 2743.51(A)(2)(a) and (C)(2)
R34 OH-SUBMIT-ONLINE info - submission AG Apply for Victims Compensation, Two options for filing a claim
R35 OH-SUBMIT-MAIL info - submission AG Apply for Victims Compensation, Two options for filing a claim
R36 OH-SUBMIT-FAX info - submission AG Apply for Victims Compensation, Two options for filing a claim
R37 OH-SUBMIT-EMAIL info - submission AG Apply for Victims Compensation, Two options for filing a claim
R38 OH-DOC-WAGES info - required_document Application, Section 7: Employment Information
R39 OH-DOC-INSCARD info - required_document Application, Section 6: Insurance and Benefit Information
R40 OH-DOC-RELEASE info - required_document Application, Section 12: Subrogation, Authorization, and Signature
R41 OH-DOC-DEATH info - required_document Application, Section 8: Funeral Expenses
R42 OH-TIME-1 info - processing_time ORC 2743.59(E)
R43 OH-ACP-1 info - address_confidentiality ORC 111.42(A)(3)
R44 OH-RECORDS-1 info - record_confidentiality ORC 2743.62(A)(2)(a)
.tags pain_suffering=bit0
.sources
S0 OH-S1 sha256 1803a3a7585fdf3a https://codes.ohio.gov/ohio-revised-code/section-2743.51
S1 OH-S3 sha256 2bac7b2d21814c35 https://codes.ohio.gov/ohio-revised-code/section-2743.60
S2 OH-S4 sha256 8cb560d4722f4aac https://codes.ohio.gov/ohio-revised-code/section-2743.56
S3 OH-S5 sha256 d40ddefb50d9361b https://codes.ohio.gov/ohio-revised-code/section-2907.28
S4 OH-S6 sha256 4dffebdf7ac3dd82 https://codes.ohio.gov/ohio-revised-code/section-2743.67
S5 OH-S8 sha256 a0fa156ac10a0de0 https://codes.ohio.gov/ohio-administrative-code/rule-109:7-1-02
S6 OH-S9 sha256 ccc7b36c04638cd4 https://www.ohioattorneygeneral.gov/Files/Individuals-and-Families/Victims/Crime-Victim-Comp-Form.aspx
S7 OH-S10 sha256 c7d1831fcbd1f821 https://codes.ohio.gov/ohio-revised-code/section-2743.191
S8 OH-S11 sha256 a7f11c39cd92e53c https://codes.ohio.gov/ohio-revised-code/section-2743.521
S9 OH-S12 sha256 dd9be85369b272e0 https://ohiocourtofclaims.gov/crime-victims-compensation/
S10 OH-S14 sha256 e82f95df4bee1c4c https://www.ohioattorneygeneral.gov/Files/Forms/Forms-for-Victims/Sexual-Assault-Forensic-Examination/SAFE-Reimbursement-Instructions
S11 OH-S15 sha256 1fd33828433236f5 https://www.ohioattorneygeneral.gov/Files/Publications-Files/Publications-for-Victims/CrimeCanBeCostly.aspx
S12 OH-S16 sha256 275d2d53ad6a0af0 https://www.ohioattorneygeneral.gov/Individuals-and-Families/Victims/Apply-for-Victims-Compensation
S13 OH-S17 sha256 d9920eb40230782e https://codes.ohio.gov/ohio-revised-code/section-2743.59
S14 OH-S18 sha256 0cfaa51c66e8a0ba https://codes.ohio.gov/ohio-revised-code/section-111.42
S15 OH-S19 sha256 9856a5f5f2a146a5 https://codes.ohio.gov/ohio-revised-code/section-2743.62
S16 OH-S20 sha256 69bc7ece633d6cd7 https://www.ohiosos.gov/public-integrity/safe-at-home
.proofs
P0 ()
P1 (OH-EXAM-1, OH-EXAM-2, OH-EXAM-3, OH-EXAM-4, OH-EXAM-5, OH-EXAM-6, OH-EXAM-7)
P2 (OH-EXCL-1)
P3 (OH-EXCL-2)
P4 (OH-EXCL-1, OH-EXCL-2)
P5 (OH-COV-1)
P6 (OH-COV-1, OH-COLL-1, OH-COLL-2)
P7 (OH-CAP-2, OH-COV-3)
P8 (OH-CAP-2, OH-COV-3, OH-COLL-1, OH-COLL-2)
P9 (OH-COV-4)
P10 (OH-COV-4, OH-COLL-1, OH-COLL-2)
P11 (OH-CAP-3)
P12 (OH-CAP-3, OH-COLL-1, OH-COLL-2)
P13 (OH-COV-6)
P14 (OH-COV-6, OH-COLL-1, OH-COLL-2)
P15 (OH-CAP-4)
P16 (OH-CAP-4, OH-COLL-1, OH-COLL-2)
P17 (OH-COV-5)
P18 (OH-COV-5, OH-COLL-1, OH-COLL-2)
P19 (OH-COV-2)
P20 (OH-COV-2, OH-COLL-1, OH-COLL-2)
P21 (OH-CAP-5)
P22 (OH-CAP-5, OH-COLL-1, OH-COLL-2)
P23 (OH-CAP-6)
P24 (OH-CAP-6, OH-COLL-1, OH-COLL-2)
P25 (OH-MIN-1)
P26 (OH-DEADLINE-1)
P27 (OH-REPORT-1, OH-REPORT-2)
P28 (OH-DEADLINE-2, OH-COLL-1, OH-COLL-2, OH-CONDUCT-1, OH-CONDUCT-2, OH-EMERG-1, OH-CRIME-1, OH-RES-1, OH-RES-2, OH-SUBMIT-ONLINE, OH-SUBMIT-MAIL, OH-SUBMIT-FAX, OH-SUBMIT-EMAIL, OH-DOC-WAGES, OH-DOC-INSCARD, OH-DOC-RELEASE, OH-DOC-DEATH, OH-TIME-1, OH-ACP-1, OH-RECORDS-1)
.ints
K0 500000
K1 75000
K2 100000
K3 1500000
K4 5000000
K5 5000
.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 L26
case medical -> L2
case forensic_exam -> L1
case counseling -> L10
case lost_wages -> L18
case transportation -> L26
case relocation -> L26
case temporary_housing -> L26
case security -> L26
case crime_scene_cleanup -> L33
case childcare -> L41
case property_replacement -> L49
case clothing_bedding -> L57
case prescription -> L26
case dental -> L65
case funeral -> L26
case legal -> L73
case tuition -> L26
case other -> L81
case unknown -> L26
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 1
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 1
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 1
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 1
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: push 0
029f decide unknown_rule, P0
02a3 ret
02a4 L33: push 0
02a9 str r0
02ab ldi tags
02ad push 1
02b2 and
02b3 jz L34
02b8 ldr r0
02ba push 1
02bf or
02c0 str r0
02c2 L34: ldi tags
02c4 push 1
02c9 and
02ca jz L35
02cf ldr r0
02d1 push 2
02d6 or
02d7 str r0
02d9 L35: ldr r0
02db switch 4, default L39
case 0 -> L39
case 1 -> L36
case 2 -> L37
case 3 -> L38
02f1 L36: push 0
02f6 decide excluded, P2
02fa ret
02fb L37: push 0
0300 decide excluded, P3
0304 ret
0305 L38: push 0
030a decide excluded, P4
030e ret
030f L39: ldi confirmed
0311 jnz L40
0316 push 0
031b decide needs_confirmation, P11
031f ret
0320 L40: ldi amount_cents
0322 decide eligible, P12
0326 lda
0327 ldi insurance_paid_cents
0329 subs
032a push 0
032f max
0330 seta collateral, R26
0334 ret
0335 L41: push 0
033a str r0
033c ldi tags
033e push 1
0343 and
0344 jz L42
0349 ldr r0
034b push 1
0350 or
0351 str r0
0353 L42: ldi tags
0355 push 1
035a and
035b jz L43
0360 ldr r0
0362 push 2
0367 or
0368 str r0
036a L43: ldr r0
036c switch 4, default L47
case 0 -> L47
case 1 -> L44
case 2 -> L45
case 3 -> L46
0382 L44: push 0
0387 decide excluded, P2
038b ret
038c L45: push 0
0391 decide excluded, P3
0395 ret
0396 L46: push 0
039b decide excluded, P4
039f ret
03a0 L47: ldi confirmed
03a2 jnz L48
03a7 push 0
03ac decide needs_confirmation, P13
03b0 ret
03b1 L48: ldi amount_cents
03b3 decide eligible, P14
03b7 lda
03b8 ldi insurance_paid_cents
03ba subs
03bb push 0
03c0 max
03c1 seta collateral, R26
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 1
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 1
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 1
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, R26
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 1
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, R26
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 1
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, R26
069a ret
.aggregate
0000 push 0
0005 str r0
0007 push 0
000c str r1
000e each counseling, L4
0014 L0: ldr r1
0016 jnz L2
001b ldr r0
001d lda
001e adds
001f ldk K0
0022 gt
0023 jz L1
0028 ldk K0
002b ldr r0
002d subs
002e cap expense_cap, R8
0032 push 1
0037 str r1
0039 L1: ldr r0
003b lda
003c adds
003d str r0
003f jmp L3
0044 L2: push 0
0049 cap expense_cap, R8
004d L3: next L0
0052 L4: push 0
0057 str r0
0059 push 0
005e str r1
0060 each crime_scene_cleanup, L9
0066 L5: ldr r1
0068 jnz L7
006d ldr r0
006f lda
0070 adds
0071 ldk K1
0074 gt
0075 jz L6
007a ldk K1
007d ldr r0
007f subs
0080 cap expense_cap, R9
0084 push 1
0089 str r1
008b L6: ldr r0
008d lda
008e adds
008f str r0
0091 jmp L8
0096 L7: push 0
009b cap expense_cap, R9
009f L8: next L5
00a4 L9: push 0
00a9 str r0
00ab push 0
00b0 str r1
00b2 each property_replacement, L14
00b8 L10: ldr r1
00ba jnz L12
00bf ldr r0
00c1 lda
00c2 adds
00c3 ldk K1
00c6 gt
00c7 jz L11
00cc ldk K1
00cf ldr r0
00d1 subs
00d2 cap expense_cap, R10
00d6 push 1
00db str r1
00dd L11: ldr r0
00df lda
00e0 adds
00e1 str r0
00e3 jmp L13
00e8 L12: push 0
00ed cap expense_cap, R10
00f1 L13: next L10
00f6 L14: push 0
00fb str r0
00fd push 0
0102 str r1
0104 each legal, L19
010a L15: ldr r1
010c jnz L17
0111 ldr r0
0113 lda
0114 adds
0115 ldk K2
0118 gt
0119 jz L16
011e ldk K2
0121 ldr r0
0123 subs
0124 cap expense_cap, R11
0128 push 1
012d str r1
012f L16: ldr r0
0131 lda
0132 adds
0133 str r0
0135 jmp L18
013a L17: push 0
013f cap expense_cap, R11
0143 L18: next L15
0148 L19: push 0
014d str r0
014f push 0
0154 str r1
0156 each other, L24
015c L20: ldr r1
015e jnz L22
0163 ldr r0
0165 lda
0166 adds
0167 ldk K3
016a gt
016b jz L21
0170 ldk K3
0173 ldr r0
0175 subs
0176 cap expense_cap, R12
017a push 1
017f str r1
0181 L21: ldr r0
0183 lda
0184 adds
0185 str r0
0187 jmp L23
018c L22: push 0
0191 cap expense_cap, R12
0195 L23: next L20
019a L24: push 0
019f str r0
01a1 push 0
01a6 str r1
01a8 each all, L29
01ae L25: ldr r1
01b0 jnz L27
01b5 ldr r0
01b7 lda
01b8 adds
01b9 ldk K4
01bc gt
01bd jz L26
01c2 ldk K4
01c5 ldr r0
01c7 subs
01c8 cap total_cap, R7
01cc push 1
01d1 str r1
01d3 L26: ldr r0
01d5 lda
01d6 adds
01d7 str r0
01d9 jmp L28
01de L27: push 0
01e3 cap total_cap, R7
01e7 L28: next L25
01ec L29: push 0
01f1 str r0
01f3 each all, L31
01f9 L30: ldr r0
01fb lda
01fc adds
01fd str r0
01ff next L30
0204 L31: push 0
0209 str r2
020b ldr r0
020d ldk K5
0210 ge
0211 jnz L32
0216 push 4
021b ldr r2
021d max
021e str r2
0220 L32: ldr r2
0222 check minimum_loss, P25
0226 ldx incident_date
0228 push 1095
022d adds
022e dup
022f setdate
0230 ldx as_of_date
0232 ge
0233 jz L33
0238 push 0
023d jmp L34
0242 L33: push 1
0247 L34: check deadline, P26
024b ldx police_report
024d push 1
0252 eq
0253 jnz L36
0258 ldx police_report
025a push 0
025f eq
0260 jnz L35
0265 push 3
026a jmp L37
026f L35: push 1
0274 jmp L37
0279 L36: push 0
027e L37: check reporting, P27
0282 info P28
0285 ret