Выбор KANала для передачи по наименьшему количеству задач, по которым передана информация

@НИЯЗ94 · Регистрация: 20.04.2013

KAN1-KANМ
Х3=М – количество каналов.
Выбор KANала для передачи по наименьшему количеству задач, по которым передана информация. Режим недоступности накладывается и снимается по KANалам независимо друг от друга.
Ребята как сделать???
я сам по-простому решил, но не понравился преподу)
надо чтоб Х3 менялся а прога работала...
вот прога которую сам написал:
Листинг

Код

	          initial X1,100	
	         initial X2,100
  buf1       storage 3
  buf2       storage 1000000
vrema             table      m1,0,20,50
vich  variable ((n$otkaz1+n$otkaz2+n$otkaz3)/(n$resch+n$otkaz1+n$otkaz2+n$otkaz3))
   generate   225,25
	          gate nu    pk1,otkaz1
                   seize      pk1
                   advance   (exponential (1,0,X1))
                   release    pk1
                   gate snf   buf1,otkaz2
                   gate fv    kan1,otkaz3 
                   gate fv    kan2,otkaz3 
                   gate fv    kan3,otkaz3 
                   enter      buf1
                   test le    x$kolkan1,x$kolkan2,gokan2
                   test le    x$kolkan1,x$kolkan3,gokan3
                   seize      kan1
                   leave      buf1
                   advance    75,15
                   savevalue  kolkan1+,1
                   release    kan1
                   transfer   ,gobuf2
gokan2             test le    x$kolkan2,x$kolkan3,gokan3
                   seize      kan2
                   leave      buf1
                   advance    75,15
                   savevalue  kolkan2+,1
                   release    kan2
                   transfer   ,gobuf2
gokan3             seize      kan3
                   leave      buf1
                   advance    75,15
                   savevalue  kolkan3+,1
                   release    kan3
gobuf2             enter      buf2
                   seize      pk2
                   leave      buf2
                   advance    (normal(1,X2,8))
                   release    pk2
                   tabulate   vrema
resch              savevalue  kol+,1
                   test l     x$kol,300,konec
                   terminate
otkaz1             savevalue  kol+,1
                   test l     x$kol,300,konec
                   terminate 	
otkaz2             savevalue  kol+,1
                   test l     x$kol,300,konec
                   terminate 
otkaz3             savevalue  kol+,1
                   test l     x$kol,300,konec
                   terminate 	
konec              savevalue  verojt,v$vich
                   terminate  100               
got                generate  (exponential(1,0,20000))
                   funavail   kan1
                   funavail   kan2 
                   funavail   kan3
                   advance   (gamma(1,0,25,3))
                   favail    kan1
                   favail    kan2
                   favail    kan3
                   terminate
                   start     100

@Dukalys · 20.04.2013, 17:41

Выбор KANала для передачи по наименьшему количеству задач, по которым передана информация.

Можете пример привести? как выбрать канал по наименьшему количеству задач по которым передана информация - похоже на "мух с катлетами", либо просто не понимаю.
Код огроменный, реализует эту простую задачу? Если пойму условие задачу то скорее всего смогу помочь, смотрю в сторону блока SELECT.

@НИЯЗ94 · 20.04.2013, 17:52 **[ТС]**

ну это как бы так: если 1 кан решает 6, 2кан 5, 3 канал 4..., то выбирается в моем случае 3 канал..

@НИЯЗ94 · 20.04.2013, 17:53 **[ТС]**

Сообщение от Dukalys

Можете пример привести? как выбрать канал по наименьшему количеству задач по которым передана информация - похоже на "мух с катлетами", либо просто не понимаю.
Код огроменный, реализует эту простую задачу? Если пойму условие задачу то скорее всего смогу помочь, смотрю в сторону блока SELECT.

ну это как бы так: если 1 кан решает 6, 2кан 5, 3 канал 4..., то выбирается в моем случае 3 канал..

@Dukalys · 20.04.2013, 18:04

если 1 кан решает 6, 2кан 5, 3 канал 4..., то выбирается в моем случае 3 канал..

А как в KAN может больше 1 заявки на обработке?

Добавлено через 8 минут
Изучите блок SELECT, это позволит выбрать вам номер устройства например с минимальным количеством заявок и тд и тп.

стр 209-212.... Шрайбер. http://rghost.ru/45426572

@НИЯЗ94 · 20.04.2013, 18:04 **[ТС]**

ах да-незя же так походу(
KAN STORAGE 6

@link489 · 11.06.2013, 20:24

Сообщение от НИЯЗ94

ах да-незя же так походу(
KAN STORAGE 6

НИЯЗ94, а этот фрагмент кода у вас правильный

Код

otkaz1          savevalue  kol+,1
                   test l     x$kol,300,konec
                   terminate    
otkaz2          savevalue  kol+,1
                   test l     x$kol,300,konec
                   terminate 
otkaz3           savevalue  kol+,1
                   test l     x$kol,300,konec
                   terminate

@LiSh · 24.06.2013, 19:07

У меня такая же задача - мы выбираем канал таким образом:

Код

gate snf   kaskad
	  enter      kaskad
	  select nu  VIBOR,1,kolKAN,,,otkaz3
	  seize      p$VIBOR

Только я похоже чего-то не правильно сделал:

Код

initial	x$kolKAN,6
initial x$kol,0

buf1	storage 3
buf2	storage 1000000
kaskad  storage 6
ver	    variable (n$otkaz1+n$otkaz2+n$otkaz3)/(n$otkaz1+n$otkaz2+n$otkaz3+n$resch)
     	    generate    225,25
     	    gate nu      pk1,otkaz1
	    seize          pk1
	    advance     (exponential(1,0,100))
	    release       pk1
            gate snf      buf1,otkaz2
	    enter          buf1
	    seize          kan1
	    leave          buf1
            depart        buf1
		    
	    gate snf     kaskad
	    enter         kaskad
	    select nu    VIBOR,1,kolKAN,,,otkaz3
	    seize         p$VIBOR
		
	    advance    (uniform(3,60,90))
	    release       p$VIBOR
	    leave         kaskad
	    queue        buf2
	    seize         pk2
	    depart       buf2
	    advance    (normal(2,100,8))
	    release      pk2
		
resh	    savevalue	 kol+,1
	    test l	         x$kol,300,konec
	    terminate
	
otkaz1   savevalue	 kol+,1
            test l	         x$kol,300,konec
            terminate 
		 
otkaz2   savevalue	 kol+,1
            test l	         x$kol,300,konec
            terminate
		 
otkaz3   savevalue	 kol+,1
            test l	         x$kol,300,konec
            terminate
		 
konec     savevalue	 verotkaz,v$ver
	     terminate       1
	     start 	        1
		 
got         generate    (exponential(1,0,20000))
	     funavail      kaskad
	     advance    (gamma(1,0,25,3))
	     favail         kaskad
	     terminate
	     start         100

Может можно как-нить его код переделать (у меня похоже ошибок полно)?
Помогите, пожалуйста доделать код - завтра уже сдавать

PS: просьба сильно не пинаться - с GPSS недавно познакомился

@Dukalys 1815 / 1029 / 285 Регистрация: 13.02.2012 Сообщений: 3,339
	20.04.2013, 17:41	2
	Выбор KANала для передачи по наименьшему количеству задач, по которым передана информация. Можете пример привести? как выбрать канал по наименьшему количеству задач по которым передана информация - похоже на "мух с катлетами", либо просто не понимаю. Код огроменный, реализует эту простую задачу? Если пойму условие задачу то скорее всего смогу помочь, смотрю в сторону блока SELECT. 1

@НИЯЗ94 3 / 3 / 0 Регистрация: 20.04.2013 Сообщений: 8
	20.04.2013, 17:52 [ТС]	3
	ну это как бы так: если 1 кан решает 6, 2кан 5, 3 канал 4..., то выбирается в моем случае 3 канал.. Миниатюры 1

@НИЯЗ94 3 / 3 / 0 Регистрация: 20.04.2013 Сообщений: 8
	20.04.2013, 17:53 [ТС]	4
	Сообщение от Dukalys Можете пример привести? как выбрать канал по наименьшему количеству задач по которым передана информация - похоже на "мух с катлетами", либо просто не понимаю. Код огроменный, реализует эту простую задачу? Если пойму условие задачу то скорее всего смогу помочь, смотрю в сторону блока SELECT. ну это как бы так: если 1 кан решает 6, 2кан 5, 3 канал 4..., то выбирается в моем случае 3 канал.. 0

@Dukalys 1815 / 1029 / 285 Регистрация: 13.02.2012 Сообщений: 3,339
	20.04.2013, 18:04	5
	если 1 кан решает 6, 2кан 5, 3 канал 4..., то выбирается в моем случае 3 канал.. А как в KAN может больше 1 заявки на обработке? Добавлено через 8 минут Изучите блок SELECT, это позволит выбрать вам номер устройства например с минимальным количеством заявок и тд и тп. стр 209-212.... Шрайбер. http://rghost.ru/45426572 1

@НИЯЗ94 3 / 3 / 0 Регистрация: 20.04.2013 Сообщений: 8
	20.04.2013, 18:04 [ТС]	6
	ах да-незя же так походу( KAN STORAGE 6 0

@link489 0 / 0 / 0 Регистрация: 04.04.2013 Сообщений: 19
	11.06.2013, 20:24	7
	Сообщение от НИЯЗ94 ах да-незя же так походу( KAN STORAGE 6 НИЯЗ94, а этот фрагмент кода у вас правильный Код otkaz1 savevalue kol+,1 test l x$kol,300,konec terminate otkaz2 savevalue kol+,1 test l x$kol,300,konec terminate otkaz3 savevalue kol+,1 test l x$kol,300,konec terminate 0

Опции темы