C++Builder Programming Forum
C++Builder  |  Delphi  |  FireMonkey  |  C/C++  |  Free Pascal  |  Firebird
볼랜드포럼 BorlandForum
 경고! 게시물 작성자의 사전 허락없는 메일주소 추출행위 절대 금지
C++빌더 포럼
Q & A
FAQ
팁&트릭
강좌/문서
자료실
컴포넌트/라이브러리
메신저 프로젝트
볼랜드포럼 홈
헤드라인 뉴스
IT 뉴스
공지사항
자유게시판
해피 브레이크
공동 프로젝트
구인/구직
회원 장터
건의사항
운영진 게시판
회원 메뉴
북마크
볼랜드포럼 광고 모집

C++빌더 Q&A
C++Builder Programming Q&A
[59739] Re:비쥬얼 베이직을 비쥬얼 c++로 변환하는 것이..
금목암[손효철] [iconms1] 1309 읽음    2010-01-14 09:24
아주 옛날의 GW-BASIC 종류에 있는 PEEK POKE 등을 사용하여 임의의 포트에 읽고 쓰는
명령어는 윈도우 NT나 2000,XP ,VISTA ,7 등에서는 바로 사용할수 없고
별도의 콤포넌트나 OCX ,DLL 등을 통하여 사용가능합니다
소스를 보니  출력 I/O 717 번지에 8비트 데이타를 내보내고 비트를 읽어
상위1비트가 1이면 출력을 보내게 된거 같네요
비쥬얼 C++이나 C++BUILDER에서는 더 쉽게 구현 가능합니다
대신 2바이트가 1문장인지와 SPOLL등이 명령어가 아니고 함수나 펑션 또는
서브루틴 같아보이네요 전체 소스가 있어야 겠죠

----------------


김강욱 님이 쓰신 글 :
: 비쥬얼 베이직으로 만들어진 내용을 비주얼 c++로 전환하고 싶습니다
:
: 조금 낯설어서 코드를 머라고 입력해야 하는지 모르겠습니다
:
: 그 내용을 써보면 다음과 같습니다.
:
: Set the HP-IB control switch as follows:
:
: address : 17
: delimiter : comma
:
: 10     DIM A$[1100]
: 20     OUTPUT717 ; "IT1 CA1 DR0 BC"
: 30     OUTPUT717 ; "DE CH1, 'IE', 3, 3 ; CH2, 'VB', 'IB', 2, 2 ; CH3, 'VC', 'IC', 1, 1 ; CH4"
: 40     OUTPUT717 ; "VS1 ; VS2 ; VM1; VM2"
: 50     OUTPUT717 ; "SS VR1, 0,  1, .05, 50-E3 ; 1P 10E-6, 10E-6, 4, 3"
: 60     OUTPUT717 ; "SM DM1 XN 'VC', 1, 0, 1; YA 'IC', 1, 0, 10E-3"
: 70     OUTPUT717 ;  \; "MD ME1"
: 80     A=SPOLL(717)
: 90     IF BIT(A,0)=0 THEN 80
: 100   OUTPUT717 ; "DO 'IC'"
: 110   ENTER717 : A$
: 120   DISP A$
: 130   END
:
: 이상입니다.

+ -

관련 글 리스트
59727 비쥬얼 베이직을 비쥬얼 c++로 변환하는 것이.. 김강욱 971 2010/01/13
59739     Re:비쥬얼 베이직을 비쥬얼 c++로 변환하는 것이.. 금목암[손효철] 1309 2010/01/14
59742         Re:Re:비쥬얼 베이직을 비쥬얼 c++로 변환하는 것이.. 김강욱 951 2010/01/14
59743             Re:Re:Re:비쥬얼 베이직을 비쥬얼 c++로 변환하는 것이.. 금목암[손효철] 959 2010/01/14
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.