请教用户自定义元件

skystarting

按照ATP的rule book中RB—19E的DATA BASE MODULE部分的例子填了卡片，但不知道为何不产生.pch的打孔文件，请教各位达人可知原因，不胜感激
3 D  P/ O0 E1 j7 Q1 Q/ M; GBEGIN NEW DATA CASE                ----  NOSORT  ----
/ f2 |0 t1 G1 H$ q; L6 LDATA BASE MODULE
$ERASE
ARG, _NODE, _MINUS, __PLUS, _FIRE,RESIS,CAPACI
NUM,RESIS,CAPACI
0 i& M' @( w( H9 k9 k! h& ADUM,__MID1,__MID2,__MID3,__MID4,__MID5,__MID6
- {) r& h/ w) v. X) v# {6 s# H7 }/BRANCH
8 F0 G; T6 O5 |; _( h5 |" MC3  Begin with anode reactors and parallel resistors (6 pairs):
  _NODEA__MID1             RESIS      CAPACI
( D! R: [4 W) p5 m1 S$ }6 {0 n  _NODEA__MID1                     1.0
  _NODEB__MID3             RESIS
+ R5 I" k# p* P  v( B+ B& G  _NODEB__MID3                     1.0
3 K4 z3 z& m, @  _NODEC__MID5             RESIS
  _NODEC__MID5                     1.0
' H/ L0 V/ ^7 a+ ^0 q. E  __PLUS__MID4             RESIS
2 q, {. U7 Z% J$ a% J6 r  __PLUS__MID4                     1.0
  __PLUS__MID6             RESIS
  __PLUS__MID6                     1.0
  __PLUS__MID2             RESIS
2 O4 a( u8 n( _  K  L0 ~  __PLUS__MID2                     1.0
- ^6 l* H7 p  u6 g* X' e" L# L; sC3  Next come the snubber circuits, across valves and anode reactors:
) l# \8 G2 S  u' U( \- f  _NODEA_MINUS             1200.         0.1
8 i6 @" C" m2 {  _NODEB_MINUS             1200.         0.1
2 w+ M6 b9 t- F  _NODEC_MINUS             1200.         0.1
  _NODEA__PLUS             1200.         0.1
  _NODEB__PLUS             1200.         0.1
  _NODEC__PLUS             1200.         0.1
% U0 S2 L9 ^0 W6 @# j" s5 ]C3  Next come the valves:
: ?) X2 z3 F! K* n/ \/SWITCH
4 S) H0 T3 z# P* M11__MID1_MINUS                                                  _FIRE2
11__MID3_MINUS                                                  _FIRE4
11__MID5_MINUS                                                  _FIRE6
11__MID4_NODEA                                                  _FIRE5
11__MID6_NODEB                                                  _FIRE1
11__MID2_NODEC                                                  _FIRE3
BEGIN NEW DATA CASE
C Just a comment card
$PUNCH          { Flush critical portion of answers from preceding first subcase
/ W4 K- A1 S. I3 e& K6 X3 C+ e; n2 HBEGIN NEW DATA CASE
  r1 a9 H: |6 l* H3 M7 O0 JBLANK

hbtslc

在最后一个BLANK后加一个回车换行，就可以啦。