;redcode-94x ;name WingShot T ;author Ben Ford ;strategy 0.80c BiShot-style oneshot ;assert !(CORESIZE%10) && (MAXLENGTH>=20) start equ oscn oinc equ 10 oset equ (10*((MAXLENGTH+MINDISTANCE)/10)-1) odif equ (10*(CORESIZE/20)) otic equ (CORESIZE/10) optr spl {oset, >odif+oset-3 dat {10, >odif ospl spl #10, <-MINDISTANCE oclr mov ospl, >optr mov ospl, }optr obmb djn.a oclr,