Add sparkles
This commit is contained in:
parent
5a90cac46d
commit
2d3f5a65a1
1 changed files with 4 additions and 2 deletions
6
WOPO.COB
6
WOPO.COB
|
@ -440,7 +440,8 @@
|
||||||
|
|
||||||
HANDLE-SHITFED.
|
HANDLE-SHITFED.
|
||||||
PERFORM BEGIN-REPLY.
|
PERFORM BEGIN-REPLY.
|
||||||
STRING "$002$LEAVE MY CASE ALONE, ASSHOL$LOWE$."
|
STRING "$002$LEAVE MY CASE ALONE, "
|
||||||
|
- "$226$$156$$168$ASSHOL$LOWE$$226$$156$$168$."
|
||||||
INTO MSG-BODY
|
INTO MSG-BODY
|
||||||
WITH POINTER WORK-PTR.
|
WITH POINTER WORK-PTR.
|
||||||
PERFORM SEND-LINE.
|
PERFORM SEND-LINE.
|
||||||
|
@ -465,7 +466,8 @@
|
||||||
STRING TARGET
|
STRING TARGET
|
||||||
INTO MSG-BODY
|
INTO MSG-BODY
|
||||||
WITH POINTER WORK-PTR.
|
WITH POINTER WORK-PTR.
|
||||||
STRING " $COLN$$SOH$ACTION PUNCHES A BABY.$SOH$$NUL$"
|
STRING " $COLN$$SOH$ACTION PUNCHES A "
|
||||||
|
- "$226$$156$$168$BABY$226$$156$$168$.$SOH$$NUL$"
|
||||||
INTO MSG-BODY
|
INTO MSG-BODY
|
||||||
WITH POINTER WORK-PTR.
|
WITH POINTER WORK-PTR.
|
||||||
PERFORM SEND-LINE.
|
PERFORM SEND-LINE.
|
||||||
|
|
Loading…
Reference in a new issue