Stack Exchange Network

Stack Exchange network consists of 174 Q&A communities including Stack Overflow, the largest, most trusted online community for developers to learn, share their knowledge, and build their careers.

Visit Stack Exchange
8
reputation
4

psymann

> Me
REM Created by PARENTAL HARDWARE ®
//  This version last updated when fed;

Name = psymann
Sex = Male
PsyAge = RememberAge()
If Age > 27 Then Print "Age = 27"

str family[][] = {
{wife, PsyAge-3, clinical psychologist}
{brother, PsyAge-2, transport planner and computer modeller}
{sister, PsyAge-4, clinical psychologist}
{mother, old, retired-teacher}
{father, old, retired-civil-servant}};

<INTERESTS>
<DL>
    <DT>Sport</DT>
    <DD>badminton, hockey, pool, snooker, netball, ultimate frisbee, squash, cricket, hot slippery lime, french cricket...</DD>

    <DT>Music</DT>
    <DD>flute += windOrchestra, piano, singing~=bass</DD>

    <DT>Other</DT>
    <DD>board games, computer games</DD>
</DL>
</INTERESTS>


  10 BIRTH @ Surrey, UK
  20 FOR DAY = 1 TO DEATH
  20   PROC LIFE
  30 NEXT DAY
  40 PROC DIE
  50
 900 DEFPROC LIFE
 950 IF(POSS) GET UP = >1000
1000 ELSE GET UP = <1000: PRINT"Grrr"
1010 TEA = CUPOFTEA: TEA=TRUE
1020 IF(NOWORK=TRUE) GOTO 1040 AND HIT SELF FOR USING GOTO
1030 ELSE INPUT=0: FIRED=TRUE: NOWORK=TRUE
1040 PLAY SCRABBLE WITH DAVE
1250 T = 1300
1300 REPEAT T = T + 100
1310   On Error SelectExcuse:
1320   CH."BADMINTON"
1330 SelectExcuse:
1340   Msgbox Rand(Excuse), vbAgreewithmeOnly
1350 UNTIL T = 2000
2000 GOTO HOUSE
2010 TEA=TRUE: DRINK
2020 IF(TEA=0) TEA=TRUE: DRINK
2030 REFLECT ON BADMINTON PERFORMANCE
2040 IF(TEA=0) TEA=TRUE: DRINK
2050 EVENING = TELLY OR COMPUTER OR CHATTING
0000 GOTO BED
0010 ENDPROC
0220
0230 DEFPROC DIE
0240 IF(BADMINTON=FALSE) ELSE IF(BREATHING=FALSE) THEN DEATH=TRUE
0250 IF(DEATH=TRUE) THEN PRINT"Damn"
0260 EXIT
0270 ENDPROC
0280
0290 DATA tea tea tea tea tea timeoutbar tea tea tea tea tea tea tea tea tea
0300 DATA 'It was my partner' 'bad shuttles' 'bad lighting' 'bad floor'_
     'food poisoning' 'tired from being so amazing yesterday' 'traumatised from fighting dragons'
5
answers
1
question
~44
people reached
  • Perth, Australia
  • Member for 2 years, 9 months
  • 5 profile views
  • Last seen Dec 18 '18 at 10:18

Top Network Posts

We respect a laser-like focus on one topic.

Top Tags (6)

Score 0
Posts 4
Posts % 67
Score 0
Posts 2
Score 0
Posts 1
Score 0
Posts 1
Score 0
Posts 1
Score 0
Posts 1

Top Posts (6) All Questions Answers | Votes Newest

Badges (4)

Gold

Silver

Bronze

4

Rarest