기금넷 공식사이트 - 금 선물 - 쉬운 언어 소스 코드

쉬운 언어 소스 코드

오, 그래, 내가 너에게 메모장의 소스 코드를 하나 줄게.

버전 2

。 라이브러리 iext2 를 지원합니다.

。 라이브러리 iext 지원

。 라이브러리 eAPI 지원

。 조립창 조립 1

。 어셈블리 변수 파일 경로, 텍스트 유형

。 어셈블리 변수가 현재 입력 중인지 여부, 논리

。 Subroutine _ 수퍼 편집 상자 1_ 의 내용이 변경되고 수퍼 편집 상자의 색상이 변경되었습니다.

。 로컬 가변 색상, 문자 형식

색깔. 텍스트 색상 = 색상 값 (난수 (0,255), 난수 (0,255), 난수 (0,255))

수퍼 편집 상자 1. 선택 영역의 문자 형식 (색상) 을 설정합니다.

상태 표시줄 1. Text (0,line+를 text (수퍼 편집 상자 1) 로 설정합니다. 줄 번호 가져오기 ()+문자 길이+문자까지 (수퍼 편집 상자 1. 문자 길이 가져오기 ())

。 하위 프로그램 _ _ startup window _ 가 생성되고 일반 대화상자가 설정됩니다.

일반 대화 상자 1. Filter = "txt | *. Txt'

일반 대화 상자 1. 기본 파일 접미사 = "txt "

일반 대화 상자 1. 제목 = "범례 메모장 저장 대화상자 ..."

_ 시간 날짜 _ 선택됨 ()

_ 현음 피부 _ 선택 ()

메모 알림 ()

。 하위 프로그램 _ _ startup window _ 의 위치가 변경되고 위치가 변경되면 수퍼 편집 상자도 변경됩니다 (1 버튼도 변경됨).

。 참 (_ 시작 창) 인 경우 위치 = 3)

수퍼 편집 상자 1. 폭 = 화면 너비 () -3 입니다.

수퍼 편집 상자 1. Height = 화면 높이 () -80-button 1. 키-10.

단추 1. Top edge = 화면 높이 ()-상태 표시줄 1. 키-100.

단추 1. 폭 = 화면 너비 () -5 입니다.

단추 1. 높이 = 상태 표시줄 1. 키+10.

정말 끝난다면.

。 참 (_ 시작 창) 인 경우 위치 = 0)

수퍼 편집 상자 1. Width = _ 시작 창. 폭-10.

수퍼 편집 상자 1. Height = _ 시작 창. 높이 -55- 버튼 1. 키-10.

단추 1. 맨 위 가장자리 = 200

단추 1. 폭 = 560

정말 끝난다면.

。 서브 루틴 _ new _ selected,,, 새 파일

True 인 경우 (수퍼 편집 상자 1. 내용. "; ) 을 참조하십시오

사실이라면 (메시지 상자 ("아직 저장하지 않았습니다! 구해줄까? " 4), = # 는 버튼입니다

일반 대화 상자 1. 유형 =1

일반 대화 상자 1. 열기 ()

파일 쓰기 (일반 대화 상자 1. 바이트 단위로 설정된 파일 이름 (수퍼 편집 상자 1. 내용))

정말 끝난다면.

정말 끝난다면.

。 하위 프로그램 _ 열기 _ 선택,, 파일 열기

일반 대화 상자 1. 유형 = 0

일반 대화 상자 1. 열기 ()

。 참인 경우 (일반 대화 상자 1. 파일명 8800 ";" ) 을 참조하십시오

수퍼 편집 상자 1. 내용 = 텍스트 (파일 가져오기 (일반 대화 상자 1. 파일 이름) 을 참조하십시오

파일 경로 = 일반 대화상자 1. 파일명

정말 끝난다면.

。 서브 루틴 _ 저장 _ 선택,, 파일 저장

。 True 인 경우 (파일 경로 = "")

일반 대화 상자 1. 유형 =1

일반 대화 상자 1. 열기 ()

파일 쓰기 (일반 대화 상자 1. 바이트 단위로 설정된 파일 이름 (수퍼 편집 상자 1. 내용))

정말 끝난다면.

。 True 인 경우 (파일 경로 Ͱ "")

파일 쓰기 (파일 경로, 바이트 세트 (수퍼 편집 상자 1). 내용))

정말 끝난다면.

。 하위 프로그램 _ 저장 위치 _ 선택,,, 파일로 저장

일반 대화 상자 1. 유형 =1

일반 대화 상자 1. 열기 ()

。 참인 경우 (일반 대화 상자 1. 파일명 8800 ";" ) 을 참조하십시오

파일 쓰기 (일반 대화 상자 1. 바이트 단위로 설정된 파일 이름 (수퍼 편집 상자 1. 내용))

정말 끝난다면.

。 하위 프로그램 _ 실행 취소 _ 선택,, 실행 취소 텍스트

수퍼 편집 상자 1. 실행 취소 ()

하위 프로그램 _ Cut _ 선택,,, 텍스트 잘라내기.

수퍼 편집 상자 1. 잘라내기 ()

。 하위 프로그램 _ Copy _ 선택,, 텍스트 복사

수퍼 편집 상자 1. 복사 ()

。 서브루틴 _ 접착 _ 선택,,, 텍스트 붙여넣기

수퍼 편집 상자 1. 붙여넣기 ()

。 하위 프로그램 _ 삭제 _ 선택,, 텍스트 삭제

수퍼 편집 상자 1. 삭제 ()

수퍼 편집 상자 1. Content = 텍스트 왼쪽 가져오기 (수퍼 편집 상자 1. 내용, 텍스트 길이 가져오기 (수퍼 편집 상자 1. 내용)-1).

。 하위 프로그램 _ 찾기 _ 선택,, 텍스트 찾기

로드 (찾기 창, 참)

。 하위 프로그램 _ Find Next _ 가 선택되었습니다.,, 아직 해결되지 않았습니다.

。 서브 루틴 _ 텍스트 대체 _ 선택,,, 텍스트 대체

로드 (문자 대체 윈도우,, true)

Subroutine _ Jump _ Selected,,, 아직 해결되지 않았습니다.

로드 (창으로 이동, 참)

。 하위 프로그램 _ 모두 선택 _ 선택,,, 모든 텍스트 선택

수퍼 편집 상자 1. 선택한 문자 수 = 텍스트 길이 (수퍼 편집 상자 1. 내용)

하위 프로그램 _ 시간 날짜 _ 선택,,, 시간-날짜.

。 로컬 변수가 매우 작을 때 텍스트 유형입니다.

。 로컬 변수 분, 텍스트 유형

。 로컬 변수 날짜, 텍스트 유형

。 로컬 변수 연도, 텍스트 유형

。 로컬 변수 월, 텍스트 유형

。 로컬 변수의 날, 텍스트 유형입니다.

Hours = to 텍스트 (take hours (take current time ()))

Minute = totext (takeminutes (takecurrenttime ()))

Year = to text (연도 가져오기 (현재 시간 ()))

Month = to text (Month 가져오기 (현재 시간 가져오기 ()))

Date = to text (date (현재 시간 ()))

상태 표시줄 1. 텍스트 설정 (1, 시간+":"+분+"+년+"-"+월+"-"+일).

하위 절차 _ 범례 메모장 v 13_ 선택됨,, 메모장 정보

메시지 상자 ("소프트웨어 제작자: 상고 전설" +# newline+ "QQ:1041750677"+# newline+"MSS

。 하위 프로그램 _ 비밀번호 저장 _ 선택,,, 비밀번호 보호

로드 (암호 창, 참)

。 서브루틴 _ Memo _ 가 선택되고,, Memo 창으로 로드됩니다.

로드 (메모 창, 참)

서브루틴 메모 알림,,, 메모 알림

。 로컬 변수 분할 텍스트, 텍스트 유형, "0"

로컬 변수 오늘 날짜, 텍스트 유형

。 로컬 변수 세그먼트 오늘 날짜, 텍스트 유형, "0"

Split text = Split text (구성 항목 읽기 (실행 디렉토리 가져오기 () +"\ memo. Ini ","메모 ","미리 알림 날짜 ",)," 일 ",)

오늘 날짜 = 끝 텍스트 (날짜 가져오기 (현재 시간 가져오기 ()))

오늘 날짜 분할 = 텍스트 분할 (오늘 날짜, "일",)

True 인 경우 (배열 멤버 수 (분할 텍스트) = 1 또는 배열 멤버 수 (분할 텍스트) > 1)

True 인 경우 (분할 텍스트 [1] = 분할 오늘 날짜 [1])

상태 표시줄 1. 텍스트 설정 (2, "오늘 메모가 있습니다")

정말 끝난다면.

정말 끝난다면.

서브 루틴 _ 은백색 피부 _ 선택,, 은백색 피부

새 피부 교체 (1)

。 서브 루틴 _ 라이트 스킨 _ 선택,, 라이트 스킨

새 피부 교체 (10)

서브 루틴 _ 밝은 회색 피부 _ 선택,, 밝은 회색 피부

새 피부 교체 (13)

서브루틴 _ 연한 파란색 피부 _ 선택,, 연한 파란색 피부

새 피부 교체 (19)

。 서브 루틴 _ 어두운 피부 _ 선택,, 어두운 피부

새 피부 교체 (5)

서브루틴 _ 반짝이는 은피부 _ 선택, 반짝이는 은피부

새 피부 교체 (2)

。 서브 루틴 _ 미백 피부 _ 선택,, 미백 피부

새 피부 교체 (15)

서브 루틴 _ 밝은 파란색 피부 _ 선택,, 밝은 파란색 피부

새 피부 교체 (18)

。 서브 루틴 _ 어두운 피부 _ 선택,, 어두운 피부

새 피부 교체 (14)

。 하위 프로그램 _ _ Start window _ 끄기 가능, 논리, 투명 표시, 작업 최소화?

。 로컬 변수 변수 1, 정수 유형

변수 1 = 255

。 카운트 사이클 헤드 (255,)

창 투명도를 설정합니다 (_ 시작 창). 창 핸들 (), 변수 1) 을 가져옵니다

변수 1 = 변수 1- 1.

참인 경우 (변수 1 = 1)

트레이 아이콘 설정 (# 프로그램 아이콘, "기존 범례 메모장 v 1.2")

_ 시작 창. 표시 = 거짓

정말 끝난다면.

。 카운트 주기 끝 ()

반환 (거짓)

。 하위 프로그램 _ _ 시작 창 _ 트레이 이벤트,, 투명 디스플레이 _ 시작 창

매개변수 연산 유형, 정수 유형

。 로컬 변수 변수 1, 정수 유형

。 True 인 경우 (작업 유형 = 1)

_ 시작 창. 표시 = 참

。 카운트 사이클 헤드 (255, 변수 1)

창 투명도를 설정합니다 (_ 시작 창). 창 핸들 (), 변수 1) 을 가져옵니다

。 카운트 주기 끝 ()

정말 끝난다면.

。 True 인 경우 (작업 유형 = 3)

팝업 메뉴 (아이콘 메뉴, 수평 마우스 위치 () 및 수직 마우스 위치 () 선택)

정말 끝난다면.

。 하위 프로그램 _ _ 시작 창 _ 이 (가) 제거되고 작업 표시줄 아이콘이 제거됩니다.

트레이 아이콘 설정 ({},)

하위 프로그램 _ 범례 메모장 열기 _ 선택,,, _ 시작 창. Visual = True

_ _ Start Window _ Tray 이벤트 (1)

서브 루틴 _ Destroy _ 선택,,, 소프트웨어 파괴.

제거 ()

하위 프로그램 _ 수퍼 편집 상자 1_ 키, 논리 유형, 입력 중. ...

매개변수 키 코드, 정수 유형

매개 변수 기능 키 상태, 정수 유형

지금 입력하는 것이 사실입니까?

단추 1. 제목 = "입력 ..."

시계 1. 클럭 주기 = 800.

반환 (참)

서브 루틴 _ 수퍼 편집 상자 1_ 키를 놓고, 논리적으로 타이핑을 하고, 타이핑을 일시 중지합니다. ...

매개변수 키 코드, 정수 유형

매개 변수 기능 키 상태, 정수 유형

당신은 지금 가짜를 입력하고 있습니까?

반환 (참)

。 서브 루틴 _ 클럭 1_ 반복 이벤트,, 입력 일시 중지. ...

True 인 경우 (현재 = false 를 입력하고 있는지 여부)

단추 1. 제목 = "입력 중지 ..."

정말 끝난다면.

。 하위 프로그램 _ 수퍼 편집 상자 1_ 선택 영역 변경,, 수퍼 편집 상자 1. 두루마리.

수퍼 편집 상자 1. 스크롤 (1)