Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- GENERATE (BINOMIAL(1,1,0.5))
- ;Начала первой цепи
- LANC1 TRANSFER 0.69,KANAL11,ELSE1
- KANAL11 SEIZE CAN11;
- ASSIGN 1,CAN11;
- ADVANCE (EXPONENTIAL(1,0,60))
- TRANSFER ,LANC1END
- ELSE1 TRANSFER ALL,KANAL12,KANAL13,4
- KANAL12 SEIZE CAN12
- ASSIGN 1,CAN12;
- ADVANCE (EXPONENTIAL(1,0,60))
- TRANSFER ,LANC1END
- KANAL13 SEIZE CAN13
- ASSIGN 1,CAN13;
- ADVANCE (EXPONENTIAL(1,0,60))
- TRANSFER ,LANC1END
- LANC1END RELEASE P1
- TRANSFER , LANC2
- ;Начало второй цепи
- LANC2 SEIZE CAN21;
- ASSIGN 1,CAN21;
- ADVANCE (EXPONENTIAL(1,0,60))
- RELEASE P1
- TRANSFER ,LANC3
- ;Начало третей цепи
- LANC3 TRANSFER 0.69,KANAL31,KANAL32
- KANAL31 SEIZE CAN31;
- ASSIGN 1,CAN31;
- ADVANCE (EXPONENTIAL(1,0,60))
- TRANSFER ,LANC3END
- KANAL32 SEIZE CAN32
- ASSIGN 1,CAN32;
- ADVANCE (EXPONENTIAL(1,0,60))
- TRANSFER ,LANC3END
- LANC3END RELEASE P1
- TERMINATE 1
- START 32500
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement