Scancode

BeanShell

source("/sdcard/com.googlecode.bshforandroid/extras/bsh/android.bsh");
droid = Android();
droid.call("scanBarcode");
clip = droid.call("getClipboard");
text = clip.get("result");
droid.call("makeToast",text);

Bex

include("/sdcard/com.googlecode.bexforandroid/extras/bex/android.bex")
droid = Android()
droid.call("scanBarcode")
clip = droid.call("getClipboard")
text = clip.get("result")
droid.call("makeToast",text)

Erlang

-module(scancode_Erlang).
-export([main/0]).
main()->
  android:scanBarcode(),
  Text = android:getClipboard(),
  android:makeToast(Text).

Html and JavaScript

<HTML><HEAD><SCRIPT>
var droid = new Android();
droid.scanBarcode();
var clip = droid.getClipboard().result;
droid.makeToast(clip);
</SCRIPT></HEAD><BODY></BODY></HTML>

JRuby

droid = Android.new
droid.scanBarcode()
clip = droid.getClipboard['result']
droid.makeToast clip

JScheme

(import "com.googlecode.rpc.*")
(define droid (com.googlecode.rpc.Android.))
(.call droid "scanBarcode")
(define clip (.call droid "getClipboard"))
(define text (.get clip "result"))
(.call droid "makeToast" text)
(exit)

Jawk

import com.googlecode.rpc.*;
BEGIN{
  droid = new Android();
  droid.call("scanBarcode");
  clip = droid.call("getClipboard");
  text = clip.get("result");
  droid.call("makeToast",text);
}

Lua

require "android"
android.scanBarcode()
clip = android.getClipboard().result
text = clip
android.makeToast(text)

PHP

<?php 
require_once("Android.php");
$droid = new Android();
$droid->scanBarcode();
$clip = $droid->getClipboard();
$text = $clip['result'];
$droid->makeToast($text);
//var_dump($clip);
//$droid->setClipboard($result);
?>

Perl

use Android;
my $droid = Android->new();
$droid->scanBarcode();
my $clip = $droid->getClipboard();
my $text = $clip->{'result'};
$droid->makeToast($text);

Python

import android
droid = android.Android()
droid.scanBarcode()
clip = droid.getClipboard()
text = clip.result
droid.makeToast(text)

Rhino

load("/sdcard/com.googlecode.rhinoforandroid/extras/rhino/android.js");
var droid = new Android();
droid.scanBarcode();
var text = droid.getClipboard();
droid.makeToast(text);

Shell

Not solved. Please send me answers if you have.

Sleep

import com.googlecode.rpc.*;
$droid = [new Android];
[$droid call : "scanBarcode"];
$clip = [$droid call : "getClipboard"];
$text = [$clip get : "result"];
[$droid call : "makeToast",$text];

Squirrel

android <- Android();

function conv4facade(text){
  local msg = "";
  for(local i = 0;i<text.len();i++){
    if (text[i].tochar()=="\"") {
      msg+="\\\"";
    } else if(text[i].tochar()=="\n") {
      msg+="\\n";
    } else {
      msg+=text[i].tochar();
    }
  }
  return msg;
}

android.scanBarcode();
local clip = android.getClipboard().result;
android.makeToast(conv4facade(clip));

Tcl

Not solved. Please send me answers if you have.
return