blob: ecbf2323932489de5f46b6fc37821921c367c5ee (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
|
/**********************************************************************
** Copyright (C) 2000 Trolltech AS. All rights reserved.
**
** This file is part of Qtopia Environment.
**
** This file may be distributed and/or modified under the terms of the
** GNU General Public License version 2 as published by the Free Software
** Foundation and appearing in the file LICENSE.GPL included in the
** packaging of this file.
**
** This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE
** WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
**
** See http://www.trolltech.com/gpl/ for GPL licensing information.
**
** Contact info@trolltech.com if any conditions of this licensing are
** not clear to you.
**
**********************************************************************/
#include "binaryimpl.h"
#include "../instruction.h"
class iXOR : public Instruction {
public:
iXOR():Instruction(){};
~iXOR(){};
Data eval(Data num) {
Data result;
result.i = num.i ^ acc.i;
return result;
};
};
class iAND : public Instruction {
public:
iAND():Instruction(){};
~iAND(){};
Data eval(Data num) {
Data result;
result.i = num.i & acc.i;
return result;
};
};
class iNOT : public Instruction {
public:
iNOT():Instruction(){};
~iNOT(){};
Data eval(Data num) {
Data result;
result.i = ~ num.i;
return result;
};
};
class iOR : public Instruction {
public:
iOR():Instruction(){};
~iOR(){};
Data eval(Data num) {
Data result;
result.i = num.i | acc.i;
return result;
};
};
class iLSH : public Instruction {
public:
iLSH():Instruction(){};
~iLSH(){};
Data eval(Data num) {
Data result;
result.i = num.i << 1;
return result;
};
};
class iRSH : public Instruction {
public:
iRSH():Instruction(){};
~iRSH(){};
Data eval(Data num) {
Data result;
result.i = num.i >> 1;
return result;
};
};
void FormBinaryImpl::val0Clicked() {
engine->pushValue('0');
}
void FormBinaryImpl::val1Clicked() {
engine->pushValue('1');
}
void FormBinaryImpl::XORClicked() {
engine->pushInstruction(new iXOR());
}
void FormBinaryImpl::ANDClicked() {
engine->pushInstruction(new iAND());
}
void FormBinaryImpl::NOTClicked() {
engine->immediateInstruction(new iNOT());
}
void FormBinaryImpl::ORClicked() {
engine->pushInstruction(new iOR());
}
void FormBinaryImpl::LSHClicked() {
engine->immediateInstruction(new iLSH());
}
void FormBinaryImpl::RSHClicked() {
engine->immediateInstruction(new iRSH());
}
|
