What computer language is this??

JohnnyO
03-01-2006, 10:33 AM
; Setup a.wgen
; 1Hz square wave
;
a.wgen.enable=1
a.wgen.mode=2
a.wgen.freq=100
a.wgen.amp=1000
a.wgen.offset=0

; Summing junction
;
a.sji.enable=1
a.sji.inptr0=a.wgen.outvalue
a.sji.inptr1=a.sim.outvalue

; Forward path filter
; Gain adjusted to give
; overshoot
;
a.fi.enable=1
a.fi.inptr=a.sji.outvalue
a.fi.size=0
a.fi.gain=12000
a.fi.kt=8

; Internal plant 'simulation'
;
a.sim.enable=1
a.sim.inptr=a.fi.outvalue
a.sim.size=33,h
a.sim.gain=16384
a.sim.kt=14
a.sim.kn=14
a.sim.kd=14
a.sim.fn0=0
a.sim.fn1=0
a.sim.fn2=0
a.sim.fn3=131
a.sim.fd0=16384
a.sim.fd1=-16384
a.sim.fd2=0
a.sim.fd3=0

JohnnyO
03-01-2006, 10:35 AM
This is in a .OUI file, can anyone talk about this or give me information???

by_m
03-01-2006, 11:43 AM
perhaps it's this: http://oui.sourceforge.net/

hmm...never mind...that doesn't seem to be it

BobThePenguin
03-01-2006, 02:01 PM
Well, a little searching (http://en.wikipedia.org/wiki/Comment) says that ALGOL 60, LISP, SCHEME, and Assembly all have ";" as a comment character. Its not Assembly and I've never used ALGOL and its been a long time since ive gone near LISP or SCHEME but I seem to recall they like ('s so I'm gonna guess ALGOL. ok, so Algol 60's reserved word is actually "Comment" and not ;Comment so I got nothing

Can you narrow down the search a bit? Is the only piece of information you have really that thing you posted? Got something with compiler directives or something more than just assigning some values?

JohnnyO
03-02-2006, 05:09 AM
I think it might be LISP because there are comments that say MCL Compiler and I looked this up and found that MCL is Macintosh Common LISP... but the code they have on that page doesnt really match the code I have... any suggestions on this?

reboot
03-02-2006, 10:56 AM
What kind of suggestion are you looking for?

Iceplug
03-02-2006, 04:03 PM
That may not even be a programming language as all it contains are assignments... no decision or looping blocks anywhere. You could actually make a file parser that would read that into an application as some parameters. :)

BobThePenguin
03-03-2006, 06:18 AM
In addition to the above, if it is indeed Macintosh LISP I wouldn't hold my breath waiting for anyone on a Visual Basic forum to know much about it.

dilettante
03-03-2006, 09:05 AM
From the comments it almost looks like a fragment of ini-file specs from some sort of circuit emulation tool. It certainly isn't SPICE or Simula or anything I recognize. It really isn't Algol 60 or anything even closely related. It doesn't resemble any form of LISP I've ever seen.

reboot
03-03-2006, 09:38 AM
I agree. I originally thought it looked like an ini file too.

JohnnyO
03-05-2006, 07:58 AM
It's a DOS program that uses a hand held device to display information on. The information comes from airplane arrestment gear. I'll show you more code from that program in a little bit. This program only runs on Windows 98 and I have a computer here that supposedly has Windows 98 on it, but I'm having some trouble with the computer. I just tried to turn it on and it's only taking me to the BIOS V2.1 screen where it was click Ctrl Alt Esc to enter Setup. Does this mean there is no operation system on the computer???

JohnnyO
03-05-2006, 08:07 AM
here's some more code...


;****************DIGITAL I/O ****************************
do.invertwd 0
di.invertwd 15
di.enable 1
do.inwd 0
di.mode 2



;*****ANALOG OUTPUT 1 SET-UP : VALVE COMMAND************
;
ao1.enable 1
; set for 16 bit; +/- 32,000 = +/- 10 volts
ao1.res 16
ao1.calb 17067
ao1.offset 0
ao1.invert 0
ao1.inptr upar2
;


This code here was in a .MOO file

;*****************************************************************
; PHASE 4: DETECT CONDITIONS & RECORD IN TABLE
;*****************************************************************
; check for READY Mode, Control Voltage, Data/Confgrn change,
; Manual Reset and MAX/MIN changes
PHASE4:
; set 'value' = 0 for occurence faults
set upar151 0
; check for READY Mode
if NOT uflag3 then
set upar170 (upar170 + 1)
set upar152 upar170
set upar153 tim4.value
set upar154 9
gosub record_data
set uflag3 1
endif
; check for Control Voltage Fault
if uflag4 then
set upar171 (upar171 + 1)
set upar152 upar171
set upar153 tim4.value
set upar154 10
gosub record_data
set uflag4 0
endif
; check MANUAL Reset Fault
if uflag12 then
set upar173 (upar173 + 1)
set upar152 upar173
set upar153 tim4.value
set upar154 12
gosub record_data
set uflag12 0
endif
;
etc...

by_m
03-07-2006, 07:32 PM
I do believe I found it this time...
http://filext.com/detaillist.php?extdetail=.moo&Search=Search
http://www.rowan.sensation.net.au/moonrock.html

$1,000,000 dollar reward for the first person to find a more obscure programming language

Flyguy
03-08-2006, 02:44 AM
Did a Google search on "set upar 0"

Found this page containing "set upar 0":
http://www.eiscat.com/usersguide/type6/tau2pl.c

http://www.eiscat.se/usersguide/

EZ Archive Ads Plugin for vBulletin Copyright 2006 Computer Help Forum