';redcode' Comment.Single '\n' Text ';name Dwarf' Comment.Single '\n' Text ';author A. K. Dewdney' Comment.Single '\n' Text ';version 94.1' Comment.Single '\n' Text ';date April 29, 1993' Comment.Single '\n' Text ';strategy Bombs every fourth instruction.' Comment.Single '\n ' Text 'ORG' Name.Function ' ' Text 'start' Name ' ' Text '; Indicates the instruction with' Comment.Single '\n ' Text '; the label "start" should be the' Comment.Single '\n ' Text '; first to execute.' Comment.Single '\n' Text 'step' Name ' ' Text 'EQU' Name.Function ' ' Text '4' Literal.Number.Integer ' ' Text '; Replaces all occurrences of "step"' Comment.Single '\n ' Text '; with the character "4".' Comment.Single '\n' Text 'target' Name ' ' Text 'DAT' Name.Function '.' Punctuation 'F' Name.Decorator ' ' Text '#' Operator '0' Literal.Number.Integer ',' Punctuation ' ' Text '#' Operator '0' Literal.Number.Integer ' ' Text '; Pointer to target instruction.' Comment.Single '\n' Text 'start' Name ' ' Text 'ADD' Name.Function '.' Punctuation 'AB' Name.Decorator ' ' Text '#' Operator 'step' Name ',' Punctuation ' ' Text 'target' Name ' ' Text '; Increments pointer by step.' Comment.Single '\n ' Text 'MOV' Name.Function '.' Punctuation 'AB' Name.Decorator ' ' Text '#' Operator '0' Literal.Number.Integer ',' Punctuation ' ' Text '@' Operator 'target' Name ' ' Text '; Bombs target instruction.' Comment.Single '\n ' Text 'JMP' Name.Function '.' Punctuation 'A' Name.Decorator ' ' Text 'start' Name ' ' Text '; Same as JMP.A -2. Loops back to' Comment.Single '\n ' Text '; the instruction labelled "start".' Comment.Single '\n ' Text 'END' Name.Function '\n' Text