- /midas system july 28, 1980
- lai=opr 40
- lia=opr 20
- swp=opr 60
- dia=iot 60
- dba=iot 61
- dcc=iot 62
- dra=iot 63
- sni=skp 4000
- define sense swch
- szs swchx10
- terminate
- define init with,what
- law what
- dap with
- terminate
- define index idxx,sass,jmpp
- idx idxx
- sas sass
- jmp jmpp
- terminate
- define listen
- cla>>05<<cli 1
- szf i 1
- jmp .-1
- tyi
- terminate
- swap=swp
- define load with,what
- lio (what
- dio with
- terminate
- define move from,where
- lio from
- dio where
- terminate
- define setup where,what
- law i what
- dac where
- terminate
- define count ispp,jmpp
- isp ispp
- jmp jmpp
- terminate
- start
- w
Raw Paste