File: whileadd.i

package info (click to toggle)
intercal 30%3A0.30-6
  • links: PTS
  • area: main
  • in suites: sid, trixie
  • size: 4,044 kB
  • sloc: ansic: 8,936; sh: 1,274; yacc: 1,073; lex: 518; lisp: 460; makefile: 438; perl: 295
file content (6 lines) | stat: -rw-r--r-- 252 bytes parent folder | download | duplicates (6) 
1
2
3
4
5
6
 
	PLEASE NOTE THIS PROGRAM READS IN TWO 16-BIT NUMBERS AND ADDS THEM
	DO WRITE IN .1
	DO WRITE IN .2
(1)    	DO COME FROM ".2~.2"~#1 WHILE :1 <- "'?.1$.2'~'"':1/.1$.2'~#0"$#65535'"$"'"'&.1$.2'~'#0$#65535'"$#0'~#32767$#1"
	DO READ OUT .1
	PLEASE GIVE UP