home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / intercal.zip / pit / tests / testops.3i < prev    next >
Text File  |  1994-09-22  |  419b  |  19 lines
  1.     PLEASE WRITE IN .3
  2.     DO .1 <- "^.3$#1"~#1
  3.     DO READ OUT .1
  4.     DO .1 <- "V.3$#1"~#1
  5.     PLEASE DO READ OUT .1
  6.     DO .1 <- "V'"&.3$#2"~#1'$#1"~#1
  7.     DO READ OUT .1
  8.     DO .1 <- "?'"&.3$#2"~#1'$#1"~#1
  9.     PLEASE DO READ OUT .1
  10.     DO .1 <- "V!3~#2'$#1"~#1
  11.     DO READ OUT .1
  12.     DO .1 <- "?!3~#2'$#1"~#1
  13.     PLEASE DO READ OUT .1
  14.     DO .1 <- "@'"^.3$#7"~#4'$#2"~#10
  15.     DO READ OUT .1
  16.     DO .1 <- "^.3$.3"~"#0$#29524"
  17.     PLEASE DO READ OUT .1
  18.     PLEASE GIVE UP
  19.