Downloads: ObjectScript: A new programming language - CodeProject

Click here to Skip to main content

Click here to Skip to main content

Browse Code

Comments & Discussions

OS-0.98-rc-noexe.ZIP

OS

examples-os

add_user_module.os

add_user_module.txt

bind.os

bind.txt

core.os

core.txt

run_os_prog.os

run_os_prog.txt

test.cmd

test.os

test.txt

proj.win32

add_user_module

add_user_module.cpp

add_user_module.vcxproj

add_user_module.vcxproj.filters

stdafx.cpp

stdafx.h

targetver.h

examples.sln

os

os.cpp

os.vcxproj

os.vcxproj.filters

stdafx.cpp

stdafx.h

targetver.h

test_fannkuch.txt

osbind

osbind.cpp

osbind.vcxproj.filters

stdafx.cpp

stdafx.h

targetver.h

profile_benchmark

profile_benchmark.cpp

profile_benchmark.vcxproj

profile_benchmark.vcxproj.filters

profile_os.h

profile-2012-10-01-#2.txt

profile-2012-10-01.txt

profile-2012-10-02-#2.txt

profile-2012-10-02.txt

profile-2012-10-03-#2.txt

profile-2012-10-03-#3.txt

profile-2012-10-03-#4.txt

profile-2012-10-03-#5.txt

profile-2012-10-03.txt

run.cmd

scripts

test_fannkuch.js

test_fannkuch.lua

test_fannkuch.os

test_fannkuch.php

stdafx.cpp

stdafx.h

targetver.h

run_os_prog

run_os_prog.cpp

run_os_prog.vcxproj

run_os_prog.vcxproj.filters

stdafx.cpp

stdafx.h

targetver.h

stack_usage

stack_usage.cpp

stack_usage.vcxproj

stack_usage.vcxproj.filters

stdafx.cpp

stdafx.h

targetver.h

README.md

source

main.cpp

objectscript.cpp

os-binder.h

os-binder-arg-cc-functions.h

os-binder-cc-functions.h

os-binder-function.h

os-binder-FunctionClassImp.tpl

os-binder-FunctionImp.tpl

os-binder-FunctionImpVoid.tpl

OS-0.98-rc.ZIP

bin

os.exe

add_user_module.os

add_user_module.txt

bind.os

bind.txt

core.os

core.txt

run_os_prog.os

run_os_prog.txt

test.cmd

test.os

test.txt

Makefile

add_user_module.cpp

add_user_module.vcxproj

add_user_module.vcxproj.filters

stdafx.cpp

stdafx.h

targetver.h

examples.sln

os.cpp

os.vcxproj

os.vcxproj.filters

stdafx.cpp

stdafx.h

targetver.h

test_fannkuch.txt

osbind.cpp

osbind.vcxproj.filters

stdafx.cpp

stdafx.h

targetver.h

profile_benchmark.cpp

profile_benchmark.vcxproj

profile_benchmark.vcxproj.filters

profile_os.h

profile-2012-10-01-#2.txt

profile-2012-10-01.txt

profile-2012-10-02-#2.txt

profile-2012-10-02.txt

profile-2012-10-03-#2.txt

profile-2012-10-03-#3.txt

profile-2012-10-03-#4.txt

profile-2012-10-03-#5.txt

profile-2012-10-03.txt

run.cmd

test_fannkuch.js

test_fannkuch.lua

test_fannkuch.os

test_fannkuch.php

stdafx.cpp

stdafx.h

targetver.h

run_os_prog.cpp

run_os_prog.vcxproj

run_os_prog.vcxproj.filters

stdafx.cpp

stdafx.h

targetver.h

stack_usage.cpp

stack_usage.vcxproj

stack_usage.vcxproj.filters

stdafx.cpp

stdafx.h

targetver.h

README.md

main.cpp

objectscript.cpp

os-binder.h

os-binder-arg-cc-functions.h

os-binder-cc-functions.h

os-binder-function.h

os-binder-FunctionClassImp.tpl

os-binder-FunctionImp.tpl

os-binder-FunctionImpVoid.tpl

unitpoint-objectscript-86f30d7-noexe.zip

unitpoint-objectscript-86f30d7

.gitignore

bin

.gitignore

examples-os

add_user_module.os

add_user_module.txt

bind.os

bind.txt

core.os

core.txt

run_os_prog.os

run_os_prog.txt

test.cmd

test.os

test.txt

proj.win32

.gitignore

add_user_module

.gitignore

add_user_module.cpp

add_user_module.vcxproj

stdafx.cpp

stdafx.h

targetver.h

examples.sln

os

.gitignore

os.cpp

os.vcxproj

ReadMe.txt

stdafx.cpp

stdafx.h

targetver.h

test_fannkuch.osc

test_fannkuch.osd

test_fannkuch.txt

osbind

.gitignore

osbind.cpp

stdafx.cpp

stdafx.h

targetver.h

profile_benchmark

.gitignore

profile.txt

profile_benchmark.cpp

profile_benchmark.vcxproj

profile_os.h

profile-2012-10-01-#2.txt

profile-2012-10-01.txt

profile-2012-10-02-#2.txt

profile-2012-10-02.txt

profile-2012-10-03-#2.txt

profile-2012-10-03-#3.txt

profile-2012-10-03-#4.txt

profile-2012-10-03-#5.txt

profile-2012-10-03.txt

profile-3.txt

run.cmd

scripts

test_fannkuch.js

test_fannkuch.lua

test_fannkuch.os

test_fannkuch.php

test_fannkuch.txt

stdafx.cpp

stdafx.h

targetver.h

run_os_prog

.gitignore

run_os_prog.cpp

run_os_prog.vcxproj

stdafx.cpp

stdafx.h

targetver.h

stack_usage

.gitignore

stack_usage.cpp

stack_usage.vcxproj

stdafx.cpp

stdafx.h

targetver.h

README.md

source

.gitignore

main.cpp

objectscript.cpp

os-binder.h

os-binder-arg-cc-functions.h

os-binder-cc-functions.h

os-binder-function.h

os-binder-FunctionClassImp.tpl

os-binder-FunctionImp.tpl

os-binder-FunctionImpVoid.tpl

unitpoint-objectscript-86f30d7.zip

.gitignore

.gitignore

os.exe

add_user_module.os

add_user_module.txt

bind.os

bind.txt

core.os

core.txt

run_os_prog.os

run_os_prog.txt

test.cmd

test.os

test.txt

Makefile

.gitignore

.gitignore

add_user_module.cpp

add_user_module.vcxproj

stdafx.cpp

stdafx.h

targetver.h

examples.sln

.gitignore

os.cpp

os.vcxproj

ReadMe.txt

stdafx.cpp

stdafx.h

targetver.h

test_fannkuch.osc

test_fannkuch.osd

test_fannkuch.txt

.gitignore

osbind.cpp

stdafx.cpp

stdafx.h

targetver.h

.gitignore

profile.txt

profile_benchmark.cpp

profile_benchmark.vcxproj

profile_os.h

profile-2012-10-01-#2.txt

profile-2012-10-01.txt

profile-2012-10-02-#2.txt

profile-2012-10-02.txt

profile-2012-10-03-#2.txt

profile-2012-10-03-#3.txt

profile-2012-10-03-#4.txt

profile-2012-10-03-#5.txt

profile-2012-10-03.txt

profile-3.txt

run.cmd

test_fannkuch.js

test_fannkuch.lua

test_fannkuch.os

test_fannkuch.php

test_fannkuch.txt

stdafx.cpp

stdafx.h

targetver.h

.gitignore

run_os_prog.cpp

run_os_prog.vcxproj

stdafx.cpp

stdafx.h

targetver.h

.gitignore

stack_usage.cpp

stack_usage.vcxproj

stdafx.cpp

stdafx.h

targetver.h

README.md

.gitignore

main.cpp

objectscript.cpp

os-binder.h

os-binder-arg-cc-functions.h

os-binder-cc-functions.h

os-binder-function.h

os-binder-FunctionClassImp.tpl

os-binder-FunctionImp.tpl

os-binder-FunctionImpVoid.tpl

<?php

function fannkuch($n)
{
  $p = array();
  $q = array();
  $s = array();
  $sign = 1;
  $maxflips = $sum = 0;
  for($i=1; $i<=$n; $i++) $p[$i] = $q[$i] = $s[$i] = $i;
  for(;;){
    // Copy and flip.
    $q1 = $p[1];				// Cache 1st element.
    if($q1 != 1){
      for($i=2; $i<=$n; $i++) $q[$i] = $p[$i];		// Work on a copy.
      $flips = 1;
      for(;;){
		$qq = $q[$q1];
		if($qq == 1){				// ... until 1st element is 1.
		  $sum += $sign*$flips;
		  if($flips > $maxflips){
			$maxflips = $flips;
		  } // New maximum?
		  break;
		}
		$q[$q1] = $q1;
		if($q1 >= 4){
		  $i = 2; $j = $q1 - 1;
		  for(;;){ $tmp = $q[$i]; $q[$i] = $q[$j]; $q[$j] = $tmp; if(++$i >= --$j) break; }
		}
		$q1 = $qq; $flips++;
      }
    }
    // Permute.
    if($sign == 1){
      $tmp = $p[2]; $p[2] = $p[1]; $p[1] = $tmp; $sign = -1;	// Rotate 1<-2.
    }else{
      $tmp = $p[2]; $p[2] = $p[3]; $p[3] = $tmp; $sign = 1;	// Rotate 1<-2 and 1<-2<-3.
      for($i = 3;; $i++){
		$sx = $s[$i];
		if($sx != 1){ $s[$i] = $sx-1; break; }
		if($i == $n) return array($sum, $maxflips);	// Out of permutations.
		$s[$i] = $i;
		// Rotate 1<-...<-i+1.
		$t = $p[1]; for($j = 1; $j <= $i; $j++){ $p[$j] = $p[$j+1]; } $p[$i+1] = $t;
      }
    }
  }
}

function getTimeSec(){
    list($usec, $sec) = explode(" ",microtime());
    return ($usec + $sec);
}

$n = isset($argv[1]) ? $argv[1] : 5;
echo "n: $n\n";
$start_time = getTimeSec();
$r = fannkuch($n);
$sum = $r[0]; $flips = $r[1];
echo("$sum\nPfannkuchen($n) = $flips\n"
	. "time = ".(getTimeSec() - $start_time)."\n");

By viewing downloads associated with this article you agree to the Terms of use and the article's licence.

If a file you wish to view isn't highlighted, and is a text file (not binary), please let us know and we'll add colourisation support for it.

License

This article, along with any associated source code and files, is licensed under The MIT License

About the Author

unitpoint

United States

Member

No Biography provided

The ObjectScript is a new programing language that mixes benefits of JavaScript, Lua, and PHP. The ObjectScript has syntax from JavaScript, multiple results from Lua, OOP from PHP and much more.

Type	Article
Licence	MIT
First Posted	27 Sep 2012
Views	17,131
Bookmarked	20 times

JavascriptPHPLua

The Next Version of Android - Some of What's Coming

Get the Insider News free each morning.

Visual C# 2012: New Language Features Part 1

Visual C# 2012: New Language Features Part 2

Related Articles

ObjectScript: How does it work: 5.times{|i| print i}

ObjectScript is a new embedded programming language, OS is faster than PHP and JS

Programming in ObjectScript 1.5

MOSS Multilingual Site Configuration

Using multiple keyboards with different layouts on the same machine

Detect a written text's language

Allow users to select the user interface language in your ASP.NET Web application

Cross language inheritance in .NET

Why Learn Assembly Language?

Concepts behind the C# 3.0 language

RC Localization Tool (LocalizeRC)

Writing Your First Visual Studio Language Service

Zip and Unzip from a C# program using J# runtime

How to test your programs with Unicode characters in multiple languages on Windows 2000

Resource DLLs and Language Selection Menu

Multiple language support for MFC applications with extension DLL

Internationalization and Multiple Language Support

Multilingual Support for Web Applications

PRE tags galore: LPCodeRecognizer

Cat - A Statically Typed Programming Language Interpreter in C#

Permalink | Advertise | Privacy | Mobile
Web04 | 2.6.130516.1 | Last Updated 9 Oct 2012

Article Copyright 2012 by unitpoint
Everything else Copyright © CodeProject, 1999-2013
Terms of Use

Layout: fixed | fluid