Sonsivri
 
*
Welcome, Guest. Please login or register.
Did you miss your activation email?
December 10, 2016, 09:48:48 09:48


Login with username, password and session length


Pages: [1]
Print
Author Topic: AT89c2051 programmer  (Read 4702 times)
0 Members and 1 Guest are viewing this topic.
nikhilele
Junior Member
**
Offline Offline

Posts: 83

Thank You
-Given: 2
-Receive: 22


WWW
« on: July 14, 2006, 08:17:07 08:17 »

Is there any simple AT892051 programmer that can be easily used by 8th or 9th grage school students.
 
I am going to start a hobby club for kids and i want to teach them controller programming.
 
so i am looking for AT892051 programmer  which should be small simple and cheap and easy to use
 
is there any link or resource:)
Logged
KhepeleSibilo
Translator
Junior Member
***
Offline Offline

Posts: 54

Thank You
-Given: 3
-Receive: 410


WWW
« Reply #1 on: July 14, 2006, 08:57:38 08:57 »

Hi
and three more, tell me if this is not enough to send then (i most search for them in my archive )
 
use bascom 8051, and 89c4051 hase 4KB and new bascom8051 demo compile 4KB!!
 
 
 
Program BlowIt2051;
Uses VTD;
var
base: Word;
i, j, k, l: Integer;
mem: Array[0..2047] of byte;
f: file;
Const
inc_bit = $01;
vpp_bit = $02;
prog_bit = $04; { not inverse! }
erase_bit = $08;
prog_mode = $0F;
erase_mode = $07;
idle = $09; { Idle, RST = 0 }
label
err_exit;
begin
Writeln;
Writeln(ëóóóóó BlowIT (tm) 2051 ver 1.0 beta óóóóóí);
Writeln(ëhttp://sistudio.com for schematics and latest releaseí);
Writeln;
if ParamCount<1 then begin
Writeln(ëusage: BI2051 filename.bin [n]í);
Writeln(ëusage: n=1,2,3 LPT number to useí);
Writeln;
halt(1);
end;
base := memw[$40:8];
if ParamStr(2) = ë2í then begin
base := memw[$40:10];
end;
if ParamStr(2) = ë3í then begin
base := memw[$40:12];
end;
If base = 0 then begin
Writeln(ëParallel port does not exist!í);
Halt(2);
end;
for i:=0 to 2047 do mem := $FF;
assign(f, ParamStr(1));
reset(f,1);
blockread(f, mem, 2048,i);
close(f);
If IOResult <> 0 then begin
Writeln(ëFile not found!í);
halt(2); { File error }
end;
port[base] := $FF;
{ Erase }
port[base+2] := $01;
nms(10);
port[base+2] := $03; { RST = 12 }
nms(1);
port[base+2] := erase_mode; { RST = 12, PROG = H }
nms(1);
port[base+2] := erase_mode xor prog_bit; { P3.2 = 0 }
nms(12); { This is ERASE PULSE!}
port[base+2] := erase_mode; { P3.2 = 1 }
nms(12);
port[base+2] := erase_mode xor vpp_bit; { RST = 0 }
nms(20);
{ Program ROM }
port[base+2] := idle;
nms(10);
port[base+2] := idle or vpp_bit;
nms(10);
port[base+2] := prog_mode; { RST = 12, PROG = H }
nms(1);
Write(ëBlowingí);
k := 0; l := 0;
for j := 0 to 2047 do
begin
port[base] := mem[j];
if mem[j] <> $FF then begin
delay_mks(2);
{ PROG Pulse}
EnterCriticalSection;
port[base+2] := prog_mode xor prog_bit; { P3.2 = 0 }
delay_mks(5);
port[base+2] := prog_mode; { P3.2 = 1 }
delay_mks(2);
i := 0;
while (port[base+1] and 64) = 0 do
begin
delay_mks(10);
if i>200 then begin
Writeln;
Writeln(ëError, never ready?í);
goto err_exit;
end;
if i > k then k := i;
inc(i);
end;
LeaveCriticalSection;
if l > 30 then begin
Writeln;
Writeln(ëError, no device?í);
goto err_exit;
end;
if i = 0 then inc(l);
delay_mks(2);
end;
port[base+2] := prog_mode xor inc_bit; { XT1 = 1 }
delay_mks(5);
port[base+2] := prog_mode; { XT1 = 1 }
delay_mks(2);
if (j mod 64) = 0 then Write(ë.í);
end;
port[base] := $FF; nms(1);
port[base+2] := prog_mode xor vpp_bit; { P3.2 = 0!! }
nms(1);
port[base+2] := idle;
port[base] := $00;
BlowIT 2051
Writeln;
Writeln(ëWe are finished.í);
Halt(0);
err_exit:
LeaveCriticalSection;
Halt(1);
end.
Logged
KhepeleSibilo
Translator
Junior Member
***
Offline Offline

Posts: 54

Thank You
-Given: 3
-Receive: 410


WWW
« Reply #2 on: July 14, 2006, 09:04:49 09:04 »

sorry
problem with attach!!!
use:
http://rapidshare.de/files/25800898/89c2051_Programmer.pdf.html
Logged
nikhilele
Junior Member
**
Offline Offline

Posts: 83

Thank You
-Given: 2
-Receive: 22


WWW
« Reply #3 on: July 14, 2006, 12:13:28 12:13 »

what about hardware involved
Logged
nikhilele
Junior Member
**
Offline Offline

Posts: 83

Thank You
-Given: 2
-Receive: 22


WWW
« Reply #4 on: July 14, 2006, 12:19:35 12:19 »

http://sistudio.com/  this is the site for hardware the site seem like portal or just provides links
Logged
8052
Junior Member
**
Offline Offline

Posts: 49

Thank You
-Given: 0
-Receive: 9


« Reply #5 on: July 14, 2006, 04:55:17 16:55 »

You can find 100% working programmer with firmware ,
 
http://chaokhun.kmitl.ac.th/~kswichit/easy1/easy.htm
 
http://www.kmitl.ac.th/~kswichit/
Logged
KhepeleSibilo
Translator
Junior Member
***
Offline Offline

Posts: 54

Thank You
-Given: 3
-Receive: 410


WWW
« Reply #6 on: July 14, 2006, 06:35:55 18:35 »

1-I use http://chaokhun.kmitl.ac.th/~kswichit/easy1/easy.htm myself, no printer port problem under XP( no parttalk require) , but you must have a programmer for 89c2051 in programmer
2-I try to complitly copy main project witch i download some years ago and I think http://sistudio.com has expired!!!!
.
.
.
and also i made TAFE programmer that work with BASCOM and 3 other simple programmer for 89cx051, tell me if you want then then I try to upload
Logged
nikhilele
Junior Member
**
Offline Offline

Posts: 83

Thank You
-Given: 2
-Receive: 22


WWW
« Reply #7 on: August 22, 2006, 11:20:11 11:20 »

i have a universal progammer which can support 100s or chip
but i want to make a cheap 89c2051 programmer for kids of age group 14 - 19 for hobby kid of work.
Logged
gamegurus
Newbie
*
Offline Offline

Posts: 23

Thank You
-Given: 14
-Receive: 59

Oh what a wonderful morning!!!


« Reply #8 on: September 01, 2006, 10:43:05 10:43 »

Better to make this. its derived from easy and supports lots of chips.
 
  http://chaokhun.kmitl.ac.th/~kswichit/89prog/index.html
Logged

Indian Gaming Guru
quakeman
Newbie
*
 Muted
Offline Offline

Posts: 34

Thank You
-Given: 10
-Receive: 18


« Reply #9 on: September 01, 2006, 12:27:06 12:27 »

Here are two more really simple atmel AT89Cx051 programmers:

http://www.qsl.net/dl2tm/atprog/atprog.html
http://www.eit.fhbb.ch/htmldoz/mm/atmel-programmer/atmelprogrammers.html

The first one i build myself and it works. But i only used it a few months until i bought a galep32 multi-programmer because i needed other chips. Wink
Logged
vsmGuy
Junior Member
**
Offline Offline

Posts: 35

Thank You
-Given: 11
-Receive: 7


« Reply #10 on: January 27, 2008, 11:11:32 11:11 »

Hi

Try out the excellent Sunrom programmer :

http://www.sunrom.com/files/diy.zip
Logged
Pages: [1]
Print
Jump to:  


DISCLAIMER
WE DONT HOST ANY ILLEGAL FILES ON THE SERVER
USE CONTACT US TO REPORT ILLEGAL FILES
ADMINISTRATORS CANNOT BE HELD RESPONSIBLE FOR USERS POSTS AND LINKS

... Copyright 2003-2999 Sonsivri.to ...
Powered by SMF 1.1.18 | SMF © 2006-2009, Simple Machines LLC | HarzeM Dilber MC