Beefy Boxes and Bandwidth Generously Provided by pair Networks
Problems? Is your data what you think it is?

Clunky parsing problem, looking for simple solution

by clintp (Curate)
on Jun 16, 2002 at 01:42 UTC ( #174889=perlquestion: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download

  1. or download this
       LN  IF X GOTO LN.A
            GOTO LN.B
            GOTO LN.C
       LN.B Z
       LN.C REM 
  2. or download this
    7130 IF B3<>0 THEN PRINT "FROM E TO S":W1=B4:X=B5:GOTO 6920
    9810 IF K$="Y" AND RND(1) <.5 THEN GOTO 9820 ELSE GOTO 9770
    4835 IF V$="K" THEN A$="+K+" ELSE IF V$="M" THEN A$="!M!" ELSE IF V$="
    +R" THEN A$="?R?"
    1850 IF K3=0 AND EX(Q1,Q2)=0 THEN GOTO 8500 ELSE GOSUB 6000
    1800 IF V$="K" THEN A$="+K+" ELSE IF V$="R" THEN A$="?R?" ELSE IF V$="
    +M" THEN A$="!M!":Z1=R1:Z2=R2
  3. or download this
    1800   IF V$="K" THEN GOTO 1800.2
    1800.1 GOTO 1800.4
    1800.b Z1=R1
    1800.c Z2=R2
    1800.d REM

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://174889]
Approved by Kanji
Front-paged by ajt
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others musing on the Monastery: (4)
As of 2017-09-20 05:07 GMT
Find Nodes?
    Voting Booth?
    During the recent solar eclipse, I:

    Results (231 votes). Check out past polls.