Polski Portal COLOBOTa - Zobacz temat

Berserker · Wysłany: 10-06-2010, 18:40

@up blisko

Schocker · Wysłany: 11-06-2010, 14:40

Czyżby to był RobotC? ^^ Chyba związany z Lego Mindstorms. ^^

Berserker · Wysłany: 11-06-2010, 17:14

@up dokladnie

Korniszon · Wysłany: 03-10-2010, 09:19

No to teraz ja!

Kod:

1 0000:02 01 00 LJMP START
2 0100: ORG 100H
3 0100: START:
4
5 0100:12 81 0C LCALL LCD_CTR
6
7 0103:74 F1 MOV A, #0F1H
8 0105:75 F0 02 MOV B, #2
9 0108:A4 MUL AB
10
11
12 0103:C5 F0 XCH A, B
12 0103:12 81 04 LCALL WRITE_HEX
13
14 010E:E5 F0 MOV A, B
15 0110:12 81 04 LCALL WRITE_HEX
16
17 0113:80 FE SJMP $

To jest kod do mnożenia.

Nie jest zbyt proste.

Berserker · Wysłany: 03-10-2010, 11:20

Assembler?

Korniszon · Wysłany: 03-10-2010, 16:49

COLOBOT · Wysłany: 07-01-2011, 12:58

A to?

Kod:

LIBRARY ieee;
USE ieee.std_logic_1164.all;
Use IEEE.STD_LOGIC_ARITH.ALL;
ENTITY czesc1 IS
PORT ( CLOCK_50 : IN STD_LOGIC;
LEDR : OUT STD_LOGIC_VECTOR(17 downto 0);
SW: in STD_LOGIC_VECTOR(17 downto 0)
);
END czesc1;

ARCHITECTURE Structural OF czesc1 IS
signal temp1:integer;
BEGIN
--przyklad konwersji tablicy bitow na liczbe calkowita
temp1<=CONV_INTEGER(unsigned(SW))+1;

--przyklad konwersji liczby calkowitej na tablice bitow (jako drugi parametr podany jest rozmiar tablicy)
ledr(3 downto 0)<=CONV_STD_LOGIC_VECTOR(temp1,4);

END Structural;

Simbax · Wysłany: 07-01-2011, 14:20

Pascal?

COLOBOT · Wysłany: 07-01-2011, 14:22

Berserker · Wysłany: 07-01-2011, 17:18

Fortran

COLOBOT · Wysłany: 07-01-2011, 19:09

Zgadujcie dalej